applications.collages.collageAlgebra:
{
  n = const(4),
  alpha = const(90/(#n + .5)),
  c = const(1/(1+2*cos(#alpha))),
  
  p = { polyline((-1,0),(1,0)) },

  f1 = translate(1,0) . rotate(#alpha) . scale(#c) . translate(-1,0),
  f2 = translate(1,0) . rotate(-#alpha) . scale(#c) . translate(-1,0),
  f3 = translate(0,-tan(#alpha)) . scale(#c) . translate(0,tan(#alpha)),
  f4 = translate(0,tan(#alpha)) . scale(#c) . translate(0,-tan(#alpha)),
  f5 = translate(-1,0) . rotate(-#alpha) . scale(#c) . translate(1,0),
  f6 = translate(-1,0) . rotate(#alpha) . scale(#c) . translate(1,0),
  F = <f1,f2,f3,f4,f5,f6>
}
