src/Tools/8bit/isa-patches/HOLCF/Porder.p
author wenzelm
Sun, 21 May 2000 14:36:29 +0200
changeset 8898 a1ee54500516
parent 1826 2a2c0dbeb4ac
permissions -rw-r--r--
removed is_type_abbr; added certify_class, certify_sort, read_sort; adapted to inner syntax of sorts;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1826
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     1
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     2
syntax
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     3
  "Glub"        :: "[pttrn, 'a] => 'a"               ("(3×_./ _)" 10)
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     4
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     5
translations
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     6
  "×x.t"	== "lub(range(%x.t))"
2a2c0dbeb4ac Initial revision
oheimb
parents:
diff changeset
     7