zip2 . ((~)*.(<)*.zip2.(2π2//.(2π1)*,b_if(<,2π2,2π1)//.(2π2)*)o.++.(b_allvec[(id,id)o.2π2]o.(((id,(4π3)*.(2π2)*.(b_while((2π1,(+.(4π1.2π2,2.0)o,×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),~.4π4.2π2)o)o,>.(b_if(<.(-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o,0.0)o,-.(toFloat.0,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o)o,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o),0.00001)o))*.zip2.(zip2.(zip2.(repeat.(id,#)o,id)o,(⁄)*.zip2.((2π2)*,(2π1)*)o)o,zip4.(repeat.(1.0,#)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,repeat.(false,#)o)o)o)o,zip2.(id,id)o.(4π3)*.(2π2)*.(b_while((2π1,(+.(4π1.2π2,2.0)o,×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),~.4π4.2π2)o)o,>.(b_if(<.(-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o,0.0)o,-.(toFloat.0,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o)o,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o),0.00001)o))*.zip2.(zip2.(zip2.(repeat.(id,#)o,id)o,(⁄)*.zip2.((2π2)*,(2π1)*)o)o,zip4.(repeat.(1.0,#)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,repeat.(false,#)o)o)o)o,-0.785398)o,zip2.(id,id)o.(4π3)*.(2π2)*.(b_while((2π1,(+.(4π1.2π2,2.0)o,×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),~.4π4.2π2)o)o,>.(b_if(<.(-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o,0.0)o,-.(toFloat.0,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o)o,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o),0.00001)o))*.zip2.(zip2.(zip2.(repeat.(id,#)o,id)o,(⁄)*.zip2.((2π2)*,(2π1)*)o)o,zip4.(repeat.(1.0,#)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,repeat.(false,#)o)o)o)o,(!)*.zip2.((++)*.zip2.((b_allvec[(id,id)o.0.0]o)*.zip2.(zip2.(repeat.((((id,(4π3)*.(2π2)*.(b_while((2π1,(+.(4π1.2π2,2.0)o,×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),~.4π4.2π2)o)o,>.(b_if(<.(-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o,0.0)o,-.(toFloat.0,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o)o,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o),0.00001)o))*.zip2.(zip2.(zip2.(repeat.(id,#)o,id)o,(⁄)*.zip2.((2π2)*,(2π1)*)o)o,zip4.(repeat.(1.0,#)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,repeat.(false,#)o)o)o)o,zip2.(id,id)o.(4π3)*.(2π2)*.(b_while((2π1,(+.(4π1.2π2,2.0)o,×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),~.4π4.2π2)o)o,>.(b_if(<.(-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o,0.0)o,-.(toFloat.0,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o)o,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o),0.00001)o))*.zip2.(zip2.(zip2.(repeat.(id,#)o,id)o,(⁄)*.zip2.((2π2)*,(2π1)*)o)o,zip4.(repeat.(1.0,#)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,repeat.(false,#)o)o)o)o,(2π1.2π2,b_if(<.(2π2.2π1,2π2.2π2)o,2π2.2π2,2π2.2π1))o//.++.(b_allvec[(id,id)o.2π2]o.(((id,(4π3)*.(2π2)*.(b_while((2π1,(+.(4π1.2π2,2.0)o,×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),~.4π4.2π2)o)o,>.(b_if(<.(-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o,0.0)o,-.(toFloat.0,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o)o,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o),0.00001)o))*.zip2.(zip2.(zip2.(repeat.(id,#)o,id)o,(⁄)*.zip2.((2π2)*,(2π1)*)o)o,zip4.(repeat.(1.0,#)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,repeat.(false,#)o)o)o)o,zip2.(id,id)o.(4π3)*.(2π2)*.(b_while((2π1,(+.(4π1.2π2,2.0)o,×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),~.4π4.2π2)o)o,>.(b_if(<.(-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o,0.0)o,-.(toFloat.0,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o)o,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o),0.00001)o))*.zip2.(zip2.(zip2.(repeat.(id,#)o,id)o,(⁄)*.zip2.((2π2)*,(2π1)*)o)o,zip4.(repeat.(1.0,#)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,repeat.(false,#)o)o)o)o,-0.785398)o,zip2.(id,id)o.(4π3)*.(2π2)*.(b_while((2π1,(+.(4π1.2π2,2.0)o,×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),~.4π4.2π2)o)o,>.(b_if(<.(-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o,0.0)o,-.(toFloat.0,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o)o,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o),0.00001)o))*.zip2.(zip2.(zip2.(repeat.(id,#)o,id)o,(⁄)*.zip2.((2π2)*,(2π1)*)o)o,zip4.(repeat.(1.0,#)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,repeat.(false,#)o)o)o)o)o,#)o,iota.#)o,(2π1.2π2,b_if(<.(2π2.2π1,2π2.2π2)o,2π2.2π2,2π2.2π1))o//.++.(b_allvec[(id,id)o.2π2]o.(((id,(4π3)*.(2π2)*.(b_while((2π1,(+.(4π1.2π2,2.0)o,×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),~.4π4.2π2)o)o,>.(b_if(<.(-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o,0.0)o,-.(toFloat.0,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o)o,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o),0.00001)o))*.zip2.(zip2.(zip2.(repeat.(id,#)o,id)o,(⁄)*.zip2.((2π2)*,(2π1)*)o)o,zip4.(repeat.(1.0,#)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,repeat.(false,#)o)o)o)o,zip2.(id,id)o.(4π3)*.(2π2)*.(b_while((2π1,(+.(4π1.2π2,2.0)o,×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),~.4π4.2π2)o)o,>.(b_if(<.(-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o,0.0)o,-.(toFloat.0,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o)o,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o),0.00001)o))*.zip2.(zip2.(zip2.(repeat.(id,#)o,id)o,(⁄)*.zip2.((2π2)*,(2π1)*)o)o,zip4.(repeat.(1.0,#)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,repeat.(false,#)o)o)o)o,-0.785398)o,zip2.(id,id)o.(4π3)*.(2π2)*.(b_while((2π1,(+.(4π1.2π2,2.0)o,×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),~.4π4.2π2)o)o,>.(b_if(<.(-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o,0.0)o,-.(toFloat.0,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o)o,-.(b_if(4π4.2π2,+.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o,-.(4π3.2π2,⁄.(×.(×.(4π2.2π2,2π2.2π1)o,2π2.2π1)o,+.(4π1.2π2,2.0)o)o)o),4π3.2π2)o),0.00001)o))*.zip2.(zip2.(zip2.(repeat.(id,#)o,id)o,(⁄)*.zip2.((2π2)*,(2π1)*)o)o,zip4.(repeat.(1.0,#)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,(⁄)*.zip2.((2π2)*,(2π1)*)o,repeat.(false,#)o)o)o)o)o,repeat.(id,#)o)o,iota.#)o)o