\setlength{\unitlength}{0.0125in}%
\begin{picture}(400,212)(20,625)
\thicklines
\put(320,690){\vector( 1, 0){ 70}}
\put(300,700){\line( 1, 0){ 40}}
\put(300,705){\line( 0,-1){ 25}}
\put(300,680){\line( 1, 0){ 40}}
\put(340,680){\line( 0, 1){ 25}}
\put(240,680){\line( 1, 0){ 40}}
\put(240,660){\framebox(40,40){}}
\put( 80,705){\line( 0,-1){ 45}}
\put( 80,660){\line( 1, 0){ 40}}
\put(120,660){\line( 0, 1){ 45}}
\put( 80,680){\line( 1, 0){ 40}}
\put(100,670){\vector( 4, 1){ 60}}
\put(100,690){\vector( 1, 0){ 70}}
\put( 80,700){\line( 1, 0){ 40}}
\put( 20,680){\framebox(40,20){}}
\put(400,810){\line(-2,-3){ 20}}
\put(380,780){\line( 1, 0){ 40}}
\put(420,780){\line(-2, 3){ 20}}
\put(300,820){\line( 1, 0){ 40}}
\put(300,825){\line( 0,-1){ 25}}
\put(300,800){\line( 1, 0){ 40}}
\put(340,800){\line( 0, 1){ 25}}
\put(320,810){\vector( 1, 0){ 70}}
\put(240,800){\framebox(40,20){}}
\put(100,810){\vector( 1, 0){ 70}}
\put(180,810){\line(-2,-3){ 20}}
\put(160,780){\line( 1, 0){ 40}}
\put(200,780){\line(-2, 3){ 20}}
\put( 80,820){\line( 1, 0){ 40}}
\put( 80,825){\line( 0,-1){ 25}}
\put( 80,800){\line( 1, 0){ 40}}
\put(120,800){\line( 0, 1){ 25}}
\put( 20,820){\line( 1, 0){ 40}}
\put(245,625){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm (d) After Get}}}
\put( 25,625){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm (c) After Push 0, Eval}}}
\put(245,745){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm (b) After Pushbasic 0}}}
\put( 25,745){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm (a) State on entry to fac}}}
\put(255,665){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm 1}}}
\put(255,685){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm 0}}}
\put(395,685){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm 1}}}
\put(315,705){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm S}}}
\put(255,705){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm V}}}
\put(175,685){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm 1}}}
\put( 35,685){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm 0}}}
\put( 95,705){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm S}}}
\put( 35,705){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm V}}}
\put(255,805){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm 0}}}
\put(395,785){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm e}}}
\put(315,825){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm S}}}
\put(255,825){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm V}}}
\put(175,785){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm e}}}
\put( 95,825){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm S}}}
\put( 35,825){\makebox(0,0)[lb]{\raisebox{0pt}[0pt][0pt]{\elvrm V}}}
\end{picture}
