(proc                                                                          /* AST (R-5) */
    (name 'Add')
    (arg
        ((name 'A1') (type (' T_INTEGER T_FLOAT)))
        ((name 'A2') (type (' T_INTEGER T_FLOAT)))
    )
    (ret (' T_INTEGER T_FLOAT)))
    (_
        (return (add 'A1' 'A2'))
    )
)
