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