applications.collages.collageAlgebra("triangles"):
{  
  sqA1 = {
           filledPolygon((0,0),(-18.5,-18.5),(18.5,-18.5))[.3,.7,.2],
           polygon((0,0),(-18.5,-18.5),(18.5,-18.5)),
           filledPolygon((-18.5,-18.5),(0,-37),(0,-18.5))[.9,.85,.85],
           polygon((-18.5,-18.5),(0,-37),(0,-18.5)),
           filledPolygon((18.5,-18.5),(0,-37),(0,-18.5))[.8,.2,.2],
           polygon((18.5,-18.5),(0,-37),(0,-18.5))
         },

  sqA1b = #sqA1,

  sqB1a = { filledPolygon((0,0),(-18.5,-18.5),(0,-37))[.9,.85,.85],
            polygon((0,0),(-18.5,-18.5),(0,-37)),
            filledPolygon((0,0),(18.5,-18.5),(0,-37))[.8,.2,.2],
            polygon((0,0),(18.5,-18.5),(0,-37))
          },
        
  sqB1b = #sqB1a,
        
  sqB1c = #sqB1a,
        
  sqA2 = {
           filledPolygon((0,0),(-18.5,-18.5),(18.5,-18.5))[.8,.2,.2],
           polygon((0,0),(-18.5,-18.5),(18.5,-18.5)),
           filledPolygon((-18.5,-18.5),(0,-37),(0,-18.5))[.9,.85,.85],
           polygon((-18.5,-18.5),(0,-37),(0,-18.5)),
           filledPolygon((18.5,-18.5),(0,-37),(0,-18.5))[.3,.7,.2],
           polygon((18.5,-18.5),(0,-37),(0,-18.5))
         },

  sqA2b = #sqA2,

  sqB2a = { filledPolygon((0,0),(-18.5,-18.5),(0,-37))[.9,.85,.85],
            polygon((0,0),(-18.5,-18.5),(0,-37)),
            filledPolygon((0,0),(18.5,-18.5),(0,-37))[.3,.7,.2],
            polygon((0,0),(18.5,-18.5),(0,-37))
          },
        
  sqB2b = #sqB2a,
        
  sqB2c = #sqB2a,
  
  I = { filledPolygon((-37,-37),(37,-37),(37,37),(-37,37))[.7],
        polygon((-37,-37),(37,-37),(37,37),(-37,37)) },
  LR1 = { filledPolygon((0,0),(-37,-37),(37,-37))[.6],
          polygon((0,0),(-37,-37),(37,-37)) },
  LR2 = { filledPolygon((0,0),(-37,-37),(37,-37))[.8],
          polygon((0,0),(-37,-37),(37,-37)) },
  L1 = #LR1,
  L2 = #LR2,
  M1 = { filledPolygon((0,0),(-18.5,-18.5),(0,-37),(37,-37))[.6],
         polygon((0,0),(-18.5,-18.5),(0,-37),(37,-37)) },
  M2 = { filledPolygon((0,0),(-18.5,-18.5),(0,-37),(37,-37))[.8],
         polygon((0,0),(-18.5,-18.5),(0,-37),(37,-37)) },
  R1 = #M1,
  R2 = #M2,

  i1 = rotate(0),
  i2 = rotate(90),
  i3 = rotate(180),
  i4 = rotate(270),
  init = <i1,i2,i3,i4>,
  
  id = scale(1),
  f1 = scale(.5) . translate(-18.5,-18.5),
  f2 = scale(.5) . translate(18.5,-18.5),
  f3 = scale(.5) . translate(-27.75,-27.75),
  f4 = scale(.5) . translate(-9.25,-27.75),
  f5 = scale(.5) . translate(9.25,-27.75),
  f6 = scale(.5) . translate(27.75,-27.75),
  F = <id, f1, f2, f3, f4, f5, f6>,
  G = <id, f2, f5, f6>
 
}
