[Sub : *p1 ; & 458 181] - -Out(524 186)(485 188)(577 185)->[Int :r_result ; $1 & 577 174], <-In2(417 223)(389 249)(460 197)-[Int : 1 ; & 373 249], <-In1,f(381 189)(329 189)(458 190)-[Int : *p2 ; & 310 182]<-Out(229 185)(163 180)(310 190)-[Mul : *p3 ; & 139 172] - <-In2,f(142 213)(158 239)(151 188)-[Int : *p4 ; & 148 239]<-Out(218 249)(283 252)(167 247)-[Read ; & 283 245], <-In1,f(139 139)(158 106)(145 172)-[Int : *p5 ; & 151 90]<-Out(236 99)(316 100)(170 98)-[Read ; & 316 94]