doc-src/Tutorial/Datatype/abdata
author wenzelm
Fri, 12 May 2000 11:52:44 +0200
changeset 8857 7ec405405dd7
parent 5851 15ce4c1c8313
permissions -rw-r--r--
improved name of simproc;

datatype
    'a aexp = IF ('a bexp) ('a aexp) ('a aexp)
            | Sum ('a aexp) ('a aexp)
            | Diff ('a aexp) ('a aexp)
            | Var 'a
            | Num nat
and 'a bexp = Less ('a aexp) ('a aexp)
            | And ('a bexp) ('a bexp)
            | Neg ('a bexp)