The Forum for Discussion about The Third Manifesto and Related Matters

Please or Register to create posts and topics.

A better sample of 'C# as D' Mark II

Here is the DTARM parts explosion implemented using 'C# as D', Mark II, heading only version.

Note that this uses the basic Codd-style RA plus 3 extensions: new value, aggregation, while (fixed point recursion).

This code (based on headings only) is easier to write than the last (based on declared types and generics). It mostly corresponds line for line with TD.

I'm yet to decide whether I like it enough to use directly, but it would make a solid basis for a simple pre-processor.

      // source data
      var mmqi = RelationNode.Import(SourceKind.Csv, ".", "MMQ", "MajorPNo:text,MinorPNo:text,Qty:number");

      // phase 1 - path generation and calculation
      var mmexp = mmqi.Rename("Qty,ExpQty")
        .While(new TupWhile(tw => tw
        .Extend("Qty,ExpQty,ExpQty", new TupExtend(t => (decimal)t[0] * (decimal)t[1]))

MajorPNo:P4, MinorPNo:P6, ExpQty:8
MajorPNo:P3, MinorPNo:P5, ExpQty:4
MajorPNo:P2, MinorPNo:P4, ExpQty:7
MajorPNo:P2, MinorPNo:P6, ExpQty:56
MajorPNo:P2, MinorPNo:P3, ExpQty:2
MajorPNo:P2, MinorPNo:P5, ExpQty:8
MajorPNo:P1, MinorPNo:P3, ExpQty:3
MajorPNo:P1, MinorPNo:P5, ExpQty:12
MajorPNo:P1, MinorPNo:P2, ExpQty:5
MajorPNo:P1, MinorPNo:P4, ExpQty:35
MajorPNo:P1, MinorPNo:P6, ExpQty:280
MajorPNo:P1, MinorPNo:P3, ExpQty:10
MajorPNo:P1, MinorPNo:P5, ExpQty:40

      // phase 2 - aggregation of paths
      var mmagg = mmexp
        .Aggregate("ExpQty,TotQty", new TupAggregate((v, a) => (decimal)v + (decimal)a));

MajorPNo:P4, MinorPNo:P6, TotQty:8
MajorPNo:P3, MinorPNo:P5, TotQty:4
MajorPNo:P2, MinorPNo:P4, TotQty:7
MajorPNo:P2, MinorPNo:P6, TotQty:56
MajorPNo:P2, MinorPNo:P3, TotQty:2
MajorPNo:P2, MinorPNo:P5, TotQty:8
MajorPNo:P1, MinorPNo:P3, TotQty:13
MajorPNo:P1, MinorPNo:P5, TotQty:52  // <<=== this is the DTATRM example
MajorPNo:P1, MinorPNo:P2, TotQty:5
MajorPNo:P1, MinorPNo:P4, TotQty:35
MajorPNo:P1, MinorPNo:P6, TotQty:280


Andl - A New Database Language -