#***********************************************************************
#
#       use with test problem Ident  
#
#
#***********************************************************************
S rllwr=0, rlupr=2
p-1
i
t
i
I iscale=1, inplsw=5
s rmtrgt=.5
g
t iadapt=1, nvtrgt=10000
i
s rmtrgt=.25
g
f nx=2, ny=3, nz=1  
t
i
s rmtrgt=.125
g
f
t
i lines=1        
s rmtrgt=.0625
g
f
f9
f2
p1
t iadapt=7
i lines=0, inplsw=1
t iadapt=1
s rmtrgt=.03125
#
#       mesh regularization and final dd solve
#
t iadapt=8
s iprob=-4
#
#       do some parallel graphics
#
g igrsw=-3
g igrsw=-2
t iadapt=0
i inplsw=5, lines=2, iscale=1
f ifun=5, lines=2, iscale=1, nx=0, ny=0, nz=1
f ifun=0, nx=1, ny=1, nz=1, lines=2, iscale=0
f ifun=9, nx=1, ny=1, nz=1, lines=2, iscale=0
p-1

.