let val aa = sew(a,b) val aa = turn(b) in sew(aa,aa) end