ifs
domain [-1,1] [-1,1]

transform scl(1/phi**2) trl(cos(2*0*pi/5)/phi, sin(2*0*pi/5)/phi)
transform scl(1/phi**2) trl(cos(2*1*pi/5)/phi, sin(2*1*pi/5)/phi)
transform scl(1/phi**2) trl(cos(2*2*pi/5)/phi, sin(2*2*pi/5)/phi)
transform scl(1/phi**2) trl(cos(2*3*pi/5)/phi, sin(2*3*pi/5)/phi)
transform scl(1/phi**2) trl(cos(2*4*pi/5)/phi, sin(2*4*pi/5)/phi)

dots 30000
order 5 

image scl(10) rot(90)