7 lines
99 B
Text
7 lines
99 B
Text
|
|
declare
|
||
|
|
fun {IsFruit A}
|
||
|
|
{Member A [apple banana cherry]}
|
||
|
|
end
|
||
|
|
in
|
||
|
|
{Show {IsFruit banana}}
|