#define DEBUG
#define USRLIBS TDFLIB
#define TUBEARGS see_progress=y
#define FIGDIR .
#include <SEP.defs>
#define FIGLIST whitvar whititer

default& : tube

#define GRAPH Graph clip=1 max2=1 min2=-1 crowd=.99 > junk.H
#define DOTY Dots dots=0 connect=0 gaineach=0 constsep=1 strings=0 clip=1.2 > /dev/null
#define O1D1 `<alias.P Get o1 d1`

FIGDIR/whitvar.v! FIGDIR/whitvar.v3 whitvar.H: Alias.x Invintp2.x 1-1a.H precond.p
	Zero whitvar.H
	Alias.x tmax=80. pairs=1   n1=200 > alias.P
	Alias.x tmax=80. pairs=0   n1=200 > alias.H
	<alias.P Invintp2.x n1=200 O1D1 mm=whitvar.H> invintp.H  par=precond.p
	<whitvar.H Transp plane=23 > transp.H;
	<transp.H  GRAPH fastplot=20            out=FIGDIR/whitvar.v3
	<invintp.H GRAPH out=invintp.v
	< alias.H  GRAPH out=alias.v
        < alias.H  DOTY  strings=1 out=alias.v
        <invintp.H DOTY  connect=1 out=invintp.v
	vp_Overlay alias.v invintp.v >              FIGDIR/whitvar.v

#define LABITER labels=iter=200:iter=5:iter=2 labelsz=10 
FIGDIR/whititer.v : whitvar.H    
	< whitvar.H Window n2=1 f2=2   > it.2.H
	< whitvar.H Window n2=1 f2=5   > it.5.H
	< whitvar.H Window n2=1 f2=200 > it.200.H
	Merge < it.200.H it.5.H it.2.H space=no axis=2 > junk.H
	< junk.H DOTY connect=1 overlap=2.0 title=" " LABITER out=FIGDIR/whititer.v


1%.H : 1%.HH
	<1%.HH Dd esize=4 > 1%.H

clean&: jclean
	@-/bin/rm \*.P

$       hardcopy to make the mean lines darker.
#define HARDCOPY
#include <SEP.idoc.rules>
#include <SEP.obj.rules>
#include <SEP.prog.rules>

