rmax:
ishape=0
ishape=2
ishape=3
ishape=4
ishape=5
modelbnd
ashape
bshape
cshape
eshape:
xshape:
prtmars
prtboot
prtgato
prtfixb
prtbalr
prtbal
prtmercy
prtnova
prtdcon
prteqdata
prtcamino
tolmg
maxmg
minmg
loopinmg
bavmg
cboot
zeff
gamboot
ifillboot
jbjratio
jbtype
betafix
islwst
betapwant
nbet
betis1
betiso
dchi
nhior
totcur
baxis0
fixcur
equiltype
jbs
modelp
ncent
nedge
nexpin
nexpout
tcent
tedge
texpin
texpout
rcent
redge
rexpin
rexpout
nppcoef
ppcoef(i)
nrotcoef
rotcoef(i)
ppspline(1)
ppspline(2)
xppspline(1)
xppspline(2)
nppspline
modelq
qax
qlim
qaxp
qlimp
iqval
alphaq
jlimzero
qspline(1)
qspline(2)
xqspline(1)
xqspline(2)
qpaxspline
qplimspline
nqspline
modelf
nffp
ffpcoef(1)
ffpcoef(2)
ncdcoeff
cdcoeff(1)
cdcoeff(2)
cdcoeff(i)
cdx
cddelx
cdlocbump
cdwidthbump
bavcd
nbndry
bavboot=0
itmax=100
conres=1.e-6
ncdfreeze=0
cdfreeze=.false.
qaxwant=2.0
cdnorm=-1.
prttec=.true.
maxsor=20
minsor=5
loopin=100
tolsor=1.e-8
omega=1.6