module Soho
  ofthen(3 , var)
  int ofthen(int n,ref m )
    return 44
  end
end
-- -- --
s(:expressions, 
  s(:module,  :Soho, 
    s(:call, 
      s(:name,  :ofthen), 
      s(:arguments, 
        s(:int,  3), 
        s(:name,  :var))), 
    s(:function,  :int, 
      s(:name,  :ofthen), 
      s(:parameters, 
        s(:field,  :int,  :n), 
        s(:field,  :ref,  :m)), 
      s(:expressions, 
        s(:return, 
          s(:int,  44))))))