(v.!$if.(f1.amdahl.(mv.!$.\(v.{.e)?)0,(mv.!$.\(v.{.,i.{.))0),m)0m-0
(f.predicate  A.s.integerfn  A.(f1.(.i. .)?)0m-0
(f.true .s.result =1.)0m-0
(f.false .s.result =0.)0m-0
U -
(f. a(.r2nri.#0.)0m-0
(f. assop.s. assop#0.)0m-0
(f.  else  if .ri.finish .(f1.;.,r0)i. start .)0m-0
(f.  else .(v.  else  .,s.  finishelsestart .))0m-0
(f.shortinteger.s.integer.)0
c