comment {

These are Modified Carr formulas based on the original with
the gracious permission of Dr. Robert Carr. Utmost care has
been taken to preserve the original formulation fully intact. 
Several "User Friendly" additions have been made which allow 
the user to alter the fractal through the following parameters:

Scale: 
Use this parameter to reduce or enlarge the image 
without having to zoom the entire image.Depending
on the complexity of Z, larger numbers may be needed
to produce desired scale.Begin with 2, 4, 6, 8, etc. 

Bailout:
The user may now change this parameter as desired.
In a few cases, more than one bailout may be chosen.

Functions(3-4):
In most cases, extreme changes in form may be achieved
by varying one or more of these formula functions.

NOTE: In the interest of faster calculation speeds,
the original "Maxiter" (maximum iterations) default
has been lowered from 500 to 100. I found that, in 99.99%
of instances there was no detectable difference, and in the
0.01% of instances with a difference, these were very small.

My gratefull thanks go to Dr. Robert Carr, both for writing 
such great formulations and for graciously permitting me to
add what little functionality my small knowledge allows. 

I hope that you will find these modifications helpful.
}

===================================================================

Carr-900S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (cotanh(#pixel+1)/imag(1/#pixel-0.334))/@scale
  c = sqr(sqr(sqr(#pixel*1/#pixel)))
  
loop: 
  z = fn1(fn2(fn3((z^real(2.124)+c)/1.7)))
  
bailout:  
  |real(z)| <= @bailout

default:
title = "Carr-900S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100
angle = 90

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-901S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (cotanh(#pixel+1)/imag(1/#pixel-0.334))/@scale
  c = sqr(sqr(sqr(#pixel*1/#pixel)))

loop:
  z = fn1(fn2(fn3(tanh(z^real(2.524)+c)/1.7)))
  
bailout:
  |real(z)| <= @bailout

default:
title = "Carr-901S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-902S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (sinh(#pixel+1)/imag(1/#pixel-0.334))/@scale
  c = sqr(sqr(sqr(#pixel*1/#pixel)))
  
loop:
  z = fn1(fn2(fn3(cotanh(z^exp(2.424)+c)/1.7)))
  
bailout:
  |real(z)| <= @bailout

default:
title = "Carr-902S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-903S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = imag(1/#pixel*0.91/#pixel)
  
loop:
  z = fn1(fn2(fn3((sqr(conj(z))*conj(z)+conj(2.124))/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout

default:
title = "Carr-903S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-904 {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (((1-#pixel)/3)^0.5)/@scale
  c = (1-1/#pixel)^0.5
  
loop:
  z = fn1(fn2(fn3(z*z+c)))
  
bailout:
  |real(z)| <= @bailout

default:
title = "Carr-904S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-905S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Modified Richard frm
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/#pixel)/@scale
  c = #pixel-sqr(z)
  c = #pixel +c/z
  
loop:
  z = fn1(fn2(fn3(c-z*#pixel)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-905S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-906S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/#pixel)/@scale
  c = conj(#pixel-sqr(z))
  
loop:
  z = fn1(fn2(fn3(c-z*#pixel)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-906S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-907S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (exp(1/#pixel))
  c = conj(#pixel-sqr(z))
  
loop:
  z = fn1(fn2(fn3((c-z*#pixel)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-907S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-908S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (cotanh(exp(1/#pixel)))/@scale
  c = conj(#pixel-sqr(z))
  
loop:
  z = fn1(fn2(fn3(c+z*#pixel-1)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-908S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-909S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (conj(exp(1/#pixel)))/@scale
  c = conj(#pixel-sqr(z))
    
loop:
  z = fn1(fn2(fn3(z*z+c)))
  z = z*1/c
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-909S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================

Carr-910S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/#pixel)/1.91
  c = ((1/#pixel)/2)/z-2.5^tanh(#pixel-1.124)
  
loop:
  z = fn1(fn2(fn3(c-z*#pixel)))
  z = z*1/c
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-910S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-911S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = 1/(#pixel*#pixel)
  c = imag(1/#pixel*0.91/#pixel)
  
loop:
  z = fn1(fn2(fn3(c-z*#pixel)))
  z = c^2+#pixel+z
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-911S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================

Carr-912S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = 1/(#pixel*#pixel)
  c = imag(1/#pixel*0.91/#pixel)
  
loop:
  z = fn1(fn2(fn3(((1/(sin(z*z+#pixel*#pixel)))/(#pixel-c*c))/1.7)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-912S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100


heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-913S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = imag(1/#pixel*0.91/#pixel)
  
loop:
  z = ((1/(fn2(z*z+#pixel*#pixel)))/(#pixel-c*c))/1.7
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-913S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-914S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/#pixel+2.524)/@scale
  c = ((1*(|1.324|<=0)+1.324)*cotanh(#pixel))
  
loop:
  z = fn1(fn2(fn3(c-z*#pixel)))
  z = z*1/c
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-914S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-915S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/#pixel+0.91/#pixel)/@scale
  c = ((2.124*(|3.324|<=0)+1.324)*cotanh(#pixel))
  
loop:
  z = fn1(fn2(fn3(c-z*#pixel+1)))
  z = z*1/c
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-915S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-916S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/#pixel)/@scale
  c = ((2.124*(|3.124|<=0)+#pixel)*cotanh(#pixel))
  
loop:
  z = fn1(fn2(fn3((#pixel-z*z)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-916S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100


heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-917 {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = flip(#pixel+fn3(4/z-z/5+125))
  
loop:
  z = fn1(fn2(fn3((#pixel-z*z)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-917S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-918S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = conj(#pixel+(4/z^z*z+250))
  
loop:
  z = fn1(fn2(fn3(z*1/c)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-918S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100


heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-919S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = abs(#pixel*#pixel+(4/z^z*z+250))
  
loop:
  z = fn1(fn2(fn3((1/z^z*1/c)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-919S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================

Carr-920S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = imag(#pixel*#pixel+(4/z^z*z+250))
  
loop:
  z = fn1(fn2(fn3((#pixel-z*z)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-920S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-921S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = imag(#pixel*#pixel+(4/z^z*z+250))
  
loop:
  z = fn1(fn2(fn3(z*z+c)))
  z = z*1/c
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-921S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-922Sa {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = imag(#pixel*#pixel+(4/z^z*z+250))
  
loop:
  z = #pixel
  z = conj(z*z*z+c)
  z = fn1(fn2(fn3(z*z*1/c)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-922Sa"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================

Carr-922Sb {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = #pixel/@scale
  c = imag(#pixel*#pixel+(4/z^z*z+250))
  
loop:
  z = 1/(#pixel*#pixel)
  z = conj(z*z*z+c)
  z = fn1(fn2(fn3(z*z*1/c)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-922Sb"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-923S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/(#pixel*#pixel)))/@scale
  c = imag(#pixel*1/#pixel+(4/z^z*z+1/#pixel))
  
loop:
  z = fn1(fn2(fn3(((z*1/c)/(#pixel-c*c))/0.8)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-923S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-924S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/#pixel)/@scale
  c = #pixel
  
loop:
  z = fn1(fn2(fn3(z*z+c)))
  z = z*1/c
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-924S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-925S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = 1/#pixel
  c = #pixel
  
loop:
  z = fn1(fn2(fn3(((imag(z)/c)+(z*1/c))/(#pixel-c*c))))
  
bailout:
  |z-1/#pixel| <= @bailout
  
default:
title = "Carr-925S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-926S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (4/#pixel)/@scale
  c = #pixel+4
  
loop:
  z = fn1(fn2(fn3(((imag(z)/c)+(z*1/c))/(#pixel-c*c))))
  
bailout:
  |z-1/#pixel| <= @bailout
  
default:
title = "Carr-926S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100


heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-927S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (conj(4/#pixel))/@scale
  c = #pixel+4
  
loop:
  z = fn1(fn2(fn3(((imag(z)/c)+(z*1/c))/(#pixel-c*c))))
  
bailout:
  |z-1/#pixel| <= @bailout
  
default:
title = "Carr-927S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-928S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (conj(6/#pixel))/@scale
  c = cosh(#pixel+8)
  
loop:
  z = fn1(fn2(fn3((((imag(z)/c)+(z*1/c))/(#pixel-c*c))/0.6)))
  
bailout:
  |z-1/#pixel| <= @bailout
  
default:
title = "Carr-928S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100


heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-929S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (conj(6/#pixel))/@scale
  c = cotanh(#pixel+8)
  
loop:
  z = fn1(fn2(fn3((((imag(z+2)/c)+((2.4*z)*1/c))/(#pixel-c*c))/0.6)))
  
bailout:
  |z-1/#pixel| <= @bailout
  
default:
title = "Carr-929S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================

Carr-930S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (conj(4/#pixel))/@scale
  c = cotanh(#pixel-4)
  
loop:
  z = fn1(fn2(fn3((((imag(z+2)/c)+((2.4*z)*4/c))/(#pixel-c*c+1/#pixel))/1.6)))
  
bailout:
  |z-1/#pixel| <= @bailout
  
default:
title = "Carr-930S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-931S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (conj(4/#pixel*0.91/#pixel))/@scale
  c = #pixel-4
  
loop:
  z = fn1(fn2(fn3((((imag(z+2)/c*c)+((2.4*z)*4/c*c))/(#pixel-c*c+1/#pixel))/2.6)))
  
bailout:
  |z-1/#pixel| <= @bailout
  
default:
title = "Carr-931S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-932S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (conj(4/#pixel*0.91/#pixel))/@scale
  c = #pixel-4
  
loop:
  z = fn1(fn2(fn3((((imag(z+2)/c*c)+((2.4*z)*4/c*c))/flip(1.5*conj(#pixel-c*c+4/#pixel)))/2.6)))
  
bailout:
  |z-1/#pixel| <= @bailout
  
default:
title = "Carr-932S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-933S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (conj(4/#pixel*1.91/#pixel))/@scale
  c = 4/(#pixel*#pixel-4)
  
loop:
  z = fn1(fn2(fn3((((imag(z+2)/c*c)+((2.4*z)*4/c*c))/flip(1.5*conj(#pixel-c*c+4/#pixel)))/2.6)))
  
bailout:
  |z-1/#pixel| <= @bailout
  
default:
title = "Carr-933S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-934S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/#pixel)/@scale
  c = #pixel
  
loop:
  z = fn1(fn2(fn3((z^(cotanh(z^.5))+#pixel)/(#pixel-c*c))))
  
bailout:
  |z-1/#pixel| <= @bailout
  
default:
title = "Carr-934S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-935S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/#pixel))/@scale
  c = 1/(real(#pixel)+flip(imag(#pixel)*(-3.224)))
  
loop:
  z = fn1(fn2(fn3((#pixel-1/z^z*z)/(#pixel-c*c))))
  
bailout:
  |z-1/#pixel| <= @bailout
  
default:
title = "Carr-935S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-936S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/#pixel*0.91/#pixel))/@scale
  c = 1/(2.924*real(#pixel)+flip(imag(#pixel)*3.224))
  
loop:
  z = fn1(fn2(fn3((z*1/c)/(#pixel-c*c))))
  
bailout:
  |z-#pixel| <= @bailout
  
default:
title = "Carr-936S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-937S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/#pixel))/@scale
  c = 1/(2.924*real(#pixel)+flip(imag(#pixel)*3.224))
  
loop:
  z = fn1(fn2(fn3((1/fn1(z)+z)/(#pixel-c*c))))
  
bailout:
  |z-fn1(#pixel)| <= @bailout
  
default:
title = "Carr-937S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-938S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/#pixel))/@scale
  c = 1/(2.924*real(#pixel)+flip(imag(#pixel)*3.224))
  
loop:
  z = fn1(fn2(fn3((4/fn1(z)+#pixel)/(#pixel-c*c))))
  
bailout:
  |z-fn1(#pixel)| <= @bailout
  
default:
title = "Carr-938S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-939S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/#pixel)/@scale
  c = #pixel
  
loop:
  z = fn1(fn2(fn3(imag(z+fn1(z*1/#pixel))/c/#pixel)))
  
bailout:
  |z-#pixel| <= @bailout
  
default:
title = "Carr-939S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================

Carr-940S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/#pixel)/@scale
  c = fn2(#pixel)/fn3(#pixel)
  
loop:
  z = fn1(fn2(fn3((z*1/c)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-940S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-941S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel))/@scale
  c = fn2(#pixel)/fn3(#pixel)
  
loop:
  z = fn1(fn2(fn3((z*1/(c+2))/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-941S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-942S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel))/@scale
  c = fn2(#pixel)/fn3(#pixel)
  
loop:
  z = fn1(fn2(fn3((z*1/(c-1.753))/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-942S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-943S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel))/@scale
  c = fn2(#pixel)/fn3(#pixel)
  
loop:
  z = fn1(fn2(fn3((z*3/fn4(c*c-1.8))/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-943S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}

===============================================================


Carr-944S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel))/@scale
  c = fn2(#pixel)/fn4(#pixel)
  
loop: 
  z = fn1(fn2(fn3(((z*3/fn4(c*c-0.8))/(#pixel-c*c))/3.4)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-944S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100


heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}

===============================================================


Carr-945S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel*0.91/#pixel))/@scale
  c = fn2(#pixel)/fn4(#pixel)
  
loop:
  z = fn1(fn2(fn3((z*3/log(c*c-0.8))/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-945S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}

===============================================================


Carr-946S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel*4/#pixel))/@scale
  c = 3/fn2(#pixel)/(4/fn4(#pixel))
  
loop:
  z = fn1(fn2(fn3(((z*3/log(c*c-1.8))/(#pixel-c*c)))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-946S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}

===============================================================


Carr-947S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel*4/#pixel))/@scale
  c = 3/fn2(#pixel)/(4/fn4(#pixel))
  
loop:
  z = fn1(fn2(fn3(((z*3/cotanh(c*c-1.8))/(#pixel-c*c)))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-947S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}

===============================================================


Carr-948S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel*4/#pixel))/@scale
  c = 3/fn2(#pixel)/(4/fn4(#pixel))
  
loop:
  z = fn1(fn2(fn3(((z*#pixel-(c*c))/(#pixel-c*c))/2.8)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-948S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}

===============================================================


Carr-949S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel*4/#pixel))/@scale
  c = 3/fn2(#pixel)/(4/fn4(#pixel))
  
loop:
  z = fn1(fn2(fn3(((imag(z*#pixel)-(c*c))/(#pixel-c*c))/2.8)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-949S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}

===============================================================

Carr-950S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel*4/#pixel))/@scale
  c = 3/fn2(#pixel)/(4/fn4(#pixel))
  
loop:
  z = fn1(fn2(fn3(((z*#pixel)/(4/fn4(c*#pixel)))/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-950S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}

===============================================================


Carr-951S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel*4/#pixel))/@scale
  c = 3/fn2(#pixel)/(4/fn4(#pixel))
  
loop:
  z = fn1(fn2(fn3((cotanh(z*#pixel)/tanh(4/fn4(c*#pixel)))/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-951S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}

===============================================================


Carr-952S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel*4/#pixel))/@scale
  c = 3/fn2(#pixel)/(4/fn4(#pixel))
  
loop:
  z = fn1(fn2(fn3((z*c+#pixel)/(#pixel))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-952S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}


===============================================================


Carr-953S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel*4/#pixel))/@scale
  c = 3/fn2(#pixel)/(4/fn4(#pixel))
  
loop:
  z = fn1(fn2(fn3((z*(1/c^c)+#pixel)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-953S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}

===============================================================


Carr-954S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (sqr(1/#pixel*4/#pixel))/@scale
  c = 3/fn2(#pixel)/(4/fn4(#pixel))
  
loop:
  z = fn1(fn2(fn3((cotanh(z)*tanh(z)+fn3(fn4(c)))/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-954S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}


===============================================================


Carr-955S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel*4/#pixel))/@scale
  c = 3/fn2(#pixel)/(4/fn4(#pixel))
  
loop:
  z = fn1(fn2(fn3(((#pixel-z*z*4/z)/(#pixel-c*c))/2.8)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-955S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}


===============================================================


Carr-956S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel*4/#pixel))/@scale
  c = 3/fn2(#pixel)/(4/fn4(#pixel))
  
loop:
  z = fn1(fn2(fn3((conj(#pixel-z*z*4/z)/(#pixel-c*c))/1.7)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-956S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}

===============================================================


Carr-957S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (abs(1/#pixel*4/#pixel))/@scale
  c = 3/fn2(#pixel)/(4/fn4(#pixel))
  
loop:
  z = fn1(fn2(fn3(((z/1/c/2.224)/(#pixel-c*c))/1.4)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-957S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}


===============================================================


Carr-958S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Modified Julia
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = ((0.3224,0.69)*(|-2.224|<0)+(-2.224))
  t = (4*(real(0.624)<=0)+real(0.624)*(0<0.624))
  
loop:
  z = fn1(fn2(fn3((z*z*1/c)/(#pixel-c*c))))
  
bailout:
  |z| <= t^@bailout
  
default:
title = "Carr-958S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 1
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-959S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = (0.3224,-0.69)/#pixel
  
loop:
  z = fn1(fn2(fn3(((z*1/c)/(#pixel-c*c))/1.4)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-959S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================

Carr-960S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = z+imag(0.3224)/#pixel
  
loop:
  z = fn1(fn2(fn3(((z*1/c)/(#pixel-c*c))/1.39)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-960S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-961S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = z+imag(0.6)/#pixel
  
loop:
  z = fn1(fn2(fn3(((z*1/c)/(#pixel-c*c))/1.85)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-961S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-962S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = z+conj(cos(0.55))/#pixel
  
loop:
  z = fn1(fn2(fn3(((z*1/c)/(#pixel-c*c)))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-962S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-963S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = z+conj(cos(1.099))/#pixel
  
loop:
  z = fn1(fn2(fn3((z*1/c)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-963S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-964S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = (1.099,0)/#pixel
  
loop:
  z = fn1(fn2(fn3((z*1/c)/cotanh(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-964S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-965S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = (1.099,0)/#pixel
  
loop:
  z = fn1(fn2(fn3((z*1/c)/sinh(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-965S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-966S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = (1.099,0.01)/#pixel
  
loop:
  z = fn1(fn2(fn3((2^z*1/c)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-966S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-967S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/(#pixel*#pixel))/@scale
  c = (1.099,0.01)/real(#pixel)
  
loop:
  z = fn1(fn2(fn3((z/c)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout

default:
title = "Carr-967S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-968S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/(#pixel*#pixel*#pixel)))/@scale
  c = (1.099,0)/(1/abs(#pixel*#pixel+2))
  
loop:
  z = fn1(fn2(fn3((z*1/c)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-968S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-969S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/(#pixel*#pixel*#pixel)))/@scale
  c = (4.299,-1.2)/(1/abs(#pixel*#pixel+2))
  
loop:
  z = fn1(fn2(fn3((z*1/c)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-969S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-970S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/(#pixel*#pixel*#pixel)))/@scale
  c = (4.299,-1.2)/(1/abs(#pixel*#pixel+2))
  
loop:
  z = fn1(fn2(fn3((z*(1/c*1/c))/(#pixel-c*c))))
  z = z*1/c
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-970S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-971S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/((#pixel+2)*#pixel*#pixel)))/@scale
  c = (0.342,1.97)/(1/abs(#pixel*#pixel+2))
  
loop:
  z = (z*(1/c*1/c+4/#pixel))/(#pixel-c*c)
  z = fn1(fn2(fn3(z*1/c)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-971S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-972S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/((#pixel+2)*#pixel*#pixel)))/@scale
  c = (-0.742,-0.009)/(1/abs(#pixel*#pixel+2))
  
loop:
  z = fn1(fn2(fn3((z*(1/c*1/c+4/#pixel))/(#pixel-c*c))))
  z = z*1/c
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-972S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-973S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/((#pixel+2)*#pixel*#pixel)))/@scale
  c = (-5.742,-0.009)/(1/abs(#pixel*#pixel+2))
  
loop:
  z = fn1(fn2(fn3((z*(1/c*1/c*1/c+4/#pixel))/(#pixel-c*c*1/c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-973S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-974S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/((#pixel+2)*#pixel*#pixel)))/@scale
  c = (-5.742,-0.009)/(1/abs(#pixel*#pixel+2))
  
loop:
  z = fn1(fn2(fn3(abs(z*(1/c*1/c*1/c+4/#pixel))/(#pixel-c*c*1/c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-974S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-975S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/((#pixel+2)*#pixel*#pixel)))/@scale
  c = (-1.7621,0.0141)/(1/abs(#pixel*#pixel+2))
  
loop:
  z = fn1(fn2(fn3((abs(z*(1/c*1/c*1/c+4/#pixel))/(#pixel-c*c*1/c))/2.8)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-975S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-976S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/((#pixel+2)*#pixel*#pixel)))/@scale
  c = (-1.7621,0.0141)/(1/abs(#pixel*#pixel+2))
  
loop:
  z = fn1(fn2(fn3((abs(z*(4/c*4/c*4/c+4/#pixel))/(#pixel-c*c*4/c))/2.8)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-976S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-977S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/((#pixel+2)*#pixel*#pixel)))/@scale
  c = (-0.1672,1.0413)/(1/abs(#pixel*#pixel+2))
  
loop:
  z = fn1(fn2(fn3((abs(z*(1/c*1/c*1/c+4/#pixel))/(#pixel-c*c*4/c))/2.8)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-977S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-978S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (imag(1/((#pixel+2)*#pixel*#pixel)))/@scale
  c = (-0.1672,1.0413)/(1/abs(#pixel*#pixel+2))
  
loop:
  z = fn1(fn2(fn3((abs(z*(1/c*4/c*4/c+4/#pixel))/(#pixel-c*c*4/c))/2.8)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-978S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-979S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (sqr(1/((#pixel+2)*#pixel*#pixel)))/@scale
  c = (-0.125,1.1187)/(1/abs(#pixel*#pixel+2))
  
loop:
  z = fn1(fn2(fn3((z*1/c)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-979 S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================

Carr-980S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (sqr(1/((#pixel+2)*#pixel*(#pixel+2))))/@scale
  c = ((1.099,-0.0099)/(0.342,1.97))^((sqrt5+1)/2)
  
loop:
  z = fn1(fn2(fn3(((z*1/c*1/c*1/c)/(#pixel-c*c))/2.8)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-980S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-981S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (sqr(1/((#pixel+2)*#pixel*(#pixel+2))))/@scale
  c = (1.099,-0.0099)/(#pixel^#pixel)/z
  
loop:
  z = fn1(fn2(fn3(1/(z*z+#pixel*#pixel)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-981S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-982S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (sqr(1/((#pixel+2)*#pixel*(#pixel+2))))/@scale
  c = (0.342,1.97)^z
  
loop:
  z = fn1(fn2(fn3(((#pixel-z*1/c)/(#pixel-c*c))/2.8)))
  
bailout:
  |real(z)|<= @bailout
  
default:
title = "Carr-982S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100
angle = 270

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-983S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/#pixel)/@scale
  c = (-5.742,-0.009)+5.05
  
loop:
  z = fn1(fn2(fn3((z*z*z+(2.734-1)*z-0.734)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-983S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-984S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (1/#pixel*4/#pixel)/@scale
  c = (-5.099,0.1)+5.05
  
loop:
  z = fn1(fn2(fn3((z*(2.734-1)*z-0.734)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-984S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-985S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (cotanh(1/#pixel*4/#pixel))/@scale
  c = #pixel
  
loop:
  z = fn1(fn2(fn3(((-0.7499,-0.014407)*(z*1/c))/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-985S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-986S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (sqr(1/#pixel*4/#pixel))/@scale
  c = #pixel*#pixel
  
loop:
  z = fn1(fn2(fn3(z*z*z/5+z*z+c)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-986S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-987S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (2.234*(real(#pixel))+conj(imag(#pixel)*0.734))/@scale
  c = (4.299,-1.2)*sqr(conj(#pixel))
  
loop:
  z = fn1(fn2(fn3((z*1/c)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-987S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-988S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (2.234*(real(#pixel))+conj(imag(#pixel)*(1.099,0)))/@scale
  c = (4.299,-1.2)*sqr(conj(#pixel))
  
loop:
  z = fn1(fn2(fn3((#pixel-(1.099,0)*z)/(#pixel-(1.099,0)*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-902S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-989S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (2.234*(real(#pixel))+conj(imag(#pixel)*(1.099,0)))/@scale
  c = (4.299,-1.2)*sqr(conj(#pixel))
  
loop:
  z = fn1(fn2(fn3((#pixel-(1.099,0)*(z*1/c))/(#pixel-(1.099,0)*c*4/c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-989S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================

Carr-990S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (2.234*(real(#pixel))+conj(imag(#pixel)*(-5.742,-0.009)))/@scale
  c = (-1.7621,-0.0141)*sqr(conj(#pixel))
  
loop:
  z = fn1(fn2(fn3((#pixel-(1.0,0.4)*(z*1/c))/(#pixel-(-1.099,0)*c*4/c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-990S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-991S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm


init:
  z = (2.234*(real(#pixel))+conj(imag(#pixel)*(-5.742,-0.009)))/@scale
  c = fn3(1/#pixel)^(-1.7621,-0.0141)*sqr(conj(#pixel))
  
loop:
  z = fn1(fn2(fn3((#pixel-(1.0,0.4)*(z*1/c))/(#pixel-(-1.099,0)*c*4/c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-991S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-992S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm


init:
  z = ((1/#pixel)/0.71)/(0.85/#pixel+1.324)/@scale
  c = ((1/#pixel)/2)/z-2.5^fn4(#pixel+1.324)/(4/#pixel)
  
loop:
  z = fn1(fn2(fn3(z*1/c)))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-992S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}

===============================================================


Carr-993S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (((1/#pixel)/0.71)/(0.85/#pixel+1.324))/@scale
  c = ((1/#pixel)/2)/z-2.5^fn4(#pixel+1.324)/(4/#pixel)
  
loop:
  z = fn1(fn2(fn3(((#pixel-2)-z*1/c)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-993S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}


===============================================================


Carr-994S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (((1/#pixel)/0.71)/(0.85/#pixel+1.324))/@scale
  c = ((1/#pixel)/2)/z-2.5^fn4(#pixel+1.324)/(0.5/#pixel)
  
loop:
  z = fn1(fn2(fn3((1/z*z*z+z)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-994S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}


===============================================================


Carr-995S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (((1/#pixel)/0.71)/(0.85/#pixel+2.324))/@scale
  c = ((1/#pixel)/2)/z-2.5^fn4(#pixel+2.324)/(0.5/#pixel)
  
loop:
  z = fn1(fn2(fn3((1/z*z*z+z)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-995S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
func fn4
  caption = "Utter Chaos"
  default = ident()
  hint = "Select a function to introduce utter chaos into the formula."
endfunc
}


===============================================================


Carr-996S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (((1/#pixel)/0.71)/(0.85/#pixel+2.324))/@scale
  c = ((1/#pixel)/2)/z-2.5^fn3(#pixel+2.324)/(0.5/#pixel)
  
loop:
  z = fn1(fn2(fn3((1/z^z+c)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-996S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-997S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (((1/#pixel)/0.71)/(0.85/#pixel+2.324))/@scale
  c = ((1/#pixel)/2)/z-2.5^(#pixel+2.324)/(0.5/#pixel)
  
loop:
  z = fn1(fn2(fn3((z*1/c)/(#pixel-c*c))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-997S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-998S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (((1/#pixel)/0.71)/(0.85/#pixel+2.324))/@scale
  c = ((1/#pixel)/2)/z-2.5^(#pixel+2.324)/(0.5/#pixel)
  
loop:
  z = fn1(fn2(fn3(2*(z*1/c)/(#pixel-c*c))))
  z = (z*1/c)/(#pixel-c*c)
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-998S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================


Carr-999S {
; A "Modified Carr" formula, based on the original with permission.
; Functionality added by Sharon S. Schultz, May, 2003.
; Converted for UF by Erik Reckase, February 22, 2000
; SOURCE: Carr.frm

init:
  z = (((1/#pixel)/0.71)/(0.85/#pixel+2.324))/@scale
  c = ((1/#pixel)/2)/z-2.5^(#pixel+2.324)/(0.5/#pixel)
  
loop:
  z = fn1(fn2(fn3((z*(cotanh(1/c))))))
  
bailout:
  |real(z)| <= @bailout
  
default:
title = "Carr-999S"
method = multipass
periodicity = 0
center = (0,0)
maxiter = 100

heading
caption = "Parameters"
endheading

param scale
caption = "Scale"
default = 1
hint = "Select a value to scale the image."
endparam 
param bailout
caption = "Bailout"
default = 100
hint = "Select a bailout value for the formula."
endparam 

heading
caption = "Functions"
endheading

func fn1
  caption = "Change"
  default = ident()
  hint = "Select a function to change the formula."
endfunc
func fn2
  caption = "Change More"
  default = ident()
  hint = "Select a function to change the formula more."
endfunc
func fn3
  caption = "Total Change"
  default = ident()
  hint = "Select a function to totally change the formula."
endfunc
}

===============================================================