7 lines
103 B
Text
7 lines
103 B
Text
(tc +)
|
|
|
|
(datatype fruit
|
|
|
|
if (element? Fruit [apple banana cherry])
|
|
_____________
|
|
Fruit : fruit;)
|