feat: Update cyclic functions to be aware of being in a cycle.

Finish the creation of cyclic functions
The last part is to update vars that call into a function in the cycle

examples/acceptance_tests/066/aiken.lock

@@ -3,3 +3,5 @@
 
 requirements = []
 packages = []
+
+[etags]

examples/acceptance_tests/066/lib/tests.ak

@@ -18,8 +18,8 @@ fn sum_list(list: List<Schema>) -> Int {
 }
 
 test foo() {
-  False
+  // False
   // Can't enable the "real" test because it puts the UPLC evaluator in an infinite loop.
   // -
-  // sum(List([List([Integer(1), Integer(2)]), Integer(3), Integer(4)])) == 10
+  sum(List([List([Integer(1), Integer(2)]), Integer(3), Integer(4)])) == 10
 }