jam disjoint init (a) 0 0 100 100 makesymbol 0 75 #1 (0 75 #1 (2 .copy (a) 3 1 .roll makeinstance .pop).cvx .for).cvx .for