(program	
 (struct P
  [(:= v float2)])

 (fun vertex vs_main
  [] 
  (:= p P) 
  (= p.v.x.y 2)))