(program	
 (fun foo -> float
  [(:= x float) 
   (:= y float) 
   (:= z float)] 
  (return (* (* x y) z)))

 (fun foo -> float
  [(:= x float) 
   (:= y float) 
   (:= z float) 
   (:= w float)] 
  (return (* (* (* x y) z) w)))

 (fun vertex vs_main
  [] 
  (foo 2 3)))