#define FIGDIR ./Fig
#define FIGLIST chaos elvis diffvisduff3
#define NEEDF90 FIGLIST
#include "../Cakerules/SEP.martin.rules"
#define BINDIR ../Bin/MTYPE
#include <SEP.defs>

chaos.slidefigures.resize&:  backcol.v 
	vppen backcol.v FIGDIR/chaos.v rotate=90 |vppen align=lb| SLIDETUBE xscale=3 yscale=4 yshift=2.25

elvis.slidefigures.resize&:  backcol.v 
	vppen backcol.v FIGDIR/elvis.v rotate=90 |vppen align=lb| SLIDETUBE scale=0.75 xshift=3 yshift=2

diffvisduff3.slidefigures.resize&:  backcol.v 
	vppen backcol.v FIGDIR/diffvisduff3.v rotate=90 |vppen align=lb| SLIDETUBE scale=0.75 xshift=3 yshift=2

/* interactive   */
chaos.action&: BINDIR/duffing BINDIR/duffing2 
	( cd Panels;  xtpanel -file chaos.panel -var DUFFING ../BINDIR/duffing -var DUFFING2 ../BINDIR/duffing2  )


BINDIR/duffing%: 
	( cd Chaos ; cake ../BINDIR/duffing% )

/* other stuff */

FIGDIR/chaos.v: if not {{ cd Chaos ; cake -q ../Fig/chaos.v }}
	( cd Chaos ; cake  ../Fig/chaos.v )

FIGDIR/elvis.v: if not {{ cd Marm ; cake -q ../Fig/elvis.v }}
	( cd Marm ; cake  ../Fig/elvis.v )

FIGDIR/diffvisduff3.v: if not {{ cd Marm ; cake -q ../Fig/diffvisduff3.v }}
	( cd Marm ; cake  ../Fig/diffvisduff3.v )




print.v&: [[ sub -i X printX.v FIGLIST ]]

tcpr.v&: [[ sub -i X tcprX.v FIGLIST ]]

print%.v&:
	vppen rotate=90.  <FIGDIR/%.v |vppen align=lb |vppen hshift=1 vshift=0.5 |pspen PRINTER label=" " fat=4

tcpr%.v&:
	vppen rotate=90. xsize=8.4 <FIGDIR/%.v |vppen align=lb |vppen vshift=0.25|tcprpen label=" " fat=4

slide slides&: slides.dvi
	texpr -slide -small -v slides.dvi

slides.dvi&: slides.tex
	texpr -slide -small -d -noframe slides.tex

printslides printslide&: slides.dvi
	texpr -slide -small  slides.tex




clean&: jclean texclean
	( cd Chaos ; cake clean )
	( cd Marm ; cake clean )

#include <SEP.idoc.rules>
#include<SEP.prog.rules>
#include<SEP.obj.rules>
