sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (null sqs_l1) [] (LET x = (hd sqs_l1); sqs_t1 = (tl sqs_l1) IN (if (odd x) ((sq x):(sqs_h1 sqs_t1)) (sqs_h1 sqs_t1)))) IN (sqs_h1 xs)); xys xs ys = (LET xys_h2 xys_l2 = (if (null xys_l2) [] (LET x = (hd xys_l2); xys_t2 = (tl xys_l2) IN (LET xys_h3 xys_l3 = (if (null xys_l3) (xys_h2 xys_t2) (LET y = (hd xys_l3); xys_t3 = (tl xys_l3) IN ((x,y):(xys_h3 xys_t3)))) IN (xys_h3 ys)))) IN (xys_h2 xs)); sq x = (x*x); odd x = (if ((x%1)=0) true false); q c d = (LET e z = (c*z); p a b = (LET f x y = (c*x); g y z = (f b y); h = (g a d) IN (f (g h a) c)); q = (e (p c d)) IN (e q)); sqs xs = (LET sqs_h1 sqs_l1 = (if (