Sine_Wave          { ; Fractal of the day, 07-03-98
                     ; par file, 4min, 100mhz, 640x480
  reset=1960 type=formula 
  formulaname=IfElse03 function=sin/tan passes=1
  center-mag=0.057682/0.358976/2.963752 params=1/-1.5/2/0/2/0
  float=y maxiter=400 bailout=25 inside=bof60 logmap=yes
  symmetry=none periodicity=10 colors=000FAF37C<7>HMUzzzzzzz\
  zzszzrzz<12>enzdmyclwbkv`iz`hw`hv_gu_ft`cpbakc_feWbfTYhQUi\
  OP<2>nECpA7p17<64>hmMhmMglM<38>FKaEJbEJbEJb<40>UEVUEVUFV<5\
  0>GZWGZWHZWI_WJ_W
  }

frm:IfElse03 {; Jim Muth
 z=y=pixel, a=real(p1), b=imag(p1),
 c=p2+(p3*pixel), w=0:
IF(w)
 z=fn1(real(y))+fn2(imag(y)), w=0
ELSE
 z=(y*a), w=w+1
ENDIF
  z=z^b+c, y=z,
   |z| <= 100 
}