up [pdf]
from rsf.proj import *

Flow('rose',None,
     '''
     math n1=629 d1=0.01 o1=0 n2=40 d2=1 o2=5 
     output="x2*(8+sin(6*x1+x2/10))" |
     rtoc |
     math output="input*exp(I*x1)"
     ''')

Result('rose',
       'graph title=Rose screenratio=1 wantaxis=n')

End()

sfmath
sfrtoc
sfgraph