doc-src/Tutorial/Datatype/mutnested
author wenzelm
Fri, 14 Dec 2001 22:29:51 +0100
changeset 12512 ab14b29dfc6d
parent 9255 2ceb11a2e190
permissions -rw-r--r--
removed special treatment of "_" in syntax (now covered by \<index> arg);

datatype
    'a aexp = IF ('a bexp) ('a aexp) ('a aexp)
            | Sum ('a aexp list)
            | 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)