applications.collages.collageAlgebra:
{
  C = { polyline((0,0),(10,0)) width .1 },
  
  f1 = scale(1/3),
  f2 = scale(1/3) . translate(20/3,0),
  F = < f1, f2 >,
  
  S = { filledPolygon((0,0),(10,0),(10,10)) },
  
  g1 = scale(1/3, .5),
  g2 = scale(1/3, .5) . translate(20/3,5),
  G = <g1, g2, { filledPolygon((10/3,0),(10,0),(10,5), (10/3,5)) } >,

  i1 = scale(1),
  i2 = translate(0,-.5),
  I = <i1, i2>
  
}
