#!/bin/bash

Xvfb :3 >/dev/null 2>&1 &
xpid=$!
export DISPLAY=:3

parallel -N8 ./invltfig.sh ::: \
	fig01 0.25 1 "1'-3" 7 5 1 "100,0.02," \
	fig04 0.25 1 "1'-3" 9 7 4 "3750,0.5,1000,0.1,100,0.02,100,0.01," \
	fig05 0.25 1 "1'-4" 7 6 2 "-1000,0.06,1000,0.02," \
	fig06 0.25 10 "1'-4" 12 6 0 "f:=100000/(10+exp(x))|&2;" \
	fig07 0.25 1 "1'-4" 7 6 3 "1000,0.1,100,0.02,100,0.01," \
	fig08 0.25 1 "1'-4" 7 8 3 "1000,0.1,100,0.02,100,0.01," \
	fig09 0.25 1 "1'-3" 5.5 6 2 "700,0.08,300,0.015," \
	fig10 0.25 1 "1'-4" 5.5 6 2 "700,0.08,300,0.015," \
	fig11 0.25 1 "1'-4" 5.5 4 2 "700,0.08,300,0.015," \
	fig12 0.25 1 "1'-4" 7 6 2 "700,0.08,300,0.015,"

convert -background transparent -font courier -pointsize 40 pango:"f(t)=100000/(10+e<sup>t</sup>)<sup>2</sup>" /tmp/func$$.png
width1=`identify -format "%w" invltfig06anno.png`
width2=`identify -format "%w" /tmp/func$$.png`
center=$((width1/2-width2/2))
echo $width1 $width2 $center
composite -geometry +${center}+40 /tmp/func$$.png invltfig06anno.png /tmp/invlt2$$.png
composite -geometry +440+450 invltfig06100.png /tmp/invlt2$$.png invltfig06.png
convert invltfig06.png invltfig06.pdf
convert -density 200 invltfig09xmax.ps -alpha off \
	  -font Courier -pointsize 20 \
	  -gravity NorthEast -annotate +20+0 "fig09" \
	  /tmp/invlt$$.png
width1=`identify -format "%w" /tmp/invlt$$.png`
width2=`identify -format "%w" invltfig09func.png`
center=$((width1/2-width2/2))
echo $width1 $width2 $center
composite -geometry +${center}+40 invltfig09func.png /tmp/invlt$$.png invltfig09.png
convert invltfig09.png invltfig09.pdf
pdftk invltfig[01]*.pdf cat output invltfigs.pdf
kill $xpid