Start working on cata generator

ConsumePlugin/GeneratedCatamorphism.fs

@@ -0,0 +1,29 @@
+//------------------------------------------------------------------------------
+//        This code was generated by myriad.
+//        Changes to this file will be lost when the code is regenerated.
+//------------------------------------------------------------------------------
+
+
+
+
+
+namespace ConsumePlugin
+
+open WoofWare.Myriad.Plugins
+
+/// Catamorphism
+[<RequireQualifiedAccess>]
+module ExprCata =
+    /// Execute the catamorphism.
+    let runExpr (cata : Cata<'ExprRet, 'ExprBuilderRet>) : 'ExprRet =
+        let instructions = ResizeArray ()
+        instructions.Add (Instruction.ProcessExpr x)
+        let ExprRetStack, ExprBuilderRetStack = loop cata instructions
+        Seq.exactlyOne ExprRetStack
+
+    /// Execute the catamorphism.
+    let runExprBuilder (cata : Cata<'ExprRet, 'ExprBuilderRet>) : 'ExprBuilderRet =
+        let instructions = ResizeArray ()
+        instructions.Add (Instruction.ProcessExprBuilder x)
+        let ExprRetStack, ExprBuilderRetStack = loop cata instructions
+        Seq.exactlyOne ExprBuilderRetStack