LetExp(
DecList(
FunctionDec(f
FieldList(
x,
string,
false,
FieldList()),
CallExp(print,
ExpList(
VarExp(
SimpleVar(x))
:NAME(string)
=STRING))
:VOID,
FunctionDec())
let
function f( x :
string ) =
print( x )
in
f( “hello” )
end