src2tex-2.12h.orig/ 40755 1750 1750 0 6266067533 14002 5ustar kawamurakawamurasrc2tex-2.12h.orig/COPYING100644 1750 1750 21 5553626713 15062 0ustar kawamurakawamuracf. src2tex.c.ps src2tex-2.12h.orig/EXAMPLES100644 1750 1750 76 5707212700 15166 0ustar kawamurakawamuracf. hanoi.c.ps, newton.c.ps, simpson.c.ps, popgen.red.ps, etc src2tex-2.12h.orig/FAQ100644 1750 1750 12757 6130077426 14455 0ustar kawamurakawamura Frequently Asked Questions (FAQ) [Q1] How can I install src2tex and src2latex? [A1] You have only to issue the following commands make make install in the src2tex-212 directory, and you will find executables src2tex and src2latex there. If you are a DOS user, it suffices to type simply make dos In this case, you will get src2tex.exe and src2ltex.exe in the present working directory. The authors would be very grateful if you could type make report and send them your /etc/motd file (if it exists). They think that this would give invaluable information. [Q2] Why don't you write online manual? [A2] The usage of src2tex and src2latex is so simple that we don't think it is necessary to write an online manual. In fact, it will suffice to input either src2tex or src2latex For example, a command src2tex hanoi.c gives a TeX file hanoi.c.tex in the current directory. For more information please input src2tex -help or src2latex -help . [Q3] Shell scripts src2tex2dvi, src2tex2ps, src2latex2dvi, src2latex2ps do not work properly. Is it better to revise them? [A3] Maybe, you have to edit them. If you are not Japanese, you should comment out those lines containing "nkf" and replace "jtex" and "jlatex" with "tex" and "latex" respectively. For more information, please read src2tex2dvi.dvi, src2tex2ps.dvi, src2latex2dvi.dvi and src2latex2ps.dvi files. [Q4] Will you give some source files written in src2tex format? [A4] Source files farmer+hen.scm, hanoi.c, newton.c, simpson.c, popgen.red might be helpful. Though their comments are written in Japanese, they would illustrate how to write comment in src2tex format. [Q5] How can I include macros and figures? [A5] In TeX-mode, you can use any TeXnique such as \input ... \special{ ... } So, please feel free to use any method you are always using in TeX. [Q6] Is it possible, for src2latex, to use non-defauld style file? [A6} Yes, it is possible. For example, if you want src2latex to output \documentstyle[twocolumn,12pt]{article} and if you are a PASCAL user, then you have only to write a line (* {\documentstyle[twocolumn,12pt]{article}} *) at the beginning of your source file. [Q7] Can I use typewriter font in comment area as well? [A7] Yes, you can write comment in typewriter font by using src2tex escape sequence \src2tex{...}. For instance, if you are a FORTRAN user, it would suffice to insert a line * {\src2tex{texfont=tt}} For more information, it is better to read a postscript file src2tex.c.ps. [Q8] How src2tex and src2latex determine language type of given source file? [A8] First, they see file-name-suffix and identify language as follows: .tex, .txt, .doc => TEXT .bas, .vb => BASIC .c, .cpp, .vc => C, C++, OBJECTIVE-C .cbl, .cob => COBOL .f, .for => FORTRAN .html => HTML .java => JAVA .lsp, .sc, .scm, .el => LISP, SCHEME makefile => MAKE .p, .pas, .tp => PASCAL .pl, .prl => PERL .sh, .csh, .ksh => SHELL .tcl, .tk => TCL/TK .asi, .asir, .asr => ASIR .mac, .max => MACSYMA, MAXIMA .map, .mpl => MAPLE .mat, .mma => MATHEMATICA .ml, .mtlb, .oct => MATLAB, OCTAVE .mu = MuPAD .red, .rdc => REDUCE Next, they search key words and attempt to determine language. Unfortunately, the mechanism of automatic language detemination is not complete yet. [Q9] It looks that src2tex output unnecessary \if's at the beginning of TeX file. Can I remove them? [A9] Yes, you can. Please just replace #define ASCII #define NTT with #undef ASCII #undef NTT in src2tex.h and make a recompilation. [Q10] When I write a comment of the form * ----------------------------- * * SUBROUTINE1 * * 1'st pde solver * * ----------------------------- * in FORTRAN program, I often get unexpected output * ----------------------------- * * SUBROUTINE1 * * 1'st pde solver * * ----------------------------- * or something like that. Is it a bug of src2tex? [A10] No, it is not a bug. Actually, src2tex is just trying to print the comment in pretty proportion with cmr font. In this case, it would be better to use \hfill escape sequence, such as * {\hrulefill} * * {\hfill SUBROUTINE1 \hfill} * * {\hfill 1'st pde solver \hfill} * * {\hrulefill} * Generally speaking, it would be convenient if you could define your favorite tabulation style in src2tex.s2t file by using \settabs escape sequence or something like that. [Q11] Where do I have to put src2tex.s2t and src2latex.s2t files? [A11] You can put those files in the same directory where you find plain TeX input-files *.tex and LaTeX style-files *.sty . As is well-known, you can modify those search-directories. [Q12] Can I print line numbers? [A12] There are dirty tricks src2tex -0 src2latex -0 . If you want to print lines on each page, src2tex - src2latex - commands would be useful. [Q13] Can I print a certain key word in bold type font? [A13] Yes, you can. It would be better to use sed, perl or something like that. For example, if you want to print main() function of sample.c file in bold type font, it will suffice to type src2tex sample.c sed -e s/main()/{\\bf main()}/g sample.c.tex > sample.tex tex sample.tex You can modify several given words simultaneously, if you are familiar with sed script (cf., for example, c2tex and c2tex.sed). Furthermore, any in program area is translated into a string }{ by src2tex. This property is very useful when you modify the src2tex-output into your favorite style. src2tex-2.12h.orig/FAQ.JIS100644 1750 1750 35225 6133665012 15071 0ustar kawamurakawamura Frequently Asked Questions (FAQ.JIS) $B%f!<%6$NJ}!9$+$iD:$$$?$H$=$l$KBP$9$kEz$($r!"$G$-$k$@$1%3%s%Q%/%H(B $B$K$^$H$a$F$_$^$7$?!#$*Lr$KN)$D$HNI$$$N$G$9$,!#(B $B!"%P%0Ey$K4X$9$k(B $BO"Mm$O!"E7Ln0lCK(B (kamano@po.iijnet.or.jp) $B$^$G$*5$7Z$K$I$&$>!#(B ------------------------------------------------------------------------------- $B!|(B $B\$7$/$O(B src2tex.c.ps $B$K=q$$$F$"$j$^$9$,!"4JC1$K@bL@$7$^$9$H!"C1$K(B make make install $B$H$d$k$@$1$G$9!#$3$N7k2L!"(B src2tex src2latex $B$,=PMh>e$,$j$^$9!#8e$O!"$3$l$i$r%3%^%s%I%5!<%A%Q%9$NDL$C$F$$$kE,Ev$J%G%#%l%/%H(B $B%j$K%3%T!<$9$k$@$1$G$9!#(B $B#D#O#S%f!<%6$NJ}$O!"(Bgcc $B$,%$%s%9%H!<%k$5$l$F$$$k>l9g$K$O!"$?$@#19T(B make dos $B$H$@$1F~NO$7$F2<$5$$!#(B src2tex.exe src2ltex.exe $B$,:n$i$l$^$9!#(BGcc $B$,L5$$>l9g$G$b!"(BMakefile $B$K$A$g$C$HpJs$r$o$l$o$l$K$*Aw$jD:$1$J$$$G$7$g$&$+!)(B $B:#8e$N3+H/$N;29M$K(B $B$5$;$FD:$-$?$$$H;W$$$^$9!#(B ------------------------------------------------------------------------------- $B!|(B $B\$7$/$O(B src2tex.c.ps $B$K=q$$$F$"$j$^$9$,!";H$$J}$O$$$?$C$F4JC1$G$9!#Nc$($P!"(B $B%=!<%9%U%!%$%k(B popgen.red $B$+$i(B TeX $B%U%!%$%k(B popgen.red.tex $B$r:n$k$K$O!"(B src2tex popgen.red $B$H$d$k$@$1$G$9!#(Bsrc2latex $B$N;H$$J}$b!"F1MM$G$9!#(B ------------------------------------------------------------------------------- $B!|(B $B$C$F!"(Bsrc2tex $B$N=PNO$N0lItJ,$r@Z$jE=(B $B$j$9$k>l9g$K$O!":G=i$N(B \if $BJ8$b%3%T!<$7$F2<$5$$!#(B ------------------------------------------------------------------------------- $B!|(B $Bl9g$K$O!"%Q%C%1!<%8$KE:IU$5$l$F$$$k%7%'%k%9%/%j%W%H(B src2tex2dvi, src2tex2ps, src2latex2dvi, src2latex2ps $B$r$4MxMQ2<$5$$!#$?$@$7!"4D6-$K$h$C$F$O(B $B$3$l$i$N%7%'%k%9%/%j%W%H$r!V=$@5$9$kI,MW$,$"$j$^$9!#!W;HMQ$9$kA0$K!"0lEYFbMF$r(B $B3NG'$7$F$_$F2<$5$$!#$H$/$K!"4A;z%3%s%P!<%?(B nkf $B$,$"$J$?$N4A;z4D6-$KL7=b$7$F$$$J(B $B$$$+$I$&$+$r!"%A%'%C%/$7$F$/$@$5$$!#(B ------------------------------------------------------------------------------- $B!|(B $B$J%U%j!<%=%U%H%&%'%"$,I,MW$G$9!#%7%9%F%`4IM}\$7$/$O!"(BDVI $B%U%!%$%k(B src2tex2dvi.dvi, src2tex2ps.dvi, src2latex2dvi.dvi $B$H(B src2latex2ps.dvi $B$r$*FI$_2<$5$$!#(B ------------------------------------------------------------------------------- $B!|(B $BH2<$5$$!#$3$l(B $B$i$N%=!<%9%U%!%$%k$KBP$7$F!"(B src2tex2ps hanoi.c newton.c simpson.c, popgen.red $B$H$9$k$H!"#4$D$N%]%9%H%9%/%j%W%H%U%!%$%k(B hanoi.c.ps, newton.c.ps, simpson.c.ps, popgen.red.ps $B$,=PMh$^$9!#%=!<%9%U%!%$%k$H%]%9%H%9%/%j%W%H%U%!%$%k$r8+Hf$Y$l$P(B $B?t<0$N=q$-J}$,$*J,$+$jD:$1$k$H;W$$$^$9!#4pK\E*$K$O!"(BTeX $B$HF1$8MM$K=q$1$P(B $B#O#K(B $B$G$9!#(B $B$?$H$($P!"(BBASIC + plain TeX $B$N>l9g$G$9$H!"8e$K(B TeX $B$N(B escape sequence $B$,$"$k$H!"(BTeX $B%b!<%I$N;O$^$j$G$"$k$H2r(B $B$C$F!"(B{\ $B$O(B {\null $B$d(B {\hbox{} $B$d(B {\rm $B$J$I$G$bBeMQ$G$-$^$9!#>\$7$/$O!"(Bsrc2tex. c.ps $B$r$4Mw2<$5$$!#(B ------------------------------------------------------------------------------- $B!|(B $BR2p$7$F$*$-$^$9!#(B $BNc#1!'(B {\special{epsfile=psfigure1.eps hoffset=60 voffset=50 ...}} $BNc#2!'(B {\begin{figure} ...... \end{figure}} C + plain TeX $B$N>l9g$N6qBNNc$G$h$m$7$1$l$P!"(Bhanoi.c, newton.c, simpson.c $B$r$4Mw(B $B2<$5$$!#$=$NB>$N4D6-$G$N=q<0$O!"$3$l$i$+$iN`?d$G$-$k$H;W$$$^$9!#(BLaTeX $B%f!<%6$N(B $BJ}$O!"Nc$($P(B $B1|B<@2I'Cx!V(BLaTeX $BF~Lg!W!]H~J8=q:n@.$N%]%$%s%H!](B $B5;=QI>O@(B>} $B$H5-=R$7$F$/$@$5$$!#6qBNE*$K8@$&$H!"$?$H$($P(B LISP $B$N%=!<%9$NCf$G!"(Bmymacro.tex $B$H$$$&%U%!%$%k$rl9g$K$O!"(B ; {\input mymacro.tex} $B$H$$$&$h$&$K=q$-$^$9!#$3$N%F%/%K%C%/$O!"(Bsrc2tex.c $B$r=q$/$H$-!"8z2LE*$K;H$o$l$F(B $B$$$^$9!#;29M$K$7$F$_$F2<$5$$!#(B ------------------------------------------------------------------------------- $B!|(B $Bl9g$J$i$P!"0lHV=i$a$K(B (* {\documentstyle[twocolumn,12pt]{jarticle}} *) $B$H=q$1$P(B $B#O#K(B $B$G$9!#$?$@$7!"(BCOBOL $B$N>l9g$K$O!"Bh#19TL\$K%3%a%s%H$r=q$1$J$$$3$H(B $B$b$"$k$N$G!"(BCOBOL $B$N>l9g$K8B$jBh#2$+Bh#39TL\$G$b#O#K$G$9!#(B ------------------------------------------------------------------------------- $B!|(B $BA0(B $B$KA^F~$7$F2<$5$$!#Nc$($P!"(BFORTRAN $B$N>l9g$G$9$H!"(B * {\src2tex{texfont=tt}} $B$H$$$&0l9T$rA^F~$9$k$H!"$=$l0J8e%3%a%s%H%(%j%"$G;H$o$l$k;zBN$O!"(Btypewriter type $B$K$J$j$^$9!#$3$N@_Dj$r$b$H$KLa$9$K$O!"(B {\src2tex{texfont=rm}} $B$H$$$&(B escape sequence $B$@$1$+$i$J$k%3%a%s%H9T$r!"=q$-F~$l$^$9!#Nc$($P!"(BC $B$N>l9g(B $B$G$9$H!"(B /* {\src2tex{texfont=rm}} */ $B$H$9$l$P$h$$$o$1$G$9!#(B $B>0!"(Bsrc2tex escape sequence $B$N>\$7$$;H$$J}$O!"(Bsrc2tex.c.ps $B$G@bL@$5$l$F$$$^$9!#(B ------------------------------------------------------------------------------- $B!|(B $B$N%5%U%#%C%/%9$r8+$F!"0J2<$N$h$&$KH=Dj$7$^$9!'(B .tex, .txt, .doc => TEXT .bas, .vb => BASIC .c, .cpp, .vc => C, C++, OBJECTIVE-C .cbl, .cob => COBOL .f, .for => FORTRAN .html => HTML .java => JAVA .lsp, .sc, .scm, .el => LISP, SCHEME makefile => MAKE .p, .pas, .tp => PASCAL .pl, .prl => PERL .sh, .csh, .ksh => SHELL .tcl, .tk => TCL/TK .asi, .asir, .asr => ASIR .mac, .max => MACSYMA, MAXIMA .map, .mpl => MAPLE .mat, .mma => MATHEMATICA .ml, .mtlb, .oct => MATLAB, OCTAVE .mu = MuPAD .red, .rdc => REDUCE $B$3$l$GH=Dj=PMh$J$+$C$?$H$-!"$"$k$$$O=i$a$+$i%U%!%$%kL>$,M?$($i$l$F$$$J$+$C$?>l(B $B9g$K$O!"M=Ls8l$K$h$kH=Dj$r;n$_$^$9!#$=$l$G$bH=DjITG=$J$H$-$K$O!"$?$@$N(B TEXT $B$@(B $B$H9M$($^$9!#(B $B"((B $B$b$7!"8@8l$N<+F0H=Dj$,8mF0:n$9$k%=!<%9%U%!%$%k$,$_$D$+$j$^$7$?$i!"@'Hs(B kamano@po.iijnet.or.jp $B$^$GAw$C$F2<$5$$!#$=$N$h$&$J%=!<%9$O!"<+F0H=Dj%k!<%A%s$N2~NI$KI,MWIT2D7g$@$H!"(B $B$o$l$o$l$O9M$($F$$$^$9!#$46(NO$r$*4j$$CW$7$^$9!#(B ------------------------------------------------------------------------------- $B!|(B $Bl9g$J$i(B $B$P!"(Bsrc2tex.s2t $B%U%!%$%k$NCf$G$"$i$+$8$a(B \settabs 3\columns $B$J$I$HDj5A$7$F$*$-!"(B * {\vskip-1\baselineskip\+ \phantom{\tt *}\hrulefill * & {\tt *} & \cr} * {\vskip-1\baselineskip\+ \phantom{\tt *}\hfill SUBROUTINE1\hfill * & {\tt *} & \cr} * {\vskip-1\baselineskip\+ \phantom{\tt *}\hfill 1'st pde solver\hfill * & {\tt *} & \cr} * {\vskip-1\baselineskip\+ \phantom{\tt *}\hrulefill * & {\tt *} & \cr} $B$H$$$C$?(B TeXnique $B$rMQ$$$k$3$H$b=PMh$^$9!#$4B8CN$N$h$&$K!"(BTeX $B$K$O$+$J$j$N<+M3(B $BEY$,$"$k$N$G!">e5-$NJ}K!0J30$K$b?'!9$J$d$jJ}$,$"$kH&$G$9!#(B ------------------------------------------------------------------------------- $B!|(B $Bl=j!#(B src2tex.s2t $B$H(B src2latex.s2t $B$O2?=h$KCV$$$F$*$1$PNI$$$N$G$7$g$&$+!)(B $B!|(B $BEz$((B plain TeX $B$N(B input-file *.tex $B$*$h$S(B LaTeX $B$N(B style-file *.sty $B$HF1$8MM$K(B $B07$($^$9!#$I$N(B directory $B$r$I$N$h$&$J=g=x$GC5$9$+$O!"$"$J$?$N(B TeX $B4D6-$K0MB8$7(B $B$^$9!#(BTeX, LaTeX $B$N%^%K%e%"%k$r;2>H$7$F2<$5$$!#(B ------------------------------------------------------------------------------- $B!|(B $B$l(B src2tex2ps -twocolumns -pagelength 20 src2latex2ps -fourcolumns -pagelength 35 $B$H$7$^$9!#$?$@$7!"!V(B-pagelength 0$B!W$H$9$k$H!"9THV9f$OIU$-$^$9$,!"#1JG$K0u:~$5$l(B $B$k9T?t$N%3%s%H%m!<%k$O(B TeX $B$K0Q$M$i$l$^$9!#;DG0$J$,$i!"$3$l$i$N%7%'%k%9%/%j%W%H(B $B$O!"$=$N$^$^$G$O$&$^$/F0$+$J$$$+$b$7$l$^$;$s!#3F?M$N(B UNIX $B4D6-$K9g$&$h$&$K!V=q(B $B$-49$($F$*;H$$2<$5$$!#!W>\$7$/$O!"(BDVI $B%U%!%$%k(B src2tex2ps.dvi $B$H(B src2latex2ps .dvi $B$r$*FI$_2<$5$$!#(B ------------------------------------------------------------------------------- $B!|(B $B$r%\!<%k%IBN$"$k$$$OFCJL$J;zBN$GI=8=$5$;$?(B $B$$$N$G$9$,!"$=$N$h$&$J;v$O2DG=$G$7$g$&$+!)(B $B!|(B $BEz$((B Src2tex $B$K$O$=$N$h$&$J5!G=$O$"$j$^$;$s$,!"(Bsrc2tex $B$N=PNO$9$k(B TeX $B%U%!%$%k$r!"(B sed $BEy$rMQ$$$F(B s/}{/}{\\bf }{/g $B$H$$$&$h$&$J6q9g$K$7$F!"(B }{ ===> }{\bf }{ $B$HCV49$7$F$_$F2<$5$$!#$3$3$G!"(Bsrc2tex $B$O%W%m%0%i%`%(%j%"$N(B $B$r!"I,$:(B }{ $B$H$$$&J8;zNs$KK]Lu$9$k$N$G!"$3$N@-$@$1$r%\!<%k%IBN$G0u;z$7$?$$Ey$N!"$A$g$C(B $B$HJ#;($JJQ49$r9T$$$?$$$H$-$K$O!"(Bperl $B%9%/%j%W%H$NMxMQ$r$*A&$a$7$^$9!#(B $B;29M$^$G$K!"#C(B $B$NM=Ls8l$r%\!<%k%IBN$K$7$?$$$H$-$K2f!9$,;H$C$F$$$k(B shell $B%9%/%j(B $B%W%H(B c2tex $B$H(B sed $B%9%/%j%W%H(B c2tex.sed $B$r!"%Q%C%1!<%8$KF~$l$F$*$-$^$7$?!#(B ------------------------------------------------------------------------------- $B!|(B $Bl9g$K8@8l$N<+F0H=Dj$,!"I,MW$@$H9M$($F$$$^$9!#(B (1) src2tex $B$"$k$$$O(B src2latex $B$,!"%U%!%$%kL>$rM?$($i$l$:$K!"(B $BI8=`F~NO$+$i%G!<%?$rl9g(B (2) *.m $B$N$h$&$K!"J#?t$N8@8l$G6&DL$7$FF1$8(B filename-suffix $B$,(B $BMQ$$$i$l$F$$$k;~(B (3) filename-suffix $B$,873J$K5,Dj$5$l$F$$$J$$8@8l$N%=!<%9$rJQ(B $B49$7$J$1$l$P$J$i$J$$>l9g(B $B$b$A$m$s!"<+F0H=Dj$J$ID|$a$F!"(Bsrc2tex $B$,(B -f77 $B$H$+(B -maple $B$J$I$H$$$C$?%*%W(B $B%7%g%s$rM}2r$G$-$k$h$&$K$9$kJ}$,!"MZ$+$K4JC1$J$3$H$OJ,$+$C$F$$$^$9!#$7$+$7!"%W(B $B%m%0%i%_%s%0$NFq$7$5$rHr$1$k$?$a$K!"MM!9$J%*%W%7%g%s$r@_$1$k$3$H$O!";dE7Ln$NH~(B $B0U<1$H?.>r$KH?$7$^$9!#$=$l$O!"%W%m%0%i%^$NBUK}$5$N%D%1$r!"%f!<%6$KJ'$o$;$F$$$k(B $BMM$J$b$N$@$+$i$G$9!#(B $BJP6~$J%d%D$H$*;W$$$G$7$g$&(B (^^) . $B$G$b!"$3$l$O;dE7Ln$N?.G0$G$9!#$4M}2rD:$1$k$H(B $B4r$7$$$N$G$9$,!&!&!&(B src2tex-2.12h.orig/HISTORY100644 1750 1750 3255 6266065660 15167 0ustar kawamurakawamuraOct 6, 1992 Src2tex version 1.1 was written by K. AMANO only for his private use. After that, several vesion ups followed. Aug 17, 1993 Version 1.9 was released to some friends of K. AMANO's. Jan 11, 1994 Version 2.1 was completed by K. AMANO, S. HATAKI and S. MAEDA and released to their friends. Version 2.1 was followed by several revised versions 2.2-2.7. Jul 7, 1994 Version 2.8 was released to the public as a free software in fj.sources. Nov 3, 1994 Prof. M. Yamasaki joined src2tex-group. Version 2.8 is totally brushed up by virtue of net people and version 2.9 is completed. Version 2.9 is released in fj.sources newsgroup. Mar 3, 1995 FAQ and FAQ.JIS are added to the package. They also fixed several bugs. The acceptable language family of src2tex and src2latex is extented to the union of {BASIC, C, C++, FORTRAN, LISP, PASCAL} and {MAPLE, MATHEMATICA, REDUCE, ASIR}. Src2tex version 2.10 is posted to fj.sources newsgroup. Sep 11, 1995 Src2tex version 2.11 is released in fj.sources newsgroup. This version is able to translate not only BASIC, C, C++, FORTRAN, LISP, PASCAL, SCHEME; ASIR, MAPLE, MATHEMATICA, REDUCE but also COBOL, MAKE, PERL, SHELL, TCL/TK, MATLAB and OCTAVE into TeX. Jan 12, 1997 Version 2.12 was written by K. AMANO and S. NOMOTO. HTML, JAVA, MACSYMA, MAXIMA and MuPAD are added to the language list of src2tex. ------------------------------------------------------------------------- * ASIR, JAVA, MACSYMA, MAPLE, MATHEMATICA, MATLAB, REDUCE are registered trademarks of Fujitsu Laboratories, Ltd., Sun Microsystems, Inc., Macsyma Inc., Waterloo Maple Software, Wolfram Research, Inc., The MathWorks, Inc., The Rand Corporation respectively. src2tex-2.12h.orig/hanoi.c100644 1750 1750 6704 5736530032 15336 0ustar kawamurakawamura/* {\hrulefill} * {\ % beginning of TeX mode \centerline{\bf Towers of Hanoi} {\midinsert\narrower\narrower \noindent This program gives an answer to the following famous problem (towers of Hanoi). There is a legend that when one of the temples in Hanoi was constructed, three poles were erected and a tower consisting of 64 golden discs was arranged on one pole, their sizes decreasing regularly from bottom to top. The monks were to move the tower of discs to the opposite pole, moving only one at a time, and never putting any size disc above a smaller one. The job was to be done in the minimum numbers of moves. What strategy for moving discs will accomplish this optimum transfer? \endinsert} % end of TeX mode } * {\hrulefill} */ /* {\hrulefill\ hanoi.c\ \hrulefill} */ #include #define ARRAY 8 /* {\ disc の数 \hfill} */ int disc[3][ARRAY]; /* {\ disc に関するデータの置き場所 \hfill} */ void init_array() /* {\ disc に関するデータの初期化 \hfill} */ { int j; for (j = 0; j < ARRAY; ++j) /* {\ [問題] この {\bf for} ループ を抜け出した後、2次元配列 \hfill} */ /* {\null{\tt disc[][]} にはどのよう なデータが代入されることに \hfill} */ /* {\ なるか、具体的に述べよ。 \hfill} */ { disc[0][j] = ARRAY - j; disc[1][j] = 0; disc[2][j] = 0; } } void print_result() /* {\ 結果の表示 \hfill} */ { static long counter = 0; /* {\ [問題] ここで {\tt static} と宣言したのは、なぜなのか \hfill} */ /* {\ 考えよ。もしも {\tt static} を削除したら、何が起こる \hfill} */ /* {\ か、実験をしてみよう。 \hfill} */ int i, j; printf("---#%d---\n", ++counter); for (i = 0; i <= 2; ++i) { printf("[%d] ", i); for (j = 0; j < ARRAY; ++j) { if (disc[i][j] != 0) printf("%d ", disc[i][j]); else break; } printf("\n"); } } void move_one_disc(i, j) /* {\ 1枚の disc を pole $i$ から pole $j$ に移動する \hfill} */ { static int *ptr[3] = {disc[0] + ARRAY, disc[1], disc[2]}; (*ptr[j]++) = (*--ptr[i]); /* {\ [問題] {\tt ++} はポインタ の後にあり、{\tt --} はポインタ \hfill} */ /* {\ の前にある。なぜ、そのように しなければならない \hfill} */ /* {\ のか説明せよ。\hfill} */ *ptr[i] = 0; } void move_discs(n, i, j, k) /* {\ 上から $n$ 枚目までの disc を、pole $i$ から pole $j$ に \hfill} */ /* {\ pole $k$ を経由して、移動する \hfill} */ int n, i, j, k; { if (n >= 1) { move_discs(n - 1, i, k, j); /* {\ 関数 {\tt move\_discs()} の中で、さらに自分自身 \hfill} */ move_one_disc(i, j); /* {\ {\tt move\_discs()} が使われ ている。このような \hfill} */ print_result(); /* {\ 手法は、「再帰的呼びだし」 といわれる。一見 \hfill} */ move_discs(n - 1, k, j, i); /* {\ 複雑に見える問題でも、 再帰的手法を用いると、\hfill} */ } /* {\ 簡単に解けてしまうことが、 しばしばある。\hfill} */ } /* {\vskip 1cm \special{epsfile=hanoi1.eps hscale=0.365 vscale=0.3} \special{epsfile=hanoi2.eps hoffset=225 hscale=0.35 vscale=0.3} \vskip 5cm \noindent たとえば、関数 {\tt move\_discs(4,i,j,k)} を呼び出すことは、 上図のような操作をすることに対応する。\hfill} */ main() { init_array(); move_discs(ARRAY, 0, 1, 2); /* {\ {\tt ARRAY} 枚の disc を pole 0 から pole 1 に pole 2 \hfill} */ /* {\ を経由して、移動 する \hfill} */ } src2tex-2.12h.orig/INSTALL100644 1750 1750 101 5776753160 15103 0ustar kawamurakawamuracf. src2tex.c.ps cf. also contrib/DOS_USER if you are a DOS user src2tex-2.12h.orig/MANUAL100644 1750 1750 21 5553626713 14727 0ustar kawamurakawamuracf. src2tex.c.ps src2tex-2.12h.orig/Makefile100644 1750 1750 12263 6133555044 15553 0ustar kawamurakawamura#{\hrulefill\ {\tt\#} # \vskip 1ex # \input fonts.tex % define fonts # \input title.tex % title and authors # \vskip 1ex # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} #{\hrulefill\ Makefile\ \hrulefill\ {\tt\#}} #{\hrulefill\ preliminaries\ \hrulefill\ {\tt\#} # \par # Here we just give preliminary definitions. # If you don't have {\tt gcc}, please replace it with {\tt cc} # and plug suitable values into {\tt CFLAGS}. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} CC = gcc CFLAGS = -O2 SRCS = fileio.c getdata.c langflag.c modflag.c options.c pas_bold.c \ tools.c text2tex.c src2tex.c OBJS = fileio.o getdata.o langflag.o modflag.o options.o pas_bold.o \ tools.o text2tex.o src2tex.o #{\hrulefill\ make all\ \hrulefill\ {\tt\#} # \par # ``{\tt make all}'' gives you {\sl src2tex} and {\sl src2latex}. # Hopefully, you do not encounter any errors. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} all : $(CC) $(CFLAGS) -DUNIX -DTEX -c $(SRCS) $(CC) $(OBJS) -o src2tex $(CC) $(CFLAGS) -DUNIX -DLATEX -c $(SRCS) $(CC) $(OBJS) -o src2latex #{\hrulefill\ make install\ \hrulefill\ {\tt\#} # \par # ``{\tt make install}'' just strips {\sl src2tex} and {\sl src2latex}, # and removes object files. # You have to move executables to your favorite directory by yourself. # No online manual is available at the moment. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} install : strip ./src2tex strip ./src2latex rm -f ./$(OBJS) @-echo "" @-echo " So, you have finished installation successively." @-echo " Please copy src2tex and src2latex to a suitable" @-echo " directory you like." @-echo "" install.man : @-echo "" @-echo " Sorry, there exists no online manual." @-echo "" #{\hrulefill\ make dos\ \hrulefill\ {\tt\#} # \par # If you are a DOS user, # please just type ``{\tt make dos}'' # instead of ``{\tt make all}'' and ``{\tt make install}''. # Then you will get {\sl src2tex.exe} and {\sl src2ltex.exe} . # IF you don't have {\tt gcc}, # please replace it with {\tt cc} or something like that. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} dos : @-echo "" @-echo " Please don't be panic when \"make dos\" does not work." @-echo " What you have to do is to be patient and edit Makefile" @-echo " carefully. I am sure it would turn out to be a piece" @-echo " of cake." @-echo "" $(CC) $(CFLAGS) -DDOS -DTEX -c $(SRCS) $(CC) $(OBJS) -o src2tex $(CC) $(CFLAGS) -DDOS -DLATEX -c $(SRCS) $(CC) $(OBJS) -o src2ltex del *.o #{\hrulefill\ make verbose\ \hrulefill\ {\tt\#} # \par # ``{\tt make verbose}'' generates noisy {\sl src2tex} and {\sl src2latex}. # They report everything what they are doing. # The authors are using them to find bugs. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} verbose : $(CC) -DDEBUGGING -DUNIX -DTEX -c $(SRCS) $(CC) $(OBJS) -o src2tex $(CC) -DDEBUGGING -DUNIX -DLATEX -c $(SRCS) $(CC) $(OBJS) -o src2latex #{\hrulefill\ make plain\ \hrulefill\ {\tt\#} # \par # ``{\tt make plain}'' generates plain {\sl src2tex} and {\sl src2latex}. # They do not output any preambles and postambles; # they simply output {\TeX}t without anything like # \item{} # $\backslash$documentstyle$\cdots$, # \item{} # $\backslash$begin{document}, # \item{} # $\backslash$end{document}, # \item{} # $\backslash$bye, # \par # \noindent They would be useful when you have to insert program lists # into your manuscript written in {\TeX}. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} plain : $(CC) -DPLAIN -DUNIX -DTEX -c $(SRCS) $(CC) $(OBJS) -o src2tex $(CC) -DPLAIN -DUNIX -DLATEX -c $(SRCS) $(CC) $(OBJS) -o src2latex clean : rm -f ./$(OBJS) rm -f ./a.out rm -f ./src2tex rm -f ./src2latex ./src2ltex rm -f ./*~ rm -f ./*.bak rm -f ./Makefile.tex rm -f ./*.h.tex rm -f ./*.c.tex rm -f ./*.scm.tex rm -f ./*.red.tex rm -f ./contrib/src2tex2dvi.tex rm -f ./contrib/src2tex2ps.tex rm -f ./contrib/src2latex2dvi.tex rm -f ./contrib/src2latex2ps.tex rm -f ./contrib/c2tex.tex rm -f ./contrib/*~ rm -f ./contrib/*.bak #{\hrulefill\ make docs\ \hrulefill\ {\tt\#} # \par # ``{\tt make docs}'' simply generates several examples # by using {\sl src2tex2ps}, {\sl src2latex2ps}, {\it etc\/}. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} docs : src2tex2dvi Makefile src2tex2ps *.h src2tex2ps *.c src2latex2ps *.scm src2tex2ps popgen.red src2tex2ps -fourcolumns -pagelength 35 sqrt_mat.red cd ./contrib ; src2tex2dvi src2tex2dvi cd ./contrib ; src2tex2dvi src2tex2ps cd ./contrib ; src2tex2dvi src2latex2dvi cd ./contrib ; src2tex2dvi src2latex2ps cd ./contrib ; src2tex2dvi c2tex #{\hrulefill\ make report\ \hrulefill\ {\tt\#} # \par # ``{\tt make report}'' send your local {\sl /etc/motd} file # to one of the authors. # This would be quite helpful for further development of {\sl src2tex}. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} report : @-if [ -f /etc/motd ] ; \ then \ echo "TITLE:src2tex version 2.12" > make_report.log; \ echo USER:$(USER) >> make_report.log; \ echo HOSTNAME:$(HOSTNAME) >> make_report.log; \ cat /etc/motd >> make_report.log; \ echo -n "reporting to kamano@po.iijnet.or.jp ... " ; \ mail kamano@po.iijnet.or.jp \ < make_report.log ; \ echo "done" ; \ rm make_report.log ; \ else \ echo "make report failed" ; \ echo "thank you very much anyway" ; \ fi src2tex-2.12h.orig/Makefile.dvi100644 1750 1750 16770 6266067154 16352 0ustar kawamurakawamura; TeX output 1997.01.12:1354=K`y cmr10src2texUUv吾ersion2.123&煌'ExXtwithoutan吾ythinglike。ndoGcumen吾tstyle Й,。nbGegindocumen吾t,。nenddoGcumen吾t,。nb吾ye,。TheyUUw吾ouldbGeusefulwhenyouhavetoinsertprogramlistsintoyourmanuscriptwritteninTU>'ExX.。#UUff#。plain?:。)$(CC)?-DPLAIN-DUNIX-DTEX-c$(SRCS)YMak吾e lepageUU2 *=src2texUUv吾ersion2.123&)簇$(CC)?$(OBJS)-osrc2tex、 .1)$(CC)?-DPLAIN-DUNIX-DLATEX-c$(SRCS)。)$(CC)?$(OBJS)-osrc2latex。clean?:。)rm?-f./$(OBJS)。)rm?-f./a.out。)rm?-f./src2tex。)rm?-f./src2latex./src2ltex。)rm?-f./*~。)rm?-f./*.bak。)rm?-f./Makefile.tex。)rm?-f./*.h.tex。)rm?-f./*.c.tex。)rm?-f./*.scm.tex。)rm?-f./*.red.tex。)rm?-f./contrib/src2tex2dvi.tex。)rm?-f./contrib/src2tex2ps.tex。)rm?-f./contrib/src2latex2dvi.tex。)rm?-f./contrib/src2latex2ps.tex。)rm?-f./contrib/c2tex.tex。)rm?-f./contrib/*~。)rm?-f./contrib/*.bak。#UUffKOmak吾edoGcsffKO#。\make?docs"UUsimplygeneratessev吾eralexamplesbyusingsrc2tex2ps,src2latex2ps,$': cmti10etc叫.。#UUff#。docs?:。)src2tex2dvi?Makefile。)src2tex2ps?*.h。)src2tex2ps?*.c。)src2latex2ps?*.scm。)src2tex2ps?popgen.red。)src2tex2ps?-fourcolumns-pagelength35sqrtEff&fBmat.red。)cd?./contrib;src2tex2dvisrc2tex2dvi。)cd?./contrib;src2tex2dvisrc2tex2ps。)cd?./contrib;src2tex2dvisrc2latex2dvi。)cd?./contrib;src2tex2dvisrc2latex2ps。)cd?./contrib;src2tex2dvic2tex。#UUffgmak吾erepGortffg#。\make?report"懽sendy吾ourloGcal/etc/motd letooneoftheauthors.ThiswouldbGequitehelpfulfor furtherUUdev吾elopmentofsrc2tex.。#UUff#。report?:。)@-if?[-f/etc/motd];\。)then?\。Secho?"TITLE:src2texversion2.12">makeEff&fBreport.log;\。Secho?USER:$(USER)>>makeEff&fBreport.log;\。Secho?HOSTNAME:$(HOSTNAME)>>makeEff&fBreport.log;\。Scat?/etc/motd>>makeEff&fBreport.log;\YMak吾e lepageUU36=src2texUUv吾ersion2.123&S犯echo?-n"reportingtokamano@po.iijnet.or.jp...";\、 Smail?kamano@po.iijnet.or.jp\。}<?makeEff&fBreport.log;\。Secho?"done";\。Srm?makeEff&fBreport.log;\。)else?\。Secho?"makereportfailed";\。Secho?"thankyouverymuchanyway";\。)fi。YMak吾e lepageUU4[;%嫣GE"V cmbx10+- cmcsc10$': cmti10!p0J cmsl10煌$r$+$J$($k$?$a(B $B$N%D!<%k$G$9!#(B $B!|(B $B%3%a%s%H%(%j%"$K!"(BTeX $B$N$h$&$JJ8K!$G(B TeXt $B$d?t<0$r=q$-$?$$!#(B $B$?$H$($P!"#C$N%W%m%0%i%`$NCf$G!"(B r=sqrt(x*x+y*y); /* $BH>7B(B $r=\sqrt{x^2+y^2}$ */ $B$"$k$$$O!"(BREDUCE $B$N%W%m%0%i%`$G(B int(x/sqrt(1-x^2),x); % $BITDj@QJ,(B $\int{x\over\sqrt{1-x^2}}\,dx$ $B$H$$$&$h$&$J$3$H$r$7$?$$!#(B $B!|(B $B%3%a%s%H%(%j%"$K!"(BPostScript $B$N/$7$@$1=q$-BX$($^$7$?!#(B (3) $B%f!<%6$N3'$5$s$+$i$NMWK>$KEz$($F!"(Bsrc2tex $B$H(B src2latex $B$r!"(BHTML, JAVA, MACSYMA, MAXIMA, MuPAD $B$K$bBP1~$5$;$^$7$?!#$3$l$i$N8@8l$N<+F0H=Dj%k!<%A%s$b(B $BAH$_9~$_$^$7$?!#(B (4) $B%f!<%6$NJ}!9$N4uK>$K1h$C$F(B RCS(Revision Control System) $B$KBP1~$7$^$7$?!#6q(B $BBNE*$K$O!"(B $: ...$ $B$H$$$&N`$NI=8=$rH/8+$7$?>l9g$K$O!"4:$($F(B TeX-mode $B$K0\9T$7$J$$$h$&$K$7$^$7(B $B$?!#(B (5) $B8@8l$N<+F0H=Dj$O!"M=Ls8lEy$K4X$9$k2Y=EI>2A$rMQ$$$F9T$o$l$^$9$,!"B?$/$N%=!<(B $B%9$r2A4X?t$r2~NI$7$^$7$?!#(BVersion 2.12 $B$G$O!"M>Dx$R$M$/$l$?%W%m%0%i%`$G$J$$8B$j!"8@8l$NH=Dj$r@53N$K9T$($kMM(B $B$K$J$C$?$H;W$$$^$9!#(B $B%Q%C%1!<%8$K$O!"(Bsrc2tex, src2latex $B$r$h$j;H$$0W$/$7!"$+$D$=$N5!G=$r3HD%$9$k$?$a(B $B$N%7%'%k%9%/%j%W%H(B src2tex2dvi, src2tex2ps, src2latex2dvi, src2latex2ps $B$bF~$C$F$$$^$9!#3F?M$N%5%$%H$K9g$&$h$&$K!V=q$-49$($F!W$4MxMQ2<$5$$!#$h$j>\$7(B $B$/$O!"%Q%C%1!<%8$NCf$N(B DVI $B%U%!%$%k(B ^^^^^^^^^^ src2tex2dvi.dvi, src2tex2ps.dvi, src2latex2dvi.dvi, src2latex2ps.dvi $B$r$*FI$_2<$5$$!#$3$l$i$N%U%!%$%k<+BN(B src2tex2dvi src2tex2dvi src2tex2ps src2latex2dvi src2latex2ps $B$H$d$C$F!":n$i$l$?$b$N$G$9!#$^$?!"%7%'%k%9%/%j%W%H$,;H$($k4D6-$K$J$$(B MS-DOS $B%f!<%6$N$?$a$K!"4v$D$+$N%P%C%A%U%!%$%k$bE:IU$7$^$7$?!J(B DOS_USER.SJS $B$r;2>H$7(B $B$F2<$5$$(B $B!K!#(B ------------------------------------------------------------------------- * ASIR, JAVA, MACSYMA, MAPLE, MATHEMATICA, MATLAB, REDUCE, UNIX are registered trademarks of Fujitsu Laboratories, Ltd., Sun Microsystems, Inc., Macsyma Inc., Waterloo Maple Software, Wolfram Research, Inc., The MathWorks, Inc., The Rand Corporation AT&T Bell Laboratories respectively. src2tex-2.12h.orig/contrib/ 40755 1750 1750 0 6266067663 15446 5ustar kawamurakawamurasrc2tex-2.12h.orig/contrib/DOS_USER100444 1750 1750 3415 5723037154 16737 0ustar kawamurakawamuraTo: DOS_USERs, [1] Some compilers do not accept unix files, and you may need to convert the source files to dos text files. And you need to modify the makefile unless you use GCC. [2] The behaviour of dos-version of src2tex is different from that of unix- version. It produces "sample.tex" from "sample.c" instead of "sample.c.tex". This is not a serious problem in general, but read the following carefully! o src2tex can be used to pretty-print a TeX source file. But >>never<< try : src2tex input.tex unless you want to lose your TeX file! Anyway src2tex will fail in converting from src to tex. o src2tex can be used to pretty-print a text file with the extension .log. src2tex will produce the desired .tex file. But >>never<< tex the .tex file in the same directory unless you want to lose the original .log file! You can try : src2tex < input.tex[log] > output.tex ^^^^^^(use a different name!) tex output to avoid overwriting the .tex[log] file. [Note. Redirection is not recommended for source files, since src2tex cannot use the file extension information when determining the language.] Or you can write a batch file which takes care of these special situations. (You may need a tool to manipulate filenames and extensions in batch files.) [3] src2tex(resp. src2ltex) produces a tex file which will input a style file of the name "src2tex.s2t"(resp. "src2ltex.s2t") if there exists one in the current directory. This can be used to customise your TeX output without touching the source file. If you often switch the style files, a batch file (say, "get.bat") like: copy c:\tex\macro\%1.s2t src2tex.s2t might be handy to use (e.g., get a3 ). Msayuki Yamasaki myamasa@tansei.cc.u-tokyo.ac.jp yamasaki@crescent.josai.ac.jp src2tex-2.12h.orig/contrib/DOS_USER.SJS100444 1750 1750 17116 5722300737 17417 0ustar kawamurakawamura============= DOS_USER.SJS ========================================= cnr src2tex gpF ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ V src2tex \[XAゥ DynaBookEZ486 CXg[vigpnrFナpcnr V5jBt @CADJGCC make dos BE PC9801 Turbo C Atmhw` ョt@Ccnr`ョタsG[B Makefile BWarning A タst@CB src2tex {R[h EUC OAlr|cnr gAR[hKvB nkf p nkf -e sample.c | src2tex | nkf -s > sample.tex tex sample PタsA@ src2tex t@Cn By[WEt@C\ヲ src2dvi. bat ob`t@CgBA @@@@src2dvi sample.c Asample.tex JgEfBNgA TeX N sample.dvi B A_B ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ PDgpタst@Cob`t@C @@B src2tex.exe, tex.exe gpBK @@v @@@@@src2tex -> src2ltex, go32 src2tex, ..... @@@@@tex -> jtex, latex, jlatex, ...... @@B QDt@CfBNgJgfBNgタs @@BAc:\ Asrc2dvi d:\sample.c @@B RDタs BU.COM (Batch Utility) NKF.EXE ( Network Kanji @@Filter) \tgEFAKvBBU10?.LZH a @@arvBJBA-Net BAXL[uG @@t[\tgEFAPOOIvBnkf internet @@ news VBuUNIX USERv @@PXXSNNo.10t^bc|qnl fj.binaries.msdos @@ NKF94701.LZH B SDpJ^JiAASpタs @@BYt kana.sed gpB @@@@sed -f kana.sed input_file > output_file @@ABApsKvAX @@ebvob`t@CgB TDgq .tex t@Ci{jUe @@|fBNggqORs[A @@src2tex BEvr[t@C @@gqA src2dvi.bat dlB @@BA .tex t@Ct@C @@cATeX タsBRc @@A tex2tex.bat gBTufBN @@g __SRC2 cBAgq .log t @@@C src2dvi.bat ATeX log t@C @@hA TeX log t@C @@B UDsrc2tex タs .tex t@Ct@C @@ABo @@b`t@Cwヲs REM B VDdvi t@Cvr[R}hB WDob`t@C SRC gpBss @@AXB AJgEfBNg @@__src2 e|TufBNgs @@BssAXBAvO @@`ChEvZXタsAVer.5 ~cnr @@BAMOREENV c @@[B@AJBA-Net @@ENV c[gATCYgpP @@Bi DynaBook Net FFX @@BTCY`FbN@@ @@ob`t@CABj XDVer.3 cnrgAob`t@C @ @@BimFj ゥgvOAt@C idq[jdB ゥgprob`t@CAsKv BゥRCB R@V@UNPOQX (H7.2.18 C) internet : myamasa@tansei.cc.u-tokyo.ac.jp yamasaki@crescent.josai.ac.jp DynaBook NeT: DY312847 JBA-Net : JBA42253 src2dvi.bat: --------------------- cut here --------------------- @ECHO OFF IF EXIST %1 GOTO checkenv ECHO ..... cannot find "%1"!! GOTO end :checkenv SET SRC=12345678 IF "%SRC%"=="12345678" GOTO getname ECHO Not enough ENVIRONMENT SIZE! GOTO end :getname BU -nSRC -c STRTOKFILE %1 md __src2 ECHO ...... now converting to EUC ...... nkf -e %1 > __src2\%1 cd __src2 IF EXIST %SRC%.tex GOTO exterror IF EXIST %SRC%.log GOTO exterror src2tex %1 cd .. REM Uncomment the following 5 lines, if you like. REM IF NOT EXIST %SRC%.tex GOTO shori REM ECHO A file named "%SRC%.tex" already exists! REM BU KEYYESNO Overwrite %SRC%.tex? (Y/N) REM IF ERRORLEVEL 1 GOTO end REM :shori ECHO ...... now converting to Shift-JIS ...... nkf -s __src2\%SRC%.tex > %SRC%.tex del __src2\%SRC%.tex del __src2\%1 rd __src2 TeX %SRC% GOTO preview :exterror ren %1 %SRC% src2tex %SRC% del %SRC% ren %SRC%.tex %SRC% ECHO ...... now converting to Shift-JIS ...... nkf -s %SRC% > %SRC%.tex tex %SRC% cd .. copy __src2\%SRC%.dvi %SRC%.dvi del __src2\%SRC% del __src2\%SRC%.tex del __src2\%SRC%.log del __src2\%SRC%.dvi rd __src2 :preview REM DVIOUT %SRC% :end set SRC= --------------------- cut here --------------------- tex2tex.bat: --------------------- cut here --------------------- @ECHO OFF SET SRC=12345678 IF "%SRC%"=="12345678" GOTO getname ECHO Not enough ENVIRONMENT SIZE! GOTO end :getname BU -nSRC -c STRTOKEXT %1 BU STRICMP %SRC% TeX IF ERRORLEVEL 1 GOTO wrongext IF EXIST %1 GOTO shori ECHO "%1" does not exist! GOTO end :wrongext BU -nSRC -c STRTOKFILE %1 IF EXIST %SRC%.tex GOTO suggest ECHO NO SUCH FILE! GOTO end :suggest ECHO The extension of "%1" is not "TEX"! BU KEYYESNO Do you mean "%SRC%.tex"? (Y/N) IF ERRORLEVEL 1 GOTO end ECHO. :shori BU -nSRC -c STRTOKFILE %1 md __src2 ECHO ...... now converting to EUC ...... nkf -e %SRC%.tex > __src2\%SRC% cd __src2 src2tex %SRC% del %SRC% ren %SRC%.tex %SRC% ECHO ...... now converting to Shift-JIS ...... nkf -s %SRC% > %SRC%.tex del %SRC% tex %SRC% :preview REM dviout %SRC% REM cd .. :end set SRC= --------------------- cut here --------------------- end of tex2tex.bat kana.sed: --------------------- cut here --------------------- # kana.sed # pJ^JiSp # sed -f kana.sed input > output s/衿/K/g s/迎/M/g s/五/O/g s/閤/Q/g s/剤/S/g s/枝/U/g s/灼/W/g s/殉/Y/g s/賞/[/g s/図/]/g s/折/_/g s/挿/a/g s/袋/d/g s/筑/f/g s/爪/h/g s/鋪/p/g s/盆/s/g s/餅/v/g s/欲/y/g s/累/|/g s/舗/o/g s/凡/r/g s/勿/u/g s/抑/x/g s/涙/{/g y/、ぅΗ┤葦桶患/BuvAE@BDFHb[ACEGI/ y/況弦沙悉梢請唾津毒班/JLNPRTVXZ\^`cegijklm/ y/碧麺力佰厶壞嶐慵无槿渤/nqtwz}~JK/ # end of kana.sed ----------------------- cut here ------------------------- end of kana.sed src2tex-2.12h.orig/contrib/src2tex2dvi100555 1750 1750 6556 5777114273 17656 0ustar kawamurakawamura#! /bin/sh #{\hrulefill\ {\tt\#} # \vskip 1ex # \input ../fonts.tex % define fonts # \input ../title.tex % title and authors # \vskip 1ex # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} #{\hrulefill\ src2tex2dvi\ \hrulefill\ {\tt\#} # \par\vskip 1ex # \centerline{\tt src2tex2dvi [-pagelength ] {\sl filenames}} # \par\vskip 1ex # It is necessary for {\sl src2tex2dvi\/} # that the following softwares are installed properly: # \par # {\sl\qquad nkf\ ,\ \ src2tex\ ,\ \ jtex\ .} # \par # \noindent {\sl Src2tex2dvi\/} is just written # by \ K. Amano \ for his private use. # Here Kanji converter {\sl nkf\/} would be unnecessary # if you are not Japanese. # If you are # a L\kern-.35em\raise.33ex\hbox{\eightcmr A}\kern-.2em\hbox{\TeX}\ user, # you have to replace ``{\tt tex}`` with ``{\tt latex}``. # If {\tt jtex} and {\tt jlatex} are not installed at your site # and if you are a Japanese install them # else replace them with {\tt tex} and {\tt latex} respectively. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} #{\hrulefill\ Preliminaries\ \hrulefill\ {\tt\#} # \par # Though {\sl src2tex\/} accepts only one single filename, # {\sl src2tex2dvi} allows to input multiple filenames # by virtue of the first\ `` {\tt for $\cdots$} ''\ statement. # There is an option related to number of lines printed in each logical page # \par # {\tt -pagelength}\ \ $n$ # \par\noindent # Here we also make a carbon copy of tilde file # \ {\sl filename}{\~\ } # which is created by Emacs, Mule or something like that. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test $# = 0 then echo "Usage: src2tex2dvi [-pagelength ] filenames" fi src2tex_option="" if test "$1" = "-pagelength" -o "$1" = "-p" then shift src2tex_option="-$1" shift fi for i in $* do if test -f $i~ then mv $i~ $i.bak fi #{\hrulefill\ Any Kanji $\Rightarrow$ EUC Kanji\ \hrulefill\ {\tt\#} # \par # This conversion is necessary since {\sl src2tex} works only for EUC codes. # If you don't use Japanese, you can skip this procedure. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i then mv $i $i~ nkf -e $i~ > $i fi #{\hrulefill\ Source File $\Rightarrow$ TeX file\ \hrulefill\ {\tt\#} # \par # This block is actually the main part of {\sl src2tex2dvi\/}. # Given source files are translated into {\TeX} here. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i then echo "src2tex" $src2tex_option $i src2tex $src2tex_option $i fi if test -f $i~ then mv $i~ $i fi #{\hrulefill\ EUC Kanji $\Rightarrow$ JIS Kanji\ \hrulefill\ {\tt\#} # \par # The official Kanji is JIS Kanji at the author's site. # So, he has applied {\tt nkf}, with {\ \tt -j] } option, # to {\TeX} file generated by {\sl src2tex\/}. # And also, if there exits an input file # it is included at the beginning of {\TeX} file. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i.tex then if test -f $i.input then mv $i.tex $i.tex~ nkf -j $i.input > $i.tex nkf -j $i.tex~ >> $i.tex else mv $i.tex $i.tex~ nkf -j $i.tex~ > $i.tex fi fi #{\hrulefill\ TeX file $\Rightarrow$ DVI file\ \hrulefill\ {\tt\#} # \par # If {\tt jtex} is not installed, then replace it with {\tt tex}. # We remove several intermediate files at the last stage. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i.tex then jtex $i.tex # jlatex $i.tex # rm $i.tex >/dev/null 2>&1 rm $i.tex~ >/dev/null 2>&1 rm $i.log >/dev/null 2>&1 fi done src2tex-2.12h.orig/contrib/c2tex100555 1750 1750 5717 5777765737 16543 0ustar kawamurakawamura#! /bin/sh #{\hrulefill\ {\tt\#} # \vskip 1ex # \input ../fonts.tex % define fonts # \input ../title.tex % title and authors # \vskip 1ex # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} #{\hrulefill\ c2tex\ \hrulefill\ {\tt\#} # \par\vskip 1ex # \centerline{\tt c2tex [-pagelength ] {\sl filenames}} # \par\vskip 1ex # It is necessary for {\sl c2tex\/} # that the following softwares are installed properly: # \par # {\sl\qquad nkf\ ,\ \ src2tex\ .} # \par # \noindent {\sl C2tex\/} is just written # by \ K. Amano \ for his private use. # Here Kanji converter {\sl nkf\/} would be unnecessary # if you are not Japanese. # If you are # a L\kern-.35em\raise.33ex\hbox{\eightcmr A}\kern-.2em\hbox{\TeX}\ user, # you have to replace ``{\tt tex}`` with ``{\tt latex}``. # If {\tt jtex} and {\tt jlatex} are not installed at your site # and if you are a Japanese install them # else replace them with {\tt tex} and {\tt latex} respectively. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} #{\hrulefill\ Preliminaries\ \hrulefill\ {\tt\#} # \par # Though {\sl src2tex\/} accepts only one single filename, # {\sl c2tex} allows to input multiple filenames # by virtue of the first\ `` {\tt for $\cdots$} ''\ statement. # There is an option related to number of lines printed in each logical page # \par # {\tt -pagelength}\ \ $n$ # \par\noindent # Here we also make a carbon copy of tilde file # \ {\sl filename}{\~\ } # which is created by Emacs, Mule or something like that. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test $# = 0 then echo "Usage: src2tex2dvi [-pagelength ] filenames" fi src2tex_option="" if test "$1" = "-pagelength" -o "$1" = "-p" then shift src2tex_option="-$1" shift fi for i in $* do if test -f $i~ then mv $i~ $i.bak fi #{\hrulefill\ Any Kanji $\Rightarrow$ EUC Kanji\ \hrulefill\ {\tt\#} # \par # This conversion is necessary since {\sl src2tex} works only for EUC codes. # If you don't use Japanese, you can skip this procedure. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i then mv $i $i~ nkf -e $i~ > $i fi #{\hrulefill\ Source File $\Rightarrow$ TeX file\ \hrulefill\ {\tt\#} # \par # This block is actually the main part of {\sl src2tex2dvi\/}. # Given source files are translated into {\TeX} here. # At the last stage, {\TeX} file is modified by using sed script c2tex.sed. # \par\noindent # Here, it is necessary to indicate # where the sed script {\sl c2tex.sed\/} exists. # So, please rewrite the following two lines containing ``c2tex.sed'' # appropriately. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i then echo "src2tex" $src2tex_option $i src2tex $src2tex_option $i fi if test -f $i~ then mv $i~ $i fi if test -f $i.tex then if test -f c2tex.sed # test -f /home/kamano/etc/c2tex.sed then mv $i.tex $i.tex~ sed -f c2tex.sed $i.tex~ > $i.tex # sed -f /home/kamano/etc/c2tex.sed $i.tex~ > $i.tex else echo "Error: cannot find c2tex.sed file" echo " It would be necessary to modity c2tex." fi fi done src2tex-2.12h.orig/contrib/src2tex2ps100555 1750 1750 11667 6024155250 17517 0ustar kawamurakawamura#! /bin/sh #{\hrulefill\ {\tt\#} # \vskip 1ex # \input ../fonts.tex % define fonts # \input ../title.tex % title and authors # \vskip 1ex # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} #{\hrulefill\ src2tex2ps\ \hrulefill\ {\tt\#} # \par\vskip 1ex # \centerline{\tt src2latex2ps [-twocolumns {\it or\/} -fourcolumns {\it or\/} -sixcolumns] [-pagelength ] {\sl filenames}} # \par\vskip 1ex # It is necessary for {\sl src2tex2ps\/} # that the following softwares are installed properly: # \par # {\sl\qquad nkf\ ,\ \ src2tex\ ,\ \ jtex\ ,\ \ dvi2ps\ ,\ \ psnup\ .} # \par # \noindent {\sl Src2tex2ps\/} is just written # by \ K. Amano \ for his private use. # Here Kanji converter {\sl nkf\/} would be unnecessary # if you are not Japanese. # If you are # a L\kern-.35em\raise.33ex\hbox{\eightcmr A}\kern-.2em\hbox{\TeX}\ user, # you have to replace ``{\tt tex}`` with ``{\tt latex}``. # If {\tt jtex} and {\tt jlatex} are not installed at your site # and if you are a Japanese install them # else replace them with {\tt tex} and {\tt latex} respectively. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} #{\hrulefill\ Preliminaries\ \hrulefill\ {\tt\#} # \par # Though {\sl src2tex\/} accepts only one single filename, # {\sl src2tex2ps} allows to input multiple filenames # by virtue of the first \ `` {\tt for $\cdots$} '' \ statement. # There are three options related to column style # \par # {\tt -twocolumns}\quad or\quad {\tt -fourcolumns} # \par\noindent # and number of lines printed in each logical page # \par # {\tt -pagelength}\ \ $n$ # \par\noindent # Here we also make a carbon copy of tilde file # \ {\sl filename}{\~\ } # which is created by Emacs, Mule or something like that. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test $# = 0 then echo -n "Usage: src2tex2ps [-twocolumns] [-fourcolumns]" echo " [-pagelength ] filenames" fi src2tex_option="" psnup_option="" if test "$1" = "-twocolumns" -o "$1" = "-twocolumn" -o "$1" = "-2" then psnup_option="-2" shift fi if test "$1" = "-fourcolumns" -o "$1" = "-fourcolumn" -o "$1" = "-4" then psnup_option="-4" shift fi if test "$1" = "-sixcolumns" -o "$1" = "-sixcolumn" -o "$1" = "-6" then psnup_option="-6" shift fi if test "$1" = "-eightcolumns" -o "$1" = "-eightcolumn" -o "$1" = "-8" then psnup_option="-8" shift fi if test "$1" = "-pagelength" -o "$1" = "-p" then shift src2tex_option="-$1" shift fi if test "$1" = "-twocolumns" -o "$1" = "-twocolumn" -o "$1" = "-2" then psnup_option="-2" shift fi if test "$1" = "-fourcolumns" -o "$1" = "-fourcolumn" -o "$1" = "-4" then psnup_option="-4" shift fi if test "$1" = "-sixcolumns" -o "$1" = "-sixcolumn" -o "$1" = "-6" then psnup_option="-6" shift fi if test "$1" = "-eightcolumns" -o "$1" = "-eightcolumn" -o "$1" = "-8" then psnup_option="-8" shift fi for i in $* do if test -f $i~ then mv $i~ $i.bak fi #{\hrulefill\ Any Kanji $\Rightarrow$ EUC Kanji\ \hrulefill\ {\tt\#} # \par # This conversion is necessary since {\sl src2tex} works only for EUC codes. # If you don't use Japanese, you can skip this procedure. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i then mv $i $i~ nkf -e $i~ > $i fi #{\hrulefill\ Source File $\Rightarrow$ TeX file\ \hrulefill\ {\tt\#} # \par # This block is actually the main part of {\sl src2tex2ps\/}. # Given source files are translated into {\TeX} here. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i then echo "src2tex" $src2tex_option $i src2tex $src2tex_option $i fi if test -f $i~ then mv $i~ $i fi #{\hrulefill\ EUC Kanji $\Rightarrow$ JIS Kanji\ \hrulefill\ {\tt\#} # \par # The official Kanji is JIS Kanji at the author's site. # So, he has applied {\tt nkf}, with {\ \tt -j\ } option, # to {\TeX} file generated by {\sl src2tex\/}. # And also, if there exits an input file # it is included at the beginning of {\TeX} file. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i.tex then if test -f $i.input then mv $i.tex $i.tex~ nkf -j $i.input > $i.tex nkf -j $i.tex~ >> $i.tex else mv $i.tex $i.tex~ nkf -j $i.tex~ > $i.tex fi fi #{\hrulefill\ TeX file $\Rightarrow$ DVI file\ \hrulefill\ {\tt\#} # \par # If {\tt jtex} is not installed, then replace it with {\tt tex}. # Here DVI file is nothing more than intermediate product. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i.tex then jtex $i.tex # jlatex $i.tex fi #{\hrulefill\ DVI file $\Rightarrow$ PS file\ \hrulefill\ {\tt\#} # \par # If {\sl dvi2ps\/} is not installed, # then replace it with something like that, # {\it e.g.\/}, {\sl dvips\ ,\ \ jdvi2kps\/}. # The command \ ''{\tt psnup}`` \ is used # to put some logical pages on each sheet of paper. # We remove several intermediate files at the last stage. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i.dvi then dvi2ps $i.dvi > $i.ps~ psnup $psnup_option $i.ps~ $i.ps # rm $i.tex >/dev/null 2>&1 rm $i.tex~ >/dev/null 2>&1 rm $i.log >/dev/null 2>&1 rm $i.dvi >/dev/null 2>&1 rm $i.ps~ >/dev/null 2>&1 fi done src2tex-2.12h.orig/contrib/src2tex2dvi.dvi100644 1750 1750 11750 6266067464 20451 0ustar kawamurakawamura; TeX output 1997.01.12:13573&煌]!p0J cmsl10 lenamesg%ItUUisnecessaryforsrc2tex2dvi橈thatthefollo吾wingsoftwaresareinstalledpropGerly:。(nkfUU,src2tex,jtex.。Src2tex2dviisTjustwrittenb吾y(K.Amanoforhisprivqateuse.1rHereKanjicon吾verterTnkf娼wouldbGeunnecessary、 if)y吾ouarenotJapanese.邂IfyouareaLE|{Ycmr8A氓TU>'ExXbuser,^youhavetoreplace\tex\with\latex\.邂Ifjtexand。jlatexU姓arenotinstalledaty吾oursiteandifyouareaJapaneseinstallthemelsereplacethemwithtexand。latexUUrespGectiv吾ely*.、 #UUff#。 #UUff9Preliminariesff9#。Though}src2tex..acceptsonlyonesingle lename,┝src2tex2dviallo吾wstoinputmultiple lenamesbyvirtueゥ of1Ythe rst\for?"statemen吾t.eThereisanoptionrelatedtonumbGeroflinesprintedineachlogicalpage。-pagelength b> cmmi10n。Here*Ow吾ealsomakeacarbGoncopyoftilde leT lename~which*OiscreatedbyEmacs,2Muleorsomethinglikeヲthat.。#UUff#。if。)test?$#=0。then。)echo?"Usage:src2tex2dvi[-pagelength]filenames"。fi。src2texEff&fBoption=""。if。)test?"$1"="-pagelength"-o"$1"="-p"。then。)shift。)src2texEff&fBoption="-$1" ff=  *P吾ermissiontouse,羯copy*,andmoGdifythissoftwareanditsdoGcumentationisgrantedundernoconditions.ヲHo吾wever,NthePauthorsw吾ouldbGeveryhappyifuserscouldinformanymoGdi cationstokqamano@tansei.cc.u-ヲtoky吾o.ac.jp.qSinceUUsrc2texisafreesoftware,thereisnowarrantyofanykindfortheprogram.ヲ  yDepartmen吾tOofMathematics,PJosaiUniversity*,PKeyakidai,Sakqado,Saitama,350-02,JAP*ANO(kamano@ヲpGo.iijnet.or.jp)ヲ  zDepartmen吾tWGofMathematics,WJosaiUniversity*,WKeyakidai,Sakqado,Saitama,350-02,JAP*ANWF(m93093@ヲcrescen吾t.josai.ac.jp)s簇src2tex2dvipageUU1*3&)簇shift、 /fi。for?iin$*。do。if。)test?-f$i~。then。)mv?$i~$i.bak。fi。#UUffUAn吾yKanji)EUCKanjiffU#。Thiscon吾versionisnecessarysincesrc2texworksonlyforEUC袱coGdes.2Ifyoudon'tuseJapanese,syouゥ canUUskipthisproGcedure.。#UUff#。if。)test?-f$i。then。)mv?$i$i~。)nkf?-e$i~>$i。fi。#UUff2SourceFile)T*eX leff2#。ThisUUbloGc吾kisactuallythemainpartofsrc2tex2dvi゛.qGivensource lesaretranslatedintoTU>'ExXhere.。#UUff#。if。)test?-f$i。then。)echo?"src2tex"$src2texEff&fBoption$i。)src2tex?$src2texEff&fBoption$i。fi。if。)test?-f$i~。then。)mv?$i~$i。fi。#UUff5EUCKanji)JISKanjiff5#。TheocialKanjiisJISzKanjiattheauthor'ssite.\So,hehasappliednkf,with -j]option,toTU>'ExXヲ leUUgeneratedb吾ysrc2tex.qAndalso,ifthereexitsaninput leitisincludedatthebGeginningofTU>'ExX le.。#UUff#。if。)test?-f$i.tex。then。)if。Stest?-f$i.input。)then。Smv?$i.tex$i.tex~。Snkf?-j$i.input>$i.texs簇src2tex2dvipageUU2 3&S犯nkf?-j$i.tex~>>$i.tex、 )else。Smv?$i.tex$i.tex~。Snkf?-j$i.tex~>$i.tex。)fi。fi。#UUffT*eX le)D吾VI leff#。If Gjtexisnotinstalled,*thenreplaceitwithtex.`W*eremo吾ve Gseveralintermediate lesatthelaststage.。#UUff#。if。)test?-f$i.tex。then。)jtex?$i.tex。#$睡jlatex$i.tex。#$睡rm$i.tex>/dev/n吾ull2>&1。)簇rm?$i.tex~>/dev/null2>&1。)rm?$i.log>/dev/null2>&1。fi。done。s簇src2tex2dvipageUU3};%嫣GE"V cmbx10+- cmcsc10!p0J cmsl10煌 cmmi10|{Ycmr8K`y cmr10烝烝src2tex-2.12h.orig/contrib/src2latex2dvi100555 1750 1750 6564 5777114241 20165 0ustar kawamurakawamura#! /bin/sh #{\hrulefill\ {\tt\#} # \vskip 1ex # \input ../fonts.tex % define fonts # \input ../title.tex % title and authors # \vskip 1ex # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} #{\hrulefill\ src2latex2dvi\ \hrulefill\ {\tt\#} # \par\vskip 1ex # \centerline{\tt src2latex2dvi [-pagelength ] {\sl filenames}} # \par\vskip 1ex # It is necessary for {\sl src2latex2dvi\/} # that the following softwares are installed properly: # \par # {\sl\qquad nkf\ ,\ \ src2latex\ ,\ \ jlatex\ .} # \par # \noindent {\sl Src2latex2dvi\/} is just written # by \ K. Amano \ for his private use. # Here Kanji converter {\sl nkf\/} would be unnecessary # if you are not Japanese. # If you are a {\TeX} user, # you have to replace ``{\tt latex}`` with ``{\tt tex}``. # If {\tt jtex} and {\tt jlatex} are not installed at your site # and if you are a Japanese install them # else replace them with {\tt tex} and {\tt latex} respectively. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} #{\hrulefill\ Preliminaries\ \hrulefill\ {\tt\#} # \par # Though {\sl src2latex\/} accepts only one single filename, # {\sl src2latex2dvi} allows to input multiple filenames # by virtue of the first\ `` {\tt for $\cdots$} ''\ statement. # There is an option related to number of lines printed in each logical page # \par # {\tt -pagelength}\ \ $n$ # \par\noindent # Here we also make a carbon copy of tilde file # \ {\sl filename}{\~\ } # which is created by Emacs, Mule or something like that. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test $# = 0 then echo "Usage: src2latex2dvi [-pagelength ] filenames" fi src2tex_option="" if test "$1" = "-pagelength" -o "$1" = "-p" then shift src2tex_option="-$1" shift fi for i in $* do if test -f $i~ then mv $i~ $i.bak fi #{\hrulefill\ Any Kanji $\Rightarrow$ EUC Kanji\ \hrulefill\ {\tt\#} # \par # This conversion is necessary since {\sl src2latex\/} works # only for EUC codes. # If you don't use Japanese, you can skip this procedure. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i then mv $i $i~ nkf -e $i~ > $i fi #{\hrulefill\ Source File $\Rightarrow$ LaTeX file\ \hrulefill\ {\tt\#} # \par # This block is actually the main part of {\sl src2latex2dvi\/}. # Given source files are translated into {\TeX} here. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i then echo "src2latex" $src2tex_option $i src2latex $src2tex_option $i fi if test -f $i~ then mv $i~ $i fi #{\hrulefill\ EUC Kanji $\Rightarrow$ JIS Kanji\ \hrulefill\ {\tt\#} # \par # The official Kanji is JIS Kanji at the author's site. # So, he has applied {\tt nkf}, with {\ \tt -j] } option, # to {\TeX} file generated by {\sl src2latex\/}. # And also, if there exits an input file # it is included at the beginning of {\TeX} file. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i.tex then if test -f $i.input then mv $i.tex $i.tex~ nkf -j $i.input > $i.tex nkf -j $i.tex~ >> $i.tex else mv $i.tex $i.tex~ nkf -j $i.tex~ > $i.tex fi fi #{\hrulefill\ TeX file $\Rightarrow$ DVI file\ \hrulefill\ {\tt\#} # \par # If {\tt jlatex} is not installed, then replace it with {\tt latex}. # We remove several intermediate files at the last stage. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i.tex then # jtex $i.tex jlatex $i.tex # rm $i.tex >/dev/null 2>&1 rm $i.tex~ >/dev/null 2>&1 rm $i.aux >/dev/null 2>&1 rm $i.log >/dev/null 2>&1 fi done src2tex-2.12h.orig/contrib/src2tex2ps.dvi100644 1750 1750 16034 6266067474 20312 0ustar kawamurakawamura; TeX output 1997.01.12:13573&煌]!p0J cmsl10 lenamesqItUUisnecessaryforsrc2tex2ps紹thatthefollo吾wingsoftwaresareinstalledpropGerly:。(nkfUU,src2tex,jtex,dvi2ps,psn吾up.。Src2tex2ps8洸isajustwrittenb吾yK.Amanoforhisprivqateuse.E!HereKanjicon吾verterankf硝wouldbGeunnecessary、 if)y吾ouarenotJapanese.邂IfyouareaLE|{Ycmr8A氓TU>'ExXbuser,^youhavetoreplace\tex\with\latex\.邂Ifjtexand。jlatexU姓arenotinstalledaty吾oursiteandifyouareaJapaneseinstallthemelsereplacethemwithtexand。latexUUrespGectiv吾ely*.、 #v#UUff#。 #UUff9Preliminariesff9#。Though富src2texzqacceptsonlyonesingle lename,綽src2tex2psallo吾wstoinputmultiple lenamesbyvirtueゥ ofUUthe rst\for??"statemen吾t.qTherearethreeoptionsrelatedtocolumnstyle。-twocolumns or-fourcolumns。andUUn吾umbGeroflinesprintedineachlogicalpage。-pagelength b> cmmi10n。Here*Ow吾ealsomakeacarbGoncopyoftilde leT lename~which*OiscreatedbyEmacs,2Muleorsomethinglikeヲthat.。#UUff#。if。)test?$#=0。then。)echo?-n"Usage:src2tex2ps[-twocolumns][-fourcolumns]"。)echo?"[-pagelength]filenames"。fi。src2texEff&fBoption=""。psnupEff&fBoption=""。if @ff=  *P吾ermissiontouse,羯copy*,andmoGdifythissoftwareanditsdoGcumentationisgrantedundernoconditions.ヲHo吾wever,NthePauthorsw吾ouldbGeveryhappyifuserscouldinformanymoGdi cationstokqamano@tansei.cc.u-ヲtoky吾o.ac.jp.qSinceUUsrc2texisafreesoftware,thereisnowarrantyofanykindfortheprogram.ヲ  yDepartmen吾tOofMathematics,PJosaiUniversity*,PKeyakidai,Sakqado,Saitama,350-02,JAP*ANO(kamano@ヲpGo.iijnet.or.jp)ヲ  zDepartmen吾tWGofMathematics,WJosaiUniversity*,WKeyakidai,Sakqado,Saitama,350-02,JAP*ANWF(m93093@ヲcrescen吾t.josai.ac.jp)x$i。fi。#UUff2SourceFile)T*eX leff2#。ThisUUbloGc吾kisactuallythemainpartofsrc2tex2psi}.qGivensource lesaretranslatedintoTU>'ExXhere.。#UUff#。if。)test?-f$i。then。)echo?"src2tex"$src2texEff&fBoption$i。)src2tex?$src2texEff&fBoption$i。fi。if。)test?-f$i~。then。)mv?$i~$i。fi。#UUff5EUCKanji)JISKanjiff5#。TheocialKanjiisJISKanjiattheauthor'ssite.So,lhehasappliednkf,with6-j option,toTU>'ExXヲ leUUgeneratedb吾ysrc2tex.qAndalso,ifthereexitsaninput leitisincludedatthebGeginningofTU>'ExX le.。#UUff#。if。)test?-f$i.tex。then。)if。Stest?-f$i.input。)then。Smv?$i.tex$i.tex~。Snkf?-j$i.input>$i.tex。Snkf?-j$i.tex~>>$i.texx$i.tex。)fi。fi。#UUffT*eX le)D吾VI leff#。Ifkjtexisnotinstalled,"thenreplaceitwithtex.HereD吾VIkK leisnothingmorethanintermediate。proGduct.。#UUff#。if。)test?-f$i.tex。then。)jtex?$i.tex。#$睡jlatex$i.tex。fi。#UUffD吾VI le)PS leff#。Ifdvi2psSisnotinstalled,%thenreplaceitwithsomethinglik吾ethat,e.g.,dvips,2jdvi2kpsi}.MThecommand。"psnup\is}Xusedtoputsomelogicalpagesoneac吾hsheetofpapGer.蚪W*eremoveseveralintermediate lesat。theUUlaststage.。#UUff#。if。)test?-f$i.dvi。then。)dvi2ps?$i.dvi>$i.ps~。)psnup?$psnupEff&fBoption$i.ps~$i.ps。#$睡rm$i.tex>/dev/n吾ull2>&1。)簇rm?$i.tex~>/dev/null2>&1。)rm?$i.log>/dev/null2>&1。)rm?$i.dvi>/dev/null2>&1。)rm?$i.ps~>/dev/null2>&1。fi。done。x cmmi10|{Ycmr8K`y cmr101烝烝src2tex-2.12h.orig/contrib/src2latex2ps100555 1750 1750 11674 6024155364 20040 0ustar kawamurakawamura#! /bin/sh #{\hrulefill\ {\tt\#} # \vskip 1ex # \input ../fonts.tex % define fonts # \input ../title.tex % title and authors # \vskip 1ex # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} #{\hrulefill\ src2latex2ps\ \hrulefill\ {\tt\#} # \par\vskip 1ex # \centerline{\tt src2latex2ps [-twocolumns {\it or\/} -fourcolumns {\it or\/} -sixcolumns] [-pagelength ] {\sl filenames}} # \par\vskip 1ex # It is necessary for {\sl src2latex2dvi\/} # that the following softwares are installed properly: # \par # {\sl\qquad nkf\ ,\ \ src2latex\ ,\ \ jlatex\ ,\ \ dvi2ps\ ,\ \ psnup\ .} # \par # \noindent {\sl Src2latex2dvi\/} is just written # by \ K. Amano \ for his private use. # Here Kanji converter {\sl nkf\/} would be unnecessary # if you are not Japanese. # If you are a {\TeX} user, # you have to replace ``{\tt latex}`` with ``{\tt tex}``. # If {\tt jtex} and {\tt jlatex} are not installed at your site # and if you are a Japanese install them # else replace them with {\tt tex} and {\tt latex} respectively. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} #{\hrulefill\ Preliminaries\ \hrulefill\ {\tt\#} # \par # Though {\sl src2latex\/} accepts only one single filename, # {\sl src2latex2ps} allows to input multiple filenames # by virtue of the first\ `` {\tt for $\cdots$} ''\ statement. # There are three options related to column style # \par # {\tt -twocolumns}\quad or\quad {\tt -fourcolumns} # \par\noindent # and number of lines printed in each logical page # \par # {\tt -pagelength}\ \ $n$ # \par\noindent # Here we also make a carbon copy of tilde file # \ {\sl filename}{\~\ } # which is created by Emacs, Mule or something like that. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test $# = 0 then echo -n "Usage: src2latex2ps [-twocolumns] [-fourcolumns]" echo " [-pagelength ] filenames" fi src2tex_option="" psnup_option="" if test "$1" = "-twocolumns" -o "$1" = "-twocolumn" -o "$1" = "-2" then psnup_option="-2" shift fi if test "$1" = "-fourcolumns" -o "$1" = "-fourcolumn" -o "$1" = "-4" then psnup_option="-4" shift fi if test "$1" = "-sixcolumns" -o "$1" = "-sixcolumn" -o "$1" = "-6" then psnup_option="-6" shift fi if test "$1" = "-eightcolumns" -o "$1" = "-eightcolumn" -o "$1" = "-8" then psnup_option="-8" shift fi if test "$1" = "-pagelength" -o "$1" = "-p" then shift src2tex_option="-$1" shift fi if test "$1" = "-twocolumns" -o "$1" = "-twocolumn" -o "$1" = "-2" then psnup_option="-2" shift fi if test "$1" = "-fourcolumns" -o "$1" = "-fourcolumn" -o "$1" = "-4" then psnup_option="-4" shift fi if test "$1" = "-sixcolumns" -o "$1" = "-sixcolumn" -o "$1" = "-6" then psnup_option="-6" shift fi if test "$1" = "-eightcolumns" -o "$1" = "-eightcolumn" -o "$1" = "-8" then psnup_option="-8" shift fi for i in $* do if test -f $i~ then mv $i~ $i.bak fi #{\hrulefill\ Any Kanji $\Rightarrow$ EUC Kanji\ \hrulefill\ {\tt\#} # \par # This conversion is necessary since {\sl src2latex\/} works # only for EUC codes. # If you don't use Japanese, you can skip this procedure. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i then mv $i $i~ nkf -e $i~ > $i fi #{\hrulefill\ Source File $\Rightarrow$ LaTeX file\ \hrulefill\ {\tt\#} # \par # This block is actually the main part of {\sl src2latex2ps\/}. # Given source files are translated into {\TeX} here. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i then echo "src2latex" $src2tex_option $i src2latex $src2tex_option $i fi if test -f $i~ then mv $i~ $i fi #{\hrulefill\ EUC Kanji $\Rightarrow$ JIS Kanji\ \hrulefill\ {\tt\#} # \par # The official Kanji is JIS Kanji at the author's site. # So, he has applied {\tt nkf}, with {\ \tt -j\ } option, # to {\TeX} file generated by {\sl src2latex\/}. # And also, if there exits an input file # it is included at the beginning of {\TeX} file. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i.tex then if test -f $i.input then mv $i.tex $i.tex~ nkf -j $i.input > $i.tex nkf -j $i.tex~ >> $i.tex else mv $i.tex $i.tex~ nkf -j $i.tex~ > $i.tex fi fi #{\hrulefill\ TeX file $\Rightarrow$ DVI file\ \hrulefill\ {\tt\#} # \par # If {\tt jlatex} is not installed, then replace it with {\tt latex}. # Here DVI file is nothing more than intermediate product. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i.tex then # jtex $i.tex jlatex $i.tex fi #{\hrulefill\ DVI file $\Rightarrow$ PS file\ \hrulefill\ {\tt\#} # \par # If {\sl dvi2ps\/} is not installed, # then replace it with something like that, # {\it e.g.\/}, {\sl dvips\ ,\ \ jdvi2kps\/}. # The command \ ''{\tt psnup}`` \ is used # to put some logical pages on each sheet of paper. # We remove several intermediate files at the last stage. # \par # \noindent{\tt\#}\ \hrulefill\ {\tt\#}} if test -f $i.dvi then dvi2ps $i.dvi > $i.ps~ psnup $psnup_option $i.ps~ $i.ps # rm $i.tex >/dev/null 2>&1 rm $i.tex~ >/dev/null 2>&1 rm $i.aux >/dev/null 2>&1 rm $i.log >/dev/null 2>&1 rm $i.dvi >/dev/null 2>&1 rm $i.ps~ >/dev/null 2>&1 fi done src2tex-2.12h.orig/contrib/c2tex.sed100444 1750 1750 2411 5777754005 17260 0ustar kawamurakawamura# c2tex.sed # # Src2tex and src2latex translate any word # abcxyz # of text mode into a string of the form # }abcxyz{ # This is not the case if a word is found in either # quasi-TeX or TeX mode. So, c2tex.sed works only # in text mode. s/}auto{/}{\\bf auto}{/g s/}break{/}{\\bf break}{/g s/}case{/}{\\bf case}{/g s/}char{/}{\\bf char}{/g s/}const{/}{\\bf const}{/g s/}continue{/}{\\bf continue}{/g s/}default{/}{\\bf default}{/g s/}do{/}{\\bf do}{/g s/}do(/}{\\bf do}(/g s/}double{/}{\\bf double}{/g s/}else{/}{\\bf else}{/g s/}else/}{\\bf else}/g s/}enum{/}{\\bf enum}{/g s/}extern{/}{\\bf extern}{/g s/}float{/}{\\bf float}{/g s/}for{/}{\\bf for}{/g s/}for(/}{\\bf for}(/g s/}goto{/}{\\bf goto}{/g s/}if{/}{\\bf if}{/g s/}if(/}{\\bf if}(/g s/}int{/}{\\bf int}{/g s/}long{/}{\\bf long}{/g s/}register{/}{\\bf register}{/g s/}return{/}{\\bf return}{/g s/}return(/}{\\bf return}(/g s/}short{/}{\\bf short}{/g s/}signed{/}{\\bf signed}{/g s/}sizeof{/}{\\bf sizeof}{/g s/}static{/}{\\bf static}{/g s/}struct{/}{\\bf struct}{/g s/}switch{/}{\\bf switch}{/g s/}switch{/}(\\bf switch}(/g s/}typedef{/}{\\bf typedef}{/g s/}union{/}{\\bf union}{/g s/}unsigned{/}{\\bf unsigned}{/g s/}void{/}{\\bf void}{/g s/}volatile{/}{\\bf volatile}{/g s/}while{/}{\\bf while}{/g s/}while(/}{\\bf while}(/g src2tex-2.12h.orig/contrib/src2latex2dvi.dvi100644 1750 1750 12010 6266067504 20747 0ustar kawamurakawamura; TeX output 1997.01.12:13573&煌]!p0J cmsl10 lenamesrZItUUisnecessaryforsrc2latex2dvi橈thatthefollo吾wingsoftwaresareinstalledpropGerly:。(nkfUU,src2latex,jlatex.。Src2latex2dvigishjustwrittenb吾yK.Amanoforhisprivqateuse.HereKanjicon吾verterh凸nkfX0wouldbGeunnec-、 essary2ify吾ouarenotJapanese.f'ExX2user,9youhavetoreplace\latex\with\tex\.f cmmi10n。Here*Ow吾ealsomakeacarbGoncopyoftilde leT lename~which*OiscreatedbyEmacs,2Muleorsomethinglikeゥ that.。#UUff#。if。)test?$#=0。then。)echo?"Usage:src2latex2dvi[-pagelength]filenames"。fi。src2texEff&fBoption=""。if。)test?"$1"="-pagelength"-o"$1"="-p"。then。)shift ff=  *P吾ermissiontouse,羯copy*,andmoGdifythissoftwareanditsdoGcumentationisgrantedundernoconditions.ヲHo吾wever,NthePauthorsw吾ouldbGeveryhappyifuserscouldinformanymoGdi cationstokqamano@tansei.cc.u-ヲtoky吾o.ac.jp.qSinceUUsrc2texisafreesoftware,thereisnowarrantyofanykindfortheprogram.ヲ  yDepartmen吾tOofMathematics,PJosaiUniversity*,PKeyakidai,Sakqado,Saitama,350-02,JAP*ANO(kamano@ヲpGo.iijnet.or.jp)ヲ  zDepartmen吾tWGofMathematics,WJosaiUniversity*,WKeyakidai,Sakqado,Saitama,350-02,JAP*ANWF(m93093@ヲcrescen吾t.josai.ac.jp)lsrc2latex2dvipageUU1*3&)簇src2texEff&fBoption="-$1"、 /)shift。fi。for?iin$*。do。if。)test?-f$i~。then。)mv?$i~$i.bak。fi。#UUffUAn吾yKanji)EUCKanjiffU#。Thist>con吾versionisnecessarysincesrc2latex$岔worksonlyforEUCt6coGdes.Ifyoudon'tuseJapanese,{youゥ canUUskipthisproGcedure.。#UUff#。if。)test?-f$i。then。)mv?$i$i~。)nkf?-e$i~>$i。fi。#UUffd1SourceFile)LaT*eX leffd1#。ThisUUbloGc吾kisactuallythemainpartofsrc2latex2dvi゛.qGivensource lesaretranslatedintoTU>'ExXhere.。#UUff#。if。)test?-f$i。then。)echo?"src2latex"$src2texEff&fBoption$i。)src2latex?$src2texEff&fBoption$i。fi。if。)test?-f$i~。then。)mv?$i~$i。fi。#UUff5EUCKanji)JISKanjiff5#。TheocialKanjiisJISzKanjiattheauthor'ssite.\So,hehasappliednkf,with -j]option,toTU>'ExXヲ leUUgeneratedb吾ysrc2latex.qAndalso,ifthereexitsaninput leitisincludedatthebGeginningofTU>'ExX le.。#UUff#。if。)test?-f$i.tex。then。)if。Stest?-f$i.input。)then。Smv?$i.tex$i.tex~lsrc2latex2dvipageUU2 3&S犯nkf?-j$i.input>$i.tex、 Snkf?-j$i.tex~>>$i.tex。)else。Smv?$i.tex$i.tex~。Snkf?-j$i.tex~>$i.tex。)fi。fi。#UUffT*eX le)D吾VI leff#。If`jlatexisnotinstalled,#thenreplaceitwithlatex. W*eremo吾ve`severalintermediate lesatthelast。stage.。#UUff#。if。)test?-f$i.tex。then。#$睡jtex$i.tex。)簇jlatex?$i.tex。#$睡rm$i.tex>/dev/n吾ull2>&1。)簇rm?$i.tex~>/dev/null2>&1。)rm?$i.aux>/dev/null2>&1。)rm?$i.log>/dev/null2>&1。fi。done。lsrc2latex2dvipageUU3b;%嫣GE"V cmbx10+- cmcsc10!p0J cmsl10煌 cmmi10K`y cmr10D烝烝烝src2tex-2.12h.orig/contrib/src2latex2ps.dvi100644 1750 1750 16054 6266067514 20624 0ustar kawamurakawamura; TeX output 1997.01.12:13573&煌]!p0J cmsl10 lenamesqItUUisnecessaryforsrc2latex2dvi橈thatthefollo吾wingsoftwaresareinstalledpropGerly:。(nkfUU,src2latex,jlatex,dvi2ps,psn吾up.。Src2latex2dvigishjustwrittenb吾yK.Amanoforhisprivqateuse.HereKanjicon吾verterh凸nkfX0wouldbGeunnec-、 essary2ify吾ouarenotJapanese.f'ExX2user,9youhavetoreplace\latex\with\tex\.f cmmi10n。Here*Ow吾ealsomakeacarbGoncopyoftilde leT lename~which*OiscreatedbyEmacs,2Muleorsomethinglikeヲthat.。#UUff#。if。)test?$#=0。then。)echo?-n"Usage:src2latex2ps[-twocolumns][-fourcolumns]"。)echo?"[-pagelength]filenames"。fi。src2texEff&fBoption=""。psnupEff&fBoption=""。if @ff=  *P吾ermissiontouse,羯copy*,andmoGdifythissoftwareanditsdoGcumentationisgrantedundernoconditions.ヲHo吾wever,NthePauthorsw吾ouldbGeveryhappyifuserscouldinformanymoGdi cationstokqamano@tansei.cc.u-ヲtoky吾o.ac.jp.qSinceUUsrc2texisafreesoftware,thereisnowarrantyofanykindfortheprogram.ヲ  yDepartmen吾tOofMathematics,PJosaiUniversity*,PKeyakidai,Sakqado,Saitama,350-02,JAP*ANO(kamano@ヲpGo.iijnet.or.jp)ヲ  zDepartmen吾tWGofMathematics,WJosaiUniversity*,WKeyakidai,Sakqado,Saitama,350-02,JAP*ANWF(m93093@ヲcrescen吾t.josai.ac.jp)p:src2latex2pspageUU1*3&)簇test?"$1"="-twocolumns"-o"$1"="-twocolumn"-o"$1"="-2"、 -Nthen。)psnupEff&fBoption="-2"。)shift。fi。if。)test?"$1"="-fourcolumns"-o"$1"="-fourcolumn"-o"$1"="-4"。then。)psnupEff&fBoption="-4"。)shift。fi。if。)test?"$1"="-sixcolumns"-o"$1"="-sixcolumn"-o"$1"="-6"。then。)psnupEff&fBoption="-6"。)shift。fi。if。)test?"$1"="-eightcolumns"-o"$1"="-eightcolumn"-o"$1"="-8"。then。)psnupEff&fBoption="-8"。)shift。fi。if。)test?"$1"="-pagelength"-o"$1"="-p"。then。)shift。)src2texEff&fBoption="-$1"。)shift。fi。if。)test?"$1"="-twocolumns"-o"$1"="-twocolumn"-o"$1"="-2"。then。)psnupEff&fBoption="-2"。)shift。fi。if。)test?"$1"="-fourcolumns"-o"$1"="-fourcolumn"-o"$1"="-4"。then。)psnupEff&fBoption="-4"。)shift。fi。if。)test?"$1"="-sixcolumns"-o"$1"="-sixcolumn"-o"$1"="-6"。then。)psnupEff&fBoption="-6"。)shift。fi。if。)test?"$1"="-eightcolumns"-o"$1"="-eightcolumn"-o"$1"="-8"。then。)psnupEff&fBoption="-8"。)shiftp:src2latex2pspageUU2 /3&fi、 /for?iin$*。do。if。)test?-f$i~。then。)mv?$i~$i.bak。fi。#UUffUAn吾yKanji)EUCKanjiffU#。Thist>con吾versionisnecessarysincesrc2latex$岔worksonlyforEUCt6coGdes.Ifyoudon'tuseJapanese,{youゥ canUUskipthisproGcedure.。#UUff#。if。)test?-f$i。then。)mv?$i$i~。)nkf?-e$i~>$i。fi。#UUffd1SourceFile)LaT*eX leffd1#。ThisUUbloGc吾kisactuallythemainpartofsrc2latex2psi}.qGivensource lesaretranslatedintoTU>'ExXhere.。#UUff#。if。)test?-f$i。then。)echo?"src2latex"$src2texEff&fBoption$i。)src2latex?$src2texEff&fBoption$i。fi。if。)test?-f$i~。then。)mv?$i~$i。fi。#UUff5EUCKanji)JISKanjiff5#。TheocialKanjiisJISKanjiattheauthor'ssite.So,lhehasappliednkf,with6-j option,toTU>'ExXヲ leUUgeneratedb吾ysrc2latex.qAndalso,ifthereexitsaninput leitisincludedatthebGeginningofTU>'ExX le.。#UUff#。if。)test?-f$i.tex。then。)if。Stest?-f$i.input。)then。Smv?$i.tex$i.tex~。Snkf?-j$i.input>$i.tex。Snkf?-j$i.tex~>>$i.texp:src2latex2pspageUU33&)簇else、 Smv?$i.tex$i.tex~。Snkf?-j$i.tex~>$i.tex。)fi。fi。#UUffT*eX le)D吾VI leff#。IfTjlatexisnotinstalled,TVthenreplaceitwithlatex.q]HereD吾VI leisnothingmorethanintermediate。proGduct.。#UUff#。if。)test?-f$i.tex。then。#$睡jtex$i.tex。)簇jlatex?$i.tex。fi。#UUffD吾VI le)PS leff#。Ifdvi2psSisnotinstalled,%thenreplaceitwithsomethinglik吾ethat,e.g.,dvips,2jdvi2kpsi}.MThecommand。"psnup\is}Xusedtoputsomelogicalpagesoneac吾hsheetofpapGer.蚪W*eremoveseveralintermediate lesat。theUUlaststage.。#UUff#。if。)test?-f$i.dvi。then。)dvi2ps?$i.dvi>$i.ps~。)psnup?$psnupEff&fBoption$i.ps~$i.ps。#$睡rm$i.tex>/dev/n吾ull2>&1。)簇rm?$i.tex~>/dev/null2>&1。)rm?$i.aux>/dev/null2>&1。)rm?$i.log>/dev/null2>&1。)rm?$i.dvi>/dev/null2>&1。)rm?$i.ps~>/dev/null2>&1。fi。done。p:src2latex2pspageUU4;%嫣GE"V cmbx10+- cmcsc10$': cmti10!p0J cmsl10煌 cmmi10K`y cmr10U烝烝src2tex-2.12h.orig/contrib/c2tex.dvi100644 1750 1750 11134 6266067523 17307 0ustar kawamurakawamura; TeX output 1997.01.12:13573&煌]!p0J cmsl10 lenamesg%ItUUisnecessaryforc2tex蹕thatthefollo吾wingsoftwaresareinstalledpropGerly:。(nkfUU,src2tex.。C2texisnnjustwrittenb吾y樛K.Amanoforhisprivqateuse.HereKanjicon吾verternnnkf]惓wouldbGeunnecessaryif、 y吾ouQarenotJapanese.XIfyouareaLE|{Ycmr8A氓TU>'ExXuser,youhavetoreplace\tex\with\latex\.XIfjtexandjlatex。arenotinstalledaty吾oursiteandifyouareaJapaneseinstallthemelsereplacethemwithtexandlatex。respGectiv吾ely*.、 #UUff#。 #UUff9Preliminariesff9#。ThoughMsrc2tex?絆acceptsonlyonesingle lename,北c2texallo吾wstoinputmultiple lenamesbyvirtueofゥ theUU rst\for??"statemen吾t.qThereisanoptionrelatedtonumbGeroflinesprintedineachlogicalpage。-pagelength b> cmmi10n。Here*Ow吾ealsomakeacarbGoncopyoftilde leT lename~which*OiscreatedbyEmacs,2Muleorsomethinglikeヲthat.。#UUff#。if。)test?$#=0。then。)echo?"Usage:src2tex2dvi[-pagelength]filenames"。fi。src2texEff&fBoption=""。if。)test?"$1"="-pagelength"-o"$1"="-p"。then。)shift。)src2texEff&fBoption="-$1" ff=  *P吾ermissiontouse,羯copy*,andmoGdifythissoftwareanditsdoGcumentationisgrantedundernoconditions.ヲHo吾wever,NthePauthorsw吾ouldbGeveryhappyifuserscouldinformanymoGdi cationstokqamano@tansei.cc.u-ヲtoky吾o.ac.jp.qSinceUUsrc2texisafreesoftware,thereisnowarrantyofanykindfortheprogram.ヲ  yDepartmen吾tOofMathematics,PJosaiUniversity*,PKeyakidai,Sakqado,Saitama,350-02,JAP*ANO(kamano@ヲpGo.iijnet.or.jp)ヲ  zDepartmen吾tWGofMathematics,WJosaiUniversity*,WKeyakidai,Sakqado,Saitama,350-02,JAP*ANWF(m93093@ヲcrescen吾t.josai.ac.jp)]c2texpageUU1*3&)簇shift、 0fi。for?iin$*。do。if。)test?-f$i~。then。)mv?$i~$i.bak。fi。#UUffUAn吾yKanji)EUCKanjiffU#。Thiscon吾versionisnecessarysincesrc2texworksonlyforEUC袱coGdes.2Ifyoudon'tuseJapanese,syouゥ canUUskipthisproGcedure.。#UUff#。if。)test?-f$i。then。)mv?$i$i~。)nkf?-e$i~>$i。fi。#UUff2SourceFile)T*eX leff2#。This(bloGc吾kisactuallythemainpartofsrc2tex2dvi゛.bGivensource lesaretranslatedintoTU>'ExX(here.bAtヲtheUUlaststage,TU>'ExX leismoGdi edb吾yusingsedscriptc2tex.sed.。Here,册it呉isnecessarytoindicatewherethesedscriptc2tex.sed゛exists.oSo,pleaserewritethefollo吾wingtwoヲlinesUUcon吾taining\c2tex.sed"appropriately*.。#UUff#。if。)test?-f$i。then。)echo?"src2tex"$src2texEff&fBoption$i。)src2tex?$src2texEff&fBoption$i。fi。if。)test?-f$i~。then。)mv?$i~$i。fi。if。)test?-f$i.tex。then。)if。Stest?-fc2tex.sed。#N針test-f/home/kqamano/etc/c2tex.sed。)簇then。Smv?$i.tex$i.tex~。Ssed?-fc2tex.sed$i.tex~>$i.tex。#N針sed-f/home/kqamano/etc/c2tex.sed$i.tex~>$i.tex。)簇else]茜c2texpageUU2 3&S犯echo?"Error:cannotfindc2tex.sedfile"、 Secho?"$睡Itwouldbenecessarytomodityc2tex."。)fi。fi。done。]茜c2texpageUU3;%嫣GE"V cmbx10+- cmcsc10!p0J cmsl10煌 cmmi10|{Ycmr8K`y cmr10烝烝src2tex-2.12h.orig/farmer+hen.scm100644 1750 1750 10216 5777114205 16640 0ustar kawamurakawamura;; {\documentstyle[a4j]{jarticle}} ;; {\src2tex{texfont=bf}} ;; [問題] あるお百姓さんが、大八車を引きながら村はずれの川の西の岸にやってきた ;; 大八車には、荒縄でくくられたキャベツと背負い駕篭に入ったニワトリが積まれ ;; ていた。明日は隣村に市が立つので、その市でキャベツとニワトリを売ろうとい ;; うわけである。その後を、お百姓さんにすっかりなついてしまったキツネのコン ;; 太が、いかにもニワトリを食べたそうなそぶりて、着いて来ていた。 ;; {\src2tex{texfont=rm}} ;; さて、川のほとりには一艘の小さな船がつないであった。この船で、お百姓さん ;; はニワトリ、キャベツ、キツネのすべてを川の東の岸へ運ばなければならない。 ;; 困ったことに、この船は大変小さかったので、船をあやつるお百姓さん以外に ;; 一度に運べるのは、ニワトリ、キャベツ、キツネのうちのどれか一つだけだった。 ;; ところが、腹のへったニワトリは、お百姓さんがいなくなるとキャベツを食べて ;; しまい、さらにキツネのコン太はお百姓さんが目を離すと、ニワトリを食べてし ;; まう。 ;; {\src2tex{texfont=bf}} ;; どうやったら、お百姓さんは首尾良くニワトリ、キャベツ、キツネのすべてを東 ;; 側の岸に運べるだろうか? ;; {\src2tex{texfont=sc}} ;; farmer+hen.scm by Kazuo AMANO ;; east-side-state is represented by list $(w\ x\ y\ z)$ where each $w, x, y, z = 0$ or $1$ ;; example: {\null\[ ;; \begin{array}{l} ;; (1\ 1\ 1\ 1) = {\rm (farmer\ hen\ cabbage\ fox)-state}\\ ;; (0\ 1\ 0\ 1) = {\rm (none\ hen\ none\ fox)-state}\\ ;; (1\ 0\ 1\ 0) = {\rm (farmer\ none\ cabbage\ none)-state} ;; \end{array} ;; \]} ;; initial-state = (1 1 1 1) ;; state-sequence = (... state2 state1 initial-state) ;; state-tree = (... state-sequece2 state-sequence1 state-sequence0) ; {\src2tex{htab=4 textfont=it texfont=rm}} ; 西から東への移動 (define (west->east x seq) (let* ((y (car seq)) (fa (car y)) (he (cadr y)) (ca (caddr y)) (fo (cadddr y))) (cond ((= fa 0) (cons '() seq)) (else (cond ((and (equal? x 'hen) (= he 1)) (cons (list 0 0 ca fo) seq)) ((and (equal? x 'cabbage) (= ca 1)) (cons (list 0 he 0 fo) seq)) ((and (equal? x 'fox) (= fo 1)) (cons (list 0 he ca 0) seq)) (else (cons '() seq))))))) ; {\src2tex{htab=4 textfont=it texfont=rm}} ; 東から西への移動 (define (west<-east x seq) (let* ((y (car seq)) (fa (car y)) (he (cadr y)) (ca (caddr y)) (fo (cadddr y))) (cond ((= fa 1) (cons '() seq)) (else (cond ((and (equal? x 'hen) (= he 0)) (cons (list 1 1 ca fo) seq)) ((and (equal? x 'cabbage) (= ca 0)) (cons (list 1 he 1 fo) seq)) ((and (equal? x 'fox) (= fo 0)) (cons (list 1 he ca 1) seq)) ((equal? x 'none) (cons (list 1 he ca fo) seq)) (else (cons '() seq))))))) ; {\src2tex{htab=4 textfont=sl texfont=rm}} ; 終了の判定をする関数 (define (finished? tree) (let finished1? ((x tree)) (cond ((null? x) #f) ((equal? (caar x) '(0 0 0 0)) #t) (else (finished1? (cdr x)))))) ; {\src2tex{htab=4 textfont=sl texfont=rm}} ; 不適当な branch を切り落とす関数 (define (rm-bad-seq tree) (let rm-bad-seq1 ((x tree) (y '())) (cond ((null? x) y) ((null? (caar x)) (rm-bad-seq1 (cdr x) y)) ((equal? (caar x) '(1 0 1 0)) (rm-bad-seq1 (cdr x) y)) ((equal? (caar x) '(1 0 0 1)) (rm-bad-seq1 (cdr x) y)) ((equal? (caar x) '(0 1 1 0)) (rm-bad-seq1 (cdr x) y)) ((equal? (caar x) '(0 1 0 1)) (rm-bad-seq1 (cdr x) y)) ((equal? (caar x) '(1 1 1 1)) (rm-bad-seq1 (cdr x) y)) (else (rm-bad-seq1 (cdr x) (cons (car x) y)))))) ; {\src2tex{htab=4 textfont=sl texfont=bf}} ; branch を成長させる関数 (define (mkseq seq) (rm-bad-seq (list (west->east 'hen seq) (west->east 'cabbage seq) (west->east 'fox seq) (west<-east 'hen seq) (west<-east 'cabbage seq) (west<-east 'fox seq) (west<-east 'none seq)))) ; {\src2tex{htab=4 textfont=tt texfont=bf}} ; 手順の tree を作る関数 (define (mktree initial-state) (let mktree1 ((x (list (list initial-state)))) (cond ((finished? x) x) (else (mktree1 (let mktree2 ((x1 x) (x2 '())) (cond ((null? x1) x2) (else (mktree2 (cdr x1) (append x2 (mkseq (car x1)))))))))))) ; {\src2tex{htab=4 textfont=bf texfont=bf}} ; main 関数 (define (main-func) (let display-answer ((x (mktree '(1 1 1 1)))) (cond ((null? x) (newline)) (else (cond ((equal? (caar x) '(0 0 0 0)) (display (car x)) (newline))) (display-answer (cdr x)))))) src2tex-2.12h.orig/farmer+hen.scm.ps100644 1750 1750 231641 6266067444 17316 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: farmer+hen.scm.dvi %%Pages: 2 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 123 /f0 NF f0 SF [<078F000C58801830401830401830201830200C18100C18100C1810861810460C18460C18260C181C0410> 24 14 -1 0 23.774] 119 D [<78E0C510E708C30403040300018001800180418020C620C711A30F1E> 16 14 -1 0 18.979] 120 D [<3C006300718070C000C00060076008E018701830183018300C180C180C188618460C460C260C1C04> 16 20 -1 6 16.281] 121 D [<838047C03C60201010100C000200010000800040102018700F880708> 16 14 -1 0 15.443] 122 D [<40402020101070F0F060> 8 10 -2 6 9.224] 59 D 1.000 1 /f1 NF f1 SF [ 24 2 -3 -7 25.829] 0 D 1.000 121 /f2 NF f2 SF [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [ 16 20 -1 0 17.434] 107 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [<00FE00FE003800380038003800380FB81FF8387870786038E038E038E038E0386038707838781FF807B8> 16 21 -1 7 17.434] 113 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [ 16 14 -1 0 17.434] 120 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0C001E001E000C0000000000000000000E000E000E000E00070003C001E04070E070E0F07FE01F80> 16 20 -2 0 17.434] 63 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<80C060303018181878F8F060> 8 12 -6 -8 17.434] 39 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D 1.000 121 /f3 NF f3 SF [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [ 16 14 -1 0 17.527] 120 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<60F0F060> 8 4 -2 0 9.224] 46 D [<40402020101070F0F06000000000000060F0F060> 8 20 -2 6 9.224] 59 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D 1.000 122 /f4 NF f4 SF [<38E065A04390C190C190C18060C060C060C030C0306018E008E00720> 16 14 -4 0 16.973] 97 D [<38004C004600C200C300C3006180618061806180318031803900370018001800180018000C000C000C000C003E00> 16 23 -4 0 15.276] 98 D [<3C00630040804040C000C000600060006000300031C019C00CC00780> 16 14 -4 0 15.276] 99 D [<38E065A04390C190C190C18060C060C060C030C0306018E008E0076000300030003000300018001800180018007C> 16 23 -4 0 16.973] 100 D [<38004600C10080808000C000C000C000FE0041006080308018800F00> 16 14 -5 0 15.276] 101 D [<7000C800EC006C0004000600060006000600030003000300030003000180018001800180018007F800C000C000C000C00060 0078007C002C0018> 16 29 1 6 10.184] 102 D [<7C00C600E3006300018001800D80138011C030C030C030C018601860186008600C30043002700190> 16 20 -2 6 15.276] 103 D [ 16 23 -3 0 16.973] 104 D [<306864646430303018984C4C4838000000000000060706> 8 23 -3 0 10.184] 105 D [<70D0D0E0E0C06060606030303030181818180C0C0C0C3E> 8 23 -4 0 8.486] 108 D [<60386024306230623032303018181818181898184C084E08491830F0> 16 14 -3 0 18.670] 110 D [<1C00620041004180C0C0C0C06060606060603060306018600C400380> 16 14 -4 0 16.973] 111 D [<7F000C000C000C000600060036004E004700C300C300C300618061806180218030C010C009400640> 16 20 -4 6 15.276] 113 D [<60006000300030003000300018001800180098004C604C704A3031E0> 16 14 -3 0 14.003] 114 D [<7C008200C300E1806180018007801F001E00380019C019C008400780> 16 14 -3 0 13.578] 115 D [<38646462626030303030181818FF0C0C0C0C0606> 8 20 -3 0 11.032] 116 D [<0E3811E830E43064306430601830183018308C304C184C182C183808> 16 14 -3 0 17.822] 117 D [<0F1C0018A2003061003060803060803060801830401830401830408C30404C18604C18602C1860380840> 24 14 -3 0 22.065] 119 D [<7380CA40E620C6100610060003000300030043002198219C134C0E38> 16 14 -2 0 15.405] 120 D [<7800C400E200E300010001800F80118030C030C030C030C01860186018608C604C304C302C303810> 16 20 -3 6 16.124] 121 D [<700000C80000EC00006400000600000600000601C00603400303200303200303200303000301800181800181800181800180 C00180C00180C007FFC000C00000C00000C00000C000006000006060002070001830000FE0> 24 29 1 6 18.670] 12 D [<7800C400820083008180C180C080C0C0C0C0C0C0606060606060606030203030103018200820046003C0> 16 21 -5 0 16.973] 48 D [ 16 21 -4 0 16.973] 49 D [<6000F0007800300000000000000000001C001200190018000C0007006380718070C020C02060106010400CC00380> 16 23 -6 0 16.973] 63 D [<80402010100838787838> 8 10 -7 -13 10.184] 39 D [<10002000200040004000C000C000C000C000C000C000C000C000C000C0004000600060006000200030003000100018000800 0C0004000600030001000080004000200010> 16 34 -4 9 13.578] 40 D [<800040002000100008000C0006000200030001000180008000C000C000400060006000600020003000300030003000300030 003000300030003000200020004000400080> 16 34 -1 9 13.578] 41 D [<7FFF80FFFFC00000000000000000000000000000000000003FFFF01FFFE0> 24 10 -4 -3 25.459] 61 D 1.000 122 /f5 NF f5 SF [<3E78E174E0E4E0F2E072E07070701E7003F000381038383038701FC0> 16 14 -2 0 16.604] 97 D [ 16 23 -3 0 18.449] 98 D [<0F80304070206010E000E000E000E00060007000301018380C3803F0> 16 14 -2 0 14.759] 99 D [<1F7E30F060706038E038E038E038E0386038701C301C181C0C3C03DC001C000E000E000E000E000E000E000F003F> 16 23 -2 0 18.449] 100 D [<0F0030C060206010E000E000E000E0007FF07038303018300C6007C0> 16 14 -2 0 14.759] 101 D [ 16 23 -1 0 10.147] 102 D [<1F8000606000C03000C01800C00C00C00C00601C003FF8003FF0003FE0003000003000001780000CE0001870001870001C38 001C38000C30000E798003C780> 24 21 -1 7 16.604] 103 D [ 16 23 -1 0 18.449] 104 D [ 8 23 -1 0 9.224] 105 D [ 24 23 -1 0 17.527] 107 D [ 16 23 -1 0 9.224] 108 D [ 32 14 -1 0 27.673] 109 D [ 16 14 -1 0 18.449] 110 D [<1F8030E06070E038E018E01CE01CE01C601C701C301C18180C3003E0> 16 14 -2 0 16.604] 111 D [<03FE007000700038003800380F3830F87038601CE01CE01CE01CE01C701C700E380E181E0E3603C2> 16 20 -2 6 17.526] 113 D [ 16 14 -1 0 13.006] 114 D [<9F00E180C0C0404040E001E00FC03FC03F00380030203020186007A0> 16 14 -1 0 13.099] 115 D [<3C00720072007100710071007000700070003800380038003800FF8038001C000C00040004000400> 16 20 -3 0 12.914] 116 D [<3EFC71E060E070F0707070707070707070703838383838383838F8F8> 16 14 -3 0 18.449] 117 D [<0C08000C1C000E1C000E1E001F1E001D19001CB9001CB8801C78803C7840383040387020387070FCFCFC> 24 14 -3 0 23.984] 119 D [ 24 14 -1 0 17.527] 120 D [<780000E40000E2000061000001000000800000800000C00001C00001E00001D00001D00003C8000388000384000384000382 000703000783801FE7E0> 24 20 0 6 17.527] 121 D [<1F8030C0707060306038E018E01CE01CE01C700E700E700E700E700E300E380E180E180E0C0C061801F0> 16 21 -2 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [<6000F0007000700000000000000000001000100010000800080004000600030001C040E0E0E0E0E040E020C01F80> 16 23 -5 0 15.682] 63 D [<80402020101070F07030> 8 10 -5 -13 9.224] 39 D [<04000800100030002000600060006000C000C000C000C000C000C000C000E000E000E0006000600070007000300030001800 18000C000C00060003000100008000400020> 16 34 -3 9 12.914] 40 D [<800040002000300018000C000C0006000700030003000180018001C001C000C000C000C000E000E000E000E000E000E000E0 00C000C000C0008001800180030002000400> 16 34 -1 9 12.914] 41 D [ 16 23 -1 0 18.449] 12 D 1.000 122 /f6 NF f6 SF [<1F8780786F80F02E00F01E00F01E00781E003C1E001F1E0001FE00001E00301E00781E00783C007038001FE000> 24 15 -1 0 18.564] 97 D [<31F8003B0E003C07003C03803C03803C03C03C03C03C03C03C03C03C03C03C03803C03803C07003F0E003DF8003C00003C00 003C00003C00003C00003C0000FC0000FC0000> 24 23 -1 0 21.216] 98 D [<07E01C38380C780C7000F000F000F000F000F0007018783C383C1C1C07F0> 16 15 -1 0 16.973] 99 D [<07CFC01C3FC0380F00700F00700F00F00F00F00F00F00F00F00F00F00F00700F00700F00380F001C3F0007EF00000F00000F 00000F00000F00000F00000F00003F00003F00> 24 23 -1 0 21.216] 100 D [<07F01C18380C78067000F000F000FFFEF00EF00E700E700C381C1C3807E0> 16 15 -1 0 17.503] 101 D [<7FC07FC01E001E001E001E001E001E001E001E001E001E001E00FFC0FFC01E001E001E001E181E3C0E3C071801F0> 16 23 0 0 11.669] 102 D [ 24 23 -1 0 21.216] 104 D [ 8 24 -1 0 10.608] 105 D [ 24 23 -1 0 20.155] 107 D [ 8 23 -1 0 10.608] 108 D [ 32 15 -1 0 31.824] 109 D [ 24 15 -1 0 21.216] 110 D [<07E01C38381C700E700EF00FF00FF00FF00FF00F700E700E381C1C3807E0> 16 15 -1 0 19.095] 111 D [ 24 21 -1 6 21.216] 112 D [<003FC0003FC0000F00000F00000F00000F0007CF001C3F00381F00780F00700F00F00F00F00F00F00F00F00F00F00F00700F 00780F00381F001C370007E300> 24 21 -1 6 20.155] 113 D [ 16 15 -1 0 15.728] 114 D [ 16 15 -1 0 15.063] 115 D [<0F801C403C603C603C603C603C003C003C003C003C003C003C00FFC03FC01C001C000C000C000C000C00> 16 21 -1 0 14.851] 116 D [<0FCFC01C2FC03C1F003C0F003C0F003C0F003C0F003C0F003C0F003C0F003C0F003C0F003C0F00FC3F00FC3F00> 24 15 -1 0 21.216] 117 D [<0380E0000380E00003C1E00007C1F00007C1F00007E3F0000F6398000F7798000F3798001E370C001E3F0C003E1E0E003C1E 0600FE7F9F80FE7F9F80> 32 15 -1 0 27.581] 119 D [ 24 15 -1 0 20.155] 120 D [<7C0000E60000F30000F3800061800001800001C00001C00003E00003E00003E00007B00007B0000F38000F18000F18001E0C 001E0C003C0600FF1F80FF1F80> 24 21 -1 6 20.155] 121 D [<07E01C38381C781E700EF00FF00FF00FF00FF00FF00FF00FF00FF00FF00F700E700E700E381C1C3807E0> 16 21 -1 0 19.095] 48 D [ 16 21 -3 0 19.095] 49 D [<0E001F001F001F000E00000000000000000006000600060006000600030001C000E06070F078F078E07860F01FC0> 16 23 -2 0 18.034] 63 D [<40201008040474FCFCF870> 8 11 -3 -12 10.608] 39 D [<00800100020006000C001C00180038003800700070007000F000F000F000F000F000F000F000F000F000F000700070007000 3800380018001C000C000600020001000080> 16 34 -3 9 14.851] 40 D [<800040002000300018001C000C000E000E000700070007000780078007800780078007800780078007800780070007000700 0E000E000C001C0018003000200040008000> 16 34 -2 9 14.851] 41 D [<40201010080878F8F8F870000000000070F8F8F870> 8 21 -3 6 10.608] 59 D [ 8 33 -3 8 10.608] 91 D [ 8 33 0 8 10.608] 93 D [<7F0FE07F0FE01E07801E07801E07801E07801E07801E07801E07801E07801E07801E07801E0780FFFF80FFFF801E00001E00 001E03001E07801E07800F078007830001FE00> 24 23 0 0 21.216] 12 D 1.000 256 /f7 NF f7 SF [<00F00070003E0070600780F0F801C0E0FE0071C01F803F800FC01E000CF01C000C3C0C000C070E000C018E000C0046000C00 06000C0006000C0007000C0007000C0007000C0387000C0786000C0706000C0F06000C1E06000C3807000C6007000E000780 0C000780> 32 26 -1 3 30.399] 32 D [<0200000003FC0000030F80000301F00003007C0003C01E0003703F00C31C3B80630771C03303C0E03330E0701B70703C1F70 3FF80FF01C380F9F0F000703C7000720760007183C00770C3E007FFF7F000373F3800301C1C00300E0E00300E0F8FB007FF0 1FE0386003F83C0000E01C00> 32 28 0 4 30.399] 33 D [ 32 4 -1 -9 30.399] 34 D [ 32 27 -1 3 30.399] 35 D [<0FC00E0FE00E1FF00E00F00E00700E00700E00780E00380E00380E20380EE0380EFFF80EFFF80EFFF80EF0000E70000E7000 0E7FF00E7FF00E70F00E00700E00700E00700EFFF00EFFF00EFFF00F> 24 26 -3 3 30.399] 36 D [<3003FFF0707FFFF0F9FFFFF83FF060081FC0600007006000077FFFF0077FFFF00700600007006000071FFFC0071FFFC00718 60C07F1FFFC07F1FFFC0001860C0001FFFC0001FFFC000006000001FFFC0001FFFC0041FFFC00E7070701E7070703E700070 3C7FFFF0187FFFF0> 32 27 0 4 30.399] 37 D [<03800F8007C00FC003F01FC000F001C0007801C0003C01C0201C01C0E0FE01C0E0EE01C0FFEF01C0FFE7FFC0FFE7FFC0E0E7 01C0E0E701C0E0E701C0E0E701C0FFE701C0FFE7FFC0E0E7FFC0E0E701C0E0E701C0E0E701C0E0E701C0FFE701C0FFE7FFC0 0007FFC00007FFC0> 32 27 -2 4 30.399] 38 D [ 32 27 -2 4 30.399] 39 D [<000E0000700E0040F80E01E0FE0E03F03F0E0FC00F8E1F0003CE3E0001EE780000FEF000007FE000003FC000001F8000000F 0000FFFFFFF0FFFFFFF0010E700003CE380003CE3C00078E1C00070E1E00070E0C00000E00007FFFFFC07FFFFFC0000E0000 000E0000000F0000000F0000> 32 28 -1 4 30.399] 40 D [<006000300EFC01F80EFF07FC0E1F8FE00E0703000E07FFC00E07FFC04E0600C0EE07FFC0FE07FFC07EE600C07FE7FFC03FC7 FFC01F8600C01F0600C01E07FFC00E07FFC00E000000FFFFFFFCFFFFFFFCFFC038000E1FFFE00E1FFFE00E0038007E1FFFF8 7F1FFFF87FC0380003C0380000003800> 32 29 0 5 30.399] 41 D [<20000000F00001C0780001C03C0001C03C0381C01C0381C01E0381C00E0381C00E0381C00E0381C00E0381C00E0381C00E03 81C00E0381C00E0381C00E0381C00E0381C00E0381C00E0381C00E0381C00E0381C00E0381C00E0381C00E0381C00F0381C0 0F0001C0> 32 26 -1 3 30.399] 42 D [<07E031F007F079F00778F1700738F030073DE0300718C03007000630073FC630073FC6300730C6300730C6300730C630773F C630F73FC6307F30C6303F30C6303F30C6301F3FC6301F3FC6300F30C6300E30C6300F30C630073FC730073FC73007800030 07000038> 32 26 0 3 30.399] 43 D [<03001C0003001F0003003F8003000F8003000380030003800300038043000380E3000380E300038073186380733CF3803B78 E3803FF0E3801FE1C3801FE1C3800FC003800F8003800780038007000380FFF7FFF0FFF7FFF0FFF7FFF00300038003000380 0300038003000380038003C003800380> 32 29 -1 5 30.399] 44 D [<300000307C038078FE03C1FC3F87C3F00FCF87E003EF0FC001F61F0000F03E0000F83C0000787800003CF000003CF000001D E000001FC000000FC000000FC000000F80007FFFFFF87FFFFFF87FFFFFF80007000000070000000700000007000000070000 0007800000070000> 32 27 0 3 30.399] 45 D [<200000707C0000F8FE0003F83F8007E00FC00FC003E01F8001F01F0000783E00003C7C00001E7800000EF000000FE000000F E0000007C0000007C0000007C000000380007FFFFFF87FFFFFF8000380000003800000038000000380000003800000038000 000380000003C000> 32 27 0 4 30.399] 46 D [<001FFFF040FFFFF0E1FFBFF0F7F600607FC780F07FC7C1F07FC3E3C03DC1FFE039FDFFE039FD806039FD80603DC1FFE031C1 FFE001C1FFE0FFFD8060FFFD80600001FFE03FF1FFE03FF18060303180603031FFE03FF1FFE03FF1FFE03FF01C0030301C00 3FF7FFF03FF7FFF03FF7FFF0> 32 28 -1 4 30.399] 47 D [<0000F0000000FC003F01FE007FF03F00FFF80F00F3F00780F0F80780F0FC038078FE038078FE03803CEF07803EE78F801FE7 9F0007F3FE0003FFFC0000FFF8000077E0000071C0001FF000001FFFF0001FFFF000003FF000003C0000003C0000003C0000 00100000> 32 26 -2 3 30.399] 48 D [<078000000FC000000FE000001FF000001CF800003C780000383000003800030078000780780007807800078070000F007000 0F0070001E0070001E00F0003C00F0007C00F00078007000700070000000> 32 20 -3 1 30.399] 49 D [<02000007C0000FF0000FF80000FC00007E00001F00000F000007800007800003800003C00003C04003C0F00380FE07807FFF 801FFF0007FE00000000000000000000000C0007FC000FFC0007FE00060000> 24 27 -6 4 30.399] 50 D [<3F8000007FC7E000FFC7F800F3CFFC00F3C07C00F3C01E0073C01E007BC01E003FC01E001FC03C000FFFFC0003FFF80003FF F00003C0000003C0010003C003807FC00F807FFC3F807FFC7F0001FC3C0001C0100001C0000001C0000001E0000000E00000> 32 25 -3 2 30.399] 51 D [<00FC000070FE0000F8FF0000780F00007C0780003C0780003E0380001E0380000F0380600F03C0780F03C0F00783C0F00783 C0F06383C1E0FFC3C1E0FFFFC3C0FFFF87C001FF8F8001E0070001E0030001E0000000E0000000F0000000F00000> 32 24 -1 2 30.399] 52 D [<00F8000060FE0000F0FF0000F9EF0000780700003C0780003C0780001E0380001E0380400F0380700F03C0F00F03C0F00783 C0F00783C1E0FFC3C1E0FFFF83C0FFFF87C00FFF878001CF0F0001E0020001E0000001E0030000F007B000F0077800C00F70 000006F0000000E0> 32 27 -1 3 30.399] 53 D [<01FC000FFC003FFC007FFE007C0000780000F00030F00FF8200FF8000FF80001F00003C01E07C01FFF803FFF0007FFE0001F F8003FFC1FB87C1FFC183FFF0000FFC000EFC001E18001E00001C000> 24 26 -4 3 30.399] 54 D [<0010003C007C00F801F003E007C00F801F003E007E00FC00F800F000F8007C003C001E001F000F8007C003E001F000F800F8 0060> 16 26 -8 3 30.399] 55 D [<00020000000F80001C1F80003C07C0003C03E0003E01E0007E00F0007F00F000770070007700700072007800700078007000 7800F0007800F0007800F0007800707FFE00707FFF80707FFF8070007F807000780070007800780078007800780078007800 30007800> 32 26 -3 4 30.399] 56 D [<07FC000FFC003FFC003E00007C0000780000F00000E00070E003FCE01FF8001FF0001DF00001E00003C00007800007801FFF 003FFFC03FFFF8001FF8001C78003C10003C00003800007C00> 24 25 -4 2 30.399] 57 D [<0FE0003FFC007FFF007C7F80F80FC0F007E0F001F0E000E0E00060E00000E00000E00000E00000E00000E00000E00000E000 00E00000E00000E00000E00000E00000F00000F00000> 24 24 -7 2 30.399] 58 D [<03C0000003F8000007FE000005FF0000001F800000078000003BC000007FC00000FFC00001FFC00001E3C00001C3C00001C3 C00001E3C00001F7C00000FF8000007F800000038000780380007FFFFFE07FFFFFE0FFFFFFE0000380000003800000038000 000380000003C000> 32 27 -1 4 30.399] 59 D [<03C0000007F8000007FE000004FF0000001F0000000F8000003F800000FFC00000FFC00001F7C00001E7C00001C3C00001C3 C00001E3C00001EF800000FF8000007F800000078000000780007FFFFFC0FFFFFFE0FFFFFFE00007800000078300000783A0 0007877000078770000006F000000060> 32 29 -1 4 30.399] 60 D [<000FE000007FFF8000FFFF8000F9FF8000E0000000E0000000E0F80001E0FC0001E1FC0001E03C0001E01C0001E01E007DE0 1C00FFFE1C00FFFFFFF81FFFFFF801FFFFF801E01C0001E01C0001E01C0001E01C0001E01C0000001C0000001E0000003E00> 32 25 0 2 30.399] 61 D [<0001F0001FF0003FF0007FF000F80000F00000E00000E00000F00000F000F87800FFBC00FFFF803FFFFF03FFFF00FBFF007C 00003C00001E00000F0003078007FFC007FFE003FFE0001FC00000C0> 24 26 -3 3 30.399] 62 D [<7003FF780FFF781FFF383F833C3C003C18001C00001E00001E00000E00000F00000F06000787FE0787FE0387FEE3C000FFFC 00FFFE00FFFE0001EE0001E00000E00000F00000F000> 24 24 -3 2 30.399] 63 D [<7801FF807807FF803C1FFF803C3F81803C3C00001E0800001E0000001E0000000F0000000F00000007800000078000000783 FF0003C3FF0003C3FF0061C000007FF800007FFF0000FFFF070000FF0F0000F01EC000F00CE0007001C0007803C000400180> 32 25 -2 2 30.399] 64 D [<00E00001FC0001FF80001FC00003E00001E00000F0000070000070400070F00070FC00F0FF83E03FFFC003FF80> 24 15 -5 1 30.399] 65 D [<000FC000001FF800003FFE000000FF0000001F8000000FC0000003C0000003E0000001E0000001E0000000E0000001E02000 01E07C0001E0FF8003C0FFF00FC00FFFFF8001FFFF00001FFC00> 32 19 -1 1 30.399] 66 D [<0001FC000007FC00001FFC00003F8000003E0000007C00000078000000780000007000000070000000700000007800000078 0000003C0000003C0000781E0000FFDF0000FFFFC0001FFFFC0001FFFFC00007FFC000000F80> 32 22 -2 2 30.399] 67 D [<0001FE000007FE00000FFE00001F8000003E0000003C0000003800000038000000780000003800000038018000380380003C 0780003C0770601E02F07F0F01E07FFF80C0FFFFF00003FFFFC0003FFFC000007FC0> 32 21 -1 1 30.399] 68 D [<0FFFC03FFFC07FFFC0FC0000F00000F00000E00000E00000F00000F000007800007E00003F80001FE00007FC0007FFF007BF E0078FE00780600700000F00000F00000F00000F00000F0000> 24 25 -6 2 30.399] 69 D [<01FF800FFFC03FFFC07FFFC0FC0000F00000E00000E00000E00000F00000F000007800007E00001F80000FE00007FE0007FF E007BFE00787E00700000701000F01C00F03C00F03B80F0738010370000070> 24 27 -6 3 30.399] 70 D [<007F000000FF820001F7870001E3DF0001C3FF0071E3FE00F1FFF80078FFE000783FC0003C03C0001C03C0001E03C0001E03 80000F0380000F0381800783C38007820FC07FE03F807FFCFF00FFFC7C0001FC700001C0000001C0000001E0000001E00000> 32 25 -2 2 30.399] 71 D [<380000003C0000007C0600007C7FFF807E7FFF807E7FFF807F400000F6000000F0000000F0000000F0000000F00000007000 00007000000070000000700000007000000078000000787FFE00787FFE00787FFE003C000E003C000000> 32 23 -3 2 30.399] 72 D [<0001F0001F03F8003F83FE007FC03F00FBE00F80F1E00780E0F007C0E0F003C0E07003C0E07801E0E03801E0E03801E0F03C 01C0F03C03C0781C03C07C1C07C03E1E0F801F9E1F000FFFFE0007FFFC0001FFF000003F8000> 32 22 -2 1 30.399] 73 D [<38000000783FC000787FE1007CFBE380FCE0F7C0FEE0FFC0EEF0FF00EE7FFE00E03FF800E006F000E000F000E000F000E000 F000E000F000E000E000E000E000F0FFFE80F1FFFF80F1FFFF80F001FF807000E0007801E0007801E0003801E0003C01E000> 32 25 -3 3 30.399] 74 D [<00180000207F000070FFC000F8FFC000FC03E0603E01E0F01F81E1F007C1E3E003C3C7C001C7CF80001FBF00003F3E00007C 0C0000F8000000F0000000F000000078000000780000002000000003C000000FC380003FE780007F8720007C0F70003002F0 000001E0000000C0> 32 27 -1 3 30.399] 75 D [<00000040000000E0000001F0000007E000000FC020001F8070003F00F8007C007C01F8003E03F0001F07E0000F8FC00007FF 000003FE000001FC080000701E0000001C0000003D8000003B80000007800000070000000600> 32 22 -1 -1 30.399] 76 D [<0780003FE0207FF07078F9F8707BF0703FE07FFF803FFE001FF8000038000038000038003FFF803FFFF03FFFF03FFFF00038 00003800FFFF80FFFFF8FFFFF8FFFFF8003800003800003C00003800> 24 26 -4 3 30.399] 77 D [<001E0000FFC001FFE003E1F007C0F807807807003807803C07803C07803C07FE38FFFE78FFFEF8FF80F003C1F003C3E003C0 C007FE003FFE003FFE003DE00001E00001E00000E00000F00000F000> 24 26 -4 3 30.399] 78 D [<0006000000078000000F0000000F0000001E0000001E0000003C0000003C400000787E000078FF8070F0FFC0FDF007E07FE0 01E03FE000F00FE000F007F800F007FF00F00FFFE1E00F1FFFE01E03FFC01E077F0006078000000F8000001F0000001E0000 00060000> 32 26 -1 3 30.399] 79 D [<00600000FE0000FFC000FFE00003F00000F8000078C0003CE0003CF0003CFC003CFF00F8FFE3F87FFFF073FFC0707F007000 0070000078000078000078000001F80007F8000FF8000FC0000C0000> 24 26 -5 3 30.399] 80 D [<0F00000FC0001FF00003F80000FC00007E00003E00601E00F00F00F80F00F80F00FC0F00FE0700EE0700E40700E00700E007 00E00700E00700E00700E00700F00700F00700F00700F00780800000> 24 26 -7 3 30.399] 81 D [<00FF0003FFE007FFF00787F807077C070F3E07FE1E07FE1E23F80E70000EFC001E7E003E1F807C0FFFFC07FFF803FFE001F0 0000F800007C00003E00001F800FF7C00FFFF01FFFE0001FE0> 24 25 -3 3 30.399] 82 D [<038000000380000063800F80F3801FE0FB801FE07B801FF07F801CF83F801C781F801C300F801E000F801E0007C01E0003E0 1E0043F01E00FBF81E00FFFC1E00FFFE1E000FFF1E0003F7FC0003E3FC0003C1FC0003C0700003C0000003C0000003E00000 03C00000> 32 26 -1 3 30.399] 83 D [<000C00001FC0001FF0001FF800007C00003E20001E60000FF0000FF8000F7C000F3F001E1FC03E0FFFFC07FFF803FFF001F7 0000F800007C00003E000C1F000FFF800FFFC01FFFC0007F80000100> 24 26 -3 3 30.399] 84 D [<03C0000003C0000003C0F00063C1FC00E3C3FF00F3C03F80FBC00F807FC003C03FC003C01FC001C00FC001E00FC001E007C0 01E003E001C071F803C07FFE0780FFFFFF80FFFFFF0003F3FC0001F0000001C0000003C0000003C0000003C0000003C00000> 32 25 -2 3 30.399] 85 D [<01FE000007FFFE000FFFFE000FC1FE001E0000001E1E00000F1E00000F9E000007FE000003FE000060FE0000F87FC000FE1F F0003F1FFC000FFEFF8007FC3F0003FC0E0001E000007FF000007FFF00007FFFC00007FFC000007BC0000078000000780000 00380000> 32 26 -3 3 30.399] 86 D [ 32 25 -1 2 30.399] 87 D [<2001FFC0E003FFE0F003E7F0F0038070780300607BF300003BFFFF003BFFFFF03C031FF01C0300001CFFE0001CFFFF801C03 FF801C0300001CFB00001CFFC0001CFFFC001C01FF001C001E001FFFFF801FFFFF801C0003801C0003801C0003801C000380 1FFFFF801FFFFF80> 32 27 -1 4 30.399] 88 D [<0E0007000E0007000FFFFF000FFFFF000E0007000E0007000E0007000E0007000E0007000FFFFF000FFFFF000FFFFF000E00 07000E0007000E0007000E0007000FFFFF000FFFFF000FFFFF00001E0000000E0000000E0000000E0000000F0000FFFFFFF0 FFFFFFF0FFFFFFF0> 32 27 -1 4 30.399] 89 D [<70000060FE0003F07F800FF00FC03F0003E03C0007C0380007FFFF0007FFFF0007FFFF000700070007FFFF0007FFFF000700 07000700070007FFFF0007FFFF0007000700F7000700FFFFFF003FFFFF001E03C0000F01E0000780F00003FFF80001FFF800 00E0300000F0000000700000> 32 28 -1 4 30.399] 90 D [<0004000000EE007000EF01F8C0E783E0E0E3C3C0E0E1C780E0E18100E6E7FFE066E7FFE066E7FFE076E7006076E7006076E7 FFE076E7FFE076E7006076E7006076E7FFE076E7FFE076E7FFE076E7006076E7006076E7FFE076E7FFE076E0380076E03800 77E0380070EFFFF070EFFFF070F00000> 32 29 -1 5 30.399] 91 D [<200000E03E0003F03FF00FF07FFE3F80037EFE000301FF800303C7C0030783C003FFFD8003FFFC0003001C0003001C0003FF FC0003FFFC0003001C0003001C0003FFFC0063FFFC40F80E01E0FE0E0FF01F8F3FE007CC7F0003F1F80000FFC000007F8000 001F0000000F000000060000> 32 28 -1 4 30.399] 92 D [<781C0000FE3E00603F9F80F007FFC3F013FBE3E07FF0F7803F787F003C383E001C3C3C000E1E3C00FFFE7E00FFFC7E00078F 6E0003CFEF002387E70071CBC700FDDDC7003DFDE7000FF8E38007E0FFF8FFFE7FF8FFFE7000FFFE78000DD838001DFC3800 7DDE3C0079CF3C0031C61800> 32 28 -1 4 30.399] 93 D [<70000000F83FFFF07C3FFFF03EFFFFF00FE018000FC018003F8018007F8018007F8018007B83DC007183FFE039C3FFE039D8 180039FC180039DC180039DC180039CE18001CEFFFF0FFEFFFF0FFEFFFF0FFC718001C0718000E0718000E0718000E061800 0E0018000F001C000C001C00> 32 28 -1 4 30.399] 94 D [<60E007C0E0F80FE0E1FC0FE0E03F1FF0F18FBCF073E7FC6073F1F8007FF8F8003878F8003838F8003838FC003838FE003838 FE003FF8CF003FF9CF003FF9C7803801C7803801C2003801C0003801C0003FFFFFE03FFFFFE03FFFFFE00001C3000001CF80 0003DF000003CE000003E000> 32 28 -1 4 30.399] 95 D [<380000C0380000C03FFFFFC03FFFFFC03FFFFFC0380000C0380000C03F0000C03F81FCC03BC1FEC03BC1FEC039E1CEC038E1 CCC038E1C0C038E1C0C03871C0C03871C0C03871C0C03FFFFFC03FFFFFC00071C0000071C0000071C0000071C000FFFFFFF0 FFFFFFF0> 32 26 -1 4 30.399] 96 D [<03070F1E1E3C78F0E0> 8 9 -2 3 30.399] 97 D [<0C003F007380E1C0E1C0E1C0E1C073803F001E00> 16 10 -2 3 30.399] 98 D [<07800780078007800000070007000780078003C003C001E000F00078003CE03CE01CF01CF03C78783FF81FF007C0> 16 23 -8 -1 30.399] 99 D [<0007000020070000780700F07E0701F8FF8707F00FC70FC003F73F0001FF7C00007FF800003FF0000FFFFF800FFFFF800FFF FF800E0703800E0703800FFFFF800FFFFF800E0703800E0703800E0703800FFFFF800FFFFF8000070000000700007FFFFFF8 7FFFFFF87FFFFFF80007000000078000> 32 29 0 5 30.399] 100 D [<0E007FC00E007FE00E0073F02E0060F0EE006070EEF060006EFFFFC06EFFFFC07EFC61C07EDC61C06EDFFFC00E1FFFC0CE5C 61C0FE7FFFC0FFFFFFC0FFFFFFC01DE060001FCFFF800F1FFF801F9C61803FCC61807BEFFF80F9CFFF807C8C61801E0C6180 0F0FFF80070FFF8006000000> 32 28 -1 4 30.399] 101 D [ 24 24 -6 2 30.399] 102 D [<380000F07E0001F8FF0003F81F8007E00FC00FC003E01F8001E03E0001F03E0000F87C0000787800003CF000003CF000001F E000001FE000000FE000000FC0000007C0000007C0000003C0000003800000038000000380000003800000FF800000FFC000 00FF8000> 32 26 0 3 30.399] 103 D [<03803E0003807E0003801E0003800E0003800E0003800E0003FFFE0003FFFE0003800E0003800E0003FFFE0003FFFE000380 0E0003800E0003FFFE0003FFFE0003FFFE00003000007C71FFE0FFF1FFF0FFF1C0F00071C0600071C000FFF1FE00FFF1FFC0 FFF1CFC00071C0C00079E000> 32 28 -1 4 30.399] 104 D [<78007F80FE01FFC0FF01F7E00F81C1E003C1C0E001C1C0E000E1C00000E1C00000F1C0007071C0C07071C0C07079C0C07000 00C07FFFFFC07FFFFFC07FFFFFC00000000003FFFE0003FFFE0003CFFE0000060000000600007FFFFFE07FFFFFE000060000 000600000007000000070000> 32 28 -1 4 30.399] 105 D [<20000000F00000E0F00001F0780003F03C0003E03C0007C01E000F801E000F000F001E0007001E0007803C0007803C000380 78000380780001C0700001C0F00001C0F00001E0E00001F0E00000E0E0000001E0000001E000007FE000007FE000007FE000> 32 25 -1 3 30.399] 106 D [<000E0000000E0C000E0E1F800E0E1F800E0E13800E0E03800E0E03800E0E03800E0E03800E0E03800E0E03800E0E03800E0E 03800E0E03800E0E03800FFFFF800FFFFF80000E0000000E0000000E0000000E0000FFFFFFF0FFFFFFF0FFFFFFF0000E0000 000E0000000F0000000F0000> 32 28 -1 4 30.399] 107 D [<00060000000600000006000000060000FFFFFFF0FFFFFFF0FFFFFFF0000600000E0607000FFFFF000FFFFF000E0607000E06 07000FFFFF000FFFFF000E0607000E0607000FFFFF000FFFFF000FFFFF0000060000000600007FFFFFE07FFFFFE000060000 000600000007000000070000> 32 28 -1 4 30.399] 108 D [<007C0000007F000000FF0000001F0000000700000007000000070000000700000007000000070000FFFFFFF0FFFFFFF00007 0000000700000007000000070000000700003FFFFF803FFFFF800007000000070000000700001FFF00003FFFFE003FFFFFC0 0000FF8000000300> 32 27 -1 4 30.399] 109 D [<0600060006000E0007FFFE0007FFFE0006000600060006000600060007FFFE0007FFFE00060006000600060007FFFE0007FF FE0007FFFE00060006000600060007FFFE0007FFFE0007FFFE000007000000070000FFFFFFF0FFFFFFF0FFFFFFF000707800 00F0780001E03C0000E03800> 32 28 -1 4 30.399] 110 D [<30000180F0E003E070E787F079E71DF039E73C7039CF3870180238701FFFFFF01FFFFFF01FFFFFF0180700001FFFFF801FFF FF80180700001FFFFF801FFFFF80180700001FFFFFE07FFFFFE0FFFFFFE0787000003CFCFFE01E3CFFE00E1CE0E00F1CE0E0 071CE0E0FFFCFFE0FFFCFFE00780FFE007000000> 32 30 -1 5 30.399] 111 D [ 32 28 -2 5 30.399] 112 D [<00018000E0018000F00180007001800038018000380180003801800039FFFFC01DFFFFC01C0180001C0180001C0180001CFF FF001CFFFF001C0000001C0000007FFFFFF07FFFFFF07FFFFFF00E0000000E0003800FFFFF800FFFFF800E0703800E070380 0E0703800E07038000070000> 32 28 -1 4 30.399] 113 D [<0E0000000E3800E00E7E03F00E1F8FE00E07FF000E61FC000EF0F0000EF9F8000E7FFC000E3F9C000E1F0E004E0FFF00EE07 FF00FE0706007E0380707EFF80F03EFFFFE01EFFFFC00F00E3C00700F3804380790063C3FC00F98FFC007C3F1E003E3F8F00 0F13C7800781C7C003C1E3800180C000> 32 29 -1 5 30.399] 114 D [<200000007C071FF0FE071FF83F071EF80F871C3C07871C3803C71C1001C71C0001C71C0001C71C0001C71C0001C71C0007FF FFC007FFFFC007FFFFC00600000006000000060000003FFFFFF03FFFFFF000070000000700000077B000007630007FFFFFF8 7FFFFFF87C7FFFF80070300000703800> 32 29 0 5 30.399] 115 D [<0E00E0000E00E0000E00E0000E00E0000E00E0000E00E0000E00E0000E00FFF00E00FFF00E00E0000E00E0000E00E0006E00 E000EE00FFF0FE00FFF0FEE0FFF07FE0E0003EF0E0003E70E0001F78E0001E3FFFF00E3FFFF00F1E0000070E0000078F0000 078F000003C7800003060000> 32 28 -1 4 30.399] 116 D [<00070000000F0000000F0000000F0000000F0000000F0000000E0000000E0000FF8E0000FFFF8000FFFFFF8003FFFFC0001F FFC0001E03C0001E00001C1E00001FFC00001FFFFC001FFFFE00001FFE00003C1E00003C0000003C0000003C0000003C0000 003C0000> 32 26 -2 3 30.399] 117 D [<0001C00003C00003C0FFFFC0FFFFC0FFFFC00003C00003C00003C00003C00003C00003C00003C00003C00003C0FFFFC0FFFF C0FFFFC0> 24 18 -6 0 30.399] 118 D [<00C0000001F0000003F80000007E0000003F0000000F80000007C0000003E0000001E0000000F0000000F800000078001800 3C001E003C003C001E007C001E00781C0E00F01E0F00F03E0F00603C07800078078000F0070000700000> 32 23 -3 3 30.399] 119 D [ 16 25 -12 3 30.399] 120 D [ 32 16 -3 -2 30.399] 121 D [<000E0000000E0000000E0000300E0000780E0000FE0E0080FF8E03C01FCE0FE007FE3FC001FEFE0000FE7800003F3000000F 80000007C0000003F0001FFFF8001FFFFC001FFFF800001FF0000000000000040000000E0000003F0000007E000000F80000 00700000> 32 26 -2 3 30.399] 122 D [<00000080000003C0000007E020001FC070007F00F800FE00FE03F8003F87E0001FDFC00007FF000001FE0C0000781E000030 3C000000780000003180000007C000000F8000000E0000000400> 32 19 -2 -3 30.399] 123 D [<00E00000E00000E00000E00000E00000E00000E00001E70001CF8001C7C071C3E07FF1F0FFFFF883FFF801CFF801C00001C0 0003800003C00003C000> 24 20 -5 4 30.399] 124 D [<6000F800FC00FF001F800FC003C001E001E000F0F0F0F070F070F078F078F078F078F078F078F078F078F078F078F07C007C> 16 25 -9 3 30.399] 125 D [<0F00000FC0001FF00007F80001FC00007E00003F00000F800007800007C0F003C0F001E0F001E0F000E0F000F0F000F0F000 F0F00070FFFFF8FFFFF8FFFFF8> 24 21 -5 2 30.399] 126 D [<2000007000007C0000FF00003FC00007F00001F80000FC00003F00001F80000FC00003E00001F00000F800007C00003C0600 180F00001F80007E0000FC0000700000> 24 22 -6 2 30.399] 127 D [ 32 27 -1 3 30.399] 128 D [<000003E0780007F0FFC01FE0FFFC7F0007FCFC00060DF0000603E0000603FC0006073F0006071F80060E0700060E000007FF FC0007FFFC0006000C0006000C0006000C0007FFFC0007FFFC0006000C0006000C0006000C0007FFFC0007FFFC00000E0000 000E0000000F000000070000> 32 28 -1 4 30.399] 129 D [ 32 28 -1 4 30.399] 130 D [<0007FFE00007FFF00007FFF00E0607700FFFFF000FFFFF000E0607000E0607000FFFFF000FFFFF000E0607000FFFFF000FFF FF0000000000FFFFFFF0FFFFFFF0FFFFFFF000E0F00000E070001FFFFF801FFFFF80E0870400E1C7C70071C1CE007FFFFFF0 3FFEFFF01E0078000E007000> 32 28 -1 4 30.399] 131 D [ 32 28 -1 4 30.399] 132 D [ 32 27 -1 4 30.399] 133 D [<00C000007F000003E00000F03C003C7F701CE7E00E61E00760F00730F80338DC030CCC0707C60603C70E01FBBC00FFF000C3 C000C38000C7000FE0003FFC00307F800063C000700000F00001E000> 24 26 -3 3 30.399] 134 D [<0700000F00001F00001F00003B800731807F31801F60C00660600E60600C60301C601838600FF06001807000006000006000 00C00000> 24 18 -4 -1 30.399] 135 D [<3C000F00038001C000E000700038003800380018001C001C401CE018F838FC70CFE0E000600030001C000FE003E00FC01E00 1800> 16 26 -8 3 30.399] 136 D [<03C0000003C0000067C00000FCC7F000F8DC78000ED81C0007C00C0003C00C0001E01C0000F8380000CFF00000C00E0000C0 07C000C003801FC003803FF0FF0030FC3C0000DE000000C4000001C0000001E0000007800000> 32 22 -3 1 30.399] 137 D [ 32 23 -3 1 30.399] 138 D [ 32 24 -2 2 30.399] 139 D [<00300070007000E001C0038007000E001C0038007000E000C000E000700038001C000E00078003C001E000E000E001C0> 16 24 -8 2 30.399] 140 D [<00800000E000003000001C00600E00700600E00700E00300E00380E00180E00180F00180F00180D00180D80180D80180CC01 80CE0180C7FF80C0FFFEE001FC6001806001806001806001C0C00FC0000700> 24 27 -5 4 30.399] 141 D [<07FF003FFF80780000E00000C00000C00000800000800000C00000C000006000003000001800001C00000F000003C0001FFC 003FFE00600C00C00000> 24 20 -7 0 30.399] 142 D [<01FF0007FF001F00003C00003800003000003000003001801807800FFF8001FF00000600000E00001C000018007FB800E7F0 00C07E00006F800067C000E1C000C00001E00007C000010000> 24 25 -5 2 30.399] 143 D [<07F8000FFE001C07801801C01800701800381800081800001800001800001800001800001800001800001800001800001800 001C00001C00001C00001C00003C0000F80000> 24 23 -6 2 30.399] 144 D [<0200000003E0000000780000001C0000000E0000000600000007000000030000001F0000003F800000738000006380000063 800000338000003F800000018000000180007E0180007FF18000C3FFFFE00003FFE000018000000180000001800000038000 0003C000000F8000> 32 27 -1 4 30.399] 145 D [<0003FEC00FFEE01C00E038007030007030003030003830001818001C0C000C06000EC3800E79FC061FFC0703E00300007F80 00FFE00081FC0000DC0000E00000F00000F00003E000010000> 24 25 -4 2 30.399] 146 D [<0001FCC00FFEC01FFEE03800603000702000303000383000381800181C001C0E000C87000EF3FC063FFC0707F80300007F00 00FFC00083F81801FC3800E03B00E07700E00F03E01E038000> 24 25 -4 2 30.399] 147 D [<07800001F000003E000007C00001E00000F00C00780E00380F00380F80180FC03006F070063FE00600000600000700000300 007F8000FFF80083FE00039E0003800001C0000380000F0000> 24 25 -5 2 30.399] 148 D [<03E000007E000007800001C00000E0000060000070000030780030FC0020CF006003C1C0007F80> 24 13 -5 1 30.399] 149 D [<00FC0000001FC0000000F00000003C0000000E00000007000000078000000380000003800000018078000180FE000180DF00 038083C0030000F00E00003E7C00000FF000> 32 17 -2 -1 30.399] 150 D [<0001FC000007FC00001F0000003C000000380000007000000060000000600000006000000060000000600000003000000030 000000180000781C00007F8E0000E3FF8000C03FF0000003FF8000003F80> 32 20 -2 1 30.399] 151 D [<00000C000001FC000007FC00000F0000001C0000003800000030000000300000003000000030000000300000003001800018 0380001803A07C0C0770FF8E0CF0C3F701E0007FC100000FF0000001FF0000001F00> 32 21 -1 1 30.399] 152 D [<3FFE7FFEE000C00080008000C000C000600038001E0007C007FE063E060C0618060006000600060007003E001C00> 16 23 -8 1 30.399] 153 D [<0FFF003FFF00700000600000C00000C000006000006000003000001C00000F000003E00003FE00033F00030E00030C000300 000300000300E00301E00783C817031C0E0038000070000040> 24 25 -6 1 30.399] 154 D [<00380000FE0C018F3C01077C0183F0E0FFC0603F007003003807003806003C06001C06001E06000F060C0F833C06E1F8063F F0031F803F0000FFE00081FC0001FC0000C00000E00000E00003C000> 24 26 -4 3 30.399] 155 D [<3000007000007007FE701FFE707CF870700070E00078C000D8C00058C0006CC0006CC000646000666000723000731800318C 0030EF00303FF83007F0300000600000> 24 22 -4 1 30.399] 156 D [<003C00000F800001E03800787E003C7E000EE7000EC38007C18007C1C003C0C003C0E00760600760700730300E18380E1C38 1C07307803F3E0007F80> 24 20 -3 1 30.399] 157 D [<300000703F06707F9EF041FCF060F0F07FC0F000C0D000C0D000C0D800C0C800C0E800C06C00C06400C06600C07301C031FF FE3000FE3000C03800C03801C01801C03003C0200700> 24 24 -4 2 30.399] 158 D [<30000000703F0600707F9E007043FC00F061F800F03FF000F000C000F000C000D800C000D801C000D801C0006C01C0006C01 C0006601C00066018000730F800031FFFE003001800038018000380180003801CE001801CE001807BDC0100001C000000380 00000400> 32 26 -3 2 30.399] 159 D [<000001E0000007E000000F80E0001E00F0007C00FC00F0001E03C0000F078000039E000001F80000> 32 10 -2 -4 30.399] 160 D [<000001E0000003E000000FC0C0001F00F0003C00F800F800BC01E0000E078000070F000003FC000000F03800000038000000 72000000E70000000F0000001E00> 32 16 -2 -4 30.399] 161 D [<300000701F06707FDEF061FEE060F8E03FE0F004C0F000C0F000C0D800C0D800C0C800C0C800C06C7FE06473FE6660DE6260 C06331C0733F80719C0070EF00307FF82007F8600000> 24 24 -4 2 30.399] 162 D [<07F0300FF8F00C3BF00C1FC007FE0003F80000180000180000180000180007F8000FFF80061FE00619E00318000198007FF8 00FFFE00C01FE00019F0001830001800001C0000FC0000F000> 24 25 -4 2 30.399] 163 D [<0006000000070000000E0000000E0000001C0000001C000000180000003800000030000000700000006000007CE00000FFDF FE00CFC00F8003E0038003F801C0071E01C0070781C00607FF80070E7E0001FE0000000C0000000C00000018000000180000 00180000> 32 26 -2 3 30.399] 164 D [<06000001F800003E00000F806003C07001E0F000E0F80070FC0070EE0070E700706380E060F1C0603F806000006000006000 006000006000003F80000F80000380000700000E0000180000> 24 25 -6 2 30.399] 165 D [<60003C000F00038001C000C000E00070707070307030F038F038F038F0385038783068306C306C30667073E073C030007000 60004000> 16 27 -9 3 30.399] 166 D [<03F8000FFE001C6F0018E38019C3C00F81C00001C0C000C0E000C07001C03C01803E07801FFE000E700007000003800001C0 0001C00000E0001070003E38003FDC0021FC00001800> 24 24 -6 2 30.399] 167 D [<020000000300000003001E0007007F00E70073C07F0060E03B0060601F0060300F0070100F007000070030000380300003C0 300013E030007DB030007FD8300003CC380001C638000183B0000181F000018000000180000001C0000007C0000007800000> 32 25 -1 3 30.399] 168 D [<07F000007E00000F800003C00000E0000070C00070E00038F000387800383C00301E00700F80E00FF3C0073F0003800001C0 0000E00000E0000070003C38003F1C0037FE0018FE00081000> 24 25 -5 2 30.399] 169 D [<01FFE003FFE007000006300006380006380003380001B80000F800607800703C003C3F001E3BE00F30F80FF07C06003C0300 780380007F8000FFF80080FE0000EE0000600000F00001E000> 24 25 -4 2 30.399] 170 D [<0007E000C00FF000E00E3800701C1C00701C0E00381C07001C1803001C1801800E3801800FF0008006C000C0070000C00380 00000380000001C0000001C0000000E00000006000000070000000380000003800000078000000F00000> 32 23 -2 1 30.399] 171 D [<01C001C003C003C007C00F801E003800E000> 16 9 -1 3 30.399] 172 D [<1C007F00C380C180808080808180C18077003C00> 16 10 -2 3 30.399] 173 D [<0200000003800E0000E00F8000383F80001C01C0008E00C00FFF00C00EFF80E00C1980E00C09C0600C08C0600C00C0600C04 E0600C00E0608C006060FC0060600F8060600CF060600C1E60600C1C60600C0860600C0060600C0060600C3FFFF00E000070 0E0000600C000000> 32 27 -1 4 30.399] 174 D [<80000000C00001C0600001C0300201C0300301C0180301C0180301C01C0301C01C0301C00C0301C00C0301C00C0301C00C03 01C00C0301C00C0301C00C0301C00C0301C00C0301C00C0301C00C0301C00C0301C00C0301C00C0301C00C0301C00E0381E0 0F0381E00E000100> 32 27 -1 4 30.399] 175 D [<80000000C0E1806063F18060603180603339FFE0333980603339806033398060333980603339806033318060333180703331 FFF0F3318070FF380000FFFC007833FE00F0303F00E031B301C031B301C033B18180373183803431C3003031C3003FF8C300 3BB0E2000300E2000380020003C0000002000000> 32 30 -1 5 30.399] 176 D [ 32 25 0 2 30.399] 177 D [ 32 27 -1 4 30.399] 178 D [<0078003080EF00F847E3C3F06060FFC060603F0036601E0036603F00366063803660C3C0366081C0366FFFF036600CF07660 0C60FE660C00FFE7FFF831FFEFF830664C3833660C3833660C3833660C383767FFF836666C3830660C383FF60C383FE60C38 06070FFC0707EC380700EC1007800E00> 32 29 0 5 30.399] 179 D [<000C0000001F0000007F800000038000000380000003800000038000C00380006003800030038018380380381C0380380C03 807806038070070380F0030381E00383838003C3870001E38C0001E3B8000003800000038000000380000003800000038000 000380000003C000> 32 27 0 4 30.399] 180 D [<300000007F0001F07FF007F801FF1F800183FC00018070000180F80001819E000183078001820FF001FFFCF001800C000180 0C0001800C0001FFFC00C1800C0071800C0039800E700FFFFFF807830FF003830F8001E39E0000F2380000786000003CC000 001F8000000F800000070000> 32 28 0 4 30.399] 181 D [ 32 28 0 4 30.399] 182 D [ 32 28 0 4 30.399] 183 D [<3000018038000180380001803FFFFF803800018038000180380001803E0001803B007D803981FF8038C1CF8038C1C78038E1 C5803861C1803861C1803871C1803871C1803871C1803871C1E03FFFFFE03071C1800071C0000071C0000071C0000071C000 FFFFFFF0000000F000000060> 32 28 -1 4 30.399] 184 D [<06000000070006000700060007FFFE0007000600070006000700060007000600070006000700060007FFFE0007FFFE000700 0600070006000700060007000600070006000700070007FFFF00060C0600000E0000000600000006000000070000FFFFFFF0 000001F0000000E0> 32 27 -1 4 30.399] 185 D [<000E0000000E0000000E0000000E0000000E0000000E0000800E0000C00E0030600E0070380E00F00C0E01E0060E03C0070E 0780038E0F0001CE1C0000EE380000EEE000007E8000003E0000003C0000001C0000000E0000000F80000007FF00FFFFFFF8 000000F000000060> 32 27 -1 3 30.399] 186 D [<83F80060C79F03F0DFC3CFF061E0FE0061F0380061DC7C0061CE6E0061C7C70071C3C70031C1FFC031C1C3C031C0E1003FC3 E18031C3FFC031C301C031C301C031C3FFC031E3FFC031F301C03FDB01C031DBFFE031CF01C031CE000031C7FFF031C600F0 3FC700603FC7800031830000> 32 28 -1 4 30.399] 187 D [<7E0000200FC007F001F83FF8003EFF80E01FF0003807C0000E0FE000071CF00003F87C0001F03F0000FFFF00787C0E001F3E 0000039EF00001E1F000C0F7F0187070303C383830781E3830F80F3831F0079833C003983E00001830007FFFFFF8000380F8 00038070000380000003C000> 32 28 0 4 30.399] 188 D [<000C00000C00000C00001C00001C00001C00001C000018003018007F1800CFF800007FFC0038FC0030000830001FB00037FC 00007FE00071E000600000600000600003E00000E000> 24 24 -4 2 30.399] 189 D [<3800007FFF804007000003000003000003000003800003800001800001C07FF9E0FFFFC0000180> 24 13 -6 -3 30.399] 190 D [<3800000E000003000001C00000E000007000003800001C00000E000007000003000003800001C03801C03860E03060E070E0 70E0E07800C1F0018000> 24 20 -5 1 30.399] 191 D [<180018001800180018001800180018001830187018F01BC01E0018001800180018001800180038003800F000> 16 22 -11 1 30.399] 192 D [<3800007F800EFFFFFE8007FC00000000000000000000000000000000000007F0000FFFC0083FC0> 24 13 -4 -4 30.399] 193 D [<000400000C00000C00000C00C00C00700C001C0C000F0C06038C0701CC0E00FC1E007C3C003CF0001E80000E00003F000603 800FE1C00DFFF0101FF00001E0000000000300000700000700000F00001E00003800> 24 28 -2 4 30.399] 194 D [<00000300000F00001F00003C0000F87001E0F807807C0F001E3C0007F00003C0300000300000700001E600001E00003C> 24 16 -3 -3 30.399] 195 D [<00100000300000300000300000700000600000600000600000640070C600FEC30087E1C000FEE001C7E00180C001800007C0 00030000> 24 18 -5 3 30.399] 196 D [<8000E00038001E000700038001C001C000E010E0386038703870387038703870187018701870187018703C707870C07801F0> 16 25 -8 3 30.399] 197 D [<06000003000003800001C00000E000006000007000003800001C00000C00000E003806003807003803003803803803803801 803801C03001E03FFFF070FFE0E000C0> 24 22 -5 2 30.399] 198 D [<300000F80000FE00009F000007800003E00000F000007800003C00001E000006001C03003C01803800C0780060E00030> 24 16 -7 -1 30.399] 199 D [<00060000E0060040380603F01E0607C007061F0003863C0001E6780000F6E0000C7EC0000C3F83000FFFFF000C0603000C06 03000C0603000FFFFF000C0603000C0603000C0603000C0603800FFFFF800C0602000006000000060000FFFFFFF0000600E0 000600400007000000070000> 32 28 -1 4 30.399] 200 D [<0000038000000380FFFFFF800000038000000380000003800000038000000380000003807FFFFF8000000380000003800000 03800000038000000380FFFFFFC0000E8380018EC000038E6000038E7000070E3800070E1C000E0E1F001C0E0F00000F0C00 000F0000> 32 26 -2 3 30.399] 201 D [<000C0780000707C0FC018FC0FFF0C0E001FFE06001C0606001C070707FFF303001CE383061C018307FFF18307FFF183071C7 1C3071C71C307FFF0C3071C70C3071C70C3071C70C307FFF8C3061C6FFF801C00CF0FFFFCC7001C3CC0001C18C00F1C00C00 1FFF0C00007F0E00000C0E00> 32 28 -1 4 30.399] 202 D [<01800000018001E0018007E0018007E0018000600180006001801860018018600180186001801860FFFFD8600187D8600183 986001801860018018600180186001801860FFFF1860018F186001A4186039B0186039981860399C1860718E1860718E1C60 E1879C608187807001C2007001C00070> 32 29 -1 5 30.399] 203 D [<00001800C000180060001800380018001C0018000E0018000700180003801800018019F801C01BF080C01FC080E01F00C1E0 1E0063E0380067F078003F30F8003031D80038399800183B18001C3B18001C1E18000FFC18000C1C18000E1818000E001800 0F001C0007001C0004001800> 32 28 -1 4 30.399] 204 D [ 32 28 -2 4 30.399] 205 D [ 32 28 0 4 30.399] 206 D [ 32 27 -2 4 30.399] 207 D [ 32 28 -1 4 30.399] 208 D [<201FFFF070FFFFF8F9FFFFF83F8000C00F6001F0066603F0066606700667FE700666067006660670066606700667FE700766 6E707F60607004606070007FFFF0006063F00060627000606070007FFFF0006718700C071C000E060E001C0C0F001CFFFFFC 700060780000603000007000> 32 28 0 4 30.399] 209 D [<840000E047F007F8603E1FE0300FFC003803E0001803E000180370001C0638001C0C1C000C081E000C180F000DFFFF800C00 06000C1C10000C1C18000C1FF8000C1C18000C1C18000C1C18000FFFFFF80C1C18780C1C1C200C1818000FFFFFFC0E038078 000380300003C0000003C000> 32 28 0 4 30.399] 210 D [ 24 27 -6 4 30.399] 211 D [<30000000380C0300380C0300300FFF00300C0300700C0300F60C03003B8C030018EC03801C7FFFE00C1C03F0060E07F03E03 9F003BC1F80071E0F000E1F0F00000F9B800005B1C00035E0F00070FFF00070E06001E676000006760000060600000606000 FFFFFFF0006060F0006060400070700000404000> 32 30 -1 5 30.399] 212 D [ 32 29 -1 5 30.399] 213 D [<001E0000007E000000FF00000007000000070000000700000007000000070000000700000007000000070000000700000007 000000070000000700000007000000070000000780000006E0000000780000003C0000000F00000007C0FFFFFFF0000001E0 000000C0> 32 26 -1 3 30.399] 214 D 1.000 123 /f8 NF f8 SF [ 24 23 -1 0 27.027] 65 D [ 24 23 -1 0 27.996] 75 D [ 32 23 -1 0 32.839] 77 D [ 24 23 -1 0 27.027] 78 D [<00FC000387000E01C01C00E03C00F0380070780078700038F0003CF0003CF0003CF0003CF0003CF0003CF0003C7000387800 783800703800701C00E00E01C003870000FC00> 24 23 -2 0 28.042] 79 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 18.356] 48 D [<7FF007000700070007000700070007000700070007000700070007000700070007000700FF0007000300> 16 21 -2 0 18.356] 49 D [ 16 21 -2 0 18.356] 50 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 14.482] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 14.482] 41 D [<003000003000003000003000003000003000003000003000003000003000003000FFFFFCFFFFFC0030000030000030000030 00003000003000003000003000003000003000003000> 24 24 -2 4 28.042] 43 D [<60F0F060> 8 4 -3 0 10.608] 46 D [<60F0F06000000000000060F0F060> 8 14 -3 0 10.608] 58 D [<40402020101070F0F06000000000000060F0F060> 8 20 -3 6 10.608] 59 D [<7FFFF8FFFFFC000000000000000000000000000000000000FFFFFC7FFFF8> 24 10 -2 -3 28.042] 61 D [ 24 17 -1 0 20.368] 97 D [ 16 17 -1 0 19.261] 98 D [<01F8000E0600180100300100700080600080E00000E00000E00000E00000E000006000807000803001801803800E058001F8 80> 24 17 -1 0 19.629] 99 D [ 24 17 -1 0 20.737] 100 D [ 16 17 -1 0 18.523] 101 D [ 16 17 -1 0 17.785] 102 D [ 24 17 -1 0 20.368] 104 D [ 16 17 0 0 10.036] 105 D [ 16 17 -1 0 17.047] 108 D [ 24 17 -1 0 24.795] 109 D [ 24 17 -1 0 20.368] 110 D [<03F0000E1C00180600300300700380600180E001C0E001C0E001C0E001C0E001C06001807003803003001806000E1C0003F0 00> 24 17 -1 0 21.105] 111 D [ 16 17 -1 0 18.523] 112 D [<000700000F80000FC00008C000184003F0400F1C0019260030C300700380600180E001C0E001C0E001C0E001C0E001C06001 807003803003001806000E1C0003F000> 24 22 -1 5 21.105] 113 D [ 24 17 -1 0 19.999] 114 D [<9F80E040C020803080300030007007E03FC07F80FC00E000C020C020406020E01F20> 16 17 -1 0 15.202] 115 D [<0FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00081C08081C08081C08081C080C1C180FFFF 80> 24 17 -1 0 19.629] 116 D [<03E0000E18001C0400180400380200380200380200380200380200380200380200380200380200380200380200380700FE0F 80> 24 17 -1 0 20.368] 117 D [<010040000180C0000380E0000380E00007C1F0000741D0000741D0000E2388000E2388000E2388001C1704001C1704001C1F 0400380E0200380E0200381E0700FE7F8F80> 32 17 -1 0 27.747] 119 D [ 24 17 -1 0 20.368] 120 D [<03F80000E00000E00000E00000E00000E00000E00000E00001D00003D8000388000784000704000E02001E03001C0380FF07 E0> 24 17 0 0 20.368] 121 D [ 16 17 -1 0 16.678] 122 D f7 SF [<06000180060003808600078086001F00C6387C00C639F000663B000066300E0076700E007EE03C007EDCF878060701F8E61B 83E0FF38C780FFF87F0018703E000CE03C0006C83C00070C7E000F8667001F87C7003DC3C38078F381C0CCF1FFE00E01C1F0 0700E0C00780F0000700F00000004000> 32 29 -1 4 30.399] 215 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f3 SF 1412 -31 p (1)s f6 SF 0 81 p (;;)s 19 r ([)s f7 SF ('/)s f6 SF (])s f7 SF 19 r (0R3Y^9W5a.jlV$6G5P,JIkDu|{wEy~x}ViT2E1)s f6 SF 0 220 p (;;)s f7 SF 19 r (2U8D0Rb>IrVa3Y^9WH;A4QGB1C:MA?uwzIv\177)s f6 SF 0 267 p (;;)s f7 SF 19 r (-5a14HNy~x}V\\L?>2G>KQCa\2041C\(C1?b)s f3 SF 0 313 p (;;)s f7 SF 17 r (\217\227\254\257\235\242\231\246\234\236"\263\235\264\217\233\260\213\226\233\207\230\206\225\222\255\216\235\260\230\254\211\271\267\217\253)s f3 SF 0 360 p (;;)s f7 SF 17 r (\236\301\306\300\305\254\275\304\303\277\254\275\277\302\235\221\241\227\252\257\235\310\235\316\240#\237\233\215\250\237\233\245\233\207\255)s f3 SF 0 406 p (;;)s f7 SF 17 r (\317\225\222\216\231\234\254\216\235\260\236\262\274\264\217\212\225\222\235\230\254\260\252\206\244\226\247\211\271\267\217\253 \314\234)s f3 SF 0 453 p (;;)s f7 SF 17 r ("\322\234#\241\247\235\236\254\301\306\300\305\254\275\304\303\277\254\275\277\302\235\210\224\235\232\250\212"\226\223\215\223\225\222\255)s f3 SF 0 499 p (;;)s f7 SF 17 r (\231\216\251\213\254\273\235\240\225\222\301\306\300\305\236\254\211\271\267\217\253\213\207\233\214\233\247\231\275\304\303\277\252\265\241\227)s f3 SF 0 546 p (;;)s f7 SF 17 r (\220\243\207\254\217\245\234\275\277\302\235\276\307\261\236\211\271\267\217\253\213\323\252\325\221\231\254\301\306\300\305\252\265\241\227\220)s f3 SF 0 592 p (;;)s f7 SF 17 r (\243\210\255)s f6 SF 0 639 p (;;)s f7 SF 19 r (F2OA?Pa3Y^9WJnX\2017y~x}au|{wauwzI;LCVd)s f6 SF 0 685 p (;;)s f7 SF 19 r (+IqH%LR@T24c)s f8 SF 0 778 p (;;)s 18 r (f)s -2 r (armer+hen.scm)s 36 r (by)s 37 r (Kazuo)s 18 r (AMANO)s 0 825 p (;;)s 18 r (east)s f2 SF (-)s f8 SF (side)s f2 SF (-)s f8 SF (st)s -1 r (a)s -2 r (te)s 17 r (is)s 19 r (represented)s 18 r (by)s 18 r (list)s f3 SF 19 r (\()s f0 SF (w)s 13 r (x)s 13 r (y)s 13 r (z)s f3 SF 2 r (\))s f8 SF 18 r (where)s 19 r (each)s f0 SF 17 r (w)s 1 r (;)s 6 r (x;)s 5 r (y)s 1 r (;)s 6 r (z)s f3 SF 11 r (=)s 9 r (0)s f8 SF 18 r (or)s f3 SF 19 r (1)s f8 SF 0 871 p (;;)s 18 r (example:)s f3 SF 368 913 p (\(1)s 13 r (1)s 12 r (1)s 13 r (1\))s 9 r (=)s 9 r (\(farmer)s 12 r (hen)s 11 r (cabbage)s 11 r (fox\))s f1 SF 6 r (\000)s f3 SF 8 r (state)s 368 960 p (\(0)s 13 r (1)s 12 r (0)s 13 r (1\))s 9 r (=)s 9 r (\(none)s 12 r (hen)s 11 r (none)s 11 r (fox\))s f1 SF 6 r (\000)s f3 SF 8 r (state)s 368 1006 p (\(1)s 13 r (0)s 12 r (1)s 13 r (0\))s 9 r (=)s 9 r (\(farmer)s 12 r (none)s 11 r (cabbage)s 11 r (none\))s f1 SF 7 r (\000)s f3 SF 7 r (state)s f8 SF 0 1069 p (;;)s 18 r (initial)s f2 SF (-)s f8 SF (st)s -1 r (a)s -2 r (te)s 17 r (=)s 19 r (\(1)s 18 r (1)s 18 r (1)s 19 r (1\))s 0 1115 p (;;)s 18 r (st)s -1 r (a)s -2 r (te)s f2 SF (-)s f8 SF (sequence)s 17 r (=)s 19 r (\(...)s 18 r (st)s -1 r (a)s -2 r (te2)s 17 r (st)s -1 r (a)s -3 r (te1)s 18 r (initial)s f2 SF (-)s f8 SF (st)s -1 r (a)s -3 r (te\))s 0 1161 p (;;)s 18 r (st)s -1 r (a)s -2 r (te)s f2 SF (-)s f8 SF (tree)s 17 r (=)s 19 r (\(...)s 18 r (st)s -1 r (a)s -2 r (te)s f2 SF (-)s f8 SF (sequece2)s 17 r (st)s -1 r (a)s -3 r (te)s f2 SF (-)s f8 SF (sequence1)s 18 r (st)s -1 r (a)s -3 r (te)s f2 SF (-)s f8 SF (sequence0\))s f3 SF 0 1254 p (;)s f7 SF 33 r (\270\212\245\310\240\235!\312)s f4 SF 0 1301 p (\(de\014ne)s 17 r (\(west)s f2 SF (->)s f4 SF (e)s -1 r (ast)s 16 r (x)s 17 r (seq\))s 34 1347 p (\(let)s f2 SF (*)s f4 SF 17 r (\(\(y)s 17 r (\(c)s -1 r (ar)s 16 r (se)s -1 r (q\)\))s 16 r (\(fa)s 17 r (\(car)s 16 r (y\)\))s 17 r (\(he)s 17 r (\(c)s -1 r (adr)s 16 r (y\)\))s 17 r (\(c)s -1 r (a)s 16 r (\(c)s -1 r (addr)s 16 r (y\)\))s 17 r (\(fo)s 17 r (\(cadddr)s 16 r (y\)\)\))s 68 1394 p (\(c)s -1 r (ond)s 16 r (\(\(=)s 17 r (fa)s 17 r (0\))s 17 r (\(c)s -1 r (ons)s 16 r ('\(\))s 17 r (seq\)\))s 102 1440 p (\(else)s 17 r (\(c)s -1 r (ond)s 16 r (\(\(and)s 17 r (\(e)s -1 r (qual?)s 16 r (x)s 17 r ('hen\))s 17 r (\(=)s 17 r (he)s 17 r (1\)\))s 17 r (\(cons)s 15 r (\(list)s 17 r (0)s 17 r (0)s 17 r (ca)s 16 r (fo\))s 17 r (se)s -1 r (q\)\))s 238 1487 p (\(\(and)s 17 r (\(e)s -1 r (qual?)s 16 r (x)s 17 r ('c)s -1 r (abb)s -2 r (age\))s 16 r (\(=)s 17 r (ca)s 16 r (1\)\))s 17 r (\(c)s -1 r (ons)s 16 r (\(list)s 17 r (0)s 17 r (he)s 17 r (0)s 17 r (fo\))s 17 r (se)s -1 r (q\)\))s 238 1533 p (\(\(and)s 17 r (\(e)s -1 r (qual?)s 16 r (x)s 17 r ('fox\))s 17 r (\(=)s 17 r (fo)s 17 r (1\)\))s 17 r (\(c)s -1 r (ons)s 16 r (\(list)s 17 r (0)s 17 r (he)s 17 r (c)s -1 r (a)s 16 r (0\))s 17 r (se)s -1 r (q\)\))s 238 1580 p (\(else)s 17 r (\(c)s -1 r (ons)s 16 r ('\(\))s 17 r (se)s -1 r (q\)\)\)\)\)\)\))s f3 SF 0 1673 p (;)s f7 SF 33 r (\310\212\245\270\240\235!\312)s f4 SF 0 1719 p (\(de\014ne)s 17 r (\(west)s f2 SF (<-)s f4 SF (e)s -1 r (ast)s 16 r (x)s 17 r (seq\))s 34 1766 p (\(let)s f2 SF (*)s f4 SF 17 r (\(\(y)s 17 r (\(c)s -1 r (ar)s 16 r (se)s -1 r (q\)\))s 16 r (\(fa)s 17 r (\(car)s 16 r (y\)\))s 17 r (\(he)s 17 r (\(c)s -1 r (adr)s 16 r (y\)\))s 17 r (\(c)s -1 r (a)s 16 r (\(c)s -1 r (addr)s 16 r (y\)\))s 17 r (\(fo)s 17 r (\(cadddr)s 16 r (y\)\)\))s 68 1812 p (\(c)s -1 r (ond)s 16 r (\(\(=)s 17 r (fa)s 17 r (1\))s 17 r (\(c)s -1 r (ons)s 16 r ('\(\))s 17 r (seq\)\))s 102 1859 p (\(else)s 17 r (\(c)s -1 r (ond)s 16 r (\(\(and)s 17 r (\(e)s -1 r (qual?)s 16 r (x)s 17 r ('hen\))s 17 r (\(=)s 17 r (he)s 17 r (0\)\))s 17 r (\(cons)s 15 r (\(list)s 17 r (1)s 17 r (1)s 17 r (ca)s 16 r (fo\))s 17 r (se)s -1 r (q\)\))s 238 1905 p (\(\(and)s 17 r (\(e)s -1 r (qual?)s 16 r (x)s 17 r ('c)s -1 r (abb)s -2 r (age\))s 16 r (\(=)s 17 r (ca)s 16 r (0\)\))s 17 r (\(c)s -1 r (ons)s 16 r (\(list)s 17 r (1)s 17 r (he)s 17 r (1)s 17 r (fo\))s 17 r (se)s -1 r (q\)\))s 238 1952 p (\(\(and)s 17 r (\(e)s -1 r (qual?)s 16 r (x)s 17 r ('fox\))s 17 r (\(=)s 17 r (fo)s 17 r (0\)\))s 17 r (\(c)s -1 r (ons)s 16 r (\(list)s 17 r (1)s 17 r (he)s 17 r (c)s -1 r (a)s 16 r (1\))s 17 r (se)s -1 r (q\)\))s 238 1998 p (\(\(e)s -1 r (qual?)s 16 r (x)s 17 r ('none\))s 17 r (\(c)s -1 r (ons)s 16 r (\(list)s 17 r (1)s 17 r (he)s 17 r (c)s -1 r (a)s 16 r (fo\))s 17 r (seq\)\))s 238 2045 p (\(else)s 17 r (\(c)s -1 r (ons)s 16 r ('\(\))s 17 r (se)s -1 r (q\)\)\)\)\)\)\))s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f3 SF 0 -31 p (src2latex)s 11 r (version)s 10 r (2.12)s 1101 r (2)s 0 127 p (;)s f7 SF 33 r (\327\326\235\313\320\252\221\247\315\266)s f5 SF 0 174 p (\(de\014ne)s 17 r (\(\014nished?)s 16 r (tree\))s 33 220 p (\(let)s 17 r (\014nished1?)s 16 r (\(\(x)s 17 r (tree\)\))s 66 267 p (\(cond)s 17 r (\(\(null?)s 16 r (x\))s f2 SF 16 r (#)s f5 SF (f)s 3 r (\))s 100 313 p (\(\(equal?)s 16 r (\(caar)s 17 r (x\))s 16 r ('\(0)s 17 r (0)s 17 r (0)s 16 r (0\)\))s f2 SF 17 r (#)s f5 SF (t\))s 100 360 p (\(else)s 16 r (\(\014nished1?)s 17 r (\(cdr)s 16 r (x\)\)\)\)\)\))s f3 SF 0 453 p (;)s f7 SF 33 r (\272\321\311\233)s f3 SF 17 r (branch)s f7 SF 15 r (\252\256\246\324\231\221\315\266)s f5 SF 0 499 p (\(de\014ne)s 17 r (\(rm)s f2 SF (-)s f5 SF (bad)s f2 SF (-)s f5 SF (seq)s 16 r (tree\))s 33 546 p (\(let)s 17 r (rm)s f2 SF (-)s f5 SF (bad)s f2 SF (-)s f5 SF (seq1)s 16 r (\(\(x)s 17 r (tree\))s 17 r (\(y)s 16 r ('\(\)\)\))s 66 592 p (\(cond)s 17 r (\(\(null?)s 16 r (x\))s 16 r (y\))s 100 639 p (\(\(null?)s 15 r (\(caar)s 17 r (x\)\))s 17 r (\(rm)s f2 SF (-)s f5 SF (bad)s f2 SF (-)s f5 SF (seq1)s 16 r (\(cdr)s 17 r (x\))s 16 r (y\)\))s 100 685 p (\(\(equal?)s 16 r (\(caar)s 17 r (x\))s 16 r ('\(1)s 17 r (0)s 17 r (1)s 16 r (0\)\))s 17 r (\(rm)s f2 SF (-)s f5 SF (bad)s f2 SF (-)s f5 SF (seq1)s 16 r (\(cdr)s 17 r (x\))s 17 r (y\)\))s 100 732 p (\(\(equal?)s 16 r (\(caar)s 17 r (x\))s 16 r ('\(1)s 17 r (0)s 17 r (0)s 16 r (1\)\))s 17 r (\(rm)s f2 SF (-)s f5 SF (bad)s f2 SF (-)s f5 SF (seq1)s 16 r (\(cdr)s 17 r (x\))s 17 r (y\)\))s 100 778 p (\(\(equal?)s 16 r (\(caar)s 17 r (x\))s 16 r ('\(0)s 17 r (1)s 17 r (1)s 16 r (0\)\))s 17 r (\(rm)s f2 SF (-)s f5 SF (bad)s f2 SF (-)s f5 SF (seq1)s 16 r (\(cdr)s 17 r (x\))s 17 r (y\)\))s 100 825 p (\(\(equal?)s 16 r (\(caar)s 17 r (x\))s 16 r ('\(0)s 17 r (1)s 17 r (0)s 16 r (1\)\))s 17 r (\(rm)s f2 SF (-)s f5 SF (bad)s f2 SF (-)s f5 SF (seq1)s 16 r (\(cdr)s 17 r (x\))s 17 r (y\)\))s 100 871 p (\(\(equal?)s 16 r (\(caar)s 17 r (x\))s 16 r ('\(1)s 17 r (1)s 17 r (1)s 16 r (1\)\))s 17 r (\(rm)s f2 SF (-)s f5 SF (bad)s f2 SF (-)s f5 SF (seq1)s 16 r (\(cdr)s 17 r (x\))s 17 r (y\)\))s 100 918 p (\(else)s 16 r (\(rm)s f2 SF (-)s f5 SF (bad)s f2 SF (-)s f5 SF (seq1)s 17 r (\(cdr)s 16 r (x\))s 17 r (\(cons)s 17 r (\(car)s 16 r (x\))s 17 r (y\)\)\)\)\)\))s f6 SF 0 1011 p (;)s 38 r (branch)s f7 SF 18 r (V_\2059=Rp])s f5 SF 0 1057 p (\(de\014ne)s 17 r (\(mkseq)s 16 r (seq\))s 66 1104 p (\(rm)s f2 SF (-)s f5 SF (bad)s f2 SF (-)s f5 SF (seq)s 83 1150 p (\(list)s 17 r (\(west)s f2 SF (->)s f5 SF (east)s 15 r ('hen)s 17 r (seq\))s 17 r (\(west)s f2 SF (->)s f5 SF (east)s 15 r ('cabbage)s 17 r (seq\))s 16 r (\(west)s f2 SF (->)s f5 SF (east)s 16 r ('fox)s 16 r (seq\))s 116 1197 p (\(west)s f2 SF (<-)s f5 SF (east)s 16 r ('hen)s 17 r (seq\))s 16 r (\(west)s f2 SF (<-)s f5 SF (east)s 16 r ('cabbage)s 16 r (seq\))s 17 r (\(west)s f2 SF (<-)s f5 SF (east)s 16 r ('fox)s 15 r (seq\))s 116 1243 p (\(west)s f2 SF (<-)s f5 SF (east)s 16 r ('none)s 17 r (seq\)\)\)\))s f6 SF 0 1336 p (;)s f7 SF 38 r (m[I)s f6 SF 19 r (tree)s f7 SF 19 r (VtRp])s f2 SF 0 1383 p (\(define)s 17 r (\(mktree)s 18 r (initial-state\))s 35 1429 p (\(let)s 17 r (mktree1)s 18 r (\(\(x)s 17 r (\(list)s 18 r (\(list)s 17 r (initial-state\)\)\)\))s 70 1475 p (\(cond)s 17 r (\(\(finished?)s 18 r (x\))s 17 r (x\))s 105 1522 p (\(else)s 17 r (\(mktree1)s 17 r (\(let)s 18 r (mktree2)s 17 r (\(\(x1)s 18 r (x\))s 17 r (\(x2)s 18 r ('\(\)\)\))s 262 1568 p (\(cond)s 17 r (\(\(null?)s 17 r (x1\))s 18 r (x2\))s 296 1615 p (\(else)s 18 r (\(mktree2)s 17 r (\(cdr)s 18 r (x1\))s 17 r (\(append)s 18 r (x2)s 17 r (\(mkseq)s 17 r (\(car)s 18 r (x1\)\)\)\)\)\)\)\)\)\)\)\))s f6 SF 0 1708 p (;)s 38 r (main)s f7 SF 19 r (p])s f6 SF 0 1754 p (\(de\014ne)s 19 r (\(main)s f2 SF (-)s f6 SF (func\))s 38 1801 p (\(let)s 19 r (display)s f2 SF (-)s f6 SF (answ)s -1 r (er)s 18 r (\(\(x)s 19 r (\(mktree)s 19 r ('\(1)s 20 r (1)s 19 r (1)s 19 r (1\)\)\)\))s 76 1847 p (\(cond)s 19 r (\(\(null?)s 19 r (x\))s 19 r (\(newline\)\))s 115 1894 p (\(else)s 19 r (\(cond)s 19 r (\(\(equal?)s 19 r (\(caar)s 19 r (x\))s 19 r ('\(0)s 19 r (0)s 19 r (0)s 19 r (0\)\))s 19 r (\(display)s 18 r (\(car)s 20 r (x\)\))s 19 r (\(newline\)\)\))s 153 1940 p (\(display)s f2 SF (-)s f6 SF (answ)s -1 r (er)s 18 r (\(cdr)s 19 r (x\)\)\)\)\)\))s EP pstopssaved restore %%Trailer %%Pages: 2 END %%EOF src2tex-2.12h.orig/figure1.eps100644 1750 1750 4214 6063310542 16135 0ustar kawamurakawamura%! %%Title: /tmp/xfig-export001317 %%Creator: fig2dev %%CreationDate: Tue Dec 12 23:27:46 1995 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 494 130 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -8 15 translate 0.0 130.0 translate 0.900 -0.900 scale 2.000 setlinewidth % Polyline n 42 53 m 35 53 35 148 7 arcto 4 {pop} repeat 35 155 199 155 7 arcto 4 {pop} repeat 206 155 206 60 7 arcto 4 {pop} repeat 206 53 42 53 7 arcto 4 {pop} repeat clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 393 53 m 386 53 386 148 7 arcto 4 {pop} repeat 386 155 550 155 7 arcto 4 {pop} repeat 557 155 557 60 7 arcto 4 {pop} repeat 557 53 393 53 7 arcto 4 {pop} repeat clp gs 0.90 setgray fill gr gs col-1 s gr n 242.000 134.000 m 218.000 128.000 l 242.000 122.000 l gs 2 setlinejoin col-1 s gr % Polyline n 218 128 m 374 128 l gs col-1 s gr % Polyline n 218 80 m 374 80 l gs col-1 s gr n 350.000 74.000 m 374.000 80.000 l 350.000 86.000 l gs 2 setlinejoin col-1 s gr /Helvetica findfont 20.00 scalefont setfont 74 107 m gs 1 -1 scale (text mode) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 281 161 m gs 1 -1 scale (*/) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 8 17 m gs 1 -1 scale ( ) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 281 53 m gs 1 -1 scale (/*) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 395 110 m gs 1 -1 scale (quasi-TeX mode) col-1 show gr $F2psEnd src2tex-2.12h.orig/figure1.fig100644 1750 1750 1057 6063310551 16115 0ustar kawamurakawamura#FIG 2.1 80 2 2 1 0 3 -1 0 0 0 0.000 7 1 0 0 0 3.000 12.000 24.000 218 80 374 80 9999 9999 2 1 0 3 -1 0 0 0 0.000 7 0 1 0 0 3.000 12.000 24.000 218 128 374 128 9999 9999 2 4 0 3 -1 1 0 3 0.000 7 0 0 206 155 35 155 35 53 206 53 206 155 9999 9999 2 4 0 3 -1 1 0 3 0.000 7 0 0 557 155 386 155 386 53 557 53 557 155 9999 9999 4 0 16 20 0 -1 0 0.000 4 14 85 74 107 text mode 4 0 16 20 0 -1 0 0.000 4 14 12 281 161 */ 4 0 16 12 0 -1 0 0.000 4 1 4 8 17  4 0 16 20 0 -1 0 0.000 4 14 12 281 53 /* 4 0 16 20 0 -1 0 0.000 4 18 144 395 110 quasi-TeX mode src2tex-2.12h.orig/figure2.eps100644 1750 1750 4524 6063310661 16144 0ustar kawamurakawamura%! %%Title: /tmp/xfig-export001338 %%Creator: fig2dev %%CreationDate: Tue Dec 12 23:29:05 1995 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 497 155 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -5 12 translate 0.0 155.0 translate 0.900 -0.900 scale 2.000 setlinewidth % Polyline n 42 53 m 35 53 35 148 7 arcto 4 {pop} repeat 35 155 199 155 7 arcto 4 {pop} repeat 206 155 206 60 7 arcto 4 {pop} repeat 206 53 42 53 7 arcto 4 {pop} repeat clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 393 53 m 386 53 386 148 7 arcto 4 {pop} repeat 386 155 550 155 7 arcto 4 {pop} repeat 557 155 557 60 7 arcto 4 {pop} repeat 557 53 393 53 7 arcto 4 {pop} repeat clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 218 80 m 374 80 l gs col-1 s gr n 350.000 74.000 m 374.000 80.000 l 350.000 86.000 l gs 2 setlinejoin col-1 s gr n 242.000 134.000 m 218.000 128.000 l 242.000 122.000 l gs 2 setlinejoin col-1 s gr % Polyline n 218 128 m 374 128 l gs col-1 s gr /Helvetica findfont 12.00 scalefont setfont 17 110 m gs 1 -1 scale ( ) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 428 110 m gs 1 -1 scale (TeX mode) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 242 56 m gs 1 -1 scale ({\\ $ $$) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 5 14 m gs 1 -1 scale ( ) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 245 164 m gs 1 -1 scale (} $ $$) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 245 185 m gs 1 -1 scale ( ) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 41 110 m gs 1 -1 scale (quasi-TeX mode) col-1 show gr $F2psEnd src2tex-2.12h.orig/figure2.fig100644 1750 1750 1230 6063310667 16117 0ustar kawamurakawamura#FIG 2.1 80 2 2 1 0 3 -1 0 0 0 0.000 7 1 0 0 0 3.000 12.000 24.000 218 80 374 80 9999 9999 2 1 0 3 -1 0 0 0 0.000 7 0 1 0 0 3.000 12.000 24.000 218 128 374 128 9999 9999 2 4 0 3 -1 1 0 3 0.000 7 0 0 206 155 35 155 35 53 206 53 206 155 9999 9999 2 4 0 3 -1 1 0 3 0.000 7 0 0 557 155 386 155 386 53 557 53 557 155 9999 9999 4 0 16 12 0 -1 0 0.000 4 1 4 17 110  4 0 16 20 0 -1 0 0.000 4 14 88 428 110 TeX mode 4 0 16 20 0 -1 0 0.000 4 18 91 242 56 {\ $ $$ 4 0 16 12 0 -1 0 0.000 4 1 4 5 14  4 0 16 20 0 -1 0 0.000 4 18 91 245 164 } $ $$ 4 0 16 12 0 -1 0 0.000 4 1 8 245 185  4 0 16 20 0 -1 0 0.000 4 18 144 41 110 quasi-TeX mode src2tex-2.12h.orig/fileio.c100644 1750 1750 14667 6135355201 15533 0ustar kawamurakawamura/* {\hrulefill} * {\ % beginning of TeX mode \input fonts.tex % define fonts \input title.tex % title and authors % end of TeX mode} * {\hrulefill} */ /* {\hrulefill\ fileio.c\ \hrulefill} */ #include #include "src2tex.h" int Page_Len_Max = -1; /* {\hrulefill\ get file names in cptr[]\ \hrulefill} */ /* {\rm Here we get {\sl input-file-name} from command line and put \smallskip \qquad{\tt cptr[0]}={\sl input-file-name}, {\tt cptr[1]}={\sl output-file-name}, \smallskip \noindent Here modifying {\sl input-file-name}, we determine {\sl output-file-name} so that it has a file name extension of the form \ {\sl $*$.tex}\ . \hfill} */ void get_fnames(argc, argv, cptr) int argc; char *argv[]; char *cptr[]; { static char workarea[2][FNAME_LEN_MAX]; char c; int i; if ((argc != 1) && (argc != 2) && (argc != 3)) { #ifdef LATEX fprintf(stderr, "Usage: src2latex file_name\n"); #else fprintf(stderr, "Usage: src2tex file_name\n"); #endif exit(EXIT_FAILURE); } if (argc == 1) { workarea[0][0] = '\0'; workarea[1][0] = '\0'; } if ((argc == 2) || ((argc == 3) && (*argv[1] != '-'))) { for (i = 0; i < FNAME_LEN_MAX - 1; ++i) { if ((c = *(argv[1] + i)) == '\0') break; workarea[0][i] = c; } workarea[0][i] = '\0'; for (i = 0; i < FNAME_LEN_MAX - 5; ++i) { if ((c = *(argv[1] + i)) == '\0') break; #ifndef UNIX if (c == '.') break; #endif workarea[1][i] = c; } workarea[1][i] = '.'; workarea[1][i + 1] = 't'; workarea[1][i + 2] = 'e'; workarea[1][i + 3] = 'x'; workarea[1][i + 4] = '\0'; } if ((argc == 3) && (*argv[1] == '-')) { Page_Len_Max = 0; for (i = 1; i < FNAME_LEN_MAX - 1; ++i) { if ((*(argv[1] + i) < '0') || (*(argv[1] + i) > '9')) break; Page_Len_Max = 10 * Page_Len_Max + (int)(*(argv[1] + i) - '0'); if (Page_Len_Max >1024) { Page_Len_Max = 0; break; } } #ifdef DEBUGGING printf ("get_fnames(): Page_Len_Max is set to %d\n", Page_Len_Max); #endif for (i = 0; i < FNAME_LEN_MAX - 1; ++i) { if ((c = *(argv[2] + i)) == '\0') break; workarea[0][i] = c; } workarea[0][i] = '\0'; for (i = 0; i < FNAME_LEN_MAX - 5; ++i) { if ((c = *(argv[2] + i)) == '\0') break; #ifndef UNIX if (c == '.') break; #endif workarea[1][i] = c; } workarea[1][i] = '.'; workarea[1][i + 1] = 't'; workarea[1][i + 2] = 'e'; workarea[1][i + 3] = 'x'; workarea[1][i + 4] = '\0'; } cptr[0] = workarea[0]; cptr[1] = workarea[1]; } /* {\hrulefill\ open files for {tt cptr[]}=file\_names, {\tt fptr[]}=file\_pointers\ \hrulefill} */ /* {\rm This function opens {\sl input-file} and {\sl output-file} with \smallskip \qquad{\tt cptr[0]}={\sl input-file-name}, {\tt cptr[1]}={\sl output-file-name} \smallskip \noindent and set two file pointers \smallskip \qquad{\tt fptr[0]}={\sl input-file-pointer}, {\tt fptr[1]}={\sl output-file-pointer}. \hfill} */ void open_files(cptr, fptr) char *cptr[]; FILE *fptr[]; { if ((*cptr[0] == '-') && (*(cptr[0]+1) == 'v')) { #ifdef LATEX #ifndef UNIX printf("src2ltex version "); #else printf("src2latex version "); #endif #else printf("src2tex version "); #endif printf(VERSION); #ifndef UNIX printf(" for DOS"); #else printf(" for UNIX"); #endif printf(" with %d byte buffer\n", BUFFER_SIZE); exit(EXIT_FAILURE); } if (*cptr[0] == '-') { #ifdef LATEX #ifndef UNIX printf("Usage: src2ltex [file]\n"); #else printf("Usage: src2latex [file]\n"); #endif #else printf("Usage: src2tex [file]\n"); #endif printf("Here [file] should be written in one of the following languages:\n"); printf("Basic, C, C++, Cobol, Fortran, HTML, Java, Lisp, Make,\n"); printf("Pascal, Perl, Scheme, Shell, Tcl/Tk;\n"); printf("Asir, Macsyma, Maple, Maxima, Mathematica, MatLab, MuPAD,\n"); printf("Octave, Reduce.\n"); printf(" *.tex, *.txt => TEXT\n"); printf(" *.bas, *.vb => BASIC\n"); printf(" *.c, *.cpp, *.vc => C, C++, OBJECTIVE-C\n"); printf(" *.cbl, *.cob => COBOL\n"); printf(" *.f, *.for => FORTRAN\n"); printf(" *.html => HTML\n"); printf(" *.java => JAVA\n"); printf(" *.el, *.lsp, *.sc, *.scm => LISP, SCHEME\n"); printf(" makefile => MAKE\n"); printf(" *.p, *.pas, *.tp => PASCAL\n"); printf(" *.pl, *.prl => PERL\n"); printf(" *.sh, *.csh, *.ksh => SHELL\n"); printf(" *.tcl, *.tk => TCL/TK\n"); printf(" *.asi, *.asir, *.asr => ASIR\n"); printf(" *.mac, *.max => MACSYMA, MAXIMA\n"); printf(" *.map, *.mpl => MAPLE\n"); printf(" *.mat, *.mma => MATHEMATICA\n"); printf(" *.ml, *.mtlb, *.oct => MATLAB, OCTAVE\n"); printf(" *.mu => MuPAD\n"); printf(" *.red, *.rdc => REDUCE\n"); printf("For more information, please read the src2tex.c.ps file.\n"); exit(EXIT_FAILURE); } if (*cptr[0] == '\0') fptr[0] = stdin; else { if ((fptr[0] = fopen(cptr[0], "r")) == NULL) { fprintf(stderr, "\nError: cannot open %s\n", cptr[0]); exit(EXIT_FAILURE); } } if (*cptr[1] == '\0') fptr[1] = stdout; else { if ((fptr[1] = fopen(cptr[1], "w")) == NULL) { fprintf(stderr, "\nError: cannot open %s\n", cptr[1]); exit(EXIT_FAILURE); } } } /* {\hrulefill\ close files for {\tt cptr[]}=file\_names, {\tt fptr[]}=file\_pointers\ \hrulefill} */ /* {\rm This function closes two files with file pointers \smallskip \qquad{\tt fptr[0]}={\sl input-file-pointer}, {\tt fptr[1]}={\sl output-file-pointer}. \smallskip \noindent File names \smallskip \qquad{\tt cptr[0]}={\sl input-file-name}, {\tt cptr[1]}={\sl output-file-name} \smallskip \noindent are used only in error messages.\hfill} */ void close_files(cptr, fptr) char *cptr[]; FILE *fptr[]; { if (fclose(fptr[0]) == EOF) { fprintf(stderr, "\nError: cannot close %s\n", cptr[0]); exit(EXIT_FAILURE); } if (fclose(fptr[1]) == EOF) { fprintf(stderr, "\nError: cannot close %s\n", cptr[1]); exit(EXIT_FAILURE); } } src2tex-2.12h.orig/fileio.c.ps100644 1750 1750 127400 6266067167 16202 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: fileio.c.dvi %%Pages: 5 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 122 /f0 NF f0 SF [ 24 23 -1 0 24.906] 65 D [ 24 23 -1 0 25.367] 68 D [ 24 23 -1 0 21.678] 70 D [ 24 23 -1 0 24.906] 72 D [<3E004300C180E1C0E1C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF8> 16 23 -2 0 17.065] 74 D [ 24 23 -1 0 25.829] 75 D [ 32 23 -1 0 30.441] 77 D [ 24 23 -1 0 24.906] 78 D [ 24 23 -1 0 22.600] 80 D [<8F80F060C030C01080188018801800180038007003F01FE03FC07E00F000E000C010C010C0104030603030F01F10> 16 23 -2 0 18.449] 83 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<007C000183000700800E00400C00401C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00 201C00201C00201C00201C00201C0070FF81FC> 24 23 -1 0 24.906] 85 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [<78EEE6470707070707070707070707070707073F0000000000060F0F06> 8 29 2 6 10.147] 106 D [ 24 23 0 0 17.527] 107 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<07FC00E000E000E000E000E0FFFCC0E040E020E030E010E008E004E004E002E001E001E000E000600060> 16 21 -1 0 16.604] 52 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<1F0020C060607030703000380018001C0F9C185C303C603CE01CE01CE01CE018E0186038303018600F80> 16 21 -1 0 16.604] 57 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<060006000600C630E6703FC00F000F003FC0E670C630060006000600> 16 14 -2 -11 16.604] 42 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D [<00FF000701E008003810000020F0E0218D904307884703888603888E03888E03888E03888E03888E03888603884703904304 10218C2020F02010004008008007070000F800> 24 23 -2 0 25.829] 64 D [ 8 33 -3 8 9.224] 91 D [ 8 33 0 8 9.224] 93 D [ 24 23 0 0 18.449] 12 D [ 8 2 0 -6 11.069] 45 D 1.000 123 /f1 NF f1 SF [<060006000600C630E6703FC00F000F003FC0E670C630060006000600> 16 14 -2 -1 16.604] 3 D [<0C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C00FFC0FFC00C000C000C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 121 D [<0C000C000C000C000C000C00FFC0FFC00C000C000C000C000C000C0000000C000C000C000C000C000C00FFC0FFC00C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 122 D 1.000 126 /f2 NF f2 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 66 D [<07C00FE01C303838701C701C601CE000E000E000E000E000E000601C701C701C383C1C7C0FFC07CC> 16 20 -1 0 17.434] 67 D [ 16 20 -1 0 17.434] 68 D [ 16 20 -1 0 17.434] 69 D [ 16 20 -1 0 17.434] 70 D [<07B80FF81878387870387038E038E038E0FCE0FCE000E000E000E03870387038387818780FF80798> 16 20 -1 0 17.434] 71 D [ 16 20 -1 0 17.434] 72 D [ 16 20 -3 0 17.434] 73 D [<3E007F00E180E1C041C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF01FF0> 16 20 -2 0 17.434] 74 D [ 16 20 -1 0 17.434] 75 D [ 16 20 -1 0 17.434] 76 D [ 16 20 -1 0 17.434] 77 D [ 16 20 -1 0 17.434] 78 D [<3FC07FE070E0E070E070E070E070E070E070E070E070E070E070E070E070E070E07070E07FE03FC0> 16 20 -2 0 17.434] 79 D [ 16 20 -1 0 17.434] 80 D [ 16 20 -1 0 17.434] 82 D [ 16 20 -2 0 17.434] 83 D [<1FF01FF00380038003800380038003800380038003800380038003800380E39CE39CE39CFFFC7FFC> 16 20 -1 0 17.434] 84 D [<03C007E00C301C38381C381C381C381C381C381C381C381C381C381C381C381C381C381CFE7FFE7F> 16 20 0 0 17.434] 85 D [<0780078007800CC00CC00CC00CC00CC01CE01CE01CE01CE01CE038703870387038707878FCFCFCFC> 16 20 -1 0 17.434] 86 D [ 16 20 -1 0 17.434] 88 D [<0FE00FE0038003800380038003800380038007C007C00EC00EE00CE01CE01C7038703870FCFCFCFC> 16 20 -1 0 17.434] 89 D [ 16 20 -2 0 17.434] 90 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [<7E00FF00E38041C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C03FC03FC00000000000000180 03C003C00180> 16 28 -2 7 17.434] 106 D [ 16 20 -1 0 17.434] 107 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<078007800FC00CC00CC00CC01CE01CE01CE01CE038703870FCFCFCFC> 16 14 -1 0 17.434] 118 D [<18E03DF03DF035B035B035B037B037B03030703870387038FFFCFFFC> 16 14 -1 0 17.434] 119 D [ 16 14 -1 0 17.434] 120 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0FC03FE07070E038E01C401C001C001C0038007007E007E00070003000382038703870703FE00FC0> 16 20 -1 0 17.434] 51 D [<07FC07FC00E000E000E000E0FFFCFFFCE0E070E030E038E018E01CE00CE006E006E002E003E001E0> 16 20 -1 0 17.434] 52 D [<1F003F8071C0E0E0E070E07040700070006060E07FC07F007000700070007000700070007FE07FE0> 16 20 -2 0 17.434] 53 D [<1F003FC070E07070703000380018001C0F9C1FFC387C703CE01CE01CE018E038703838701FE00F80> 16 20 -1 0 17.434] 57 D [<3C707FF8679CE39CE788EFC0EFC07DC03CE01CE03CE03E703F7C3B7C3B803B803B801B801F000E00> 16 20 -1 0 17.434] 38 D [<60F0F0600000000070F0F0F0F0F0F0F0F0F0F060> 8 20 -6 0 17.434] 33 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<80C060303018181878F8F060> 8 12 -6 -8 17.434] 39 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<60F0F06000000000000060F0F060> 8 14 -6 0 17.434] 58 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [ 16 26 -6 3 17.434] 91 D [ 16 26 -1 3 17.434] 93 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00300070007000E000E001C001C001C0038003800700070007000E000E000E001C001C0038003800380070007000E000E000 C000> 16 26 -2 3 17.434] 92 D [ 8 26 -7 3 17.434] 124 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 121 /f3 NF f3 SF [<3E78E174E0E4E0F2E072E07070701E7003F000381038383038701FC0> 16 14 -2 0 16.604] 97 D [<0F0030C060206010E000E000E000E0007FF07038303018300C6007C0> 16 14 -2 0 14.759] 101 D [ 8 23 -1 0 9.224] 105 D [ 16 23 -1 0 9.224] 108 D [ 32 14 -1 0 27.673] 109 D [ 16 14 -1 0 18.449] 110 D [<1F8030E06070E038E018E01CE01CE01C601C701C301C18180C3003E0> 16 14 -2 0 16.604] 111 D [ 24 20 0 6 18.449] 112 D [ 16 14 -1 0 13.006] 114 D [<3C00720072007100710071007000700070003800380038003800FF8038001C000C00040004000400> 16 20 -3 0 12.914] 116 D [<3EFC71E060E070F0707070707070707070703838383838383838F8F8> 16 14 -3 0 18.449] 117 D [ 24 14 -1 0 17.527] 120 D [<60F07070> 8 4 -2 0 9.224] 46 D [ 16 23 -1 0 18.449] 12 D [ 8 2 -1 -6 11.069] 45 D 1.000 123 /f4 NF f4 SF [ 24 23 -1 0 27.027] 65 D [ 24 23 -1 0 27.996] 75 D [ 24 23 -1 0 27.027] 78 D [<87C0D830E018C008800C800C800C000C001C003803F81FF03FE07F00F000E000C008C008C0084018603830580F88> 16 23 -2 0 20.294] 83 D [ 24 17 -1 0 20.368] 97 D [<01F8000E0600180100300100700080600080E00000E00000E00000E00000E000006000807000803001801803800E058001F8 80> 24 17 -1 0 19.629] 99 D [ 24 17 -1 0 20.737] 100 D [ 24 17 -1 0 20.368] 104 D [ 16 17 0 0 10.036] 105 D [ 24 17 -1 0 24.795] 109 D [ 24 17 -1 0 20.368] 110 D [<03F0000E1C00180600300300700380600180E001C0E001C0E001C0E001C0E001C06001807003803003001806000E1C0003F0 00> 24 17 -1 0 21.105] 111 D [<0FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00081C08081C08081C08081C080C1C180FFFF 80> 24 17 -1 0 19.629] 116 D [<03E0000E18001C0400180400380200380200380200380200380200380200380200380200380200380200380200380700FE0F 80> 24 17 -1 0 20.368] 117 D [ 16 17 -1 0 16.678] 122 D 1.000 121 /f5 NF f5 SF [<03F00FFC1F063C037C007800F800F800F800F800F800F800781C783E3C3E1E3E0FFC03F8> 16 18 -2 0 20.367] 99 D [<01FC000FFF001F01803E00C07C0000780000F80000F80000F80000FFFFC0FFFFC0F803C07803C07C03803C07801E0F000FFE 0003F800> 24 18 -1 0 21.004] 101 D [ 16 18 -1 0 18.873] 114 D [ 16 18 -2 0 18.076] 115 D [<03E00FF00F101F181F181F181F181F001F001F001F001F001F001F001F001F00FFF8FFF83F000F0007000700030003000300> 16 25 -1 0 17.822] 116 D [ 24 18 -1 0 24.186] 120 D [ 24 26 -2 0 22.913] 50 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f2 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f5 SF 479 155 p (src2tex)s f0 SF (*)s 45 r (version)s 10 r (2.12)s 33 r (\(Sep)s 11 r (9,)s 11 r (1996\))s f4 SF 466 236 p (Kazuo)s 13 r (Amano)s f1 SF (y)s f4 SF 12 r (and)s 13 r (Shinichi)s 13 r (Nomoto)s f1 SF (z)s f2 SF 0 357 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 477 p (/*)s 17 r 671 1 ru f0 SF 682 r (\014leio.c)s 11 r 671 1 ru f2 SF 688 r (*/)s 0 598 p (#include)s 17 r ()s 0 638 p (#include)s 17 r ("src2tex.h")s 0 718 p (int)s 17 r (Page)s 3 r 10 1 ru 15 r (Len)s 2 r 10 1 ru 15 r (Max)s 18 r (=)s 17 r (-1;)s 0 838 p (/*)s 17 r 554 1 ru f0 SF 565 r (get)s 11 r (\014le)s 11 r (names)s 11 r (in)s 11 r (cptr[])s 11 r 554 1 ru f2 SF 571 r (*/)s 0 878 p (/*)s f0 SF 17 r (Here)s 11 r (we)s 10 r (get)s f3 SF 11 r (input-\014le-name)s f0 SF 11 r (from)s 11 r (command)s 11 r (line)s 11 r (and)s 11 r (put)s f2 SF 133 929 p (cptr[0])s f0 SF (=)s f3 SF (input-\014le-name)s f0 SF (,)s f2 SF 11 r (cptr[1])s f0 SF (=)s f3 SF (output-\014le-name)s f0 SF (,)s 0 979 p (Here)s 13 r (mo)s 1 r (difying)s f3 SF 12 r (input-\014le-name)s f0 SF (,)s 14 r (we)s 11 r (determine)s f3 SF 13 r (output-\014le-name)s f0 SF 13 r (so)s 12 r (that)s 13 r (it)s 13 r (has)s 13 r (a)s 12 r (\014le)s 13 r (name)s 13 r (extension)s 13 r (of)s 12 r (the)s 0 1019 p (form)s f1 SF 22 r (\003)s f3 SF (.tex)s f0 SF 11 r (.)s f2 SF 1344 r (*/)s 0 1099 p (void)s 17 r (get)s 3 r 10 1 ru 15 r (fnames\(argc,)s 17 r (argv,)s 18 r (cptr\))s 0 1139 p (int)s 17 r (argc;)s 0 1179 p (char)s 17 r (*argv[];)s 0 1219 p (char)s 17 r (*cptr[];)s 0 1259 p ({)s 70 1299 p (static)s 17 r (char)s 18 r (workarea[2][FNAME)s 2 r 10 1 ru 15 r (LEN)s 2 r 10 1 ru 16 r (MAX];)s 70 1339 p (char)s 17 r (c;)s 70 1380 p (int)s 17 r (i;)s 70 1460 p (if)s 17 r (\(\(argc)s 18 r (!=)s 17 r (1\))s 17 r (&&)s 18 r (\(argc)s 17 r (!=)s 18 r (2\))s 17 r (&&)s 18 r (\(argc)s 17 r (!=)s 18 r (3\)\))s 105 1500 p ({)s 0 1540 p (#ifdef)s 17 r (LATEX)s 174 1580 p (fprintf\(stderr,)s 18 r ("Usage:)s 17 r (src2latex)s 18 r (file)s 2 r 10 1 ru 15 r (name\\n"\);)s 0 1620 p (#else)s 174 1660 p (fprintf\(stderr,)s 18 r ("Usage:)s 17 r (src2tex)s 18 r (file)s 2 r 10 1 ru 15 r (name\\n"\);)s 0 1700 p (#endif)s 174 1740 p (exit\(EXIT)s 2 r 10 1 ru 16 r (FAILURE\);)s 105 1780 p (})s 70 1820 p (if)s 17 r (\(argc)s 18 r (==)s 17 r (1\))s 0 1860 p 480 1 ru f0 SF 33 1897 p (*)s 17 r (Permission)s 8 r (to)s 9 r (use,)s 10 r (copy)s -3 r (,)s 9 r (and)s 9 r (mo)s 1 r (dify)s 9 r (this)s 10 r (softw)s -1 r (are)s 8 r (and)s 9 r (its)s 10 r (do)s 1 r (cumentation)s 8 r (is)s 9 r (granted)s 9 r (under)s 9 r (no)s 9 r (conditions.)s 0 1937 p (How)s -1 r (ev)s -1 r (er,)s 11 r (the)s 12 r (authors)s 11 r (would)s 11 r (b)s 1 r (e)s 12 r (very)s 11 r (happy)s 10 r (if)s 12 r (users)s 12 r (could)s 11 r (inform)s 12 r (any)s 11 r (mo)s 1 r (di\014cations)s 12 r (to)s 11 r (k)s -1 r (amano@tansei.cc.u-)s 0 1977 p (tokyo.ac.jp.)s 14 r (Since)s 11 r (src2tex)s 11 r (is)s 11 r (a)s 11 r (free)s 11 r (softw)s -1 r (are,)s 10 r (there)s 11 r (is)s 12 r (no)s 11 r (warran)s -1 r (t)s -1 r (y)s 10 r (of)s 11 r (any)s 10 r (kind)s 11 r (for)s 11 r (the)s 11 r (program.)s f1 SF 33 2016 p (y)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -3 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -1 r (AN)s 10 r (\(k)s -1 r (amano@)s 0 2056 p (p)s 1 r (o.iijnet.or.jp\))s f1 SF 33 2096 p (z)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -2 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -2 r (AN)s 11 r (\(m93093@)s 0 2136 p (crescent.josai.ac.jp\))s 1307 2216 p (\014leio.c)s 67 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f2 SF 105 33 p ({)s 139 74 p (workarea[0][0])s 18 r (=)s 17 r ('\\0';)s 139 114 p (workarea[1][0])s 18 r (=)s 17 r ('\\0';)s 105 155 p (})s 70 195 p (if)s 17 r (\(\(argc)s 18 r (==)s 17 r (2\))s 17 r (||)s 18 r (\(\(argc)s 17 r (==)s 18 r (3\))s 17 r (&&)s 18 r (\(*argv[1])s 17 r (!=)s 18 r ('-'\)\)\))s 105 235 p ({)s 139 276 p (for)s 18 r (\(i)s 17 r (=)s 18 r (0;)s 17 r (i)s 18 r (<)s 17 r (FNAME)s 2 r 10 1 ru 16 r (LEN)s 2 r 10 1 ru 15 r (MAX)s 17 r (-)s 18 r (1;)s 17 r (++i\))s 174 316 p ({)s 209 357 p (if)s 18 r (\(\(c)s 17 r (=)s 18 r (*\(argv[1])s 17 r (+)s 17 r (i\)\))s 18 r (==)s 17 r ('\\0'\))s 244 397 p (break;)s 209 438 p (workarea[0][i])s 18 r (=)s 17 r (c;)s 174 478 p (})s 139 518 p (workarea[0][i])s 18 r (=)s 17 r ('\\0';)s 139 559 p (for)s 18 r (\(i)s 17 r (=)s 18 r (0;)s 17 r (i)s 18 r (<)s 17 r (FNAME)s 2 r 10 1 ru 16 r (LEN)s 2 r 10 1 ru 15 r (MAX)s 17 r (-)s 18 r (5;)s 17 r (++i\))s 174 599 p ({)s 209 640 p (if)s 18 r (\(\(c)s 17 r (=)s 18 r (*\(argv[1])s 17 r (+)s 17 r (i\)\))s 18 r (==)s 17 r ('\\0'\))s 244 680 p (break;)s 0 721 p (#ifndef)s 17 r (UNIX)s 209 761 p (if)s 18 r (\(c)s 17 r (==)s 18 r ('.'\))s 244 802 p (break;)s 0 842 p (#endif)s 209 882 p (workarea[1][i])s 18 r (=)s 17 r (c;)s 174 923 p (})s 139 963 p (workarea[1][i])s 18 r (=)s 17 r ('.';)s 139 1004 p (workarea[1][i)s 18 r (+)s 17 r (1])s 18 r (=)s 17 r ('t';)s 139 1044 p (workarea[1][i)s 18 r (+)s 17 r (2])s 18 r (=)s 17 r ('e';)s 139 1085 p (workarea[1][i)s 18 r (+)s 17 r (3])s 18 r (=)s 17 r ('x';)s 139 1125 p (workarea[1][i)s 18 r (+)s 17 r (4])s 18 r (=)s 17 r ('\\0';)s 105 1165 p (})s 70 1206 p (if)s 17 r (\(\(argc)s 18 r (==)s 17 r (3\))s 17 r (&&)s 18 r (\(*argv[1])s 17 r (==)s 18 r ('-'\)\))s 105 1246 p ({)s 139 1287 p (Page)s 3 r 10 1 ru 15 r (Len)s 2 r 10 1 ru 15 r (Max)s 18 r (=)s 17 r (0;)s 139 1327 p (for)s 18 r (\(i)s 17 r (=)s 18 r (1;)s 17 r (i)s 18 r (<)s 17 r (FNAME)s 2 r 10 1 ru 16 r (LEN)s 2 r 10 1 ru 15 r (MAX)s 17 r (-)s 18 r (1;)s 17 r (++i\))s 174 1368 p ({)s 209 1408 p (if)s 18 r (\(\(*\(argv[1])s 17 r (+)s 18 r (i\))s 17 r (<)s 17 r ('0'\))s 18 r (||)s 17 r (\(*\(argv[1])s 18 r (+)s 17 r (i\))s 18 r (>)s 17 r ('9'\)\))s 244 1449 p (break;)s 209 1489 p (Page)s 2 r 10 1 ru 16 r (Len)s 2 r 10 1 ru 15 r (Max)s 18 r (=)s 17 r (10)s 17 r (*)s 18 r (Page)s 2 r 10 1 ru 15 r (Len)s 2 r 10 1 ru 16 r (Max)s 17 r (+)s 18 r (\(int\)\(*\(argv[1])s 17 r (+)s 18 r (i\))s 17 r (-)s 17 r ('0'\);)s 209 1529 p (if)s 18 r (\(Page)s 2 r 10 1 ru 15 r (Len)s 2 r 10 1 ru 16 r (Max)s 17 r (>1024\))s 244 1570 p ({)s 279 1610 p (Page)s 2 r 10 1 ru 15 r (Len)s 3 r 10 1 ru 15 r (Max)s 17 r (=)s 18 r (0;)s 279 1651 p (break;)s 244 1691 p (})s 174 1732 p (})s 0 1772 p (#ifdef)s 17 r (DEBUGGING)s 139 1812 p (printf)s 18 r (\("get)s 2 r 10 1 ru 15 r (fnames\(\):)s 18 r (Page)s 2 r 10 1 ru 15 r (Len)s 2 r 10 1 ru 16 r (Max)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (Page)s 2 r 10 1 ru 15 r (Len)s 2 r 10 1 ru 16 r (Max\);)s 0 1853 p (#endif)s 139 1893 p (for)s 18 r (\(i)s 17 r (=)s 18 r (0;)s 17 r (i)s 18 r (<)s 17 r (FNAME)s 2 r 10 1 ru 16 r (LEN)s 2 r 10 1 ru 15 r (MAX)s 17 r (-)s 18 r (1;)s 17 r (++i\))s 174 1934 p ({)s 209 1974 p (if)s 18 r (\(\(c)s 17 r (=)s 18 r (*\(argv[2])s 17 r (+)s 17 r (i\)\))s 18 r (==)s 17 r ('\\0'\))s 244 2015 p (break;)s 209 2055 p (workarea[0][i])s 18 r (=)s 17 r (c;)s 174 2096 p (})s 139 2136 p (workarea[0][i])s 18 r (=)s 17 r ('\\0';)s f0 SF 1307 2216 p (\014leio.c)s 67 r (page)s 11 r (2)s EP pstopssaved restore %%Page: pstops 3 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f2 SF 139 33 p (for)s 18 r (\(i)s 17 r (=)s 18 r (0;)s 17 r (i)s 18 r (<)s 17 r (FNAME)s 2 r 10 1 ru 16 r (LEN)s 2 r 10 1 ru 15 r (MAX)s 17 r (-)s 18 r (5;)s 17 r (++i\))s 174 73 p ({)s 209 113 p (if)s 18 r (\(\(c)s 17 r (=)s 18 r (*\(argv[2])s 17 r (+)s 17 r (i\)\))s 18 r (==)s 17 r ('\\0'\))s 244 153 p (break;)s 0 193 p (#ifndef)s 17 r (UNIX)s 209 233 p (if)s 18 r (\(c)s 17 r (==)s 18 r ('.'\))s 244 272 p (break;)s 0 312 p (#endif)s 209 352 p (workarea[1][i])s 18 r (=)s 17 r (c;)s 174 392 p (})s 139 432 p (workarea[1][i])s 18 r (=)s 17 r ('.';)s 139 472 p (workarea[1][i)s 18 r (+)s 17 r (1])s 18 r (=)s 17 r ('t';)s 139 512 p (workarea[1][i)s 18 r (+)s 17 r (2])s 18 r (=)s 17 r ('e';)s 139 551 p (workarea[1][i)s 18 r (+)s 17 r (3])s 18 r (=)s 17 r ('x';)s 139 591 p (workarea[1][i)s 18 r (+)s 17 r (4])s 18 r (=)s 17 r ('\\0';)s 105 631 p (})s 70 671 p (cptr[0])s 17 r (=)s 18 r (workarea[0];)s 70 711 p (cptr[1])s 17 r (=)s 18 r (workarea[1];)s 0 751 p (})s 0 830 p (/*)s 17 r 315 1 ru f0 SF 326 r (op)s 1 r (en)s 11 r (\014les)s 11 r (for)s 11 r (tt)s 11 r (cptr[]=\014le)s 2 r 10 1 ru 10 r (names,)s f2 SF 11 r (fptr[])s f0 SF (=\014le)s 2 r 10 1 ru 10 r (p)s 1 r (ointers)s 10 r 315 1 ru f2 SF 332 r (*/)s 0 870 p (/*)s f0 SF 17 r (This)s 11 r (function)s 11 r (op)s 1 r (ens)s f3 SF 11 r (input-\014le)s f0 SF 11 r (and)s f3 SF 11 r (output-\014le)s f0 SF 11 r (with)s f2 SF 133 920 p (cptr[0])s f0 SF (=)s f3 SF (input-\014le-name)s f0 SF (,)s f2 SF 11 r (cptr[1])s f0 SF (=)s f3 SF (output-\014le-name)s f0 SF 0 970 p (and)s 11 r (set)s 11 r (tw)s -1 r (o)s 10 r (\014le)s 11 r (p)s 1 r (ointers)s f2 SF 133 1020 p (fptr[0])s f0 SF (=)s f3 SF (input-\014le-p)s 1 r (ointer)s f0 SF (,)s f2 SF 10 r (fptr[1])s f0 SF (=)s f3 SF (output-\014le-p)s 1 r (ointer)s f0 SF (.)s f2 SF 555 r (*/)s 0 1100 p (void)s 17 r (open)s 3 r 10 1 ru 15 r (files\(cptr,)s 17 r (fptr\))s 0 1139 p (char)s 17 r (*cptr[];)s 0 1179 p (FILE)s 17 r (*fptr[];)s 0 1219 p ({)s 35 1259 p (if)s 17 r (\(\(*cptr[0])s 18 r (==)s 17 r ('-'\))s 18 r (&&)s 17 r (\(*\(cptr[0]+1\))s 17 r (==)s 18 r ('v'\)\))s 70 1299 p ({)s 0 1339 p (#ifdef)s 17 r (LATEX)s 0 1379 p (#ifndef)s 17 r (UNIX)s 105 1418 p (printf\("src2ltex)s 17 r (version)s 17 r ("\);)s 0 1458 p (#else)s 105 1498 p (printf\("src2latex)s 17 r (version)s 17 r ("\);)s 0 1538 p (#endif)s 0 1578 p (#else)s 105 1618 p (printf\("src2tex)s 17 r (version)s 17 r ("\);)s 0 1658 p (#endif)s 105 1697 p (printf\(VERSION\);)s 0 1737 p (#ifndef)s 17 r (UNIX)s 105 1777 p (printf\(")s 17 r (for)s 17 r (DOS"\);)s 0 1817 p (#else)s 105 1857 p (printf\(")s 17 r (for)s 17 r (UNIX"\);)s 0 1897 p (#endif)s 105 1937 p (printf\(")s 17 r (with)s 17 r (%d)s 18 r (byte)s 17 r (buffer\\n",)s 18 r (BUFFER)s 2 r 10 1 ru 15 r (SIZE\);)s 105 1976 p (exit\(EXIT)s 2 r 10 1 ru 15 r (FAILURE\);)s 70 2016 p (})s 35 2056 p (if)s 17 r (\(*cptr[0])s 18 r (==)s 17 r ('-'\))s 70 2096 p ({)s 0 2136 p (#ifdef)s 17 r (LATEX)s f0 SF 1307 2216 p (\014leio.c)s 67 r (page)s 11 r (3)s EP pstopssaved restore %%Page: pstops 4 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f2 SF 0 33 p (#ifndef)s 17 r (UNIX)s 105 74 p (printf\("Usage:)s 17 r (src2ltex)s 17 r ([file]\\n"\);)s 0 114 p (#else)s 105 155 p (printf\("Usage:)s 17 r (src2latex)s 17 r ([file]\\n"\);)s 0 195 p (#endif)s 0 235 p (#else)s 105 276 p (printf\("Usage:)s 17 r (src2tex)s 17 r ([file]\\n"\);)s 0 316 p (#endif)s 105 357 p (printf\("Here)s 17 r ([file])s 17 r (should)s 18 r (be)s 17 r (written)s 18 r (in)s 17 r (one)s 18 r (of)s 17 r (the)s 18 r (following)s 17 r (languages:\\n"\);)s 105 397 p (printf\("Basic,)s 17 r (C,)s 17 r (C++,)s 18 r (Cobol,)s 17 r (Fortran,)s 18 r (HTML,)s 17 r (Java,)s 18 r (Lisp,)s 17 r (Make,\\n"\);)s 105 438 p (printf\("Pascal,)s 17 r (Perl,)s 17 r (Scheme,)s 18 r (Shell,)s 17 r (Tcl/Tk;\\n"\);)s 105 478 p (printf\("Asir,)s 17 r (Macsyma,)s 17 r (Maple,)s 18 r (Maxima,)s 17 r (Mathematica,)s 18 r (MatLab,)s 17 r (MuPAD,\\n"\);)s 105 518 p (printf\("Octave,)s 17 r (Reduce.\\n"\);)s 105 559 p (printf\(")s 34 r (*.tex,)s 18 r (*.txt)s 279 r (=>)s 70 r (TEXT\\n"\);)s 105 599 p (printf\(")s 34 r (*.bas,)s 18 r (*.vb)s 296 r (=>)s 70 r (BASIC\\n"\);)s 105 640 p (printf\(")s 34 r (*.c,)s 18 r (*.cpp,)s 17 r (*.vc)s 210 r (=>)s 69 r (C,)s 18 r (C++,)s 17 r (OBJECTIVE-C\\n"\);)s 105 680 p (printf\(")s 34 r (*.cbl,)s 18 r (*.cob)s 279 r (=>)s 70 r (COBOL\\n"\);)s 105 721 p (printf\(")s 34 r (*.f,)s 18 r (*.for)s 314 r (=>)s 69 r (FORTRAN\\n"\);)s 105 761 p (printf\(")s 34 r (*.html)s 384 r (=>)s 70 r (HTML\\n"\);)s 105 802 p (printf\(")s 34 r (*.java)s 384 r (=>)s 70 r (JAVA\\n"\);)s 105 842 p (printf\(")s 34 r (*.el,)s 18 r (*.lsp,)s 17 r (*.sc,)s 18 r (*.scm)s 70 r (=>)s 69 r (LISP,)s 18 r (SCHEME\\n"\);)s 105 882 p (printf\(")s 34 r (makefile)s 349 r (=>)s 70 r (MAKE\\n"\);)s 105 923 p (printf\(")s 34 r (*.p,)s 18 r (*.pas,)s 17 r (*.tp)s 210 r (=>)s 69 r (PASCAL\\n"\);)s 105 963 p (printf\(")s 34 r (*.pl,)s 18 r (*.prl)s 296 r (=>)s 70 r (PERL\\n"\);)s 105 1004 p (printf\(")s 34 r (*.sh,)s 18 r (*.csh,)s 17 r (*.ksh)s 175 r (=>)s 69 r (SHELL\\n"\);)s 105 1044 p (printf\(")s 34 r (*.tcl,)s 18 r (*.tk)s 296 r (=>)s 70 r (TCL/TK\\n"\);)s 105 1085 p (printf\(")s 34 r (*.asi,)s 18 r (*.asir,)s 17 r (*.asr)s 140 r (=>)s 70 r (ASIR\\n"\);)s 105 1125 p (printf\(")s 34 r (*.mac,)s 18 r (*.max)s 279 r (=>)s 70 r (MACSYMA,)s 17 r (MAXIMA\\n"\);)s 105 1165 p (printf\(")s 34 r (*.map,)s 18 r (*.mpl)s 279 r (=>)s 70 r (MAPLE\\n"\);)s 105 1206 p (printf\(")s 34 r (*.mat,)s 18 r (*.mma)s 279 r (=>)s 70 r (MATHEMATICA\\n"\);)s 105 1246 p (printf\(")s 34 r (*.ml,)s 18 r (*.mtlb,)s 17 r (*.oct)s 157 r (=>)s 70 r (MATLAB,)s 17 r (OCTAVE\\n"\);)s 105 1287 p (printf\(")s 34 r (*.mu)s 419 r (=>)s 70 r (MuPAD\\n"\);)s 105 1327 p (printf\(")s 34 r (*.red,)s 18 r (*.rdc)s 279 r (=>)s 70 r (REDUCE\\n"\);)s 105 1368 p (printf\("For)s 17 r (more)s 17 r (information,)s 18 r (please)s 17 r (read)s 18 r (the)s 17 r (src2tex.c.ps)s 18 r (file.\\n"\);)s 105 1408 p (exit\(EXIT)s 2 r 10 1 ru 15 r (FAILURE\);)s 70 1449 p (})s 35 1489 p (if)s 17 r (\(*cptr[0])s 18 r (==)s 17 r ('\\0'\))s 70 1529 p (fptr[0])s 17 r (=)s 18 r (stdin;)s 35 1570 p (else)s 70 1610 p ({)s 105 1651 p (if)s 17 r (\(\(fptr[0])s 17 r (=)s 18 r (fopen\(cptr[0],)s 17 r ("r"\)\))s 18 r (==)s 17 r (NULL\))s 139 1691 p ({)s 174 1732 p (fprintf\(stderr,)s 18 r ("\\nError:)s 17 r (cannot)s 18 r (open)s 17 r (%s\\n",)s 18 r (cptr[0]\);)s 174 1772 p (exit\(EXIT)s 2 r 10 1 ru 16 r (FAILURE\);)s 139 1812 p (})s 70 1853 p (})s 35 1893 p (if)s 17 r (\(*cptr[1])s 18 r (==)s 17 r ('\\0'\))s 70 1934 p (fptr[1])s 17 r (=)s 18 r (stdout;)s 35 1974 p (else)s 70 2015 p ({)s 105 2055 p (if)s 17 r (\(\(fptr[1])s 17 r (=)s 18 r (fopen\(cptr[1],)s 17 r ("w"\)\))s 18 r (==)s 17 r (NULL\))s 139 2096 p ({)s 174 2136 p (fprintf\(stderr,)s 18 r ("\\nError:)s 17 r (cannot)s 18 r (open)s 17 r (%s\\n",)s 18 r (cptr[1]\);)s f0 SF 1307 2216 p (\014leio.c)s 67 r (page)s 11 r (4)s EP pstopssaved restore %%Page: pstops 5 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f2 SF 174 33 p (exit\(EXIT)s 2 r 10 1 ru 16 r (FAILURE\);)s 139 73 p (})s 70 113 p (})s 0 153 p (})s 0 232 p (/*)s 17 r 320 1 ru f0 SF 331 r (close)s 11 r (\014les)s 11 r (for)s f2 SF 11 r (cptr[])s f0 SF (=\014le)s 2 r 10 1 ru 10 r (names,)s f2 SF 11 r (fptr[])s f0 SF (=\014le)s 2 r 10 1 ru 10 r (p)s 1 r (ointers)s 10 r 320 1 ru f2 SF 337 r (*/)s 0 272 p (/*)s f0 SF 17 r (This)s 11 r (function)s 11 r (closes)s 11 r (tw)s -1 r (o)s 10 r (\014les)s 11 r (with)s 11 r (\014le)s 11 r (p)s 1 r (ointers)s f2 SF 133 322 p (fptr[0])s f0 SF (=)s f3 SF (input-\014le-p)s 1 r (ointer)s f0 SF (,)s f2 SF 10 r (fptr[1])s f0 SF (=)s f3 SF (output-\014le-p)s 1 r (ointer)s f0 SF (.)s 0 372 p (File)s 11 r (names)s f2 SF 133 422 p (cptr[0])s f0 SF (=)s f3 SF (input-\014le-name)s f0 SF (,)s f2 SF 11 r (cptr[1])s f0 SF (=)s f3 SF (output-\014le-name)s f0 SF 0 472 p (are)s 11 r (used)s 11 r (only)s 11 r (in)s 11 r (error)s 11 r (messages.)s f2 SF 1062 r (*/)s 0 551 p (void)s 17 r (close)s 3 r 10 1 ru 15 r (files\(cptr,)s 17 r (fptr\))s 0 591 p (char)s 17 r (*cptr[];)s 0 631 p (FILE)s 17 r (*fptr[];)s 0 671 p ({)s 70 711 p (if)s 17 r (\(fclose\(fptr[0]\))s 18 r (==)s 17 r (EOF\))s 105 751 p ({)s 174 790 p (fprintf\(stderr,)s 18 r ("\\nError:)s 17 r (cannot)s 18 r (close)s 17 r (%s\\n",)s 18 r (cptr[0]\);)s 174 830 p (exit\(EXIT)s 2 r 10 1 ru 16 r (FAILURE\);)s 105 870 p (})s 70 910 p (if)s 17 r (\(fclose\(fptr[1]\))s 18 r (==)s 17 r (EOF\))s 105 950 p ({)s 174 990 p (fprintf\(stderr,)s 18 r ("\\nError:)s 17 r (cannot)s 18 r (close)s 17 r (%s\\n",)s 18 r (cptr[1]\);)s 174 1029 p (exit\(EXIT)s 2 r 10 1 ru 16 r (FAILURE\);)s 105 1069 p (})s 0 1109 p (})s f0 SF 1307 2216 p (\014leio.c)s 67 r (page)s 11 r (5)s EP pstopssaved restore %%Trailer %%Pages: 5 END %%EOF src2tex-2.12h.orig/fonts.tex100644 1750 1750 3426 5651466456 15763 0ustar kawamurakawamura% fonts.tex % cmr fonts \font\fivecmr=cmr5 scaled \magstep0 \font\sevencmr=cmr7 scaled \magstep0 \font\eightcmr=cmr8 scaled \magstep0 \font\tencmr=cmr10 scaled \magstep0 \font\twelvecmr=cmr10 scaled \magstep1 \font\fourteencmr=cmr10 scaled \magstep2 \font\seventeencmr=cmr10 scaled \magstep3 % cmbx fonts \font\fivecmbx=cmbx5 scaled \magstep0 \font\sevencmbx=cmbx7 scaled \magstep0 \font\tencmbx=cmbx10 scaled \magstep0 \font\twelvecmbx=cmbx10 scaled \magstep1 \font\fourteencmbx=cmbx10 scaled \magstep2 \font\seventeencmbx=cmbx10 scaled \magstep3 % cmti fonts \font\sevencmti=cmti7 scaled \magstep0 \font\tencmti=cmti10 scaled \magstep0 \font\twelvecmti=cmti10 scaled \magstep1 \font\fourteencmti=cmti10 scaled \magstep2 \font\seventeencmti=cmti10 scaled \magstep3 % cmss fonts \font\eightcmss=cmss8 scaled \magstep0 \font\tencmss=cmss10 scaled \magstep0 \font\twelvecmss=cmss10 scaled \magstep1 \font\fourteencmss=cmss10 scaled \magstep2 \font\seventeencmss=cmss10 scaled \magstep3 % cmcsc fonts \font\tencmcsc=cmcsc10 scaled \magstep0 \font\twelvecmcsc=cmcsc10 scaled \magstep1 \font\fourteencmcsc=cmcsc10 scaled \magstep2 \font\seventeencmcsc=cmcsc10 scaled \magstep3 % manfnt fonts \font\manual=manfnt % dm fonts %\jfont\tendm=dm10 scaled \magstep0 %\jfont\twelvedm=dm10 scaled \magstep1 %\jfont\fourteendm=dm10 scaled \magstep2 %\jfont\seventeendm=dm10 scaled \magstep3 % dg fonts %\jfont\tendg=dg10 scaled \magstep0 %\jfont\twelvedg=dg10 scaled \magstep1 %\jfont\fourteendg=dg10 scaled \magstep2 %\jfont\seventeendg=dg10 scaled \magstep3 % macros by M. Doob, A Gentle Introduction to TeX \def\\{\char92{}} %%%%% backslash %%%%% \def\lb{\char'173{}} %%%%% left brace %%%%% \def\rb{\char'175{}} %%%%% right brace %%%%% \def\sp{\char32{}} %%%%% special space symbol %%%%% src2tex-2.12h.orig/getdata.c100644 1750 1750 6341 5733237723 15656 0ustar kawamurakawamura/* {\hrulefill} * {\ % beginning of TeX mode \input fonts.tex % define fonts \input title.tex % title and authors % end of TeX mode} * {\hrulefill} */ /* {\hrulefill\ getdata.c\ \hrulefill} */ #include #include "src2tex.h" /* {\hrulefill\ buffer storage\ \hrulefill} */ /* {\rm Input data are temporarily stored in buffer storage \smallskip \qquad{\tt Buffer[0] Buffer[1]} $\cdots$ {\tt Buffer[BUFFER\_SIZE-1]\ .} \smallskip \noindent For further details, see the definitions of functions of getdata.c, langflag.c, modflag.c and text2tex.c .\hfill} */ int Buffer[BUFFER_SIZE]; /* {\hrulefill\ increase buffer pointer buf\_ptr\ \hrulefill} */ /* {\rm We access buffer storage by using integer pointer to {\tt Buffer[]}, which we call buffer pointer. This function simply increases buffer pointer provided that {\tt Buffer[BUFFER\_SIZE]} is identified with {\tt Buffer[0]}.\hfill} */ int *inc_buf_ptr(buf_ptr) int *buf_ptr; { if ((buf_ptr == Buffer -1) || (buf_ptr == Buffer + BUFFER_SIZE)) { fprintf(stderr, "\nError: buffering error !!\n"); exit(EXIT_FAILURE); } if (++buf_ptr == Buffer + BUFFER_SIZE) buf_ptr = Buffer; return buf_ptr; } /* {\hrulefill\ decrease buffer pointer buf\_ptr\ \hrulefill} */ /* {\rm This function is an inverse function of the above {\tt inc\_buf\_ptr()}. In fact, {\tt dec\_buf\_ptr()} decreases buffer pointer on the assumption that {\tt Buffer[-1]} is identified with {\tt Buffer[BUFFER\_SIZE-1]}. \hfill} */ int *dec_buf_ptr(buf_ptr) int *buf_ptr; { if ((buf_ptr == Buffer -1) || (buf_ptr == Buffer + BUFFER_SIZE)) { fprintf(stderr, "\nError: buffering error !!\n"); exit(EXIT_FAILURE); } if (buf_ptr-- == Buffer) buf_ptr += BUFFER_SIZE; return buf_ptr; } /* {\hrulefill\ fgetc to buffer {\tt Buffer[]}\ \hrulefill} */ /* {\rm In case of first call, {\it i.e.\/}, in case of {\tt stat\_flag}=0, {\tt fgetc2buffer()} increases {\tt stat\_flag} and fills $1\over2$ of buffer \smallskip \qquad{\tt Buffer[0] Buffer[1]} $\cdots$ {\tt Buffer[(int)(BUFFER\_SIZE/2)-1]} \smallskip \noindent with input data which we {\tt fgetc()} from a file given on the command line. After that, {\tt fgetc2buffer()} put \smallskip \qquad{\tt buf\_ptr1=Buffer, buf\_ptr2=Buffer+(int)(BUFFER\_SIZE/2)} \smallskip \noindent and returns {\tt buf\_ptr1}. When {\tt stat\_flag}$\not=0$, {\tt fgetc2buffer()} reads a datum from a given file, substitutes it to {\tt *buf\_ptr2} and increases {\tt buf\_ptr2}. And also, it increases buffer pointer {\tt buf\_ptr1} and returns {\tt buf\_ptr1}. So, {\tt fgetc2buffer()} uses a half of {\tt Buffer[]} for input data and the remaining half for input history.\hfill} */ int *fgetc2buffer(fptr) FILE *fptr[]; { static int stat_flag = 0; static int *buf_ptr1, *buf_ptr2; int i; if (stat_flag == 0) { ++stat_flag; for (i = 0; i < (int) (BUFFER_SIZE / 2); ++i) Buffer[i] = fgetc(fptr[0]); for (i = (int) (BUFFER_SIZE / 2); i < BUFFER_SIZE; ++i) Buffer[i] = 0x00; buf_ptr1 = Buffer; buf_ptr2 = Buffer + (int) (BUFFER_SIZE / 2); return buf_ptr1; } else { *buf_ptr2 = fgetc(fptr[0]); buf_ptr2 = inc_buf_ptr(buf_ptr2); buf_ptr1 = inc_buf_ptr(buf_ptr1); return buf_ptr1; } } src2tex-2.12h.orig/getdata.c.ps100644 1750 1750 104362 6266067172 16342 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: getdata.c.dvi %%Pages: 3 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 122 /f0 NF f0 SF [ 24 23 -1 0 24.906] 65 D [ 24 23 -1 0 25.367] 68 D [ 24 23 -1 0 21.678] 70 D [ 24 23 -1 0 24.906] 72 D [ 16 23 0 0 11.992] 73 D [<3E004300C180E1C0E1C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF8> 16 23 -2 0 17.065] 74 D [ 24 23 -1 0 25.829] 75 D [ 32 23 -1 0 30.441] 77 D [ 24 23 -1 0 24.906] 78 D [ 24 23 -1 0 22.600] 80 D [<8F80F060C030C01080188018801800180038007003F01FE03FC07E00F000E000C010C010C0104030603030F01F10> 16 23 -2 0 18.449] 83 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<007C000183000700800E00400C00401C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00 201C00201C00201C00201C00201C0070FF81FC> 24 23 -1 0 24.906] 85 D [<0040040000C0060000E00E0000E00E0001E00F0001D01D0001D01D0001D01D0003901C800388388003883880070838400704 7040070470400E0470200E02E0200E02E0200E02E0201C03E0101C01C0101C01C0103C03C038FF0FF8FE> 32 23 -1 0 34.131] 87 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [<78EEE6470707070707070707070707070707073F0000000000060F0F06> 8 29 2 6 10.147] 106 D [ 24 23 0 0 17.527] 107 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<1F0020C060607030703000380018001C0F9C185C303C603CE01CE01CE01CE018E0186038303018600F80> 16 21 -1 0 16.604] 57 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<060006000600C630E6703FC00F000F003FC0E670C630060006000600> 16 14 -2 -11 16.604] 42 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D [<00FF000701E008003810000020F0E0218D904307884703888603888E03888E03888E03888E03888E03888603884703904304 10218C2020F02010004008008007070000F800> 24 23 -2 0 25.829] 64 D [ 24 23 0 0 19.371] 11 D [ 24 23 0 0 18.449] 12 D [ 24 23 0 0 18.449] 13 D [ 8 2 0 -6 11.069] 45 D 1.000 51 /f1 NF f1 SF [ 8 15 -2 0 13.237] 49 D [ 16 15 -1 0 13.237] 50 D 1.000 123 /f2 NF f2 SF [<60F0F060> 8 4 -2 -6 9.224] 1 D [<4000C00060006000300030001800180018000C000C0006000600030003000180018000C000C0006000600030003000300018 0018000C000C00060006> 16 30 -5 7 0.000] 54 D [<0C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C00FFC0FFC00C000C000C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 121 D [<0C000C000C000C000C000C00FFC0FFC00C000C000C000C000C000C0000000C000C000C000C000C000C00FFC0FFC00C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 122 D 1.000 126 /f3 NF f3 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 66 D [ 16 20 -1 0 17.434] 69 D [ 16 20 -1 0 17.434] 70 D [ 16 20 -3 0 17.434] 73 D [ 16 20 -1 0 17.434] 76 D [ 16 20 -1 0 17.434] 82 D [ 16 20 -2 0 17.434] 83 D [<1FF01FF00380038003800380038003800380038003800380038003800380E39CE39CE39CFFFC7FFC> 16 20 -1 0 17.434] 84 D [<03C007E00C301C38381C381C381C381C381C381C381C381C381C381C381C381C381C381CFE7FFE7F> 16 20 0 0 17.434] 85 D [ 16 20 -1 0 17.434] 88 D [ 16 20 -2 0 17.434] 90 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [ 16 20 -2 0 17.434] 108 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [ 16 14 -1 0 17.434] 120 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<60F0F0600000000070F0F0F0F0F0F0F0F0F0F060> 8 20 -6 0 17.434] 33 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<60F0F06000000000000060F0F060> 8 14 -6 0 17.434] 58 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [ 16 26 -6 3 17.434] 91 D [ 16 26 -1 3 17.434] 93 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00300070007000E000E001C001C001C0038003800700070007000E000E000E001C001C0038003800380070007000E000E000 C000> 16 26 -2 3 17.434] 92 D [ 8 26 -7 3 17.434] 124 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 106 /f4 NF f4 SF [<38004600C10080808000C000C000C000FE0041006080308018800F00> 16 14 -5 0 15.276] 101 D [<306864646430303018984C4C4838000000000000060706> 8 23 -3 0 10.184] 105 D [<60F07830> 8 4 -3 0 10.184] 46 D 1.000 123 /f5 NF f5 SF [ 24 23 -1 0 27.027] 65 D [ 24 23 -1 0 27.996] 75 D [ 24 23 -1 0 27.027] 78 D [<87C0D830E018C008800C800C800C000C001C003803F81FF03FE07F00F000E000C008C008C0084018603830580F88> 16 23 -2 0 20.294] 83 D [ 24 17 -1 0 20.368] 97 D [<01F8000E0600180100300100700080600080E00000E00000E00000E00000E000006000807000803001801803800E058001F8 80> 24 17 -1 0 19.629] 99 D [ 24 17 -1 0 20.737] 100 D [ 24 17 -1 0 20.368] 104 D [ 16 17 0 0 10.036] 105 D [ 24 17 -1 0 24.795] 109 D [ 24 17 -1 0 20.368] 110 D [<03F0000E1C00180600300300700380600180E001C0E001C0E001C0E001C0E001C06001807003803003001806000E1C0003F0 00> 24 17 -1 0 21.105] 111 D [<0FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00081C08081C08081C08081C080C1C180FFFF 80> 24 17 -1 0 19.629] 116 D [<03E0000E18001C0400180400380200380200380200380200380200380200380200380200380200380200380200380700FE0F 80> 24 17 -1 0 20.368] 117 D [ 16 17 -1 0 16.678] 122 D 1.000 121 /f6 NF f6 SF [<03F00FFC1F063C037C007800F800F800F800F800F800F800781C783E3C3E1E3E0FFC03F8> 16 18 -2 0 20.367] 99 D [<01FC000FFF001F01803E00C07C0000780000F80000F80000F80000FFFFC0FFFFC0F803C07803C07C03803C07801E0F000FFE 0003F800> 24 18 -1 0 21.004] 101 D [ 16 18 -1 0 18.873] 114 D [ 16 18 -2 0 18.076] 115 D [<03E00FF00F101F181F181F181F181F001F001F001F001F001F001F001F001F00FFF8FFF83F000F0007000700030003000300> 16 25 -1 0 17.822] 116 D [ 24 18 -1 0 24.186] 120 D [ 24 26 -2 0 22.913] 50 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f6 SF 479 195 p (src2tex)s f0 SF (*)s 45 r (version)s 10 r (2.12)s 33 r (\(Sep)s 11 r (9,)s 11 r (1996\))s f5 SF 466 276 p (Kazuo)s 13 r (Amano)s f2 SF (y)s f5 SF 12 r (and)s 13 r (Shinichi)s 13 r (Nomoto)s f2 SF (z)s f3 SF 0 397 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 518 p (/*)s 17 r 651 1 ru f0 SF 662 r (getdata.c)s 11 r 651 1 ru f3 SF 667 r (*/)s 0 638 p (#include)s 17 r ()s 0 678 p (#include)s 17 r ("src2tex.h")s 0 799 p (/*)s 17 r 618 1 ru f0 SF 629 r (bu\013er)s 11 r (storage)s 11 r 618 1 ru f3 SF 635 r (*/)s 0 839 p (/*)s f0 SF 17 r (Input)s 11 r (data)s 11 r (are)s 11 r (temp)s 1 r (orarily)s 11 r (stored)s 11 r (in)s 11 r (bu\013er)s 11 r (storage)s f3 SF 133 889 p (Buffer[0])s 17 r (Buffer[1])s f2 SF 11 r (\001)s 6 r (\001)s 5 r (\001)s f3 SF 11 r (Buffer[BUFFER)s 3 r 10 1 ru 10 r (SIZE-1])s 17 r (.)s f0 SF 0 939 p (F)s -2 r (or)s 10 r (further)s 11 r (details,)s 11 r (see)s 12 r (the)s 11 r (de\014nitions)s 11 r (of)s 11 r (functions)s 11 r (of)s 11 r (getdata.c,)s 11 r (lang\015ag.c,)s 11 r (mo)s 1 r (d\015ag.c)s 11 r (and)s 11 r (text2tex.c)s 11 r (.)s f3 SF 60 r (*/)s 0 1019 p (int)s 17 r (Buffer[BUFFER)s 3 r 10 1 ru 15 r (SIZE];)s 0 1140 p (/*)s 17 r 498 1 ru f0 SF 509 r (increase)s 11 r (bu\013er)s 11 r (p)s 1 r (ointer)s 10 r (buf)s 2 r 10 1 ru 10 r (ptr)s 11 r 498 1 ru f3 SF 515 r (*/)s 0 1180 p (/*)s f0 SF 17 r (W)s -2 r (e)s 7 r (access)s 9 r (bu\013er)s 9 r (storage)s 8 r (by)s 8 r (using)s 9 r (integer)s 8 r (p)s 1 r (ointer)s 7 r (to)s f3 SF 9 r (Buffer[])s f0 SF (,)s 9 r (which)s 8 r (we)s 8 r (call)s 8 r (bu\013er)s 9 r (p)s 1 r (ointer.)s 13 r (This)s 9 r (function)s 0 1220 p (simply)s 11 r (increases)s 11 r (bu\013er)s 11 r (p)s 1 r (ointer)s 10 r (provided)s 10 r (that)s f3 SF 11 r (Buffer[BUFFER)s 3 r 10 1 ru 10 r (SIZE])s f0 SF 11 r (is)s 11 r (identi\014ed)s 10 r (with)s f3 SF 11 r (Buffer[0])s f0 SF (.)s f3 SF 105 r (*/)s 0 1300 p (int)s 17 r (*inc)s 3 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 1340 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 1380 p ({)s 35 1420 p (if)s 17 r (\(\(buf)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 18 r (Buffer)s 17 r (-1\))s 18 r (||)s 17 r (\(buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (==)s 17 r (Buffer)s 18 r (+)s 17 r (BUFFER)s 2 r 10 1 ru 16 r (SIZE\)\))s 70 1460 p ({)s 105 1500 p (fprintf\(stderr,)s 17 r ("\\nError:)s 17 r (buffering)s 18 r (error)s 17 r (!!\\n"\);)s 105 1541 p (exit\(EXIT)s 2 r 10 1 ru 15 r (FAILURE\);)s 70 1581 p (})s 35 1621 p (if)s 17 r (\(++buf)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 18 r (Buffer)s 17 r (+)s 18 r (BUFFER)s 2 r 10 1 ru 15 r (SIZE\))s 70 1661 p (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (Buffer;)s 35 1701 p (return)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 0 1741 p (})s 0 1821 p (/*)s 17 r 495 1 ru f0 SF 506 r (decrease)s 11 r (bu\013er)s 11 r (p)s 1 r (ointer)s 10 r (buf)s 2 r 10 1 ru 10 r (ptr)s 11 r 495 1 ru f3 SF 512 r (*/)s 0 1860 p 480 1 ru f0 SF 33 1897 p (*)s 17 r (Permission)s 8 r (to)s 9 r (use,)s 10 r (copy)s -3 r (,)s 9 r (and)s 9 r (mo)s 1 r (dify)s 9 r (this)s 10 r (softw)s -1 r (are)s 8 r (and)s 9 r (its)s 10 r (do)s 1 r (cumentation)s 8 r (is)s 9 r (granted)s 9 r (under)s 9 r (no)s 9 r (conditions.)s 0 1937 p (How)s -1 r (ev)s -1 r (er,)s 11 r (the)s 12 r (authors)s 11 r (would)s 11 r (b)s 1 r (e)s 12 r (very)s 11 r (happy)s 10 r (if)s 12 r (users)s 12 r (could)s 11 r (inform)s 12 r (any)s 11 r (mo)s 1 r (di\014cations)s 12 r (to)s 11 r (k)s -1 r (amano@tansei.cc.u-)s 0 1977 p (tokyo.ac.jp.)s 14 r (Since)s 11 r (src2tex)s 11 r (is)s 11 r (a)s 11 r (free)s 11 r (softw)s -1 r (are,)s 10 r (there)s 11 r (is)s 12 r (no)s 11 r (warran)s -1 r (t)s -1 r (y)s 10 r (of)s 11 r (any)s 10 r (kind)s 11 r (for)s 11 r (the)s 11 r (program.)s f2 SF 33 2016 p (y)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -3 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -1 r (AN)s 10 r (\(k)s -1 r (amano@)s 0 2056 p (p)s 1 r (o.iijnet.or.jp\))s f2 SF 33 2096 p (z)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -2 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -2 r (AN)s 11 r (\(m93093@)s 0 2136 p (crescent.josai.ac.jp\))s 1267 2216 p (getdata.c)s 66 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 0 33 p (/*)s f0 SF 17 r (This)s 9 r (function)s 10 r (is)s 9 r (an)s 10 r (inv)s -1 r (erse)s 9 r (function)s 9 r (of)s 10 r (the)s 9 r (ab)s 1 r (ov)s -1 r (e)s f3 SF 9 r (inc)s 2 r 10 1 ru 11 r (buf)s 2 r 10 1 ru 10 r (ptr\(\))s f0 SF (.)s 14 r (In)s 10 r (fact,)s f3 SF 10 r (dec)s 2 r 10 1 ru 10 r (buf)s 3 r 10 1 ru 10 r (ptr\(\))s f0 SF 10 r (decreases)s 9 r (bu\013er)s 0 73 p (p)s 1 r (ointer)s 10 r (on)s 11 r (the)s 11 r (assumption)s 11 r (that)s f3 SF 11 r (Buffer[-1])s f0 SF 11 r (is)s 11 r (identi\014ed)s 11 r (with)s f3 SF 11 r (Buffer[BUFFER)s 2 r 10 1 ru 10 r (SIZE-1])s f0 SF (.)s f3 SF 250 r (*/)s 0 154 p (int)s 17 r (*dec)s 3 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 194 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 235 p ({)s 35 275 p (if)s 17 r (\(\(buf)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 18 r (Buffer)s 17 r (-1\))s 18 r (||)s 17 r (\(buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (==)s 17 r (Buffer)s 18 r (+)s 17 r (BUFFER)s 2 r 10 1 ru 16 r (SIZE\)\))s 70 316 p ({)s 105 356 p (fprintf\(stderr,)s 17 r ("\\nError:)s 17 r (buffering)s 18 r (error)s 17 r (!!\\n"\);)s 105 397 p (exit\(EXIT)s 2 r 10 1 ru 15 r (FAILURE\);)s 70 437 p (})s 35 478 p (if)s 17 r (\(buf)s 2 r 10 1 ru 16 r (ptr--)s 17 r (==)s 18 r (Buffer\))s 70 518 p (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (+=)s 17 r (BUFFER)s 2 r 10 1 ru 16 r (SIZE;)s 35 558 p (return)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 0 599 p (})s 0 720 p (/*)s 17 r 540 1 ru f0 SF 550 r (fgetc)s 11 r (to)s 12 r (bu\013er)s f3 SF 11 r (Buffer[])s 11 r 540 1 ru 556 r (*/)s 0 761 p (/*)s f0 SF 17 r (In)s 14 r (case)s 14 r (of)s 14 r (\014rst)s 14 r (call,)s f4 SF 15 r (i.e.)s f0 SF (,)s 15 r (in)s 14 r (case)s 14 r (of)s f3 SF 14 r (stat)s 2 r 10 1 ru 11 r (flag)s f0 SF (=0,)s f3 SF 14 r (fgetc2buffer\(\))s f0 SF 15 r (increases)s f3 SF 14 r (stat)s 2 r 10 1 ru 10 r (flag)s f0 SF 14 r (and)s 14 r (\014lls)s f1 SF 1502 748 p (1)s 1502 753 p 13 1 ru 1502 772 p (2)s f0 SF 1533 761 p (of)s 0 801 p (bu\013er)s f3 SF 133 852 p (Buffer[0])s 17 r (Buffer[1])s f2 SF 11 r (\001)s 6 r (\001)s 5 r (\001)s f3 SF 11 r (Buffer[\(int\)\(BUFFER)s 3 r 10 1 ru 10 r (SIZE/2\)-1])s f0 SF 0 903 p (with)s 11 r (input)s 10 r (data)s 11 r (which)s 10 r (we)s f3 SF 10 r (fgetc\(\))s f0 SF 10 r (from)s 11 r (a)s 11 r (\014le)s 10 r (given)s 10 r (on)s 11 r (the)s 10 r (command)s 11 r (line.)s 15 r (After)s 10 r (that,)s f3 SF 11 r (fgetc2buffer\(\))s f0 SF 11 r (put)s f3 SF 133 954 p (buf)s 2 r 10 1 ru 10 r (ptr1=Buffer,)s 18 r (buf)s 2 r 10 1 ru 10 r (ptr2=Buffer+\(int\)\(BUFFER)s 2 r 10 1 ru 11 r (SIZE/2\))s f0 SF 0 1005 p (and)s 10 r (returns)s f3 SF 9 r (buf)s 2 r 10 1 ru 11 r (ptr1)s f0 SF (.)s 14 r (When)s f3 SF 9 r (stat)s 2 r 10 1 ru 11 r (flag)s f2 SF (6)s f0 SF (=)s 9 r (0,)s f3 SF 10 r (fgetc2buffer\(\))s f0 SF 10 r (reads)s 9 r (a)s 10 r (datum)s 9 r (from)s 10 r (a)s 9 r (given)s 9 r (\014le,)s 10 r (substitutes)s 9 r (it)s 0 1044 p (to)s f3 SF 11 r (*buf)s 2 r 10 1 ru 10 r (ptr2)s f0 SF 11 r (and)s 11 r (increases)s f3 SF 10 r (buf)s 2 r 10 1 ru 11 r (ptr2)s f0 SF (.)s 15 r (And)s 10 r (also,)s 11 r (it)s 11 r (increases)s 10 r (bu\013er)s 11 r (p)s 1 r (ointer)s f3 SF 10 r (buf)s 2 r 10 1 ru 10 r (ptr1)s f0 SF 11 r (and)s 11 r (returns)s f3 SF 11 r (buf)s 2 r 10 1 ru 10 r (ptr1)s f0 SF (.)s 0 1084 p (So,)s f3 SF 11 r (fgetc2buffer\(\))s f0 SF 11 r (uses)s 11 r (a)s 11 r (half)s 11 r (of)s f3 SF 11 r (Buffer[])s f0 SF 11 r (for)s 12 r (input)s 11 r (data)s 11 r (and)s 11 r (the)s 11 r (remaining)s 11 r (half)s 11 r (for)s 11 r (input)s 11 r (history)s -2 r (.)s f3 SF 58 r (*/)s 0 1165 p (int)s 17 r (*fgetc2buffer\(fptr\))s 0 1206 p (FILE)s 17 r (*fptr[];)s 0 1246 p ({)s 70 1287 p (static)s 17 r (int)s 18 r (stat)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 70 1327 p (static)s 17 r (int)s 18 r (*buf)s 2 r 10 1 ru 15 r (ptr1,)s 18 r (*buf)s 2 r 10 1 ru 15 r (ptr2;)s 70 1367 p (int)s 17 r (i;)s 70 1448 p (if)s 17 r (\(stat)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 105 1489 p ({)s 174 1529 p (++stat)s 2 r 10 1 ru 16 r (flag;)s 174 1570 p (for)s 18 r (\(i)s 17 r (=)s 18 r (0;)s 17 r (i)s 18 r (<)s 17 r (\(int\))s 17 r (\(BUFFER)s 2 r 10 1 ru 16 r (SIZE)s 17 r (/)s 18 r (2\);)s 17 r (++i\))s 244 1610 p (Buffer[i])s 18 r (=)s 17 r (fgetc\(fptr[0]\);)s 174 1651 p (for)s 18 r (\(i)s 17 r (=)s 18 r (\(int\))s 17 r (\(BUFFER)s 2 r 10 1 ru 16 r (SIZE)s 17 r (/)s 17 r (2\);)s 18 r (i)s 17 r (<)s 18 r (BUFFER)s 2 r 10 1 ru 15 r (SIZE;)s 18 r (++i\))s 244 1691 p (Buffer[i])s 18 r (=)s 17 r (0x00;)s 174 1731 p (buf)s 2 r 10 1 ru 16 r (ptr1)s 17 r (=)s 18 r (Buffer;)s 174 1772 p (buf)s 2 r 10 1 ru 16 r (ptr2)s 17 r (=)s 18 r (Buffer)s 17 r (+)s 18 r (\(int\))s 17 r (\(BUFFER)s 2 r 10 1 ru 15 r (SIZE)s 18 r (/)s 17 r (2\);)s 174 1812 p (return)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr1;)s 105 1853 p (})s 70 1893 p (else)s 105 1934 p ({)s 174 1974 p (*buf)s 2 r 10 1 ru 16 r (ptr2)s 17 r (=)s 18 r (fgetc\(fptr[0]\);)s 174 2015 p (buf)s 2 r 10 1 ru 16 r (ptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(buf)s 2 r 10 1 ru 15 r (ptr2\);)s 174 2055 p (buf)s 2 r 10 1 ru 16 r (ptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(buf)s 2 r 10 1 ru 15 r (ptr1\);)s 174 2095 p (return)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr1;)s 105 2136 p (})s f0 SF 1267 2216 p (getdata.c)s 66 r (page)s 11 r (2)s EP pstopssaved restore %%Page: pstops 3 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 0 33 p (})s f0 SF 1267 2216 p (getdata.c)s 66 r (page)s 11 r (3)s EP pstopssaved restore %%Trailer %%Pages: 3 END %%EOF src2tex-2.12h.orig/tools.c100644 1750 1750 30544 5755376733 15440 0ustar kawamurakawamura/* {\hrulefill} * {\ % beginning of TeX mode \input fonts.tex % define fonts \input title.tex % title and authors % end of TeX mode} * {\hrulefill} */ /* {\hrulefill\ tools.c\ \hrulefill} */ #include #include "src2tex.h" extern int TXT_flag; extern int BAS_flag; extern int C_flag; extern int CBL_flag; extern int F77_flag; extern int LISP_flag; extern int MAKE_flag; extern int PAS_flag; extern int PERL_flag; extern int SH_flag; extern int TCL_flag; extern int MAP_flag; extern int MAT_flag; extern int MLAB_flag; extern int RED_flag; extern int *dec_buf_ptr(); extern int *inc_buf_ptr(); extern int *fgetc2buffer(); extern int *get_phrase(); extern int search_line(); extern int get_comment_flag(); extern int get_tex_flag(); extern int str_cmp(); extern int parse_options(); /* {\hrulefill\ absorb differencies of NTT and ASCII J{\TeX}s\ \hrulefill} */ /* {\ Unfortunately, Japanese {\TeX} is splitted into NTT J{\TeX} and ASCII J{\TeX}. Their escape sequences are often different. So, we write the following lines at the beginning of output {\TeX} file and absorb those differences.\hfill} */ void merge_ntt_ascii(fptr) FILE *fptr[]; { #ifdef ASCII /* {\ NTT+ASCII J\TeX \hfill} */ fprintf(fptr[1], "\\ifx\\gtfam\\undefined\n"); fprintf(fptr[1], " \\ifx\\dm\\undefined\n"); fprintf(fptr[1], " \\ifx\\tendm\\undefined\n"); fprintf(fptr[1], " \\def\\mc{\\null}\n"); fprintf(fptr[1], " \\else\n"); fprintf(fptr[1], " \\def\\mc{\\tendm}\n"); fprintf(fptr[1], " \\fi\n"); fprintf(fptr[1], " \\else\n"); fprintf(fptr[1], " \\def\\mc{\\dm}\n"); fprintf(fptr[1], " \\fi\n"); fprintf(fptr[1], " \\ifx\\dg\\undefined\n"); fprintf(fptr[1], " \\ifx\\tendg\\undefined\n"); fprintf(fptr[1], " \\def\\gt{\\null}\n"); fprintf(fptr[1], " \\else\n"); fprintf(fptr[1], " \\def\\gt{\\tendg}\n"); fprintf(fptr[1], " \\fi\n"); fprintf(fptr[1], " \\else\n"); fprintf(fptr[1], " \\def\\gt{\\dg}\n"); fprintf(fptr[1], " \\fi\n"); fprintf(fptr[1], "\\fi\n"); fprintf(fptr[1], "\\ifx\\sc\\undefined\n"); fprintf(fptr[1], " \\def\\sc{\\null}\n"); fprintf(fptr[1], "\\fi\n"); #else /* {\ NTT J\TeX \hfill} */ fprintf(fptr[1], "\\ifx\\dm\\undefined\n"); fprintf(fptr[1], " \\def\\dm{\\tendm}\n"); fprintf(fptr[1], "\\fi\n"); fprintf(fptr[1], "\\ifx\\dg\\undefined\n"); fprintf(fptr[1], " \\def\\dg{\\tendg}\n"); fprintf(fptr[1], "\\fi\n"); fprintf(fptr[1], "\\ifx\\sc\\undefined\n"); fprintf(fptr[1], " \\def\\sc{\\null}\n"); fprintf(fptr[1], "\\fi\n"); #endif } /* {\hrulefill\ get flagged character\ \hrulefill} */ /* {\rm This function substitutes $\qquad\displaystyle{\tt ptr->flag}=\cases{ 0 &when text mode\cr 1 &when quasi-{\TeX} mdoe\cr 2 &when {\TeX} mode\ ,\cr}$ $\qquad\displaystyle{\tt ptr->character} = \hbox{\rm a character read from a given file}$ \noindent and $\qquad\displaystyle{\tt ptr->buffer} = \hbox{\rm buffer address}\ .$ \noindent After that, it returns flag\_char pointer {\tt\ ptr\ }. \noindent {\it Remark.\ } In case of PASCAL, it is very important to delay getting mode flag by observing the value of flag \qquad{\tt prev\_flag\ .} \noindent Since we cannot translate a phrase \qquad{\tt$\{\backslash$(...$\backslash$)$\}$} \noindent or something like that properly without delaying mode transitions. \hfill} */ flag_char *get_flag_char(fptr) FILE *fptr[]; { static flag_char ptr[1]; /* {\ flagged character \hfill} */ static int prev_flag = 0; /* {\ previous flag \hfill} */ int flag; int *buf_ptr; buf_ptr = fgetc2buffer(fptr); flag = get_comment_flag(buf_ptr); if ((prev_flag != 0) && (flag != 0) && (TXT_flag == 0)) if (get_tex_flag(buf_ptr) != 0) ++flag; ptr->flag = flag; ptr->character = *buf_ptr; ptr->buffer = buf_ptr; prev_flag = flag; return ptr; } /* {\hrulefill\ fprintf documentstyle\ \hrulefill} */ /* {\ This function simply outputs a line of the form} \documentstyle[{\tt LATEXOPTION}]{{{\tt LATEXSTYLE}}} {\ where {\tt LATEXOPTION} and {\tt LATEXSTYLE} are defined in {\sl src2tex.h}. If there exists a string ``$\{\backslash$documentstyle....$\}$'' at the beginning of input file, then {\bf src2latex} moves it to the top of output file.\hfill} */ void fprintf_documentstyle(buf_ptr,fptr) int *buf_ptr; FILE *fptr[]; { int i, *b_ptr, *tail_ptr; char c1, c2, mini_buffer[256]; b_ptr = get_phrase(buf_ptr,"{\\documentstyle"); tail_ptr = b_ptr; while ((*tail_ptr != '}') && (*tail_ptr >= ' ')) ++tail_ptr; c1 = *(tail_ptr - 1); c2 = *tail_ptr; if (((char)*b_ptr == 0x00) || (c1 < '0') || ((c1 > '9') && (c1 < 'A')) || ((c1 > 'Z') && (c1 < 'a')) || (c1 > 'z') || (c2 != '}')) { #ifdef LATEXSTYLE fprintf(fptr[1],"\\documentstyle"); #ifdef LATEXOPTION fprintf(fptr[1],"["); fprintf(fptr[1],LATEXOPTION); /* {\ LaTeX option \hfill} */ fprintf(fptr[1],"]"); #endif fprintf(fptr[1],"{"); fprintf(fptr[1],LATEXSTYLE); /* {\ LaTeX style \hfill} */ fprintf(fptr[1],"}"); fprintf(fptr[1],"\n"); #endif #ifdef DEBUGGING printf("outputting the default \"\\documentstyle ...\"\n"); #endif } else { for (i=0; ((i < 255) && ((char)*b_ptr >= ' ')); ++i) { mini_buffer[i] = (char)*++b_ptr; /* {\ Here we replace the original string \ $\backslash$documentstyle ... \ with a string \ $\backslash$null ... . \hfill} */ switch(i) { case 0: *b_ptr = '\\'; break; case 1: *b_ptr = 'n'; break; case 2: *b_ptr = 'u'; break; case 3: *b_ptr = 'l'; break; case 4: *b_ptr = 'l'; break; default: *b_ptr = 0x20; } if (mini_buffer[i] == '}') { ++i; break; } } mini_buffer[i] = 0x00; fprintf(fptr[1],"%s\n", mini_buffer); #ifdef DEBUGGING printf("outputting a string \"%s...\"\n", mini_buffer); #endif } fprintf(fptr[1],"\\begin{document}\n"); fprintf(fptr[1],"\n"); /* {\ We define sevenrm escape sequence here, since it is not defined in some LaTeX systems. \hfill} */ fprintf(fptr[1], "\\ifx\\sevenrm\\undefined\n"); fprintf(fptr[1], " \\font\\sevenrm=cmr7 scaled \\magstep0\n"); fprintf(fptr[1], "\\fi\n"); } /* {\hrulefill\ fprintf footline\ \hrulefill} */ /* {\ This function simply outputs a line of the form} \footline=$\{$\rm\hfill {\sl file-name} \qquad\folio$\}$ {\ where {\sl file-name} is a string stored at cptr[0].\hfill} */ void fprintf_footline(cptr, fptr) char *cptr[]; FILE *fptr[]; { char *ptr; fprintf(fptr[1], "\\footline={\\rm\\hfill "); for (ptr = cptr[0]; *ptr != '\0'; ++ptr) { switch (*ptr) { case '"': fprintf(fptr[1], "{\\tt \"}"); break; case '#': fprintf(fptr[1], "{\\tt\\#}"); break; case '$': fprintf(fptr[1], "{\\tt\\$}"); break; case '%': fprintf(fptr[1], "{\\tt\\%c}", *ptr); break; case '&': fprintf(fptr[1], "{\\tt\\&}"); break; case '*': fprintf(fptr[1], "{\\tt *}"); break; case '-': fprintf(fptr[1], "{\\tt -}"); break; case '/': fprintf(fptr[1], "{\\tt /}"); break; case '<': fprintf(fptr[1], "{\\tt <}"); break; case '>': fprintf(fptr[1], "{\\tt >}"); break; case '\\': fprintf(fptr[1], "$\\backslash$"); break; case '^': fprintf(fptr[1], "$\\hat{\\ }$"); break; case '_': fprintf(fptr[1], "{\\tt\\_}"); break; case '{': fprintf(fptr[1], "$\\{$"); break; case '|': fprintf(fptr[1], "{\\tt |}"); break; case '}': fprintf(fptr[1], "$\\}$"); break; case '~': fprintf(fptr[1], "$\\tilde{\\ }$"); break; default: fprintf(fptr[1], "%c", *ptr); } } fprintf(fptr[1], "\\qquad page \\folio}\n"); } /* {\hrulefill\ input user's style file\ \hrulefill} */ /* {\null This function {\tt input\_usr\_style()} simply tries to input either {\sl src2tex.s2t} or {\sl src2latex.s2t} at the beginning of output operation. If you want to customize src2tex [resp. src2latex], it will suffice to write a style file {\sl src2tex.s2t} [resp. {\sl src2latex.s2t}].\hfill} */ void input_user_style(fptr) FILE *fptr[]; { #ifdef LATEX fprintf(fptr[1], "\\newread\\MyStyle\n"); #ifndef UNIX fprintf(fptr[1], "\\openin\\MyStyle=src2ltex.s2t\n"); #else fprintf(fptr[1], "\\openin\\MyStyle=src2latex.s2t\n"); #endif fprintf(fptr[1], "\\ifeof\\MyStyle\n"); fprintf(fptr[1], " \\closein\\MyStyle\n"); fprintf(fptr[1], "\\else\n"); #ifndef UNIX fprintf(fptr[1], " \\input src2ltex.s2t\n"); #else fprintf(fptr[1], " \\input src2latex.s2t\n"); #endif fprintf(fptr[1], " \\closein\\MyStyle\n"); fprintf(fptr[1], "\\fi\n"); #ifdef DEBUGGING printf ("input_user_style(): src2latex.s2t is included\n"); #endif #else fprintf(fptr[1], "\\newread\\MyStyle\n"); fprintf(fptr[1], "\\openin\\MyStyle=src2tex.s2t\n"); fprintf(fptr[1], "\\ifeof\\MyStyle\n"); fprintf(fptr[1], " \\closein\\MyStyle\n"); fprintf(fptr[1], "\\else\n"); fprintf(fptr[1], " \\input src2tex.s2t\n"); fprintf(fptr[1], " \\closein\\MyStyle\n"); fprintf(fptr[1], "\\fi\n"); #ifdef DEBUGGING printf ("input_user_style(): src2tex.s2t is included\n"); #endif #endif } /* {\hrulefill\ set TT\_flag of text2tex()\ \hrulefill} */ /* {\null This function {\tt choose\_tt\_font()} returns 1 if and only if it is better to choose typewriter font in quasi-{\TeX} mode. Actually, this function tries to determine whether or not the user prefers cmtt font to cmr font. \hfill} */ int choose_tt_font(buf_ptr) int *buf_ptr; { int *b_ptr, char_counter, tt_flag, tex_flag; int line_length0, line_length1, line_length2; char_counter = 0; line_length0 = 0; line_length1 = 0; line_length2 = 0; tt_flag = 0; tex_flag = 0; for (b_ptr = buf_ptr; b_ptr != buf_ptr + (int)(BUFFER_SIZE / 2); ++b_ptr) { if (*b_ptr == '\t') char_counter += (int)(HTAB_SKIP) - (char_counter % (int)(HTAB_SKIP)); else ++char_counter; if (((*b_ptr == '{') && (*(b_ptr + 1) == '\\')) || (*b_ptr == '$')) ++tex_flag; #ifdef UNIX if (*b_ptr != '\n') continue; #else if (*b_ptr != '\r') continue; #endif else { line_length0 = line_length1; line_length1 = line_length2; if (tex_flag == 0) line_length2 = char_counter; else line_length2 = 0; char_counter = 0; tex_flag = 0; } if ((line_length0 == 0) || (line_length1 == 0) || (line_length2 == 0) || (line_length0 != line_length1) || (line_length1 != line_length2)) continue; if (C_flag != 0) { if ((*(b_ptr - 2) == '*') && (*(b_ptr -1) == '/')) ++tt_flag; if ((*(b_ptr - 2) == '/') && (*(b_ptr -1) == '/')) ++tt_flag; } if (CBL_flag != 0) { if (*(b_ptr - 1) == '*') ++tt_flag; } if (F77_flag != 0) { if (*(b_ptr - 1) == '*') ++tt_flag; } if (PAS_flag != 0) { if ((*(b_ptr - 2) == '*') && (*(b_ptr -1) == ')')) ++tt_flag; if (*(b_ptr - 1) == '}') ++tt_flag; } if (MAP_flag != 0) { if (*(b_ptr - 1) == '#') ++tt_flag; } if (MAT_flag != 0) { if ((*(b_ptr - 2) == '*') && (*(b_ptr -1) == ')')) ++tt_flag; } if (MLAB_flag != 0) { if (*(b_ptr - 1) == '#') ++tt_flag; if (*(b_ptr - 1) == '%') ++tt_flag; } if (tt_flag != 0) break; } #ifdef DEBUGGING printf ("choose_tt_font():\n"); printf ("TT_flag =%d\n", tt_flag); #endif return tt_flag; } /* {\hrulefill\ fprintf\ line\ numer\ \hrulefill} */ /* {\null This function {\tt fprintf\_line\_numer()} simply prints line number at the beginning of each line. \hfill} */ void fprintf_line_number(fptr, line_counter) FILE *fptr[]; long line_counter; { if (line_counter < 9) fprintf(fptr[1], "\n\n{\\tt\\noindent\\phantom{00000}%d:\\ }\n", line_counter + 1); if ((line_counter >= 9) && (line_counter < 99)) fprintf(fptr[1], "\n\n{\\tt\\noindent\\phantom{0000}%d:\\ }\n", line_counter + 1); if ((line_counter >= 99) && (line_counter < 999)) fprintf(fptr[1], "\n\n{\\tt\\noindent\\phantom{000}%d:\\ }\n", line_counter + 1); if ((line_counter >= 999) && (line_counter < 9999)) fprintf(fptr[1], "\n\n{\\tt\\noindent\\phantom{00}%d:\\ }\n", line_counter + 1); if ((line_counter >= 9999) && (line_counter < 99999)) fprintf(fptr[1], "\n\n{\\tt\\noindent\\phantom{0}%d:\\ }\n", line_counter + 1); if (line_counter >= 99999) fprintf(fptr[1], "\n\n{\\tt %d:\\ }\n", line_counter + 1); } src2tex-2.12h.orig/hanoi.c.ps100644 1750 1750 163326 6266067200 16024 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: hanoi.c.dvi %%Pages: 3 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 123 /f0 NF f0 SF [ 24 23 -1 0 24.906] 72 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<0040040000C0060000E00E0000E00E0001E00F0001D01D0001D01D0001D01D0003901C800388388003883880070838400704 7040070470400E0470200E02E0200E02E0200E02E0201C03E0101C01C0101C01C0103C03C038FF0FF8FE> 32 23 -1 0 34.131] 87 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [<78EEE6470707070707070707070707070707073F0000000000060F0F06> 8 29 2 6 10.147] 106 D [ 24 23 0 0 17.527] 107 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [ 16 14 -1 0 14.759] 122 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<07FC00E000E000E000E000E0FFFCC0E040E020E030E010E008E004E004E002E001E001E000E000600060> 16 21 -1 0 16.604] 52 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<0C001E001E000C0000000000000000000400040004000400040006000300038001C040E0E0E0E0E080E061C01F00> 16 23 -2 0 15.682] 63 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [ 8 33 -3 8 9.224] 91 D [ 8 33 0 8 9.224] 93 D 1.000 111 /f1 NF f1 SF [<3824626232301818188C4C4C4C38000000000000060703> 8 23 -1 0 11.441] 105 D [<7000CC00E60066000300030003000300018001800180018000C000C000C008C0046004600440038000000000000000000000 0000002000700030> 16 29 0 6 13.675] 106 D [ 16 23 -2 0 17.288] 107 D [<3038302618621861183118300C180C180C188C18460C470844983870> 16 14 -1 0 19.933] 110 D 1.000 120 /f2 NF f2 SF [ 32 23 -1 0 29.887] 72 D [<07FFF007FFF0003E00003E00003E00003E00003E00003E00003E00003E00003E00003E00003E00003E00003E00C03E03C03E 03C03E03E03E07603E06783E0E7FFFFE7FFFFE> 24 23 -1 0 26.566] 84 D [<1F8780786F80F02E00F01E00F01E00781E003C1E001F1E0001FE00001E00301E00781E00783C007038001FE000> 24 15 -1 0 18.564] 97 D [<07F01C18380C78067000F000F000FFFEF00EF00E700E700C381C1C3807E0> 16 15 -1 0 17.503] 101 D [<7FC07FC01E001E001E001E001E001E001E001E001E001E001E00FFC0FFC01E001E001E001E181E3C0E3C071801F0> 16 23 0 0 11.669] 102 D [ 8 24 -1 0 10.608] 105 D [ 24 15 -1 0 21.216] 110 D [<07E01C38381C700E700EF00FF00FF00FF00FF00F700E700E381C1C3807E0> 16 15 -1 0 19.095] 111 D [ 16 15 -1 0 15.728] 114 D [ 16 15 -1 0 15.063] 115 D [<0380E0000380E00003C1E00007C1F00007C1F00007E3F0000F6398000F7798000F3798001E370C001E3F0C003E1E0E003C1E 0600FE7F9F80FE7F9F80> 32 15 -1 0 27.581] 119 D 1.000 126 /f3 NF f3 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 82 D [<0FE00FE0038003800380038003800380038007C007C00EC00EE00CE01CE01C7038703870FCFCFCFC> 16 20 -1 0 17.434] 89 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [<7E00FF00E38041C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C03FC03FC00000000000000180 03C003C00180> 16 28 -2 7 17.434] 106 D [ 16 20 -1 0 17.434] 107 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<078007800FC00CC00CC00CC01CE01CE01CE01CE038703870FCFCFCFC> 16 14 -1 0 17.434] 118 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0FC03FE07070E038E01C401C001C001C0038007007E007E00070003000382038703870703FE00FC0> 16 20 -1 0 17.434] 51 D [<07FC07FC00E000E000E000E0FFFCFFFCE0E070E030E038E018E01CE00CE006E006E002E003E001E0> 16 20 -1 0 17.434] 52 D [<0FC03FF078787038E01CE01CE01CE01C7038387007800FC03870703870387038703838701FE00FC0> 16 20 -1 0 17.434] 56 D [<60F0F0600000000070F0F0F0F0F0F0F0F0F0F060> 8 20 -6 0 17.434] 33 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [ 16 26 -6 3 17.434] 91 D [ 16 26 -1 3 17.434] 93 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00300070007000E000E001C001C001C0038003800700070007000E000E000E001C001C0038003800380070007000E000E000 C000> 16 26 -2 3 17.434] 92 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 256 /f4 NF f4 SF [<0200000003FC0000030F80000301F00003007C0003C01E0003703F00C31C3B80630771C03303C0E03330E0701B70703C1F70 3FF80FF01C380F9F0F000703C7000720760007183C00770C3E007FFF7F000373F3800301C1C00300E0E00300E0F8FB007FF0 1FE0386003F83C0000E01C00> 32 28 0 4 30.399] 32 D [ 32 4 -1 -9 30.399] 33 D [<0007FE00C01FFF00601C0F00661C0600371C0218379C0238339C0238339C0238319C0070399C0070399C00E0399C0180399C 0300381C3000381C3000381E7000380070003800E0003801C0003803000038000000380000003FFFFFF83C0300F830030070 000380000003800000030000> 32 28 0 3 30.399] 34 D [<070000000703FFF00703FFF00703006007030060070300600703006007030020070300000703000087030000C70300006703 000077030000370300001F03C0001F0370000F033E000F030F80070307E0070301E0070300C0038300000383000003C30000 01C3800001C3C00000030000> 32 28 -1 4 30.399] 35 D [<180000001C000F001C003F001C0043801C0003801C0003801C0003801C30C3801C30C3801C30E3801C3FE3801C3FE3801C30 E3801C30E3809C30C380DC30C3805C30C3807C30E3803C3FE3803C20C380180003801C0003800C0003800E00038006FFFFF0 070001F0078000E003000000> 32 28 -1 4 30.399] 36 D [<0006000000060000E00600E0380601F00C0607C007060F0003861E0001C6380000E660000076C000003F8000003F0000FFFF FFF0000600F0000600E00606000007FFFE0007FFFE0006060600060606000606060007FFFE00060606000606060006060600 07FFFF0007FFFF00> 32 27 -1 4 30.399] 37 D [<00C000007F000003E00000F03C003C7F701CE7E00E61E00760F00730F80338DC030CCC0707C60603C70E01FBBC00FFF000C3 C000C38000C7000FE0003FFC00307F800063C000700000F00001E000> 24 26 -3 3 30.399] 38 D [<0700000F00001F00001F00003B800731807F31801F60C00660600E60600C60301C601838600FF06001807000006000006000 00C00000> 24 18 -4 -1 30.399] 39 D [<3C000F00038001C000E000700038003800380018001C001C401CE018F838FC70CFE0E000600030001C000FE003E00FC01E00 1800> 16 26 -8 3 30.399] 40 D [ 24 25 -4 2 30.399] 41 D [ 32 23 -3 1 30.399] 42 D [ 32 24 -2 2 30.399] 43 D [<001E0003FF000FFF001E00001800003000003000001803001807000FFF00000700000600000E000F0C001FFC00187C000C1F 000633C00331F03FB070FFF00000F800007E00006F0000E30007E00003E000> 24 27 -5 4 30.399] 44 D [<00800000E000003000001C00600E00700600E00700E00300E00380E00180E00180F00180F00180D00180D80180D80180CC01 80CE0180C7FF80C0FFFEE001FC6001806001806001806001C0C00FC0000700> 24 27 -5 4 30.399] 45 D [<07FF003FFF80780000E00000C00000C00000800000800000C00000C000006000003000001800001C00000F000003C0001FFC 003FFE00600C00C00000> 24 20 -7 0 30.399] 46 D [<01FF0007FF001F00003C00003800003000003000003001801807800FFF8001FF00000600000E00001C000018007FB800E7F0 00C07E00006F800067C000E1C000C00001E00007C000010000> 24 25 -5 2 30.399] 47 D [<07F8000FFE001C07801801C01800701800381800081800001800001800001800001800001800001800001800001800001800 001C00001C00001C00001C00003C0000F80000> 24 23 -6 2 30.399] 48 D [<0200000003E0000000780000001C0000000E0000000600000007000000030000001F0000003F800000738000006380000063 800000338000003F800000018000000180007E0180007FF18000C3FFFFE00003FFE000018000000180000001800000038000 0003C000000F8000> 32 27 -1 4 30.399] 49 D [<00030000003FFE0000E03C0000C0000001C0000001838000018F80000181C0006180C000F980C000DF80C00003C0C00001FC C000018FC00001C0FFE001C0CFE001C0C0000380C0000000E0000000E0000000E0000003C000> 32 22 -2 1 30.399] 50 D [<000FFE00007FFE000070000000C0000000C1000000C7C00000CFC00000C0C00070C0C000FCC0E000FFC0600083F0600000FF 600000C3FFE000C07FE000E061E000E0600003C0600000006300000073800000F3800001E77000000C70000000E000000380> 32 25 -1 1 30.399] 51 D [<0001E0000FF0003E0000700000600000E00000C00000C00000C000C06000F830003F38000FFC00037F00018FFC01C0FC00E0 00007000003800071C000FCE000FFF00007F00001E00> 24 24 -4 2 30.399] 52 D [<0003FEC00FFEE01C00E038007030007030003030003830001818001C0C000C06000EC3800E79FC061FFC0703E00300007F80 00FFE00081FC0000DC0000E00000F00000F00003E000010000> 24 25 -4 2 30.399] 53 D [<0001FCC00FFEC01FFEE03800603000702000303000383000381800181C001C0E000C87000EF3FC063FFC0707F80300007F00 00FFC00083F81801FC3800E03B00E07700E00F03E01E038000> 24 25 -4 2 30.399] 54 D [<0001FC000007FC00001F0000003C000000380000007000000060000000600000006000000060000000600000003000000030 000000180000781C00007F8E0000E3FF8000C03FF0000003FF8000003F80> 32 20 -2 1 30.399] 55 D [<00000C000001FC000007FC00000F0000001C0000003800000030000000300000003000000030000000300000003001800018 0380001803A07C0C0770FF8E0CF0C3F701E0007FC100000FF0000001FF0000001F00> 32 21 -1 1 30.399] 56 D [<3FFE7FFEE000C00080008000C000C000600038001E0007C007FE063E060C0618060006000600060007003E001C00> 16 23 -8 1 30.399] 57 D [<0FFF003FFF00700000600000C00000C000006000006000003000001C00000F000003E00003FE00033F00030E00030C000300 000300000300E00301E00783C817031C0E0038000070000040> 24 25 -6 1 30.399] 58 D [<00380000FE0C018F3C01077C0183F0E0FFC0603F007003003807003806003C06001C06001E06000F060C0F833C06E1F8063F F0031F803F0000FFE00081FC0001FC0000C00000E00000E00003C000> 24 26 -4 3 30.399] 59 D [<3000007000007007FE701FFE707CF870700070E00078C000D8C00058C0006CC0006CC000646000666000723000731800318C 0030EF00303FF83007F0300000600000> 24 22 -4 1 30.399] 60 D [<003C00000F800001E03800787E003C7E000EE7000EC38007C18007C1C003C0C003C0E00760600760700730300E18380E1C38 1C07307803F3E0007F80> 24 20 -3 1 30.399] 61 D [<300000703F06707F9EF041FCF060F0F07FC0F000C0D000C0D000C0D800C0C800C0E800C06C00C06400C06600C07301C031FF FE3000FE3000C03800C03801C01801C03003C0200700> 24 24 -4 2 30.399] 62 D [<30000000703F0600707F9E007043FC00F061F800F03FF000F000C000F000C000D800C000D801C000D801C0006C01C0006C01 C0006601C00066018000730F800031FFFE003001800038018000380180003801CE001801CE001807BDC0100001C000000380 00000400> 32 26 -3 2 30.399] 63 D [<07E000001FF80000383C0000301C0000700E00006006000060030000600300006003070060037F0020018E0030019C003001 B8001001F0001801E0001801E0000C01C0000E01C0000701C0007F818000EFC01C0081C01C00000039800000638000000780 00000800> 32 26 -3 2 30.399] 64 D [<000001E0000003E000000FC0C0001F00F0003C00F800F800BC01E0000E078000070F000003FC000000F03800000038000000 72000000E70000000F0000001E00> 32 16 -2 -4 30.399] 65 D [<07F0300FF8F00C3BF00C1FC007FE0003F80000180000180000180000180007F8000FFF80061FE00619E00318000198007FF8 00FFFE00C01FE00019F0001830001800001C0000FC0000F000> 24 25 -4 2 30.399] 66 D [<00100000001C0000000600000007000000038000780180007C01C040CE00C1C06300E7C063807F803983FC000FFFF00000F0 7000006030000060380000303800003070000030E0000018000000180000001C000003CE000007FE0000067C000000180000> 32 25 -2 3 30.399] 67 D [<01F8030E0606060706030603060307E31FE77E06660E470C6318633033001F003F807B80E1808180018001C001C003800700> 16 25 -7 2 30.399] 68 D [<7F8000F7C7E0C1C3C0C1CF80F1FE007FF00000C00000C00000C00000C00000C00000C00000C00000C00000C00000C00000FF 8000FFC000C1C001C00001C00001E0000FC000020000> 24 24 -6 1 30.399] 69 D [<06000001F800003E00000F806003C07001E0F000E0F80070FC0070EE0070E700706380E060F1C0603F806000006000006000 006000006000003F80000F80000380000700000E0000180000> 24 25 -6 2 30.399] 70 D [<60003C000F00038001C000C000E00070707070307030F038F038F038F0385038783068306C306C30667073E073C030007000 60004000> 16 27 -9 3 30.399] 71 D [<03F8000FFE001C6F0018E38019C3C00F81C00001C0C000C0E000C07001C03C01803E07801FFE000E700007000003800001C0 0001C00000E0001070003E38003FDC0021FC00001800> 24 24 -6 2 30.399] 72 D [<020000000300000003001E0007007F00E70073C07F0060E03B0060601F0060300F0070100F007000070030000380300003C0 300013E030007DB030007FD8300003CC380001C638000183B0000181F000018000000180000001C0000007C0000007800000> 32 25 -1 3 30.399] 73 D [<010000038000038F004383E0E780F875803C79801E39800E1D80071D80070F800307800303800303C00701E00779B80EFFCF FC07E1E001E00001E00001800001800001C00001C000078000020000> 24 26 -3 3 30.399] 74 D [<01FFE003FFE007000006300006380006380003380001B80000F800607800703C003C3F001E3BE00F30F80FF07C06003C0300 780380007F8000FFF80080FE0000EE0000600000F00001E000> 24 25 -4 2 30.399] 75 D [<03B00000039801C0038C07E003870460038380700381C0300380E030038E6030039E7030039C3030C3B8303063F038303BE0 38301FB018300F98183007CF183003C7183001C6183001E0183000F018300070183000381830FFFFFFF8039DFFF803800030 0380000003C0000003C00000> 32 28 0 4 30.399] 76 D [<80000600BE000700C780070060E0070060700700601C0700300E0700300707003007070030038700300387003011C7003019 C7003FF8C7003FF8C7003018C7003018C7003018C7003018FFF0301CC0F03FFDC0E03039C0000001C0000001C0000001C000 FFFFFFE0003C07E0001801C0> 32 28 -1 4 30.399] 77 D [ 32 28 -2 4 30.399] 78 D [ 32 25 0 2 30.399] 79 D [<00380000078E078000E38FC02079F9C03C1CE0E0070E706001C7387070E39C70FC739C30FFB9CE3007FCE738061FFFF80607 00300607800006FFFFFC06000078060C0030060E0180060FFF80FFFE0180066E0180060E0180060FFF80060E0180060E0180 070FFFC0070EFFC000000100> 32 28 0 4 30.399] 80 D [<0000F0008001F8007802F8001E0038000780380001E0380000783800003E3800600F3800FC07F800FFF1F8001FFFF8000187 F80001803C0001803E0001FFFF0001803B80018039F0018039F001FFF8E001803800018038000180380001FFFC0001CE3800 010600000007800000070000> 32 28 -1 4 30.399] 81 D [ 32 27 -2 4 30.399] 82 D [ 32 28 0 4 30.399] 83 D [<40180300607C0300600C0300300C0300300C0300380C0300180C0300180FFF1C180F87FC1FFF033018CD830018CD830018CC C30018CCFF981FFC7FF818CC733018CE7B0018CFB380D8CDC0007FFFE3C03FFE67E038C4306018E038701C7038300FF81830 0E381C380F23FFF80780003004000000> 32 29 0 4 30.399] 84 D [<00000080306000E030601BF030601870307FF8303060183030601830307FF8303060183030601830307FFC30306018303000 0030301860303FF87FF03FF87FF0301860303FF87FF030186030301860303FFE7FF8F8DE673060E3070030E3070019C18700 1FFEFFF80C1EE0780F0CF0300F007000> 32 29 0 5 30.399] 85 D [ 32 28 -2 4 30.399] 86 D [<801C00C0C00601E0600303E030078060380EC0601C0EE0600F1C60600738606004606060FFFFF0600C1BB0600C1930600C18 3FE00C1830600FF830600C1830600C1830600C1830600FF83FE00C1830600C1830600C183060FFFFF060FFFFF0600C1B3FF0 0E1830600E1C000000100000> 32 28 -1 4 30.399] 87 D [<0000C0008030C6004030CF806030DF803030C3803030C3801830C3801830C3801C30C3800C30C3800C3FFFC00DB9FFC00FC0 C080CFC0E0C0EEC0E0F0EE7FFFF06E4000606E0003006E3FFF002E0003000E0003000E0003000E3FFF000E0003000E000300 0E3FFF800F3FFF800C000300> 32 28 -1 4 30.399] 88 D [<000FFFF0C07FFFF040FFFFF863C0000067C0000077C07FF83DC07FFC39C0E03839C0E01839C0E01819FFE00019C7600019C0 60001DC0600019C0600001C060307FC37FF061FF403001C6003001C0003001C0003001C0003001C000303FFF7FF801C60070 01C0000001C0000001E00000> 32 28 0 4 30.399] 89 D [<000600000E00000E00000E00000E00000E00000E00C00E00600E00380E001C0E00070E00038E0001CE0000EE00007E00007E 00003C00001E00000F000007800003C00001E00001E00007C0> 24 25 -3 3 30.399] 90 D [ 24 23 -4 1 30.399] 91 D [<60000000300000001C0000000E0000000300000001C0000001C0000000E0000000700000007000000038000000380000003C 0000001C0000FE1C0000FFFFFE00807FFC0000000000000000000000000007E000000FFFCC000C07DDC000001F8000003380 00000600> 32 26 -3 3 30.399] 92 D [<7800001C00000E000003800001C00000E000007000003800001C00001C00000E00000E000007000003000003807F01C07FFF E0C00FC080018800003E00003300003300003E00001C> 24 24 -5 0 30.399] 93 D [<00300000780003F80000380070300C78301C1C303C1C30780C30E0063180023000703000FFFFFCC0FFFC0030000030000030 0000380C00781F00F01300001100001F00000E> 24 23 -4 0 30.399] 94 D [ 32 16 -1 -2 30.399] 95 D [<300000F80000FE00009F000007800003E00000F000007800003C00001E000006001C03003C01803800C0780060E00030> 24 16 -7 -1 30.399] 96 D [<01C001C003C003C007C00F801E003800E000> 16 9 -1 3 30.399] 97 D [<1C007F00C380C180808080808180C18077003C00> 16 10 -2 3 30.399] 98 D [<3800007FFFFFFFFFFEC00000> 24 4 -3 -8 30.399] 99 D [<8000800080008000800080008000800080008000800080008000800080008000800080008000800080008000FFE0> 16 23 -17 0 30.399] 100 D [ 16 23 -2 3 30.399] 101 D [<0006000000060000000600000006000000060000FFFFFFF0000600E00C0603400C0603000FFFFF000C0603000C0603000C06 03000C0603000FFFFF000C0603000C0603000C0603000C0603800FFFFF80080043000386600003863000070E1C00070E1E00 0E0C0F000C18070010300000> 32 28 -1 4 30.399] 102 D [<18000000180000001FFFFFF0188000F018C006E018FFFE0018C0060018C0060018FFFE0018C0060018C0060018FFFE0018C0 060018C006001CC006001CFFFF000007060000030000FFFFFFF0200380E0700381C07FFFFF807060C1807060C1807060C180 7060C1807FFFFFC0600001C0> 32 28 -1 4 30.399] 103 D [<001800000018000000180000001800000018000000180000001800000018000000180000C0180000C0180600C0180700C018 0700FFFFFF00C0180700C0180700C0180700C0180700C0180700C0180700C0180700C0180700FFFFFF808018060000180000 0018000000180000001C0000001C0000> 32 29 -3 5 30.399] 104 D [<0000380000003E00C000FF00C0C08700FFC00300C0C00380C0C00380C0C00180C0C00180C0C00180C0C071C0C0C071C0C0E0 F1C0FFF0E1C0C0D9C1C0C0DB81C0C0CC01C0C0CC01C0C0C601C0C0C601C0C0E701E0FFE3FFC018C381801C0380000C01C000 0E01E0000F01E0000C01C000> 32 28 -2 4 30.399] 105 D [<07C0000006780070060E01F8060703E00603C7800601EF008600FE0046007800660038002600780036007C003670CC001EE0 CE001EE0CE001FC186001E2187000E3187000E1903000E0D03000E070380FFFFFFFC06F3007806638030060380000601C000 0601E0000700E00006008000> 32 28 0 4 30.399] 106 D [<0000060003800F8000C03F80006001800030018000180180C0180180C00C0180C0CC0180C0CE0180FFCE0180C0C7FF80C0C6 0180C0C60180C0C60180C0C60180C0C60180FFC60180C0C7FF80C0C60180C0C60180C0C60180C0C60180C0E60180FFE601C0 E0C7FFC000060180> 32 27 -2 4 30.399] 107 D [ 24 27 -6 4 30.399] 108 D [<00000200C00003C0C0000FC0C00000C0C18000C0C18060C0C1FFE0C0C18060C0C18060C0C18060C0C18060C0C18060C0C180 60C0C18060C0C1FFF0C0C10040C0C00000C0C00000C0C06180C0FFE1FFC0C06180C0C06180C0C06180C0FFE1FFC0C06180C0 C06180C0C07180E0FFF1FFE0806180C0> 32 29 -2 5 30.399] 109 D [ 24 28 -4 4 30.399] 110 D [<80000000C00303C060030FE0300300E01803006018030060180300600C0300600C0300600C0300600E0300600FFFFFE00E03 00600E0300600E0300600E0300600E0300600E0300600FFFFFE00E0300600E0300600E0300600E0300600E0300600E030060 0FFFFFF00FFFFFF0000000E0> 32 28 0 4 30.399] 111 D [ 32 28 -1 4 30.399] 112 D [ 32 26 -1 3 30.399] 113 D [<307001C031F80FC0317819C0301860C0301870C0301870C0301870C03FF870C03FF870C0301870C0301870C0301870C03FF8 70C0301870C0301870C0301870C0301C70C03FFC70C0303070E00000008000000000FFFFFFF00060C0F00070C06000E0E000 01E070000380780002007000> 32 28 -1 4 30.399] 114 D [<000030001F8030107E603078063830F8061C31E0060733800603B7000601FE000601FC000600F80066FFFFF876003030FE00 38003E38FC3007BFCFF007F8CC300678CC300638CC300638EC38063FEFF8FFF2000086F3FF0006E303000603030006030300 060303000703FF8006020300> 32 28 0 4 30.399] 115 D [<0C0060000C0060000C0060000C0060000F0060000D8060300CDFFFFC0C6067F00C7067E00C3061C00C186380CC1C67006C0E 66006C0E6E007C076C003C03F8003C03F8001C01F0001E01E0000FFFFFF80C0060780E0060300E0060000600600007006000 078060000780700006004000> 32 28 0 4 30.399] 116 D [<0000070000001F8040003F8060000180380C01801C1C01800E1C0180073C018003B8018001F0318000E0718001E0718003E0 E1800770C1800E318180183B018030180180201C0180001E0180FFFFFFFCE1FFC3F8018601B0018001800180018001800180 01C0018001C001C001800100> 32 28 0 4 30.399] 117 D [<06000010060000F8060003F0060007F006000F1806001E1806001C0806003800060030000600700006006000C600E0006600 C0006600C0003601C0003E0180001E0180001FFF80000F07FF800E0381F80E038070060387000703870007038E0007833C00 03C3C0000383C000> 32 27 0 4 30.399] 118 D [<800FFFC0C0FFFFE043F001F067B00040671C00E07F0701E03B03C3C03301E78033FB01C0333BFFC03B0301C0330301C00303 01C0FFFFFFC0001301C0600301C06033FFC07FF3FFC0603301C0603301C0603301C07FF3FFE0603330806030300060303800 603FFFF07FF801E0606000C0> 32 28 -1 4 30.399] 119 D [<000C0780000707C0FC018FC0FFF0C0E001FFE06001C0606001C070707FFF303001CE383061C018307FFF18307FFF183071C7 1C3071C71C307FFF0C3071C70C3071C70C3071C70C307FFF8C3061C6FFF801C00CF0FFFFCC7001C3CC0001C18C00F1C00C00 1FFF0C00007F0E00000C0E00> 32 28 -1 4 30.399] 120 D [<80000080600001F0300001E01C0003C00E00078007000F0003801E0001C03C0001C0780000E070000070E0000070E0000038 C0000039C000003D8000001D8000001D0000000F0000000F0000000F0000000E000000020000000200000003000001FF8000 0003800000030000> 32 27 -1 3 30.399] 121 D [<6000000060063FF060067FF8600670F07FFE7070600670306006703060067000600670007FFE700060067000600670007006 700078FE700078FE70006CDE70606CDE7FE06CCE71E06CC600606CC700607FFF00600EC600600EC000600EC000600EC00060 FFFFFFF0001E0070000C0000> 32 28 -1 4 30.399] 122 D [<040000000F7000203F1E00F807C701F00763C3C00730E78007387E0007183C00070C1C00070E3E006706360077076700FF03 63801F0361800781C1C007C1C0E00771FFE00718C0E00700C0000700C0000700C0000704E000FFFFFFFC0760603807006020 07006000070060000700780007807800> 32 29 0 5 30.399] 123 D [<010000000181C0000181C0004181C0006181FFFC318DC638199DC6101DB9C6000FF1C6000781C6000781FFF80381C670FFFF C600019DC6000199C600C1CDC600600DFFF83047C67018FFC62018DFC6000CCBC6000CCBFFF80CC186F80CC1C630FFE1C700 06E0C3000600E3800700F3C007006300> 32 29 0 5 30.399] 124 D [<0F0000000DE000F00C780FF80C0E3FC00C07F8000C01C0000C63C0000C72C0000C3EC0000C1CE0000C3660C0CC3460C04C3F FFC06C3060C02C3060C03C3060C03C3060C01E3060C01E3FFFE01C3060C00C0060000C0060000E00600007FFFFF807006070 0780700003007000> 32 27 0 4 30.399] 125 D [<0E000020230000F079C001F0786003E07030078070380700701C0E00700C1C00700E1800F006380070073000380320001983 600018C3E0000CC3C0000C61C0000671C4000231C3000339E3800119C1C0019C01F01C8FFFF01CCE00E03C4600C078270000 602700000007800000030000> 32 28 -1 4 30.399] 126 D [<000C0000001E0000007F000080070000E00700E0600700E0300701E0180701C01C0703C00E0703800707070003070C0003C7 180001C72000000700000007000000070000FFFFFFF8000000F000000060000000000000000000000000000000000FFFFF00 00001F0000000E00> 32 27 -1 4 30.399] 127 D [ 24 28 -5 4 30.399] 128 D [ 32 28 0 4 30.399] 129 D [<00060000000F0000007F0000000300000003800000030000000300000003000000030000000300000003000000030000FFFF FFF800030078000300200003000000030000000300007FFFFFF8000300F80003006000030000000300007FFF800000FFFCC0 0007FFC000001F80> 32 27 0 4 30.399] 130 D [ 32 27 -3 4 30.399] 131 D [<20000000F07FFFF0F8FFFFF81DC000000F00600006C0600006706000063860E0061860E0061C60E0060C60C0060C60C0060C 61C0070C61807F0E6300070E6600000E6600000E6000000060000000600001FFFFF800006070060060A00E0061C00E006380 0C0067801800760000007000> 32 28 0 4 30.399] 132 D [<03FC003807CF007C0CE380E0C061C1C0E070E380F83073007B3036005FF3340076F33C3001FBFFF0219B1830301B18303FFF 1830339B1C303383FFF833831C303FF81C003FF81C0033BFFFC0338203B8338101FC3FF181E033B0C1C03380E30033806600 33803C003FF83C0020303800> 32 28 0 4 30.399] 133 D [ 32 26 -1 3 30.399] 134 D [<060003000600030007FFFF00060003000600030006000300060003000600030007FFFF800600070000000000000000001FFF FF0000001F0000000E0000000000000000001FFFFF8000000F000000060000000000FFFFFFF0000000F0000000E000000000 1FFFFF8000000F0000000600> 32 28 -1 4 30.399] 135 D [<0001E0000007E0000000600000006000000060000000600000006000C0006000C0006000C0006000C3806000C3806000FF80 6000C3FFFFF0C38060F0C38060E0C3876C00C3876600C38F6700C38E6380C39861E0C3B061E0C38060C0C3807000FFFFF000 C381FFE000001FE0000003C0> 32 28 -1 4 30.399] 136 D [<0F8000600CF003F00C1E0FE00C071F000F01FC000D80F0000CC0F0000C60F8000C319C000C1F1E008C1E0F008C0FFF804C07 06006C0780303DFBC0301FFFF8701C01FFE00C03C1E00E0763C0070F3700878E3800C33C1C00706C1E0038060F000E070600 0F03800007C3C0000381C000> 32 28 -1 4 30.399] 137 D [<0001C0000003F000000FF80000001C0000000E0001000E000180070001C0030001C003C0E1FFFFC079C001801EC0000007FE 000001EFF80000F0FE0000F80C00000E000000070000FFFFFFF0000DE0E0000CF000000C3800000C1C003FFFEE00000CC700 000C0780000E0300000E0000> 32 28 -1 4 30.399] 138 D [<06001E0006003F000600470006000700060007000600070006000700060007000600070006000700FFFFFFF8060607700606 0760060607000606070007FFFF000606070006060700060607000606070007FFFF8006060700000600000006000000060000 FFFFFFF0000001F0000000E0> 32 28 -1 4 30.399] 139 D [<0C0060000C0060000C0060000C0060000C0060000C0060000C0060000C007FFC0C007FFC0C0060780C0060008D006000CC80 60004CC060006C607FF87C3060783C3060003C1860003E1C6000181C60001C0FFFFC1C0E007C0E0700300E0700000E070000 0F03C0000703C00004030000> 32 28 0 4 30.399] 140 D [<20180180303C03E0307E0FE030060060300600603006006030061860300618603FFE18603006186030061860300618603006 18603FFE18603FFE18603006186030061860300618603FFE1860398F186021CC186019A0186039B0186039981C60319C1860 618F0070C1CE007001C00000> 32 28 -1 4 30.399] 141 D [<8000FFF8FFF860383018180C0C0C0E000700038001E000F000780038783C783C783C703C707838F80FF00380> 16 22 -8 -1 30.399] 142 D [<000001C0700001E01C0007F006000070030000700180187000C01C7000E01C7000701C7040301C7020F81C7030FC1C7019DC 1C701F8C1C700E0E1C700E061C7006061C7007071C7003FF9C7003071C7003821C7003801C7001801C7001C01E7001C01870 FFFFE0700003C07800010000> 32 28 0 4 30.399] 143 D [ 32 27 0 4 30.399] 144 D [<0600000006000000467FFFF8460030786600300066303000663030003670300036703000366FFFF03EC030E0368030400638 3000763C38007FF738F8F8F183F00CE0EF8007807E00070038001F007C001D80EE0038E0C60078F18700086103800C0303C0 071FFFC0070001C006000000> 32 28 0 4 30.399] 145 D [<03030060630380606303FFE0631B8060233B8060333B8060333B8060333B8060333380603B7380603B6380703B43FFF0031B 00707B1C00007FD80000FFF800000637FFF807601870038018200D8018000DC018001CF0180018EFFFF83C0018F00E001860 0600180007001C0007001C00> 32 28 0 4 30.399] 146 D [ 32 28 -1 4 30.399] 147 D [<1E0000001FC000781FFC00FC007FC3E00063FF80E0601E003C601C000F60380003E0300001F0780000F0EE000078C780003C 8380000F80007FFFFFF8000300780003007000030000000300000FFFFFE0000303C000030180000300003FFFFFF8000300F0 000300700003800000038000> 32 28 0 4 30.399] 148 D [<09C000E00C7C03F80C0F07C00F83CE000CC0F8000C7078000C38FC000C0CCF000CC787800CC7FF808CC380004DCFC1806F8F FF803D0E01801FCE01800CEE01800ECFFF80078E018007CE018003EFFFC001FE078001F80000FFF800000C0FFFF00C0E01E0 0C0600C00E07000008070000> 32 28 -1 4 30.399] 149 D [ 32 28 -1 4 30.399] 150 D [<7000000078C0006070FC00F071FFF0E0711FFFC0700C03C0F0060780F0070E0070033800300380003801C0001801E0001801 E0000FFFFFF03C00E0F03400E0607600E000F600E0008200E0000300E0000100E00001FFFFF00080E0E00E80E0400E40E000 1E00E0003800F0000000C000> 32 28 -1 4 30.399] 151 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f2 SF 644 153 p (T)s -2 r (o)s -1 r (w)s -1 r (ers)s 11 r (of)s 13 r (Hanoi)s f0 SF 133 221 p (This)s 9 r (program)s 9 r (gives)s 8 r (an)s 9 r (answer)s 8 r (to)s 9 r (the)s 9 r (following)s 8 r (famous)s 9 r (problem)s 9 r (\(tow)s -1 r (ers)s 8 r (of)s 9 r (Hanoi\).)s 14 r (There)s 9 r (is)s 133 261 p (a)s 10 r (legend)s 11 r (that)s 10 r (when)s 10 r (one)s 11 r (of)s 10 r (the)s 10 r (temples)s 11 r (in)s 10 r (Hanoi)s 11 r (was)s 9 r (constructed,)s 11 r (three)s 10 r (p)s 1 r (oles)s 10 r (were)s 10 r (erected)s 133 301 p (and)s 11 r (a)s 10 r (tower)s 9 r (consisting)s 11 r (of)s 11 r (64)s 11 r (golden)s 11 r (discs)s 11 r (was)s 9 r (arranged)s 11 r (on)s 11 r (one)s 11 r (p)s 1 r (ole,)s 11 r (their)s 11 r (sizes)s 10 r (decreasing)s 133 341 p (regularly)s 10 r (from)s 10 r (b)s 1 r (ottom)s 10 r (to)s 11 r (top.)s 14 r (The)s 10 r (monks)s 11 r (were)s 9 r (to)s 10 r (mov)s -1 r (e)s 9 r (the)s 11 r (tow)s -1 r (er)s 9 r (of)s 10 r (discs)s 10 r (to)s 11 r (the)s 10 r (opp)s 1 r (osite)s 133 381 p (p)s 1 r (ole,)s 10 r (moving)s 9 r (only)s 10 r (one)s 9 r (at)s 10 r (a)s 10 r (time,)s 10 r (and)s 10 r (never)s 9 r (putting)s 10 r (any)s 8 r (size)s 10 r (disc)s 10 r (ab)s 1 r (ov)s -1 r (e)s 9 r (a)s 10 r (smaller)s 10 r (one.)s 14 r (The)s 133 420 p (job)s 12 r (was)s 12 r (to)s 12 r (b)s 1 r (e)s 13 r (done)s 12 r (in)s 13 r (the)s 12 r (minimum)s 12 r (num)s -1 r (bers)s 12 r (of)s 13 r (mov)s -1 r (es.)s 18 r (What)s 12 r (strategy)s 13 r (for)s 12 r (moving)s 12 r (discs)s 133 460 p (will)s 11 r (accomplish)s 11 r (this)s 11 r (optimum)s 10 r (transfer?)s f3 SF 0 580 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 700 p (/*)s 17 r 666 1 ru f0 SF 676 r (hanoi.c)s 12 r 666 1 ru f3 SF 682 r (*/)s 0 819 p (#include)s 17 r ()s 0 859 p (#define)s 17 r (ARRAY)s 18 r (8)s 436 r (/*)s f0 SF 16 r (disc)s f4 SF 11 r (=S)s f3 SF 649 r (*/)s 0 939 p (int)s 17 r (disc[3][ARRAY];)s 367 r (/*)s f0 SF 16 r (disc)s f4 SF 11 r (:=E\(;\\c[+vy/IH.9<)s f3 SF 48 r (*/)s 697 1258 p (/*)s f4 SF 17 r (;H*a\220ti<\204AEb)s f3 SF 411 r (*/)s 105 1298 p ({)s 174 1338 p (disc[0][j])s 18 r (=)s 17 r (ARRAY)s 18 r (-)s 17 r (j;)s 174 1378 p (disc[1][j])s 18 r (=)s 17 r (0;)s 174 1418 p (disc[2][j])s 18 r (=)s 17 r (0;)s 105 1458 p (})s 0 1498 p (})s 0 1577 p (void)s 17 r (print)s 3 r 10 1 ru 15 r (result\(\))s 366 r (/*)s f4 SF 17 r (\222%=\224\177)s f3 SF 624 r (*/)s 0 1617 p ({)s 70 1657 p (static)s 17 r (long)s 18 r (counter)s 17 r (=)s 17 r (0;)s 210 r (/*)s f0 SF 16 r ([)s f4 SF (mw)s f0 SF (])s f4 SF 11 r (..8)s f3 SF 11 r (static)s f4 SF 11 r (9q\20705=>a;3;=*)s f3 SF 73 r (*/)s 697 1697 p (/*)s f4 SF 17 r (\212\)EbD0D)s f3 SF 11 r (static)s f4 SF 11 r (K\215N05Fa$+Y.H)s f3 SF 72 r (*/)s 697 1737 p (/*)s f4 SF 17 r (*a\201\205K07CE\(b)s f3 SF 442 r (*/)s 70 1777 p (int)s 17 r (i,)s 18 r (j;)s 70 1857 p (printf\("---#%d---\\n",)s 17 r (++counter\);)s 70 1897 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 17 r (i)s 18 r (<=)s 17 r (2;)s 18 r (++i\))s 105 1936 p ({)s 174 1976 p (printf\("[%d])s 18 r (",)s 17 r (i\);)s 174 2016 p (for)s 18 r (\(j)s 17 r (=)s 18 r (0;)s 17 r (j)s 18 r (<)s 17 r (ARRAY;)s 17 r (++j\))s 209 2056 p ({)s 279 2096 p (if)s 17 r (\(disc[i][j])s 18 r (!=)s 17 r (0\))s 349 2136 p (printf\("%d)s 17 r (",)s 18 r (disc[i][j]\);)s f0 SF 1296 2216 p (hanoi.c)s 67 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 279 33 p (else)s 349 74 p (break;)s 209 114 p (})s 174 154 p (printf\("\\n"\);)s 105 195 p (})s 0 235 p (})s 0 316 p (void)s 17 r (move)s 3 r 10 1 ru 15 r (one)s 2 r 10 1 ru 15 r (disc\(i,)s 18 r (j\))s 279 r (/*)s f0 SF 16 r (1)s f4 SF 8 r (j=)s f0 SF 11 r (disc)s f4 SF 11 r (K)s f0 SF 11 r (p)s 1 r (ole)s f1 SF 11 r (i)s f4 SF 11 r (*F)s f0 SF 8 r (p)s 1 r (ole)s f1 SF 11 r (j)s f4 SF 13 r (< x1H)s f3 SF 160 r (*/)s 0 357 p ({)s 70 397 p (static)s 17 r (int)s 18 r (*ptr[3])s 17 r (=)s 17 r ({disc[0])s 18 r (+)s 17 r (ARRAY,)s 18 r (disc[1],)s 17 r (disc[2]};)s 70 478 p (\(*ptr[j]++\))s 17 r (=)s 18 r (\(*--ptr[i]\);)s 174 r (/*)s f0 SF 17 r ([)s f4 SF (mw)s f0 SF (])s f3 SF 11 r (++)s f4 SF 11 r (>^Z`[=\211<&Ga)s f3 SF 7 r (--)s f4 SF 11 r (>^Z`[)s f3 SF 100 r (*/)s 697 518 p (/*)s f4 SF 17 r (=r<&Hb;3a4=E\(<0;-I?;F;')s f3 SF 77 r (*/)s 697 559 p (/*)s f4 SF 17 r (=*pk2Eb)s f3 SF 563 r (*/)s 70 599 p (*ptr[i])s 17 r (=)s 18 r (0;)s 0 639 p (})s 0 720 p (void)s 17 r (move)s 3 r 10 1 ru 15 r (discs\(n,)s 17 r (i,)s 18 r (j,)s 17 r (k\))s 227 r (/*)s f4 SF 16 r (O*F)s f1 SF 12 r (n)s f4 SF 11 r (jlB8=)s f0 SF 11 r (disc)s f4 SF 11 r (Ka)s f0 SF 7 r (p)s 1 r (ole)s f1 SF 11 r (i)s f4 SF 11 r (*F)s f0 SF 11 r (p)s 1 r (ole)s f1 SF 11 r (j)s f4 SF 13 r (<)s f3 SF 52 r (*/)s 697 761 p (/*)s f0 SF 17 r (p)s 1 r (ole)s f1 SF 11 r (k)s f4 SF 12 r (K\221n07a x1H)s f3 SF 372 r (*/)s 0 801 p (int)s 17 r (n,)s 18 r (i,)s 17 r (j,)s 18 r (k;)s 0 842 p ({)s 70 882 p (if)s 17 r (\(n)s 18 r (>=)s 17 r (1\))s 105 922 p ({)s 174 963 p (move)s 2 r 10 1 ru 16 r (discs\(n)s 17 r (-)s 18 r (1,)s 17 r (i,)s 18 r (k,)s 17 r (j\);)s 52 r (/*)s f4 SF 17 r (VS)s f3 SF 11 r (move)s 2 r 10 1 ru 11 r (discs\(\))s f4 SF 11 r (=h8a/F<\200\226\200Q)s f3 SF 154 r (*/)s 174 1003 p (move)s 2 r 10 1 ru 16 r (one)s 2 r 10 1 ru 15 r (disc\(i,)s 18 r (j\);)s 174 r (/*)s 17 r (move)s 2 r 10 1 ru 10 r (discs\(\))s f4 SF 11 r (+}JI7'Hb.=E\(;)s f3 SF 166 r (*/)s 174 1044 p (print)s 2 r 10 1 ru 16 r (result\(\);)s 261 r (/*)s f4 SF 17 r (\202\227>ad\213Xi\210@60e9'JIHb!\223)s f3 SF 138 r (*/)s 174 1084 p (move)s 2 r 10 1 ru 16 r (discs\(n)s 17 r (-)s 18 r (1,)s 17 r (k,)s 18 r (j,)s 17 r (i\);)s 52 r (/*)s f4 SF 17 r (\225|<\223\)Hmw8Da\213Xi\202\227Ko'H9a)s f3 SF 107 r (*/)s 105 1124 p (})s 575 r (/*)s f4 SF 17 r (UfaOR=E\(;s\214K1H.9 #include "src2tex.h" #define SkipSpaces1(Ptr) while((*Ptr>'\0')&&(*Ptr<=' '))++Ptr #define SkipSpaces2(Ptr) while((*Ptr>'\0')&&(*Ptr<=' ')&&(*Ptr!='\n'))++Ptr int TXT_flag = 0; /* {\ TEXT flag \hfill} */ int BAS_flag = 0; /* {\ BASIC flag \hfill} */ int CBL_flag = 0; /* {\ COBOL flag \hfill} */ int C_flag = 0; /* {\ C flag \hfill} */ int F77_flag = 0; /* {\ FORTRAN flag \hfill} */ int HTML_flag = 0; /* {\ HTML flag \hfill} */ int JAVA_flag = 0; /* {\ JAVA flag \hfill} */ int LISP_flag = 0; /* {\ LISP flag \hfill} */ int MAKE_flag = 0; /* {\ MAKE flag \hfill} */ int PAS_flag = 0; /* {\ PASCAL flag \hfill} */ int PERL_flag = 0; /* {\ PERL flag \hfill} */ int SH_flag = 0; /* {\ SHELL flag \hfill} */ int TCL_flag = 0; /* {\ TCL/TK flag \hfill} */ int ASR_flag = 0; /* {\ ASIR flag \hfill} */ int MAC_flag = 0; /* {\ MACSYMA flag \hfill} */ int MAP_flag = 0; /* {\ MAPLE flag \hfill} */ int MAT_flag = 0; /* {\ MATHEMATICA flag \hfill} */ int MLAB_flag = 0; /* {\ MATLAB flag \hfill} */ int MPAD_flag = 0; /* {\ MuPAD flag \hfill} */ int RED_flag = 0; /* {\ REDUCE flag \hfill} */ int M_flag = 0; /* {\ M-file flag \hfill} */ /* {\hrulefill\ search a phrase globally\ \hrulefill} */ /* {\ This function {\tt search\_phrase(buf\_ptr, char\_ptr)} searches the area {\tt buf\_ptr+0, buf\_ptr+1}, $\cdots$, {\tt buf\_ptr+(int)(BUFFER\_SIZE/2)-1} \noindent and tries to find a phrase stored at {\tt char\_ptr}="{\sl phrase}". It returns the following values according to the result of search. $\displaystyle \eqalign{ {\tt search\_phrase()}= \cases{ 1 &if given phrase exists\cr 0 &otherwise\cr } } $ \noindent The automatic language identification mechanism essentially depends on this function.\hfill} */ int search_phrase(buf_ptr, char_ptr) int *buf_ptr; char *char_ptr; { char *c_ptr, c; int *b_ptr1, *b_ptr2, flag; b_ptr1 = buf_ptr; flag = 1; while (b_ptr1 != buf_ptr + (int) (BUFFER_SIZE / 2)) { b_ptr2 = b_ptr1; SkipSpaces1(b_ptr2); c_ptr = char_ptr; SkipSpaces1(c_ptr); while (*c_ptr != '\0') { c = (char)*b_ptr2; if ((c >= 'A') && (c <= 'Z')) /* upper case -> lower case */ c += 0x20; flag = c - *c_ptr; if (flag != 0) break; ++b_ptr2; SkipSpaces1(b_ptr2); ++c_ptr; SkipSpaces1(c_ptr); } if (flag == 0) break; ++b_ptr1; } #ifdef DEBUGGING if (flag == 0) printf("search_phrase(): phrase \"%s\" exists\n", char_ptr); else printf("search_phrase(): phrase \"%s\" is not found\n", char_ptr); #endif if (flag == 0) return 1; else return 0; } /* {\hrulefill\ search two phrases globally\ \hrulefill} */ /* {\ This function {\tt search\_two\_phrases(buf\_ptr, char\_ptr1, char\_ptr2)} searches the area {\tt buf\_ptr+0, buf\_ptr+1}, $\cdots$, {\tt buf\_ptr+(int)(BUFFER\_SIZE/2)-1} \noindent and tries to find a pair of phrases stored at \ {\tt char\_ptr1}="{\sl phrase1}", \ {\tt char\_ptr2}="{\sl phrase2}". It returns the following values according to the result of search. $\displaystyle \eqalign{ {\tt search\_two\_phrases()}= \cases{ 1 &if given phrases exist\cr 0 &otherwise\cr } } $ \noindent The automatic language identification mechanism essentially depends on this function.\hfill} */ int search_two_phrases(buf_ptr, char_ptr1, char_ptr2) int *buf_ptr; char *char_ptr1, *char_ptr2; { char *c_ptr, c; int *b_ptr1, *b_ptr2, i, flag; b_ptr1 = buf_ptr; flag = 1; while (b_ptr1 != buf_ptr + (int) (BUFFER_SIZE / 2)) { b_ptr2 = b_ptr1; SkipSpaces1(b_ptr2); c_ptr = char_ptr1; SkipSpaces1(c_ptr); while (*c_ptr != '\0') { c = (char)*b_ptr2; if ((c >= 'A') && (c <= 'Z')) /* upper case -> lower case */ c += 0x20; flag = c - *c_ptr; if (flag != 0) break; ++b_ptr2; SkipSpaces1(b_ptr2); ++c_ptr; SkipSpaces1(c_ptr); } if (flag == 0) break; ++b_ptr1; } #ifdef DEBUGGING if (flag == 0) printf("search_two_phrases(): phrase \"%s\" exists\n", char_ptr1); else printf("search_two_phrases(): phrase \"%s\" is not found\n", char_ptr1); #endif if (flag != 0) return 0; for (i = 0 ; i < 40 ; ++i) { b_ptr2 = b_ptr1; SkipSpaces1(b_ptr2); c_ptr = char_ptr2; SkipSpaces1(c_ptr); while (*c_ptr != '\0') { c = (char)*b_ptr2; if ((c >= 'A') && (c <= 'Z')) /* upper case -> lower case */ c += 0x20; flag = c - *c_ptr; if (flag != 0) break; ++b_ptr2; SkipSpaces1(b_ptr2); ++c_ptr; SkipSpaces1(c_ptr); } if (flag == 0) break; ++b_ptr1; } #ifdef DEBUGGING if (flag == 0) printf(" phrase \"%s\" exists\n", char_ptr2); else printf(" phrase \"%s\" is not found\n", char_ptr2); #endif if (flag == 0) return 1; else return 0; } /* {\hrulefill\ get a phrase locally\ \hrulefill} */ /* {\ This function {\tt get\_phrase(buf\_ptr, char\_ptr)} searches the area {\tt buf\_ptr+0, buf\_ptr+1}, $\cdots$, {\tt buf\_ptr+63} \noindent and tries to find an exactly the same phrase stored at {\tt char\_ptr}="{\sl phrase}". It returns the following values according to the result of search. $\displaystyle \eqalign{ {\tt get\_phrase()}= \cases{ {\rm the\ address\ of\ desired\ phrase} &if given phrase exists\cr {\rm the\ address\ of\ null\ phrase} &otherwise\ .\cr } } $ \hfill} */ int *get_phrase(buf_ptr, char_ptr) int *buf_ptr; char *char_ptr; { char *c_ptr, c; int *b_ptr1, *b_ptr2, i, flag = 1; static int null_phrase[1]={0x00}; b_ptr1 = buf_ptr; for (i=0; i<64; ++i) { b_ptr2 = b_ptr1; c_ptr = char_ptr; while (*c_ptr != '\0') { c = (char)*b_ptr2; if ((c >= 'A') && (c <= 'Z')) /* upper case -> lower case */ c += 0x20; flag = c - *c_ptr; if (flag != 0) break; ++b_ptr2; ++c_ptr; } if (flag == 0) break; ++b_ptr1; } #ifdef DEBUGGING if (flag == 0) printf("get_phrase(): phrase \"%s\" exists\n", char_ptr); else printf("get_phrase(): phrase \"%s\" is not found\n", char_ptr); #endif if (flag == 0) return b_ptr1; else return null_phrase; } /* {\hrulefill\ search line locally\ \hrulefill} */ /* {\ This function {\tt search\_line(buf\_ptr, char\_ptr)} searches the area {\tt buf\_ptr+0, buf\_ptr+1}, $\cdots$, {\tt buf\_ptr+255} \noindent and tries to find a line of phrase stored at {\tt char\_ptr} ="{\sl a line of phrase}". It returns the following values according to the result of search. $\displaystyle \eqalign{ {\tt search\_line()}= \cases{ 1 &if given line of phrase exists\cr 0 &otherwise\ .\cr } } $ \hfill} */ int search_line(buf_ptr,char_ptr) int *buf_ptr; char *char_ptr; { char *c_ptr, c, line1[256], line2[256]; int *b_ptr, i, flag=1; b_ptr = buf_ptr; SkipSpaces2(b_ptr); c_ptr = char_ptr; SkipSpaces2(c_ptr); for (i=0; ((i < 255) && (*c_ptr != 0x00)); ++i) { c = (char)*b_ptr; if (c == '\n') c = 0x00; if ((c >= 'A') && (c <= 'Z')) /* upper case -> lower case */ c += 0x20; line1[i] = c; line2[i] = *c_ptr; ++b_ptr; SkipSpaces2(b_ptr); ++c_ptr; SkipSpaces2(c_ptr); } line1[i] = 0x00; line2[i] = 0x00; for (i=0; ((i < 256) && (line2[i] != 0x00)); ++i) { flag = line1[i] - line2[i]; if (flag != 0) break; } #ifdef DEBUGGING if (flag == 0) { printf("given line is ...\n"); printf("\"%s\"\n", line1); printf("searching a line ...\n"); printf("\"%s\"\n", line2); printf("search_line(): line \"%s\" exists\n", char_ptr); } else { printf("given line is ...\n"); printf("\"%s\"\n", line1); printf("searching a line ...\n"); printf("\"%s\"\n", line2); printf("search_line(): line \"%s\" is not found\n", char_ptr); } #endif if (flag == 0) return 1; else return 0; } /* {\hrulefill\ set BASIC flag\ \hrulefill} */ void set_bas_flag(buf_ptr) int *buf_ptr; { if (M_flag != 0) return; /* {\ search characteristic phrases \hfill} */ BAS_flag = 10 * search_phrase(buf_ptr, "' basic"); BAS_flag += 10 * search_phrase(buf_ptr, "rem basic"); BAS_flag += search_phrase(buf_ptr, "0 '"); BAS_flag += search_phrase(buf_ptr, "1 '"); BAS_flag += search_phrase(buf_ptr, "2 '"); BAS_flag += search_phrase(buf_ptr, "3 '"); BAS_flag += search_phrase(buf_ptr, "4 '"); BAS_flag += search_phrase(buf_ptr, "5 '"); BAS_flag += search_phrase(buf_ptr, "6 '"); BAS_flag += search_phrase(buf_ptr, "7 '"); BAS_flag += search_phrase(buf_ptr, "8 '"); BAS_flag += search_phrase(buf_ptr, "9 '"); BAS_flag += 2 * search_phrase(buf_ptr, "0 rem"); BAS_flag += 2 * search_phrase(buf_ptr, "1 rem"); BAS_flag += 2 * search_phrase(buf_ptr, "2 rem"); BAS_flag += 2 * search_phrase(buf_ptr, "3 rem"); BAS_flag += 2 * search_phrase(buf_ptr, "4 rem"); BAS_flag += 2 * search_phrase(buf_ptr, "5 rem"); BAS_flag += 2 * search_phrase(buf_ptr, "6 rem"); BAS_flag += 2 * search_phrase(buf_ptr, "7 rem"); BAS_flag += 2 * search_phrase(buf_ptr, "8 rem"); BAS_flag += 2 * search_phrase(buf_ptr, "9 rem"); BAS_flag += search_phrase(buf_ptr, "cls"); BAS_flag += search_phrase(buf_ptr, "defdbl"); BAS_flag += search_phrase(buf_ptr, "<>"); BAS_flag += 2 * search_phrase(buf_ptr, "gosub"); BAS_flag += 3 * search_phrase(buf_ptr, "then gosub"); BAS_flag += 3 * search_phrase(buf_ptr, "then print"); BAS_flag += search_phrase(buf_ptr, "wend"); BAS_flag += search_phrase(buf_ptr, "input \""); BAS_flag += search_phrase(buf_ptr, "data \""); BAS_flag += search_phrase(buf_ptr, "print \""); BAS_flag += 2 * search_phrase(buf_ptr, "$=\""); BAS_flag += 4 * search_phrase(buf_ptr, "left$("); BAS_flag += 4 * search_phrase(buf_ptr, "mid$("); BAS_flag += 4 * search_phrase(buf_ptr, "right$("); BAS_flag += search_phrase(buf_ptr, "dir$("); BAS_flag += search_phrase(buf_ptr, "getattr("); BAS_flag += search_phrase(buf_ptr, "chdir \""); BAS_flag += search_phrase(buf_ptr, "curdir$"); BAS_flag += search_phrase(buf_ptr, "select case"); BAS_flag += search_phrase(buf_ptr, "end select"); BAS_flag += search_phrase(buf_ptr, "exit proc"); BAS_flag += search_phrase(buf_ptr, "end proc"); BAS_flag += search_phrase(buf_ptr, "end sub"); #ifdef DEBUGGING printf("set_bas_flag(): BAS_flag is set to %d\n", BAS_flag); #endif } /* {\hrulefill\ set C flag\ \hrulefill} */ void set_c_flag(buf_ptr) int *buf_ptr; { /* {\ search characteristic phrases \hfill} */ C_flag = 10 * search_phrase(buf_ptr, "/* c */"); C_flag += 10 * search_phrase(buf_ptr, "// c"); C_flag += 10 * search_phrase(buf_ptr, "/* objective-c */"); C_flag += 10 * search_phrase(buf_ptr, "// objective-c"); C_flag += 5 * search_phrase(buf_ptr, "// //"); C_flag += 5 * search_phrase(buf_ptr, "#include <"); C_flag += 5 * search_phrase(buf_ptr, "#include \""); C_flag += 5 * search_phrase(buf_ptr, "#import <"); C_flag += 5 * search_phrase(buf_ptr, "#import \""); C_flag += search_phrase(buf_ptr, "#define"); C_flag += 4 * (search_phrase(buf_ptr, "#if") & search_phrase(buf_ptr, "#endif")); C_flag += 5 * search_phrase(buf_ptr, "@implementation"); C_flag += 5 * search_phrase(buf_ptr, "@interface"); C_flag += 5 * search_phrase(buf_ptr, "@private"); C_flag += 5 * search_phrase(buf_ptr, "@protected"); C_flag += 5 * search_phrase(buf_ptr, "@public"); C_flag += 5 * search_phrase(buf_ptr, "@selector("); C_flag += 5 * search_phrase(buf_ptr, "@def("); C_flag += 5 * search_phrase(buf_ptr, "@encode("); C_flag += 3 * search_phrase(buf_ptr, "main() {"); C_flag += 5 * search_phrase(buf_ptr, "main(argc,argv) int argc;"); C_flag += search_phrase(buf_ptr, "printf(\""); C_flag += search_phrase(buf_ptr, "; } }"); C_flag += search_phrase(buf_ptr, "++"); C_flag += search_phrase(buf_ptr, "--"); C_flag += 2 * search_phrase(buf_ptr, "+="); C_flag += 2 * search_phrase(buf_ptr, "-="); C_flag += 2 * search_phrase(buf_ptr, "*="); C_flag += 2 * search_phrase(buf_ptr, "/="); C_flag += search_phrase(buf_ptr, ")&&("); C_flag += search_phrase(buf_ptr, ")||("); #ifdef DEBUGGING printf("set_c_flag(): C_flag is set to %d\n", C_flag); #endif } /* {\hrulefill\ set\ COBOL\ flag\ \hrulefill} */ void set_cbl_flag(buf_ptr) int *buf_ptr; { if (M_flag != 0) return; /* {\ search characteristic phrases \hfill} */ CBL_flag = 10 * search_phrase(buf_ptr, "* cobol"); CBL_flag += 10 * search_phrase(buf_ptr, "/ cobol"); CBL_flag += 4 * search_phrase(buf_ptr, "identification division."); CBL_flag += 4 * search_phrase(buf_ptr, "program-id."); CBL_flag += search_phrase(buf_ptr, "author."); CBL_flag += 4 * search_phrase(buf_ptr, "date-written."); CBL_flag += 4 * search_phrase(buf_ptr, "date-written."); CBL_flag += 4 * search_phrase(buf_ptr, "environment division."); CBL_flag += 4 * search_phrase(buf_ptr, "configuration section."); CBL_flag += 4 * search_phrase(buf_ptr, "source-computer."); CBL_flag += 4 * search_phrase(buf_ptr, "object-computer."); CBL_flag += 4 * search_phrase(buf_ptr, "special-names."); CBL_flag += 3 * search_phrase(buf_ptr, "input-output section."); CBL_flag += 4 * search_phrase(buf_ptr, "file-contral."); CBL_flag += 2 * search_phrase(buf_ptr, "i-o-contral."); CBL_flag += 4 * search_phrase(buf_ptr, "data division."); CBL_flag += 3 * search_phrase(buf_ptr, "file section."); CBL_flag += 4 * search_phrase(buf_ptr, "working-storage section."); CBL_flag += 4 * search_phrase(buf_ptr, "procedure division."); CBL_flag += search_phrase(buf_ptr, "section."); CBL_flag += 4 * search_phrase(buf_ptr, "stop run."); #ifdef DEBUGGING printf("set_cbl_flag(): CBL_flag is set to %d\n", CBL_flag); #endif } /* {\hrulefill\ set FORTRAN flag\ \hrulefill} */ void set_f77_flag(buf_ptr) int *buf_ptr; { if (M_flag != 0) return; /* {\ search characteristic phrases \hfill} */ F77_flag = 10 * search_phrase(buf_ptr, "c fortran"); F77_flag += 10 * search_phrase(buf_ptr, "* fortran"); F77_flag += search_phrase(buf_ptr, "implicit"); F77_flag += 2 * search_phrase(buf_ptr, "logical*2"); F77_flag += 2 * search_phrase(buf_ptr, "logical*4"); F77_flag += 2 * search_phrase(buf_ptr, "integer*2"); F77_flag += 2 * search_phrase(buf_ptr, "integer*4"); F77_flag += 2 * search_phrase(buf_ptr, "real*4"); F77_flag += 2 * search_phrase(buf_ptr, "real*8"); F77_flag += (search_phrase(buf_ptr, "do") & search_phrase(buf_ptr, "continue")); F77_flag += (search_phrase(buf_ptr, "subroutine") & search_phrase(buf_ptr, "end")); F77_flag += 3 * (search_phrase(buf_ptr, "write(") & search_phrase(buf_ptr, "format(")); F77_flag += search_phrase(buf_ptr, "stop end"); F77_flag += 4 * search_phrase(buf_ptr, ".lt."); F77_flag += 4 * search_phrase(buf_ptr, ".le."); F77_flag += 4 * search_phrase(buf_ptr, ".eq."); F77_flag += 4 * search_phrase(buf_ptr, ".ne."); F77_flag += 4 * search_phrase(buf_ptr, ".gt."); F77_flag += 4 * search_phrase(buf_ptr, ".ge."); F77_flag += 4 * search_phrase(buf_ptr, ".or."); F77_flag += 4 * search_phrase(buf_ptr, ".and."); F77_flag += 4 * search_phrase(buf_ptr, ".not."); #ifdef DEBUGGING printf("set_f77_flag(): F77_flag is set to %d\n", F77_flag); #endif } /* {\hrulefill\ set HTML flag\ \hrulefill} */ void set_html_flag(buf_ptr) int *buf_ptr; { /* {\ search characteristic phrases \hfill} */ HTML_flag = 10 * search_phrase(buf_ptr, "/"); HTML_flag += 10 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 10 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 10 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 10 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); HTML_flag += 5 * search_phrase(buf_ptr, ""); #ifdef DEBUGGING printf("set_html_flag(): HTML_flag is set to %d\n", HTML_flag); #endif } /* {\hrulefill\ set JAVA flag\ \hrulefill} */ void set_java_flag(buf_ptr) int *buf_ptr; { /* {\ search characteristic phrases \hfill} */ JAVA_flag = C_flag; JAVA_flag += 10 * search_phrase(buf_ptr, "/* java */"); JAVA_flag += 10 * search_phrase(buf_ptr, "// java"); JAVA_flag += 10 * search_phrase(buf_ptr, "synchronized"); JAVA_flag += 10 * search_phrase(buf_ptr, "instanceof"); JAVA_flag += 10 * search_phrase(buf_ptr, "import java."); JAVA_flag += 5 * search_phrase(buf_ptr, "@author"); JAVA_flag += 5 * search_phrase(buf_ptr, "@version"); #ifdef DEBUGGING printf("set_java_flag(): JAVA_flag is set to %d\n", JAVA_flag); #endif } /* {\hrulefill\ set LISP flag\ \hrulefill} */ void set_lisp_flag(buf_ptr) int *buf_ptr; { if (M_flag != 0) return; /* {\ search characteristic phrases \hfill} */ LISP_flag = 10 * search_phrase(buf_ptr, "; lisp"); LISP_flag += 10 * search_phrase(buf_ptr, "; scheme"); LISP_flag += 5 * search_phrase(buf_ptr, ")))))"); LISP_flag += 4 * search_phrase(buf_ptr, "(car"); LISP_flag += 4 * search_phrase(buf_ptr, "(cdr"); LISP_flag += 2 * search_phrase(buf_ptr, "(cons"); LISP_flag += search_phrase(buf_ptr, "(list"); LISP_flag += 4 * search_phrase(buf_ptr, "(setq"); LISP_flag += 4 * search_phrase(buf_ptr, "(set!"); LISP_flag += 4 * search_phrase(buf_ptr, "(lambda"); LISP_flag += search_phrase(buf_ptr, "(def"); LISP_flag += 4 * search_phrase(buf_ptr, "(defun"); LISP_flag += search_phrase(buf_ptr, "(define"); LISP_flag += search_phrase(buf_ptr, "(let"); LISP_flag += search_phrase(buf_ptr, "(+"); LISP_flag += 3 * search_phrase(buf_ptr, "(/"); LISP_flag += 3 * search_phrase(buf_ptr, "(cond ("); LISP_flag += search_phrase(buf_ptr, "(if ("); #ifdef DEBUGGING printf("set_lisp_flag(): LISP_flag is set to %d\n", LISP_flag); #endif } /* {\hrulefill\ set MAKE flag\ \hrulefill} */ void set_make_flag(buf_ptr) int *buf_ptr; { int *b_ptr; if (M_flag != 0) return; /* {\ search MAKE comment area \hfill} */ b_ptr = buf_ptr; while (b_ptr != buf_ptr + (int) (BUFFER_SIZE / 2)) { if ((*b_ptr == '\n') && (*(b_ptr + 1) == '#') && ((*(b_ptr + 2) == '\t') || (*(b_ptr + 2) == ' '))) ++MAKE_flag; ++b_ptr; } /* {\ search characteristic phrases \hfill} */ MAKE_flag += 10 * search_phrase(buf_ptr, "# makefile"); MAKE_flag += 5 * search_phrase(buf_ptr, "all:"); MAKE_flag += 5 * search_phrase(buf_ptr, "install:"); MAKE_flag += 5 * search_phrase(buf_ptr, "install.man:"); MAKE_flag += 5 * search_phrase(buf_ptr, "depend:"); MAKE_flag += 5 * search_phrase(buf_ptr, "clean:"); MAKE_flag += 3 * search_phrase(buf_ptr, "lint:"); MAKE_flag += 3 * search_phrase(buf_ptr, "diff:"); MAKE_flag += search_phrase(buf_ptr, "cc="); MAKE_flag += search_phrase(buf_ptr, "$(cc)"); MAKE_flag += search_phrase(buf_ptr, "objs="); MAKE_flag += search_phrase(buf_ptr, "obj="); MAKE_flag += search_phrase(buf_ptr, "srcs="); MAKE_flag += search_phrase(buf_ptr, "src="); MAKE_flag += search_phrase(buf_ptr, "missing="); MAKE_flag += search_phrase(buf_ptr, "optimize="); MAKE_flag += search_phrase(buf_ptr, "parser="); MAKE_flag += search_phrase(buf_ptr, "flags="); MAKE_flag += 2 * search_phrase(buf_ptr, "ldflags="); MAKE_flag += 2 * search_phrase(buf_ptr, "libdir="); MAKE_flag += 2 * search_phrase(buf_ptr, "bindir="); MAKE_flag += 2 * search_phrase(buf_ptr, "destdir="); MAKE_flag += 2 * search_phrase(buf_ptr, "mandir="); MAKE_flag += 2 * search_phrase(buf_ptr, "docdir="); MAKE_flag += 5 * search_phrase(buf_ptr, "@echo"); MAKE_flag += 5 * search_phrase(buf_ptr, "@-echo"); #ifdef DEBUGGING printf("set_make_flag(): MAKE_flag is set to %d\n", MAKE_flag); #endif } /* {\hrulefill\ set PASCAL flag\ \hrulefill} */ void set_pas_flag(buf_ptr) int *buf_ptr; { int *b_ptr; if (M_flag != 0) return; /* {\ search PASCAL comment area \hfill} */ b_ptr = buf_ptr; while (b_ptr != buf_ptr + (int) (BUFFER_SIZE / 2)) { if ((*b_ptr == '\n') && (*(b_ptr + 1) == '(') && (*(b_ptr + 2) == '*') && ((*(b_ptr + 3) == ' ') || (*(b_ptr + 3) == '*'))) ++PAS_flag; ++b_ptr; } /* {\ search characteristic phrases \hfill} */ PAS_flag += 10 * search_phrase(buf_ptr, "{ pascal }"); PAS_flag += 10 * search_phrase(buf_ptr, "(* pascal *)"); PAS_flag += 2 * search_phrase(buf_ptr, "*)(*"); PAS_flag += 3 * (search_phrase(buf_ptr, "program") | search_phrase(buf_ptr, "procedure")); PAS_flag += (search_phrase(buf_ptr, "begin") & search_phrase(buf_ptr, "end")); PAS_flag += (search_phrase(buf_ptr, "const") & search_phrase(buf_ptr, "var")); PAS_flag += 3 * search_phrase(buf_ptr, "keypressed("); PAS_flag += search_phrase(buf_ptr, "blockread("); PAS_flag += search_phrase(buf_ptr, "blockwrite("); PAS_flag += 4 * search_phrase(buf_ptr, "readln("); PAS_flag += 4 * search_phrase(buf_ptr, "writeln("); PAS_flag += search_phrase(buf_ptr, "write('"); PAS_flag += search_phrase(buf_ptr, ":="); #ifdef DEBUGGING printf("set_pas_flag(): PAS_flag is set to %d\n", PAS_flag); #endif } /* {\hrulefill\ set PERL flag\ \hrulefill} */ void set_perl_flag(buf_ptr) int *buf_ptr; { int *b_ptr; if (M_flag != 0) return; /* {\ search PERL comment area \hfill} */ b_ptr = buf_ptr; while (b_ptr != buf_ptr + (int) (BUFFER_SIZE / 2)) { if ((*b_ptr == '\n') && (*(b_ptr + 1) == '#') && ((*(b_ptr + 2) == '\t') || (*(b_ptr + 2) == ' '))) ++PERL_flag; ++b_ptr; } /* {\ search characteristic phrases \hfill} */ PERL_flag += 10 * search_phrase(buf_ptr, "# perl"); #ifdef UNIX PERL_flag += 10 * search_two_phrases(buf_ptr, "#!", "/bin/perl"); PERL_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/bin/perl"); PERL_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/local/bin/perl"); PERL_flag += 10 * search_two_phrases(buf_ptr, "#!", "/bin/jperl"); PERL_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/bin/jperl"); PERL_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/local/bin/jperl"); #else PERL_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\bin\\perl"); PERL_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\usr\\bin\\perl"); PERL_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\usr\\local\\bin\\perl"); PERL_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\bin\\jperl"); PERL_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\usr\\bin\\jperl"); PERL_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\usr\\local\\bin\\jperl"); #endif PERL_flag += 2 * search_phrase(buf_ptr, ".+"); PERL_flag += 2 * search_phrase(buf_ptr, ".-"); PERL_flag += 3 * search_phrase(buf_ptr, ".*"); PERL_flag += 2 * search_phrase(buf_ptr, "./"); PERL_flag += 3 * search_phrase(buf_ptr, ".\\"); PERL_flag += 3 * search_phrase(buf_ptr, ".**"); PERL_flag += 3 * search_phrase(buf_ptr, ".^"); PERL_flag += 3 * search_phrase(buf_ptr, "~="); PERL_flag += 3 * search_phrase(buf_ptr, "=~"); PERL_flag += 3 * search_phrase(buf_ptr, ".="); PERL_flag += 4 * search_phrase(buf_ptr, ".'"); PERL_flag += 4 * search_phrase(buf_ptr, "/^"); PERL_flag += 3 * search_phrase(buf_ptr, "/\\"); PERL_flag += search_phrase(buf_ptr, "print \""); PERL_flag += search_phrase(buf_ptr, "<>"); PERL_flag += 4 * search_phrase(buf_ptr, "while(<"); PERL_flag += 4 * search_phrase(buf_ptr, "$_"); PERL_flag += 3 * search_phrase(buf_ptr, "$."); PERL_flag += 4 * search_phrase(buf_ptr, "@_"); PERL_flag += 2 * search_phrase(buf_ptr, "__end__"); #ifdef DEBUGGING printf("set_perl_flag(): PERL_flag is set to %d\n", PERL_flag); #endif } /* {\hrulefill\ set SHELL flag\ \hrulefill} */ void set_shell_flag(buf_ptr) int *buf_ptr; { int *b_ptr; if (M_flag != 0) return; /* {\ search SHELL comment area \hfill} */ b_ptr = buf_ptr; while (b_ptr != buf_ptr + (int) (BUFFER_SIZE / 2)) { if ((*b_ptr == '\n') && (*(b_ptr + 1) == '#') && ((*(b_ptr + 2) == '\t') || (*(b_ptr + 2) == ' '))) ++SH_flag; ++b_ptr; } /* {\ search characteristic phrases \hfill} */ SH_flag += 10 * search_phrase(buf_ptr, "# shell"); #ifdef UNIX SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/bin/sh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/bin/sh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/bin/csh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/bin/csh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/bin/ksh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/bin/ksh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/bin/tcsh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/bin/tcsh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/local/bin/tcsh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/bin/zsh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/bin/zsh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/local/bin/zsh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/bin/bash"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/bin/bash"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/local/bin/bash"); #else SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\sh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\csh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\ksh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\tcsh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\zsh"); SH_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\bash"); #endif #ifdef DEBUGGING printf("set_shell_flag(): SH_flag is set to %d\n", SH_flag); #endif } /* {\hrulefill\ set TCL/TK flag\ \hrulefill} */ void set_tcl_flag(buf_ptr) int *buf_ptr; { int *b_ptr; if (M_flag != 0) return; /* {\ search TCL/TK comment area \hfill} */ b_ptr = buf_ptr; while (b_ptr != buf_ptr + (int) (BUFFER_SIZE / 2)) { if ((*b_ptr == '\n') && (*(b_ptr + 1) == '#') && ((*(b_ptr + 2) == '\t') || (*(b_ptr + 2) == ' '))) ++TCL_flag; ++b_ptr; } /* {\ search characteristic phrases \hfill} */ TCL_flag += 10 * search_phrase(buf_ptr, "# tcl/tk"); #ifdef UNIX TCL_flag += 10 * search_two_phrases(buf_ptr, "#!", "/bin/tclsh"); TCL_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/bin/tclsh"); TCL_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/local/bin/tclsh"); TCL_flag += 10 * search_two_phrases(buf_ptr, "#!", "/bin/wish"); TCL_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/bin/wish"); TCL_flag += 10 * search_two_phrases(buf_ptr, "#!", "/usr/local/bin/wish"); #else TCL_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\bin\\tclsh"); TCL_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\usr\\bin\\tclsh"); TCL_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\usr\\local\\bin\\tclsh"); TCL_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\bin\\wish"); TCL_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\usr\\bin\\wish"); TCL_flag += 10 * search_two_phrases(buf_ptr, "#!", "\\usr\\local\\bin\\wish"); #endif TCL_flag += 2 * search_phrase(buf_ptr, "tcl_"); TCL_flag += 2 * search_phrase(buf_ptr, "tk_"); TCL_flag += 2 * search_phrase(buf_ptr, "button ."); TCL_flag += 2 * search_phrase(buf_ptr, "pack ."); TCL_flag += 2 * search_phrase(buf_ptr, "destroy ."); TCL_flag += 2 * search_phrase(buf_ptr, "entry ."); TCL_flag += 2 * search_phrase(buf_ptr, "label ."); TCL_flag += 2 * search_phrase(buf_ptr, "bind ."); TCL_flag += 2 * search_phrase(buf_ptr, "radiobutton ."); TCL_flag += 2 * search_phrase(buf_ptr, "scale ."); TCL_flag += 2 * search_phrase(buf_ptr, "frame ."); TCL_flag += search_phrase(buf_ptr, "menu ."); TCL_flag += 2 * search_phrase(buf_ptr, "menubutton ."); TCL_flag += 2 * search_phrase(buf_ptr, "focus ."); TCL_flag += 5 * search_phrase(buf_ptr, "tk_menuBar ."); TCL_flag += 2 * search_phrase(buf_ptr, "geometry ."); TCL_flag += search_phrase(buf_ptr, "title ."); TCL_flag += 2 * search_phrase(buf_ptr, "tkwait"); TCL_flag += 2 * search_phrase(buf_ptr, "blink ."); #ifdef DEBUGGING printf("set_tcl_flag(): TCL_flag is set to %d\n", TCL_flag); #endif } /* {\hrulefill\ set ASIR flag\ \hrulefill} */ /* {\ Before calling this function {\tt set\_asr\_flag()} we have to call {\tt set\_c\_flag()} in advance.\hfill} */ void set_asr_flag(buf_ptr) int *buf_ptr; { if (M_flag != 0) return; /* {\ search characteristic phrases \hfill} */ ASR_flag = C_flag; ASR_flag += 10 * search_phrase(buf_ptr, "/* asir */"); ASR_flag += search_phrase(buf_ptr, "fujitsu lab"); ASR_flag += search_phrase(buf_ptr, "computer algebra"); ASR_flag += search_phrase(buf_ptr, "algebraic"); ASR_flag += search_phrase(buf_ptr, "symbolic"); ASR_flag += search_phrase(buf_ptr, "ctrl(\""); ASR_flag += search_phrase(buf_ptr, "} def"); ASR_flag += 2 * search_phrase(buf_ptr, "*/ def"); ASR_flag += search_phrase(buf_ptr, "pari("); ASR_flag += search_phrase(buf_ptr, "setprec("); ASR_flag += search_phrase(buf_ptr, "newvect("); ASR_flag += search_phrase(buf_ptr, "newmat("); ASR_flag += search_phrase(buf_ptr, "functor("); ASR_flag += search_phrase(buf_ptr, "funargs("); ASR_flag += search_phrase(buf_ptr, "rtostr("); ASR_flag += search_phrase(buf_ptr, "strtov("); ASR_flag += search_phrase(buf_ptr, "which(\""); ASR_flag += search_phrase(buf_ptr, "plotover("); ASR_flag += search_phrase(buf_ptr, "conplot("); ASR_flag += search_phrase(buf_ptr, "ifplot("); ASR_flag += search_phrase(buf_ptr, "grm("); ASR_flag += search_phrase(buf_ptr, "hgr("); ASR_flag += search_phrase(buf_ptr, "hgrm("); ASR_flag += search_phrase(buf_ptr, "newalg("); ASR_flag += search_phrase(buf_ptr, "defpoly("); ASR_flag += search_phrase(buf_ptr, "ratint("); if (ASR_flag == C_flag) ASR_flag = 0; #ifdef DEBUGGING printf("set_asr_flag(): ASR_flag is set to %d\n", ASR_flag); #endif } /* {\hrulefill\ set MACSYMA flag\ \hrulefill} */ void set_mac_flag(buf_ptr) int *buf_ptr; { /* {\ search characteristic phrases \hfill} */ MAC_flag = 10 * search_phrase(buf_ptr, "/* macsyma */"); MAC_flag += 10 * search_phrase(buf_ptr, "/* maxima */"); MAC_flag += 5 * search_phrase(buf_ptr, "?round"); MAC_flag += 5 * search_phrase(buf_ptr, "?truncate"); MAC_flag += 5 * search_phrase(buf_ptr, "::= "); MAC_flag += search_phrase(buf_ptr, ":="); MAC_flag += search_phrase(buf_ptr, "cabs("); MAC_flag += 2 * search_phrase(buf_ptr, "declare("); MAC_flag += 5 * search_phrase(buf_ptr, "define_variable("); MAC_flag += search_phrase(buf_ptr, "diff("); MAC_flag += search_phrase(buf_ptr, "eigenvals("); MAC_flag += search_phrase(buf_ptr, "eigenvects("); MAC_flag += 5 *search_phrase(buf_ptr, "eval_when"); MAC_flag += 3 * search_phrase(buf_ptr, "gendiff("); MAC_flag += search_phrase(buf_ptr, "graph2("); MAC_flag += search_phrase(buf_ptr, "graph3d("); MAC_flag += 3 * search_phrase(buf_ptr, "file_"); MAC_flag += 3 * search_phrase(buf_ptr, "grobner_basis"); MAC_flag += 5 * search_phrase(buf_ptr, "mode_check_"); MAC_flag += 5 * search_phrase(buf_ptr, "mode_declare("); MAC_flag += search_phrase(buf_ptr, "plot2("); MAC_flag += search_phrase(buf_ptr, "plot3d("); MAC_flag += 3 * search_phrase(buf_ptr, "resolvante_"); MAC_flag += 5 * search_phrase(buf_ptr, "setup_autoload("); MAC_flag += search_phrase(buf_ptr, "solve("); MAC_flag += search_phrase(buf_ptr, "sum("); MAC_flag += search_phrase(buf_ptr, "taylor("); MAC_flag += search_phrase(buf_ptr, "taylor_"); MAC_flag += search_phrase(buf_ptr, "tr_"); MAC_flag += 3 * search_phrase(buf_ptr, "undiff("); MAC_flag += 5 * search_phrase(buf_ptr, "with_stdout("); MAC_flag += 3 * search_phrase(buf_ptr, "writefile("); #ifdef DEBUGGING printf("set_mac_flag(): MAC_flag is set to %d\n", MAC_flag); #endif } /* {\hrulefill\ set MAPLE flag\ \hrulefill} */ void set_map_flag(buf_ptr) int *buf_ptr; { int *b_ptr; /* {\ search MAPLE comment area \hfill} */ b_ptr = buf_ptr; while (b_ptr != buf_ptr + (int) (BUFFER_SIZE / 2)) { if ((*b_ptr == '\n') && (*(b_ptr + 1) == '#') && ((*(b_ptr + 2) == '\t') || (*(b_ptr + 2) == ' '))) ++MAP_flag; ++b_ptr; } /* {\ search characteristic phrases \hfill} */ MAP_flag += 10 * search_phrase(buf_ptr, "# maple"); MAP_flag += search_phrase(buf_ptr, "##"); MAP_flag += search_phrase(buf_ptr, "###"); MAP_flag += 2 * search_phrase(buf_ptr, "####"); MAP_flag += search_phrase(buf_ptr, "university of waterloo"); MAP_flag += search_phrase(buf_ptr, "computer algebra"); MAP_flag += search_phrase(buf_ptr, "algebraic"); MAP_flag += search_phrase(buf_ptr, "symbolic"); MAP_flag += search_phrase(buf_ptr, "mvcal"); MAP_flag += search_phrase(buf_ptr, "daub"); MAP_flag += search_phrase(buf_ptr, "calcp"); MAP_flag += search_phrase(buf_ptr, "calcplot"); MAP_flag += search_phrase(buf_ptr, "posets"); MAP_flag += search_phrase(buf_ptr, "coxeter"); MAP_flag += search_phrase(buf_ptr, "matthews"); MAP_flag += search_phrase(buf_ptr, "casa"); MAP_flag += search_phrase(buf_ptr, "macro("); MAP_flag += search_phrase(buf_ptr, "with("); MAP_flag += 4 * search_phrase(buf_ptr, "fi;"); MAP_flag += 4 * search_phrase(buf_ptr, "od;"); MAP_flag += 4 * search_phrase(buf_ptr, "error(`"); MAP_flag += 3 * search_phrase(buf_ptr, "`)"); MAP_flag += search_phrase(buf_ptr, "='"); MAP_flag += 3 * search_phrase(buf_ptr, "=`"); MAP_flag += 3 * search_phrase(buf_ptr, "`="); MAP_flag += search_phrase(buf_ptr, ":="); MAP_flag += 3 * search_phrase(buf_ptr, "`:="); MAP_flag += 3 * search_phrase(buf_ptr, ":=`"); MAP_flag += search_phrase(buf_ptr, "<>"); MAP_flag += search_phrase(buf_ptr, "proc("); MAP_flag += 2 * search_phrase(buf_ptr, "readlib("); MAP_flag += 4 * search_phrase(buf_ptr, "readlib(`"); MAP_flag += search_phrase(buf_ptr, "eigenvals("); MAP_flag += search_phrase(buf_ptr, "eigenvects("); MAP_flag += search_phrase(buf_ptr, "simplify("); MAP_flag += search_phrase(buf_ptr, "sum("); MAP_flag += search_phrase(buf_ptr, "diff("); MAP_flag += search_phrase(buf_ptr, "int("); MAP_flag += search_phrase(buf_ptr, "solve("); MAP_flag += search_phrase(buf_ptr, "draw("); MAP_flag += search_phrase(buf_ptr, "plot("); MAP_flag += search_phrase(buf_ptr, "plot3d("); MAP_flag += search_phrase(buf_ptr, "animate("); MAP_flag += search_phrase(buf_ptr, "animate3d("); MAP_flag += 4 * search_phrase(buf_ptr, "save `"); #ifdef DEBUGGING printf("set_map_flag(): MAP_flag is set to %d\n", MAP_flag); #endif } /* {\hrulefill\ set MATHEMATICA flag\ \hrulefill} */ void set_mat_flag(buf_ptr) int *buf_ptr; { int *b_ptr; /* {\ search MATHEMATICA comment area \hfill} */ b_ptr = buf_ptr; while (b_ptr != buf_ptr + (int) (BUFFER_SIZE / 2)) { if ((*b_ptr == '\n') && (*(b_ptr + 1) == '(') && (*(b_ptr + 2) == '*') && ((*(b_ptr + 3) == '\t') || (*(b_ptr + 3) == ' '))) ++MAT_flag; ++b_ptr; } /* {\ search characteristic phrases \hfill} */ MAT_flag += 10 * search_phrase(buf_ptr, "(* mathematica *)"); MAT_flag += 2 * search_phrase(buf_ptr, "*)(*"); MAT_flag += search_phrase(buf_ptr, "wolfram research"); MAT_flag += search_phrase(buf_ptr, "computer algebra"); MAT_flag += search_phrase(buf_ptr, "algebraic"); MAT_flag += search_phrase(buf_ptr, "symbolic"); MAT_flag += 3 * search_phrase(buf_ptr, "beginpackage["); MAT_flag += 3 * search_phrase(buf_ptr, "endpackage["); MAT_flag += 3 * search_phrase(buf_ptr, "begin["); MAT_flag += 3 * search_phrase(buf_ptr, "module["); MAT_flag += search_phrase(buf_ptr, "block["); MAT_flag += 3 *search_phrase(buf_ptr, "end["); MAT_flag += search_phrase(buf_ptr, "on["); MAT_flag += search_phrase(buf_ptr, "off["); MAT_flag += search_phrase(buf_ptr, "array["); MAT_flag += search_phrase(buf_ptr, "table["); MAT_flag += search_phrase(buf_ptr, "vectorq["); MAT_flag += search_phrase(buf_ptr, "matrixq["); MAT_flag += search_phrase(buf_ptr, "list["); MAT_flag += 2 * search_phrase(buf_ptr, "evaluate["); MAT_flag += search_phrase(buf_ptr, "function["); MAT_flag += 4 * search_phrase(buf_ptr, "if["); MAT_flag += 4 * search_phrase(buf_ptr, "switch["); MAT_flag += 4 * search_phrase(buf_ptr, "do["); MAT_flag += 4 * search_phrase(buf_ptr, "while["); MAT_flag += 4 * search_phrase(buf_ptr, "for["); MAT_flag += 4 * search_phrase(buf_ptr, "break["); MAT_flag += 4 * search_phrase(buf_ptr, "continue["); MAT_flag += 4 * search_phrase(buf_ptr, "return["); MAT_flag += 4 * search_phrase(buf_ptr, "label["); MAT_flag += 4 * search_phrase(buf_ptr, "goto["); MAT_flag += 2 * search_phrase(buf_ptr, "sum["); MAT_flag += 2 * search_phrase(buf_ptr, "product["); MAT_flag += 3 * search_phrase(buf_ptr, "expand["); MAT_flag += 2 * search_phrase(buf_ptr, "factor["); MAT_flag += 2 * search_phrase(buf_ptr, "simplify["); MAT_flag += 2 * search_phrase(buf_ptr, "limit["); MAT_flag += 2 * (search_phrase(buf_ptr, "d[") | search_phrase(buf_ptr, "dt[")); MAT_flag += 3 * search_phrase(buf_ptr, "integrate["); MAT_flag += 2 * search_phrase(buf_ptr, "solve["); MAT_flag += search_phrase(buf_ptr, "series["); MAT_flag += search_phrase(buf_ptr, "show["); MAT_flag += search_phrase(buf_ptr, "plot["); MAT_flag += search_phrase(buf_ptr, "plot3d["); #ifdef DEBUGGING printf("set_mat_flag(): MAT_flag is set to %d\n", MAT_flag); #endif } /* {\hrulefill\ set MATLAB flag\ \hrulefill} */ void set_mlab_flag(buf_ptr) int *buf_ptr; { int *b_ptr; /* {\ search MATLAB or OCTAVE comment area \hfill} */ b_ptr = buf_ptr; while (b_ptr != buf_ptr + (int) (BUFFER_SIZE / 2)) { if ((*b_ptr == '\n') && ((*(b_ptr + 1) == '#') || (*(b_ptr + 1) == '%')) && ((*(b_ptr + 2) == '\t') || (*(b_ptr + 2) == ' '))) ++MLAB_flag; ++b_ptr; } /* {\ search characteristic phrases \hfill} */ MLAB_flag += 10 * search_phrase(buf_ptr, "# matlab"); MLAB_flag += 10 * search_phrase(buf_ptr, "% matlab"); MLAB_flag += 10 * search_phrase(buf_ptr, "# octave"); MLAB_flag += 10 * search_phrase(buf_ptr, "% octave"); MLAB_flag += search_phrase(buf_ptr, "# mathworks"); MLAB_flag += search_phrase(buf_ptr, "% mathworks"); MLAB_flag += 3 * search_phrase(buf_ptr, "endfor"); MLAB_flag += search_phrase(buf_ptr, "function["); MLAB_flag += 3 * search_phrase(buf_ptr, "endfunction"); MLAB_flag += 3 * search_phrase(buf_ptr, "endwhile"); MLAB_flag += 2 * search_phrase(buf_ptr, "end end"); MLAB_flag += search_phrase(buf_ptr, "plot("); MLAB_flag += search_phrase(buf_ptr, "plot3d("); MLAB_flag += 2 * search_phrase(buf_ptr, "surf("); MLAB_flag += 2 * search_phrase(buf_ptr, "shg"); MLAB_flag += 2 * search_phrase(buf_ptr, "clg"); MLAB_flag += search_phrase(buf_ptr, "gplot"); MLAB_flag += search_phrase(buf_ptr, "gsplot"); MLAB_flag += 3 * search_phrase(buf_ptr, "casesen"); MLAB_flag += 3 * search_phrase(buf_ptr, "edit_history"); MLAB_flag += 3 * search_phrase(buf_ptr, "run_history"); MLAB_flag += 2 * search_phrase(buf_ptr, ".+"); MLAB_flag += 2 * search_phrase(buf_ptr, ".-"); MLAB_flag += 3 * search_phrase(buf_ptr, ".*"); MLAB_flag += 2 * search_phrase(buf_ptr, "./"); MLAB_flag += 3 * search_phrase(buf_ptr, ".\\"); MLAB_flag += 3 * search_phrase(buf_ptr, ".**"); MLAB_flag += 3 * search_phrase(buf_ptr, ".^"); MLAB_flag += 3 * search_phrase(buf_ptr, "~="); MLAB_flag += 4 * search_phrase(buf_ptr, ".'"); MLAB_flag += search_phrase(buf_ptr, "<>"); MLAB_flag += search_phrase(buf_ptr, "printf(\""); MLAB_flag += 4 * search_phrase(buf_ptr, "printf('"); MLAB_flag += 4 * search_phrase(buf_ptr, "disp('"); MLAB_flag += search_phrase(buf_ptr, "error(\""); MLAB_flag += 4 * search_phrase(buf_ptr, "error('"); MLAB_flag += 3 * search_phrase(buf_ptr, "nargin"); MLAB_flag += 3 * search_phrase(buf_ptr, "nargout"); MLAB_flag += 4 * search_phrase(buf_ptr, "(:"); MLAB_flag += 4 * search_phrase(buf_ptr, ":)"); MLAB_flag += search_phrase(buf_ptr, "zeros("); MLAB_flag += 3 * search_phrase(buf_ptr, "rot90"); MLAB_flag += 3 * search_phrase(buf_ptr, "fliplr"); MLAB_flag += 3 * search_phrase(buf_ptr, "flipud"); MLAB_flag += search_phrase(buf_ptr, "diag"); MLAB_flag += 3 * search_phrase(buf_ptr, "tril"); MLAB_flag += 3 * search_phrase(buf_ptr, "triu"); MLAB_flag += 2 * search_phrase(buf_ptr, "title('"); MLAB_flag += 3 * search_phrase(buf_ptr, "gtext("); MLAB_flag += 3 * search_phrase(buf_ptr, "ginput("); MLAB_flag += search_phrase(buf_ptr, "input("); #ifdef DEBUGGING printf("set_mlab_flag(): MLAB_flag is set to %d\n", MLAB_flag); #endif } /* {\hrulefill\ set MuPAD flag\ \hrulefill} */ void set_mpad_flag(buf_ptr) int *buf_ptr; { int *b_ptr; /* {\ search MuPAD comment area \hfill} */ b_ptr = buf_ptr; while (b_ptr != buf_ptr + (int) (BUFFER_SIZE / 2)) { if ((*b_ptr == '\n') && (*(b_ptr + 1) == '#') && ((*(b_ptr + 2) == '\t') || (*(b_ptr + 2) == ' '))) ++MPAD_flag; ++b_ptr; } /* {\ search characteristic phrases \hfill} */ MPAD_flag += 10 * search_phrase(buf_ptr, "# mupad #"); MPAD_flag += search_phrase(buf_ptr, "##"); MPAD_flag += search_phrase(buf_ptr, "###"); MPAD_flag += 2 * search_phrase(buf_ptr, "####"); MPAD_flag += search_phrase(buf_ptr, "computer algebra"); MPAD_flag += search_phrase(buf_ptr, "algebraic"); MPAD_flag += search_phrase(buf_ptr, "symbolic"); MPAD_flag += 5 * search_phrase(buf_ptr, "end_case"); MPAD_flag += 5 * search_phrase(buf_ptr, "end_for"); MPAD_flag += 5 * search_phrase(buf_ptr, "end_if"); MPAD_flag += 3 * search_phrase(buf_ptr, "parbegin"); MPAD_flag += 5 * search_phrase(buf_ptr, "end_par"); MPAD_flag += 5 * search_phrase(buf_ptr, "end_proc"); MPAD_flag += 5 * search_phrase(buf_ptr, "end_repeat"); MPAD_flag += 3 * search_phrase(buf_ptr, "seqbegin"); MPAD_flag += 5 * search_phrase(buf_ptr, "end_seq"); MPAD_flag += 5 * search_phrase(buf_ptr, "end_while"); MPAD_flag += search_phrase(buf_ptr, ":="); MPAD_flag += search_phrase(buf_ptr, "diff("); MPAD_flag += search_phrase(buf_ptr, "int("); MPAD_flag += search_phrase(buf_ptr, "solve("); MPAD_flag += search_phrase(buf_ptr, "plot2d("); MPAD_flag += search_phrase(buf_ptr, "plot3d("); MPAD_flag += search_phrase(buf_ptr, "simplify("); MPAD_flag += search_phrase(buf_ptr, "sum("); #ifdef DEBUGGING printf("set_mpad_flag(): MPAD_flag is set to %d\n", MPAD_flag); #endif } /* {\hrulefill\ set REDUCE flag\ \hrulefill} */ void set_red_flag(buf_ptr) int *buf_ptr; { int *b_ptr; if (M_flag != 0) return; /* {\ search REDUCE comment area \hfill} */ b_ptr = buf_ptr; while (b_ptr != buf_ptr + (int) (BUFFER_SIZE / 2)) { if ((*b_ptr == '\n') && (*(b_ptr + 1) == '%') && ((*(b_ptr + 2) == '\t') || (*(b_ptr + 2) == ' '))) ++RED_flag; ++b_ptr; } /* {\ search characteristic phrases \hfill} */ RED_flag += 10 * search_phrase(buf_ptr, "% reduce"); RED_flag += search_phrase(buf_ptr, ". hearn"); RED_flag += search_phrase(buf_ptr, "computer algebra"); RED_flag += search_phrase(buf_ptr, "algebraic"); RED_flag += search_phrase(buf_ptr, "symbolic"); RED_flag += search_phrase(buf_ptr, "arnum"); RED_flag += search_phrase(buf_ptr, "compact"); RED_flag += search_phrase(buf_ptr, "excalc"); RED_flag += search_phrase(buf_ptr, "gentran"); RED_flag += search_phrase(buf_ptr, "orthovec"); RED_flag += search_phrase(buf_ptr, "specfn"); RED_flag += search_phrase(buf_ptr, "fide"); RED_flag += search_phrase(buf_ptr, "physop"); RED_flag += search_phrase(buf_ptr, "reacteqn"); RED_flag += search_phrase(buf_ptr, "rlfi"); RED_flag += search_phrase(buf_ptr, "ghyper"); RED_flag += search_phrase(buf_ptr, "linalg"); RED_flag += search_phrase(buf_ptr, "ncpoly"); RED_flag += search_phrase(buf_ptr, "xideal"); RED_flag += search_phrase(buf_ptr, "zeilberg"); RED_flag += search_phrase(buf_ptr, "out \""); RED_flag += search_phrase(buf_ptr, "begin scalar"); RED_flag += (search_phrase(buf_ptr, "off echo") | search_phrase(buf_ptr, "on echo")); RED_flag += (search_phrase(buf_ptr, "on rational") | search_phrase(buf_ptr, "off rational")); RED_flag += (search_phrase(buf_ptr, "on complex") | search_phrase(buf_ptr, "off complex")); RED_flag += (search_phrase(buf_ptr, "on round") | search_phrase(buf_ptr, "off round")); RED_flag += (search_phrase(buf_ptr, "on factor") | search_phrase(buf_ptr, "off factor")); RED_flag += (search_phrase(buf_ptr, "on nat") | search_phrase(buf_ptr, "off nat")); RED_flag += search_phrase(buf_ptr, ":="); RED_flag += search_phrase(buf_ptr, "part("); RED_flag += search_phrase(buf_ptr, "factorize("); RED_flag += search_phrase(buf_ptr, "remainder("); RED_flag += search_phrase(buf_ptr, "mat(("); RED_flag += 2 * search_phrase(buf_ptr, "then<<"); RED_flag += 2 * search_phrase(buf_ptr, "do<<"); RED_flag += 2 * search_phrase(buf_ptr, "repeat<<"); RED_flag += 2 * search_phrase(buf_ptr, "else<<"); RED_flag += search_phrase(buf_ptr, "df("); RED_flag += search_phrase(buf_ptr, "int("); RED_flag += search_phrase(buf_ptr, "defint("); RED_flag += search_phrase(buf_ptr, "solve("); RED_flag += search_phrase(buf_ptr, "taylor("); RED_flag += search_phrase(buf_ptr, "groebner("); RED_flag += search_phrase(buf_ptr, "odesolve("); RED_flag += search_phrase(buf_ptr, "root("); RED_flag += search_phrase(buf_ptr, "plot("); RED_flag += search_phrase(buf_ptr, "linineq("); #ifdef DEBUGGING printf("set_red_flag(): RED_flag is set to %d\n", RED_flag); #endif } /* {\hrulefill\ set TEXT flag\ \hrulefill} */ /* {\ The purpose of this function is to decide whether or not the input file is a plain text file or a src2tex format file.\hfill} */ void set_txt_flag(buf_ptr) int *buf_ptr; { int brace_counter = 0; /* {\ brace counter \hfill} */ int dollar_counter = 0; /* {\ single dollar sign counter \hfill} */ int ddollar_counter = 0; /* {\ double dollar sign counter \hfill} */ int i, perl_flag, tmp_flag, *ptr, *mark_ptr; char c_1, c0, c1, c2; /* {\ prepare for special treatment of perl \hfill} */ tmp_flag = PERL_flag; set_perl_flag(buf_ptr); perl_flag = PERL_flag; PERL_flag = tmp_flag; /* {\ initialize parameters and start checking \hfill} */ TXT_flag = 1; ptr = buf_ptr; while (ptr != buf_ptr + (int)(BUFFER_SIZE / 2)) { /* {\ increase counters if it is necessary \hfill} */ if (ptr == buf_ptr) c_1 = 0x00; else c_1 = *(ptr - 1); c0 = *ptr; c1 = *(ptr + 1); c2 = *(ptr + 2); ++ptr; if ((c_1 != '\\') && (c0 == '{')) ++brace_counter; if ((c_1 != '\\') && (c0 == '}')) --brace_counter; if ((c_1 != '$') && (c0 == '$') && (c1 != '$')) { mark_ptr = ptr; for(i=0 ; i < FORMULA_LEN_MAX; ++i) { ++mark_ptr; if(((char)*(mark_ptr -1) != '$') && ((char)*mark_ptr == '$')) break; } if(((char)*(mark_ptr -1) != '$') && ((char)*mark_ptr == '$')) { ++dollar_counter; dollar_counter %= 2; #ifdef DEBUGGING printf("non-display style mathematical formula of the length "); printf("%d\n", i + 1); #endif } else dollar_counter = 0; } #ifdef LATEX if ((c0 == '\\') && (c1 == '(')) { mark_ptr = ptr; for(i=0 ; i < FORMULA_LEN_MAX; ++i) { ++mark_ptr; if(((char)*mark_ptr == '\\') && ((char)*(mark_ptr + 1) == ')')) break; } if(((char)*mark_ptr == '\\') && ((char)*(mark_ptr + 1) == ')')) { dollar_counter = 1; #ifdef DEBUGGING printf("non-display style mathematical formula of the length "); printf("%d\n", i); #endif } else dollar_counter = 0; } if ((c0 == '\\') && (c1 == ')')) dollar_counter = 0; if ((c0 == '\\') && ((c1 == '[') || (c1 == ']'))) { ++ddollar_counter; ddollar_counter %= 2; } #else if ((c0 == '$') && (c1 == '$') && (c2 != '$')) { ++ddollar_counter; ddollar_counter %= 2; } #endif /* {\ set or unset TXT\_flag \hfill} */ if (brace_counter > 0) { /* {\ If there exits an $\{\backslash$ then src2tex thinks that input file is written in TeX. \hfill} */ if ((c_1 == '{') && (c0 == '\\') && (((c1 >= 'a') && (c1 <= 'z')) || ((c1 >= 'A') && (c1 <= 'Z'))) && (((c2 >= 'a') && (c2 <= 'z')) || ((c2 >= 'A') && (c2 <= 'Z')))) { TXT_flag = 0; break; } if ((c_1 == '{') && (c0 == '\\') && (c1 == ' ')) { TXT_flag = 0; break; } } if ((dollar_counter == 1) || (ddollar_counter == 1)) { /* {\ check escape sequence \hfill} */ if ((c0 == '\\') && (((c1 >= 'a') && (c1 <= 'z')) || ((c1 >= 'A') && (c1 <= 'Z'))) && (((c2 >= 'a') && (c2 <= 'z')) || ((c2 >= 'A') && (c2 <= 'Z')))) { TXT_flag = 0; #ifdef DEBUGGING printf("set_txt_flag(): TeX escape sequence is found\n"); #endif } /* If _ and ^ are not used properly, then src2tex thinks that input file is a plain text, i.e., not a TeXt. {\hfill} */ if (((c0 == '_') || (c0 == '^')) && (perl_flag == 0)) { if ((c_1 <= ' ') || (c1 <= ' ')) { TXT_flag = 1; #ifdef DEBUGGING printf("set_txt_flag(): TeX syntax error #1\n"); printf(" %c%c%c%c...\n", c_1, c0, c1, c2); #endif break; } if (c1 == '{') { TXT_flag = 0; break; } if (((c1 >= '0') && (c1 <= '9')) || ((c1 >= 'a') && (c1 <= 'z'))) { if (((c2 >= '0') && (c2 <= '9')) || ((c2 >= 'a') && (c2 <= 'z'))) { TXT_flag = 1; #ifdef DEBUGGING printf("set_txt_flag(): TeX syntax error #2\n"); printf(" %c%c%c%c...\n", c_1, c0, c1, c2); #endif break; } else { TXT_flag = 0; } } } } } /* {\ Any news article or mail is considered as a text file.\hfill} */ if ((search_phrase(buf_ptr, "from:") != 0) && (search_phrase(buf_ptr, "newsgroups:") != 0) && (search_phrase(buf_ptr, "subject:") != 0) && (search_phrase(buf_ptr, "date:") != 0) && (search_phrase(buf_ptr, "organization:") != 0) && (search_phrase(buf_ptr, "path:") != 0)) TXT_flag = 1; if ((search_phrase(buf_ptr, "from:") != 0) && (search_phrase(buf_ptr, "subject:") != 0) && (search_phrase(buf_ptr, "date:") != 0) && (search_phrase(buf_ptr, "to:") != 0) && (search_phrase(buf_ptr, "return-path:") != 0)) TXT_flag = 1; #ifdef DEBUGGING printf("set_txt_flag(): TXT_flag is set to %d\n", TXT_flag); #endif } /* {\hrulefill\ initialize language and text flags\ \hrulefill} */ /* {\ In this function we just see the suffix of input file name and determine language type. For further details, it would be better to read the following definition of function {\tt init\_lang\_flag()}. \hfill} */ void init_lang_flag(cptr) char *cptr[]; { char *ptr, c0, c1, c2, c3, c4; /* set language flag according to the file name */ ptr = cptr[0]; c0 = *ptr; c1 = *++ptr; c2 = *++ptr; c3 = *++ptr; c4 = *++ptr; if (((c0 == 'M') || (c0 == 'm')) /* MAKE {\hfill} */ && ((c1 == 'A') || (c1 == 'a')) && ((c2 == 'K') || (c2 == 'k')) && ((c3 == 'E') || (c3 == 'e')) && ((c4 == 'F') || (c4 == 'f'))) MAKE_flag = 1; /* search the suffix of file name {\hfill} */ for (ptr = cptr[0]; *ptr != '\0'; ++ptr); for (; (*ptr != '.') && (ptr != cptr[0]); --ptr); /* set language flags according to the suffix {\hfill} */ if (*ptr == '.') { c1 = *++ptr; c2 = *++ptr; c3 = *++ptr; c4 = *++ptr; if (((c1 == 'A') || (c1 == 'a')) /* TEXT {\hfill} */ && ((c2 == 'W') || (c2 == 'w')) && ((c3 == 'K') || (c3 == 'k'))) TXT_flag = 1; if (((c1 == 'B') || (c1 == 'b')) && ((c2 == 'A') || (c2 == 'a')) && ((c3 == 'T') || (c3 == 't'))) TXT_flag = 1; if (((c1 == 'C') || (c1 == 'c')) && ((c2 == 'O') || (c2 == 'o')) && ((c3 == 'N') || (c3 == 'n')) && ((c4 == 'F') || (c4 == 'f'))) TXT_flag = 1; if (((c1 == 'D') || (c1 == 'd')) && ((c2 == 'O') || (c2 == 'o')) && ((c3 == 'C') || (c3 == 'c'))) TXT_flag = 1; if (((c1 == 'L') || (c1 == 'l')) && ((c2 == 'E') || (c2 == 'e')) && ((c3 == 'T') || (c3 == 't'))) TXT_flag = 1; if (((c1 == 'L') || (c1 == 'l')) && ((c2 == 'O') || (c2 == 'o')) && ((c3 == 'G') || (c3 == 'g'))) TXT_flag = 1; if (((c1 == 'S') || (c1 == 's')) && ((c2 == 'E') || (c2 == 'e')) && ((c3 == 'D') || (c3 == 'd'))) TXT_flag = 1; if (((c1 == 'S') || (c1 == 's')) && ((c2 == 'Y') || (c2 == 'y')) && ((c3 == 'S') || (c3 == 's'))) TXT_flag = 1; if (((c1 == 'T') || (c1 == 't')) && ((c2 == 'E') || (c2 == 'e')) && ((c3 == 'X') || (c3 == 'x'))) TXT_flag = 1; if (((c1 == 'T') || (c1 == 't')) && ((c2 == 'X') || (c2 == 'x')) && ((c3 == 'T') || (c3 == 't'))) TXT_flag = 1; if ((c1 == 'B') || (c1 == 'b')) /* BASIC {\hfill} */ BAS_flag = 1; if (((c1 == 'V') || (c1 == 'v')) && ((c2 == 'B') || (c2 == 'b'))) BAS_flag = 1; if (((c1 == 'C') || (c1 == 'c')) /* C {\hfill} */ && (c2 != 'B') && (c2 != 'b') && (c2 != 'O') && (c2 != 'o') && (c2 != 'S') && (c2 != 's')) C_flag = 1; if (((c1 == 'V') || (c1 == 'v')) && ((c2 == 'C') || (c2 == 'c'))) C_flag = 1; if ((c1 == 'H') || (c1 == 'h')) C_flag = 1; if (((c1 == 'C') || (c1 == 'c')) /* COBOL {\hfill} */ && ((c2 == 'B') || (c2 == 'b')) && ((c3 == 'L') || (c3 == 'l'))) CBL_flag = 1; if (((c1 == 'C') || (c1 == 'c')) && ((c2 == 'O') || (c2 == 'o')) && ((c3 == 'B') || (c3 == 'b'))) CBL_flag = 1; if (((c1 == 'A') || (c1 == 'a')) /* ASIR {\hfill} */ && ((c2 == 'S') || (c2 == 's')) && (((c3 >= '0') && (c3 <= '9')) || ((c3 >= 'A') && (c3 <= 'Z')) || ((c3 >= 'a') && (c3 <= 'z')))) ASR_flag = 1; if ((c1 == 'F') || (c1 == 'f')) /* FORTRAN {\hfill} */ F77_flag = 1; if (((c1 == 'H') || (c1 == 'h')) /* HTML {\hfill} */ && ((c2 == 'T') || (c2 == 't')) && ((c3 == 'M') || (c3 == 'm')) && ((c4 == 'L') || (c4 == 'l'))) HTML_flag = 1; if (((c1 == 'J') || (c1 == 'j')) /* JAVA {\hfill} */ && ((c2 == 'A') || (c2 == 'a')) && ((c3 == 'V') || (c3 == 'v')) && ((c4 == 'A') || (c4 == 'a'))) JAVA_flag = 1; if (((c1 == 'L') || (c1 == 'l')) /* LISP {\hfill} */ && ((c2 == 'S') || (c2 == 's'))) LISP_flag = 1; if (((c1 == 'S') || (c1 == 's')) && ((c2 == 'C') || (c2 == 'c'))) LISP_flag = 1; if (((c1 == 'E') || (c1 == 'e')) && ((c2 == 'L') || (c2 == 'l'))) LISP_flag = 1; if (((c1 == 'P') || (c1 == 'p')) /* PASCAL {\hfill} */ && (c2 != 'L') && (c2 != 'l') && (c2 != 'R') && (c2 != 'r')) PAS_flag = 1; if (((c1 == 'T') || (c1 == 't')) && ((c2 == 'P') || (c2 == 'p'))) PAS_flag = 1; if (((c1 == 'P') || (c1 == 'p')) /* PERL {\hfill} */ && ((c2 == 'L') || (c2 == 'l'))) PERL_flag =1; if (((c1 == 'P') || (c1 == 'p')) && ((c2 == 'R') || (c2 == 'r')) && ((c3 == 'L') || (c3 == 'l'))) PERL_flag = 1; if (((c1 == 'P') || (c1 == 'p')) && ((c2 == 'H') || (c2 == 'h'))) PERL_flag =1; if (((c1 == 'P') || (c1 == 'p')) && ((c2 == 'M') || (c2 == 'm'))) PERL_flag =1; if (((c1 == 'S') || (c1 == 's')) /* SHELL {\hfill} */ && ((c2 == 'H') || (c2 == 'h'))) SH_flag = 1; if (((c1 == 'C') || (c1 == 'c')) && ((c2 == 'S') || (c2 == 's')) && ((c3 == 'H') || (c3 == 'h'))) SH_flag = 1; if (((c1 == 'K') || (c1 == 'k')) && ((c2 == 'S') || (c2 == 's')) && ((c3 == 'H') || (c3 == 'h'))) SH_flag = 1; if (((c1 == 'Z') || (c1 == 'Z')) && ((c2 == 'S') || (c2 == 's')) && ((c3 == 'H') || (c3 == 'h'))) SH_flag = 1; if (((c1 == 'T') || (c1 == 't')) && ((c2 == 'C') || (c2 == 'c')) && ((c3 == 'S') || (c3 == 's')) && ((c4 == 'H') || (c4 == 'h'))) SH_flag = 1; if (((c1 == 'T') || (c1 == 't')) /* TCL/TK {\hfill} */ && ((c2 == 'C') || (c2 == 'c')) && ((c3 == 'L') || (c3 == 'l'))) TCL_flag = 1; if (((c1 == 'T') || (c1 == 't')) && ((c2 == 'K') || (c2 == 'k'))) TCL_flag = 1; if (((c1 == 'M') || (c1 == 'm')) /* MACSYMA, MAXIMA {\hfill} */ && ((c2 == 'A') || (c2 == 'a')) && ((c3 == 'C') || (c3 == 'c'))) MAC_flag = 1; if (((c1 == 'M') || (c1 == 'm')) && ((c2 == 'A') || (c2 == 'a')) && ((c3 == 'X') || (c3 == 'x'))) MAC_flag = 1; if (((c1 == 'M') || (c1 == 'm')) /* MAPLE {\hfill} */ && ((c2 == 'A') || (c2 == 'a')) && ((c3 == 'P') || (c3 == 'p'))) MAP_flag = 1; if (((c1 == 'M') || (c1 == 'm')) && ((c2 == 'P') || (c2 == 'p')) && ((c3 == 'L') || (c3 == 'l'))) MAP_flag = 1; if (((c1 == 'M') || (c1 == 'm')) /* MATHEMATICA {\hfill} */ && ((c2 == 'A') || (c2 == 'a')) && ((c3 == 'T') || (c3 == 't'))) MAT_flag = 1; if (((c1 == 'M') || (c1 == 'm')) && ((c2 == 'M') || (c2 == 'm')) && ((c3 == 'A') || (c3 == 'a'))) MAT_flag = 1; if (((c1 == 'M') || (c1 == 'm')) /* MATLAB, OCTAVE {\hfill} */ && ((c2 == 'L') || (c2 == 'l'))) MLAB_flag = 1; if (((c1 == 'M') || (c1 == 'm')) && ((c2 == 'T') || (c2 == 't')) && ((c3 == 'L') || (c3 == 'l'))) MLAB_flag = 1; if (((c1 == 'O') || (c1 == 'o')) && ((c2 == 'C') || (c2 == 'c')) && ((c3 == 'T') || (c3 == 't'))) MLAB_flag = 1; if (((c1 == 'M') || (c1 == 'm')) /* MuPAD {\hfill} */ && ((c2 == 'U') || (c2 == 'u'))) MPAD_flag = 1; if (((c1 == 'R') || (c1 == 'r')) /* REDUCE {\hfill} */ && ((c2 == 'E') || (c2 == 'e')) && ((c3 == 'D') || (c3 == 'd'))) RED_flag = 1; if (((c1 == 'R') || (c1 == 'r')) && ((c2 == 'D') || (c2 == 'd')) && ((c3 == 'C') || (c3 == 'c'))) RED_flag = 1; if ((c1 == 'M') || (c1 == 'm')) /* M-file {\hfill} */ M_flag = 1; } #ifdef DEBUGGING printf("init_lang_flag():\n"); printf("TXT_flag =%d\n", TXT_flag); printf("BAS_flag =%d\n", BAS_flag); printf("C_flag =%d\n", C_flag); printf("CBL_flag =%d\n", CBL_flag); printf("F77_flag =%d\n", F77_flag); printf("HTML_flag =%d\n", HTML_flag); printf("JAVA_flag =%d\n", JAVA_flag); printf("LISP_flag =%d\n", LISP_flag); printf("MAKE_flag =%d\n", MAKE_flag); printf("PAS_flag =%d\n", PAS_flag); printf("PERL_flag =%d\n", PERL_flag); printf("SH_flag =%d\n", SH_flag); printf("TCL_flag =%d\n", TCL_flag); printf("ASR_flag =%d\n", ASR_flag); printf("MAC_flag =%d\n", MAC_flag); printf("MAP_flag =%d\n", MAP_flag); printf("MAT_flag =%d\n", MAT_flag); printf("MLAB_flag =%d\n", MLAB_flag); printf("MPAD_flag =%d\n", MPAD_flag); printf("RED_flag =%d\n", RED_flag); printf("M_flag =%d\n", M_flag); #endif } /* {\hrulefill\ set language flags\ \hrulefill} */ /* {\null If no language flags are set to 1, then {\tt set\_lang\_flag()} tries to determine language type by reading input source program carefully. And also, {\tt set\_lang\_flag()} decides whether or not the user knows the grammar of TeX. \hfill} */ void set_lang_flag(buf_ptr) int *buf_ptr; { char *cptr; int flag, max_flag = 0; /* plain text file? or src2tex format file? {\hfill} */ /* If all language flags are still equal to 0, then they are {\hfill} */ /* determined by searching reserved words of each language. {\hfill} */ if (TXT_flag == 0) set_txt_flag(buf_ptr); flag = BAS_flag; flag += C_flag; flag += CBL_flag; flag += F77_flag; flag += HTML_flag; flag += JAVA_flag; flag += LISP_flag; flag += MAKE_flag; flag += PAS_flag; flag += PERL_flag; flag += SH_flag; flag += TCL_flag; flag += ASR_flag; flag += MAP_flag; flag += MAC_flag; flag += MAT_flag; flag += MLAB_flag; flag += MPAD_flag; flag += RED_flag; flag += TXT_flag; /* {\ set language flags and max\_flag \hfill} */ if (flag == 0) { #ifdef LATEX fprintf(stderr,"src2latex: "); #else fprintf(stderr,"src2tex: "); #endif fprintf(stderr, "trying to identify language "); set_bas_flag(buf_ptr); fprintf(stderr, "."); if (BAS_flag > max_flag) max_flag = BAS_flag; set_c_flag(buf_ptr); fprintf(stderr, "."); if (C_flag > max_flag) max_flag = C_flag; set_cbl_flag(buf_ptr); fprintf(stderr, "."); if (CBL_flag > max_flag) max_flag = CBL_flag; set_f77_flag(buf_ptr); fprintf(stderr, "."); if (F77_flag > max_flag) max_flag = F77_flag; set_html_flag(buf_ptr); fprintf(stderr, "."); if (HTML_flag > max_flag) max_flag = HTML_flag; set_java_flag(buf_ptr); fprintf(stderr, "."); if (JAVA_flag > max_flag) max_flag = JAVA_flag; set_lisp_flag(buf_ptr); fprintf(stderr, "."); if (LISP_flag > max_flag) max_flag = LISP_flag; set_make_flag(buf_ptr); fprintf(stderr, "."); if (MAKE_flag > max_flag) max_flag = MAKE_flag; set_pas_flag(buf_ptr); fprintf(stderr, "."); if (PAS_flag > max_flag) max_flag = PAS_flag; set_perl_flag(buf_ptr); fprintf(stderr, "."); if (PERL_flag > max_flag) max_flag = PERL_flag; set_shell_flag(buf_ptr); fprintf(stderr, "."); if (SH_flag > max_flag) max_flag = SH_flag; set_tcl_flag(buf_ptr); fprintf(stderr, "."); if (TCL_flag > max_flag) max_flag = TCL_flag; set_asr_flag(buf_ptr); fprintf(stderr, "."); if (ASR_flag > max_flag) max_flag = ASR_flag; set_mac_flag(buf_ptr); fprintf(stderr, "."); if (MAC_flag > max_flag) max_flag = MAC_flag; set_map_flag(buf_ptr); fprintf(stderr, "."); if (MAP_flag > max_flag) max_flag = MAP_flag; set_mat_flag(buf_ptr); fprintf(stderr, "."); if (MAT_flag > max_flag) max_flag = MAT_flag; set_mlab_flag(buf_ptr); fprintf(stderr, "."); if (MLAB_flag > max_flag) max_flag = MLAB_flag; set_mpad_flag(buf_ptr); fprintf(stderr, "."); if (MPAD_flag > max_flag) max_flag = MPAD_flag; set_red_flag(buf_ptr); fprintf(stderr, "."); if (RED_flag > max_flag) max_flag = RED_flag; fprintf(stderr, " done\n"); /* {\ normalize language flags \hfill} */ if (BAS_flag == max_flag) BAS_flag = 1; else BAS_flag = 0; if (C_flag == max_flag) C_flag = 1; else C_flag = 0; if (CBL_flag == max_flag) CBL_flag = 1; else CBL_flag = 0; if (F77_flag == max_flag) F77_flag = 1; else F77_flag = 0; if (HTML_flag == max_flag) HTML_flag = 1; else HTML_flag = 0; if (JAVA_flag == max_flag) JAVA_flag = 1; else JAVA_flag = 0; if (LISP_flag == max_flag) LISP_flag = 1; else LISP_flag = 0; if (MAKE_flag == max_flag) MAKE_flag = 1; else MAKE_flag = 0; if (PAS_flag == max_flag) PAS_flag = 1; else PAS_flag = 0; if (PERL_flag == max_flag) PERL_flag = 1; else PERL_flag = 0; if (SH_flag == max_flag) SH_flag = 1; else SH_flag = 0; if (TCL_flag == max_flag) TCL_flag = 1; else TCL_flag = 0; if (ASR_flag == max_flag) ASR_flag = 1; else ASR_flag = 0; if (MAC_flag == max_flag) MAC_flag = 1; else MAC_flag = 0; if (MAP_flag == max_flag) MAP_flag = 1; else MAP_flag = 0; if (MAT_flag == max_flag) MAT_flag = 1; else MAT_flag = 0; if (MLAB_flag == max_flag) MLAB_flag = 1; else MLAB_flag = 0; if (MPAD_flag == max_flag) MPAD_flag = 1; else MPAD_flag = 0; if (RED_flag == max_flag) RED_flag = 1; else RED_flag = 0; } /* {\ If sum of all language flags $> 1$, \hfill} */ /* {\ i.e., if we cannot identify language type, then we reset all language flags to 0. \hfill} */ flag = BAS_flag; flag += C_flag; flag += CBL_flag; flag += F77_flag; flag += HTML_flag; flag += JAVA_flag; flag += LISP_flag; flag += MAKE_flag; flag += PAS_flag; flag += PERL_flag; flag += SH_flag; flag += TCL_flag; flag += ASR_flag; flag += MAC_flag; flag += MAP_flag; flag += MAT_flag; flag += MLAB_flag; flag += MPAD_flag; flag += RED_flag; if (flag > 1) { BAS_flag = 0; C_flag = 0; CBL_flag = 0; F77_flag = 0; HTML_flag = 0; JAVA_flag = 0; LISP_flag = 0; MAKE_flag = 0; PAS_flag = 0; PERL_flag = 0; SH_flag = 0; TCL_flag = 0; ASR_flag = 0; MAC_flag = 0; MAP_flag = 0; MAT_flag = 0; MLAB_flag = 0; MPAD_flag = 0; RED_flag = 0; } /* {\ Here, we simply identify ASIR with C ; actually, we don't use {\tt ASR\_flag} in {\sl\ text2tex.c\/\ } file \hfill} */ C_flag += ASR_flag; #ifdef DEBUGGING printf("set_lang_flag():\n"); printf("TXT_flag =%d\n", TXT_flag); printf("BAS_flag =%d\n", BAS_flag); printf("C_flag =%d\n", C_flag); printf("CBL_flag =%d\n", CBL_flag); printf("F77_flag =%d\n", F77_flag); printf("HTML_flag =%d\n", HTML_flag); printf("JAVA_flag =%d\n", JAVA_flag); printf("LISP_flag =%d\n", LISP_flag); printf("MAKE_flag =%d\n", MAKE_flag); printf("PAS_flag =%d\n", PAS_flag); printf("PERL_flag =%d\n", PERL_flag); printf("SH_flag =%d\n", SH_flag); printf("TCL_flag =%d\n", TCL_flag); printf("ASR_flag =%d\n", ASR_flag); printf("MAC_flag =%d\n", MAC_flag); printf("MAP_flag =%d\n", MAP_flag); printf("MAT_flag =%d\n", MAT_flag); printf("MLAB_flag =%d\n", MLAB_flag); printf("MPAD_flag =%d\n", MPAD_flag); printf("RED_flag =%d\n", RED_flag); #endif /* {\ display title, version and conversion type \hfill} */ #ifdef LATEX fprintf(stderr,"src2latex: version "); #else fprintf(stderr,"src2tex: version "); #endif fprintf(stderr,VERSION); #ifdef LATEX cptr = "(TEXT->LaTeX)"; if (BAS_flag != 0) cptr = "(BASIC->LaTeX)"; if (C_flag != 0) cptr = "(C,C++,OBJECTIVE-C->LaTeX)"; if (CBL_flag != 0) cptr = "(COBOL->LaTeX)"; if (HTML_flag != 0) cptr = "(HTML->LaTeX)"; if (JAVA_flag != 0) cptr = "(JAVA->LaTeX)"; if (LISP_flag != 0) cptr = "(LISP,SCHEME->LaTeX)"; if (MAKE_flag != 0) cptr = "(MAKE->LaTeX)"; if (F77_flag != 0) cptr = "(FORTRAN->LaTeX)"; if (PAS_flag != 0) cptr = "(PASCAL->LaTeX)"; if (PERL_flag != 0) cptr = "(PERL->LaTeX)"; if (SH_flag != 0) cptr = "(SHELL->LaTeX)"; if (TCL_flag != 0) cptr = "(TCL/TK->LaTeX)"; if (ASR_flag != 0) cptr = "(ASIR->LaTeX)"; if (MAC_flag != 0) cptr = "(MACSYMA,MAXIMA->LaTeX)"; if (MAP_flag != 0) cptr = "(MAPLE->LaTeX)"; if (MAT_flag != 0) cptr = "(MATHEMATICA->LaTeX)"; if (MLAB_flag != 0) cptr = "(MATLAB,OCTAVE->LaTeX)"; if (MPAD_flag != 0) cptr = "(MuPAD->LaTeX)"; if (RED_flag != 0) cptr = "(REDUCE->LaTeX)"; #else cptr = "(TEXT->TeX)"; if (BAS_flag != 0) cptr = "(BASIC->TeX)"; if (C_flag != 0) cptr = "(C,C++,OBJECTIVE-C->TeX)"; if (CBL_flag != 0) cptr = "(COBOL->TeX)"; if (HTML_flag != 0) cptr = "(HTML->TeX)"; if (JAVA_flag != 0) cptr = "(JAVA->TeX)"; if (LISP_flag != 0) cptr = "(LISP,SCHEME->TeX)"; if (MAKE_flag != 0) cptr = "(MAKE->TeX)"; if (F77_flag != 0) cptr = "(FORTRAN->TeX)"; if (PAS_flag != 0) cptr = "(PASCAL->TeX)"; if (PERL_flag != 0) cptr = "(PERL->TeX)"; if (SH_flag != 0) cptr = "(SHELL->TeX)"; if (TCL_flag != 0) cptr = "(TCL/TK->TeX)"; if (ASR_flag != 0) cptr = "(ASIR->TeX)"; if (MAC_flag != 0) cptr = "(MACSYMA,MAXIMA->TeX)"; if (MAP_flag != 0) cptr = "(MAPLE->TeX)"; if (MAT_flag != 0) cptr = "(MATHEMATICA->TeX)"; if (MLAB_flag != 0) cptr = "(MATLAB,OCTAVE->TeX)"; if (MPAD_flag != 0) cptr = "(MuPAD->TeX)"; if (RED_flag != 0) cptr = "(REDUCE->TeX)"; #endif fprintf(stderr," %s \n", cptr); } src2tex-2.12h.orig/langflag.c.ps100644 1750 1750 757446 6266067261 16524 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: langflag.c.dvi %%Pages: 40 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 123 /f0 NF f0 SF [ 24 23 -1 0 24.906] 65 D [ 24 23 -1 0 23.522] 66 D [<00FC000382000E01001C0080380040380040780020700020F00020F00000F00000F00000F00000F00000F000207000207800 203800603800601C00E00E01E003826000FC20> 24 23 -2 0 23.984] 67 D [ 24 23 -1 0 25.367] 68 D [ 24 23 -1 0 22.600] 69 D [ 24 23 -1 0 21.678] 70 D [ 24 23 -1 0 24.906] 72 D [ 16 23 0 0 11.992] 73 D [<3E004300C180E1C0E1C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF8> 16 23 -2 0 17.065] 74 D [ 24 23 -1 0 25.829] 75 D [ 24 23 -1 0 20.755] 76 D [ 32 23 -1 0 30.441] 77 D [ 24 23 -1 0 24.906] 78 D [<01FC000707000E03801C01C03800E03800E07800F0700070F00078F00078F00078F00078F00078F00078F000787000707800 F03800E03800E01C01C00E038007070001FC00> 24 23 -2 0 25.829] 79 D [ 24 23 -1 0 22.600] 80 D [ 24 23 -1 0 24.445] 82 D [<8F80F060C030C01080188018801800180038007003F01FE03FC07E00F000E000C010C010C0104030603030F01F10> 16 23 -2 0 18.449] 83 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<007C000183000700800E00400C00401C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00 201C00201C00201C00201C00201C0070FF81FC> 24 23 -1 0 24.906] 85 D [<00300000300000300000780000780000FC0000E40000E40001C20001C20001C2000381000381000381000700800700800F00 400E00400E00401C00201C00203C0070FF81FC> 24 23 -1 0 24.906] 86 D [ 24 23 -1 0 24.906] 88 D [<00FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00003E00003A0000710000F10000E08001E08001C0 400380400780200700200F00101E0038FFC07F> 24 23 0 0 24.906] 89 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [<78EEE6470707070707070707070707070707073F0000000000060F0F06> 8 29 2 6 10.147] 106 D [ 24 23 0 0 17.527] 107 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [<00FF80001C00001C00001C00001C00001C00079C00185C00303C00701C00601C00E01C00E01C00E01C00E01C00601C00701C 00303C001C6C00078400> 24 20 -1 6 17.526] 113 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [ 16 14 -1 0 14.759] 122 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<07FC00E000E000E000E000E0FFFCC0E040E020E030E010E008E004E004E002E001E001E000E000600060> 16 21 -1 0 16.604] 52 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<04000E000E000E000E000E0006000600060002000300010001000080004080408020C0107FF87FF87FFC4000> 16 22 -2 0 16.604] 55 D [<0FC038306018C008C00CC00CC01C603C607831F00FE00F801FC03C307810601860186018203018600FC0> 16 21 -1 0 16.604] 56 D [<1F0020C060607030703000380018001C0F9C185C303C603CE01CE01CE01CE018E0186038303018600F80> 16 21 -1 0 16.604] 57 D [<0C001E001E000C0000000000000000000400040004000400040006000300038001C040E0E0E0E0E080E061C01F00> 16 23 -2 0 15.682] 63 D [<40402020101070F0F060> 8 10 -2 -13 9.224] 39 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<060006000600C630E6703FC00F000F003FC0E670C630060006000600> 16 14 -2 -11 16.604] 42 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [ 16 33 -2 8 16.604] 47 D [<40402020101070F0F06000000000000060F0F060> 8 20 -2 6 9.224] 59 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D [<00FF000701E008003810000020F0E0218D904307884703888603888E03888E03888E03888E03888E03888603884703904304 10218C2020F02010004008008007070000F800> 24 23 -2 0 25.829] 64 D [ 24 23 0 0 18.449] 12 D [ 24 23 0 0 18.449] 13 D [ 32 23 0 0 27.673] 14 D [<40804080204020401020102070E0F1E0F1E060C0> 16 10 -1 -13 16.604] 34 D [ 8 2 0 -6 11.069] 45 D 1.000 63 /f1 NF f1 SF [ 24 20 -3 2 25.829] 62 D 1.000 123 /f2 NF f2 SF [<00100030003000600060006000C000C000C00180018001800300030003000600060006000C000C000C001800180018003000 30003000600060006000C000C000C000> 16 33 -2 8 16.604] 110 D [<60F0F060> 8 4 -2 -6 9.224] 1 D [<00F001800300060006000600060006000600060006000600060006000C001800F00018000C00060006000600060006000600 060006000600060006000300018000F0> 16 33 -2 8 16.604] 102 D [<0C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C00FFC0FFC00C000C000C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 121 D [<0C000C000C000C000C000C00FFC0FFC00C000C000C000C000C000C0000000C000C000C000C000C000C00FFC0FFC00C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 122 D 1.000 111 /f3 NF f3 SF [<0038007800E001C0038007000700070007000700070007000700070007000700070007000700070007000700070007000E00 0E001C007800E000E00078001C000E000E000700070007000700070007000700070007000700070007000700070007000700 070007000700038001C000E000780038> 16 58 -4 57 22.139] 110 D [<0007000F001E0038007000E000E001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C0 01C001C001C001C001C001C001C00380038007000E001C003800F000F00038001C000E0007000380038001C001C001C001C0 01C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C000E000E000700038 001E000F0007> 16 78 -4 77 24.906] 26 D 1.000 127 /f4 NF f4 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 66 D [<07C00FE01C303838701C701C601CE000E000E000E000E000E000601C701C701C383C1C7C0FFC07CC> 16 20 -1 0 17.434] 67 D [ 16 20 -1 0 17.434] 68 D [ 16 20 -1 0 17.434] 69 D [ 16 20 -1 0 17.434] 70 D [<07B80FF81878387870387038E038E038E0FCE0FCE000E000E000E03870387038387818780FF80798> 16 20 -1 0 17.434] 71 D [ 16 20 -1 0 17.434] 72 D [ 16 20 -3 0 17.434] 73 D [<3E007F00E180E1C041C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF01FF0> 16 20 -2 0 17.434] 74 D [ 16 20 -1 0 17.434] 75 D [ 16 20 -1 0 17.434] 76 D [ 16 20 -1 0 17.434] 77 D [ 16 20 -1 0 17.434] 78 D [<3FC07FE070E0E070E070E070E070E070E070E070E070E070E070E070E070E070E07070E07FE03FC0> 16 20 -2 0 17.434] 79 D [ 16 20 -1 0 17.434] 80 D [ 16 20 -1 0 17.434] 82 D [ 16 20 -2 0 17.434] 83 D [<1FF01FF00380038003800380038003800380038003800380038003800380E39CE39CE39CFFFC7FFC> 16 20 -1 0 17.434] 84 D [<03C007E00C301C38381C381C381C381C381C381C381C381C381C381C381C381C381C381CFE7FFE7F> 16 20 0 0 17.434] 85 D [<0780078007800CC00CC00CC00CC00CC01CE01CE01CE01CE01CE038703870387038707878FCFCFCFC> 16 20 -1 0 17.434] 86 D [<3CF03CF03CF034B034B03CF03FF07FF87FF87FF87FF87FF8703870387038703870387038F87CF87C> 16 20 -1 0 17.434] 87 D [ 16 20 -1 0 17.434] 88 D [<0FE00FE0038003800380038003800380038007C007C00EC00EE00CE01CE01C7038703870FCFCFCFC> 16 20 -1 0 17.434] 89 D [ 16 20 -2 0 17.434] 90 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [<7E00FF00E38041C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C03FC03FC00000000000000180 03C003C00180> 16 28 -2 7 17.434] 106 D [ 16 20 -1 0 17.434] 107 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [<00FE00FE003800380038003800380FB81FF8387870786038E038E038E038E0386038707838781FF807B8> 16 21 -1 7 17.434] 113 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<078007800FC00CC00CC00CC01CE01CE01CE01CE038703870FCFCFCFC> 16 14 -1 0 17.434] 118 D [<18E03DF03DF035B035B035B037B037B03030703870387038FFFCFFFC> 16 14 -1 0 17.434] 119 D [ 16 14 -1 0 17.434] 120 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [ 16 14 -1 0 17.434] 122 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0FC03FE07070E038E01C401C001C001C0038007007E007E00070003000382038703870703FE00FC0> 16 20 -1 0 17.434] 51 D [<07FC07FC00E000E000E000E0FFFCFFFCE0E070E030E038E018E01CE00CE006E006E002E003E001E0> 16 20 -1 0 17.434] 52 D [<1F003F8071C0E0E0E070E07040700070006060E07FC07F007000700070007000700070007FE07FE0> 16 20 -2 0 17.434] 53 D [<07C01FE038707038701C601CE01CE01CE01CF038F870EFE0E7C070007000303838381E3807F003E0> 16 20 -1 0 17.434] 54 D [<04000E000E000E000E000E0006000700070007000380038001C001C000E00060E070E038FFFCFFFCE000> 16 21 -1 0 17.434] 55 D [<0FC03FF078787038E01CE01CE01CE01C7038387007800FC03870703870387038703838701FE00FC0> 16 20 -1 0 17.434] 56 D [<1F003FC070E07070703000380018001C0F9C1FFC387C703CE01CE01CE018E038703838701FE00F80> 16 20 -1 0 17.434] 57 D [<0200060006001F003FC076E0E620E630E6304630067006E00FC03F807F007600C620C670C670467076E03FC00F8006000600 0200> 16 26 -2 3 17.434] 36 D [<3C707FF8679CE39CE788EFC0EFC07DC03CE01CE03CE03E703F7C3B7C3B803B803B801B801F000E00> 16 20 -1 0 17.434] 38 D [<0C001E001E000C0000000000000000000E000E000E000E00070003C001E04070E070E0F07FE01F80> 16 20 -2 0 17.434] 63 D [<60F0F0600000000070F0F0F0F0F0F0F0F0F0F060> 8 20 -6 0 17.434] 33 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<80C060303018181878F8F060> 8 12 -6 -8 17.434] 39 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<60F0F06000000000000060F0F060> 8 14 -6 0 17.434] 58 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [<03F00FFC1C1C380030E071F073B8E71CE71CE71CE71CE71CE71C73BC71FC30F838381C300FF003C0> 16 20 -1 0 17.434] 64 D [ 16 26 -6 3 17.434] 91 D [ 16 26 -1 3 17.434] 93 D [<3078F8F0C0C0C06060301808> 8 12 -5 -11 17.434] 96 D [<4080F3C0FFC03F000C00> 16 5 -3 -15 17.434] 94 D [<4600EF003DC01880> 16 4 -3 -16 17.434] 126 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00300070007000E000E001C001C001C0038003800700070007000E000E000E001C001C0038003800380070007000E000E000 C000> 16 26 -2 3 17.434] 92 D [ 8 26 -7 3 17.434] 124 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 121 /f5 NF f5 SF [<3E78E174E0E4E0F2E072E07070701E7003F000381038383038701FC0> 16 14 -2 0 16.604] 97 D [<0F80304070206010E000E000E000E00060007000301018380C3803F0> 16 14 -2 0 14.759] 99 D [<0F0030C060206010E000E000E000E0007FF07038303018300C6007C0> 16 14 -2 0 14.759] 101 D [ 16 23 -1 0 10.147] 102 D [ 16 23 -1 0 18.449] 104 D [ 8 23 -1 0 9.224] 105 D [ 16 23 -1 0 9.224] 108 D [ 16 14 -1 0 18.449] 110 D [<1F8030E06070E038E018E01CE01CE01C601C701C301C18180C3003E0> 16 14 -2 0 16.604] 111 D [ 24 20 0 6 18.449] 112 D [ 16 14 -1 0 13.006] 114 D [<9F00E180C0C0404040E001E00FC03FC03F00380030203020186007A0> 16 14 -1 0 13.099] 115 D [<3C00720072007100710071007000700070003800380038003800FF8038001C000C00040004000400> 16 20 -3 0 12.914] 116 D [ 24 14 -1 0 17.527] 120 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<60F07070> 8 4 -2 0 9.224] 46 D 1.000 123 /f6 NF f6 SF [ 24 23 -1 0 27.027] 65 D [ 24 23 -1 0 27.996] 75 D [ 24 23 -1 0 27.027] 78 D [<87C0D830E018C008800C800C800C000C001C003803F81FF03FE07F00F000E000C008C008C0084018603830580F88> 16 23 -2 0 20.294] 83 D [ 24 17 -1 0 20.368] 97 D [<01F8000E0600180100300100700080600080E00000E00000E00000E00000E000006000807000803001801803800E058001F8 80> 24 17 -1 0 19.629] 99 D [ 24 17 -1 0 20.737] 100 D [ 24 17 -1 0 20.368] 104 D [ 16 17 0 0 10.036] 105 D [ 24 17 -1 0 24.795] 109 D [ 24 17 -1 0 20.368] 110 D [<03F0000E1C00180600300300700380600180E001C0E001C0E001C0E001C0E001C06001807003803003001806000E1C0003F0 00> 24 17 -1 0 21.105] 111 D [<0FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00081C08081C08081C08081C080C1C180FFFF 80> 24 17 -1 0 19.629] 116 D [<03E0000E18001C0400180400380200380200380200380200380200380200380200380200380200380200380200380700FE0F 80> 24 17 -1 0 20.368] 117 D [ 16 17 -1 0 16.678] 122 D 1.000 121 /f7 NF f7 SF [<03F00FFC1F063C037C007800F800F800F800F800F800F800781C783E3C3E1E3E0FFC03F8> 16 18 -2 0 20.367] 99 D [<01FC000FFF001F01803E00C07C0000780000F80000F80000F80000FFFFC0FFFFC0F803C07803C07C03803C07801E0F000FFE 0003F800> 24 18 -1 0 21.004] 101 D [ 16 18 -1 0 18.873] 114 D [ 16 18 -2 0 18.076] 115 D [<03E00FF00F101F181F181F181F181F001F001F001F001F001F001F001F001F00FFF8FFF83F000F0007000700030003000300> 16 25 -1 0 17.822] 116 D [ 24 18 -1 0 24.186] 120 D [ 24 26 -2 0 22.913] 50 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f7 SF 479 151 p (src2tex)s f0 SF (*)s 45 r (version)s 10 r (2.12)s 33 r (\(Sep)s 11 r (9,)s 11 r (1996\))s f6 SF 466 230 p (Kazuo)s 13 r (Amano)s f2 SF (y)s f6 SF 12 r (and)s 13 r (Shinichi)s 13 r (Nomoto)s f2 SF (z)s f4 SF 0 349 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 468 p (/*)s 17 r 649 1 ru f0 SF 660 r (lang\015ag.c)s 11 r 649 1 ru f4 SF 666 r (*/)s 0 588 p (#include)s 17 r ()s 0 628 p (#include)s 17 r ("src2tex.h")s 0 707 p (#define)s 17 r (SkipSpaces1\(Ptr\))s 18 r (while\(\(*Ptr>'\\0'\)&&\(*Ptr<=')s 17 r ('\)\)++Ptr)s 0 747 p (#define)s 17 r (SkipSpaces2\(Ptr\))s 18 r (while\(\(*Ptr>'\\0'\)&&\(*Ptr<=')s 17 r ('\)&&\(*Ptr!='\\n'\)\)++Ptr)s 0 827 p (int)s 17 r (TXT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 401 r (/*)s f0 SF 16 r (TEXT)s 11 r (\015ag)s f4 SF 618 r (*/)s 0 867 p (int)s 17 r (BAS)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 401 r (/*)s f0 SF 16 r (BASIC)s 11 r (\015ag)s f4 SF 611 r (*/)s 0 906 p (int)s 17 r (CBL)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 401 r (/*)s f0 SF 16 r (COBOL)s 11 r (\015ag)s f4 SF 594 r (*/)s 0 946 p (int)s 17 r (C)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 436 r (/*)s f0 SF 16 r (C)s 11 r (\015ag)s f4 SF 690 r (*/)s 0 986 p (int)s 17 r (F77)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 401 r (/*)s f0 SF 16 r (FOR)s -2 r (TRAN)s 10 r (\015ag)s f4 SF 547 r (*/)s 0 1026 p (int)s 17 r (HTML)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 383 r (/*)s f0 SF 17 r (HTML)s 11 r (\015ag)s f4 SF 613 r (*/)s 0 1066 p (int)s 17 r (JAVA)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 383 r (/*)s f0 SF 17 r (JA)s -3 r (V)s -3 r (A)s 10 r (\015ag)s f4 SF 629 r (*/)s 0 1106 p (int)s 17 r (LISP)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 383 r (/*)s f0 SF 17 r (LISP)s 11 r (\015ag)s f4 SF 640 r (*/)s 0 1146 p (int)s 17 r (MAKE)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 383 r (/*)s f0 SF 17 r (MAKE)s 11 r (\015ag)s f4 SF 610 r (*/)s 0 1185 p (int)s 17 r (PAS)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 401 r (/*)s f0 SF 16 r (P)s -1 r (ASCAL)s 10 r (\015ag)s f4 SF 580 r (*/)s 0 1225 p (int)s 17 r (PERL)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 383 r (/*)s f0 SF 17 r (PERL)s 11 r (\015ag)s f4 SF 623 r (*/)s 0 1265 p (int)s 17 r (SH)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 r (/*)s f0 SF 17 r (SHELL)s 11 r (\015ag)s f4 SF 606 r (*/)s 0 1305 p (int)s 17 r (TCL)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 401 r (/*)s f0 SF 16 r (TCL/TK)s 11 r (\015ag)s f4 SF 579 r (*/)s 0 1385 p (int)s 17 r (ASR)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 401 r (/*)s f0 SF 16 r (ASIR)s 11 r (\015ag)s f4 SF 634 r (*/)s 0 1425 p (int)s 17 r (MAC)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 401 r (/*)s f0 SF 16 r (MACSYMA)s 11 r (\015ag)s f4 SF 536 r (*/)s 0 1464 p (int)s 17 r (MAP)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 401 r (/*)s f0 SF 16 r (MAPLE)s 11 r (\015ag)s f4 SF 593 r (*/)s 0 1504 p (int)s 17 r (MAT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 401 r (/*)s f0 SF 16 r (MA)s -1 r (THEMA)s -3 r (TICA)s 10 r (\015ag)s f4 SF 452 r (*/)s 0 1544 p (int)s 17 r (MLAB)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 383 r (/*)s f0 SF 17 r (MA)s -2 r (TLAB)s 10 r (\015ag)s f4 SF 568 r (*/)s 0 1584 p (int)s 17 r (MPAD)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 383 r (/*)s f0 SF 17 r (MuP)s -2 r (AD)s 10 r (\015ag)s f4 SF 595 r (*/)s 0 1624 p (int)s 17 r (RED)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 401 r (/*)s f0 SF 16 r (REDUCE)s 11 r (\015ag)s f4 SF 570 r (*/)s 0 1703 p (int)s 17 r (M)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 436 r (/*)s f0 SF 16 r (M-\014le)s 11 r (\015ag)s f4 SF 630 r (*/)s 0 1823 p (/*)s 17 r 544 1 ru f0 SF 554 r (search)s 11 r (a)s 11 r (phrase)s 11 r (globally)s 11 r 544 1 ru f4 SF 560 r (*/)s 0 1860 p 480 1 ru f0 SF 33 1897 p (*)s 17 r (Permission)s 8 r (to)s 9 r (use,)s 10 r (copy)s -3 r (,)s 9 r (and)s 9 r (mo)s 1 r (dify)s 9 r (this)s 10 r (softw)s -1 r (are)s 8 r (and)s 9 r (its)s 10 r (do)s 1 r (cumentation)s 8 r (is)s 9 r (granted)s 9 r (under)s 9 r (no)s 9 r (conditions.)s 0 1937 p (How)s -1 r (ev)s -1 r (er,)s 11 r (the)s 12 r (authors)s 11 r (would)s 11 r (b)s 1 r (e)s 12 r (very)s 11 r (happy)s 10 r (if)s 12 r (users)s 12 r (could)s 11 r (inform)s 12 r (any)s 11 r (mo)s 1 r (di\014cations)s 12 r (to)s 11 r (k)s -1 r (amano@tansei.cc.u-)s 0 1977 p (tokyo.ac.jp.)s 14 r (Since)s 11 r (src2tex)s 11 r (is)s 11 r (a)s 11 r (free)s 11 r (softw)s -1 r (are,)s 10 r (there)s 11 r (is)s 12 r (no)s 11 r (warran)s -1 r (t)s -1 r (y)s 10 r (of)s 11 r (any)s 10 r (kind)s 11 r (for)s 11 r (the)s 11 r (program.)s f2 SF 33 2016 p (y)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -3 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -1 r (AN)s 10 r (\(k)s -1 r (amano@)s 0 2056 p (p)s 1 r (o.iijnet.or.jp\))s f2 SF 33 2096 p (z)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -2 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -2 r (AN)s 11 r (\(m93093@)s 0 2136 p (crescent.josai.ac.jp\))s 1263 2216 p (lang\015ag.c)s 66 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 0 33 p (/*)s f0 SF 17 r (This)s 11 r (function)s f4 SF 11 r (search)s 2 r 10 1 ru 10 r (phrase\(buf)s 2 r 10 1 ru 11 r (ptr,)s 17 r (char)s 2 r 10 1 ru 11 r (ptr\))s f0 SF 11 r (searches)s 10 r (the)s 11 r (area)s f4 SF 66 73 p (buf)s 3 r 10 1 ru 10 r (ptr+0,)s 17 r (buf)s 2 r 10 1 ru 11 r (ptr+1)s f0 SF (,)s f2 SF 11 r (\001)s 6 r (\001)s 5 r (\001)s f0 SF (,)s f4 SF 11 r (buf)s 2 r 10 1 ru 11 r (ptr+\(int\)\(BUFFER)s 2 r 10 1 ru 10 r (SIZE/2\)-1)s f0 SF 0 114 p (and)s 14 r (tries)s 13 r (to)s 14 r (\014nd)s 13 r (a)s 14 r (phrase)s 14 r (stored)s 13 r (at)s f4 SF 14 r (char)s 2 r 10 1 ru 10 r (ptr)s f0 SF (=")s f5 SF (phrase)s f0 SF (".)s 23 r (It)s 13 r (returns)s 14 r (the)s 13 r (following)s 13 r (v)s -1 r (alues)s 13 r (according)s 13 r (to)s 14 r (the)s 0 154 p (result)s 11 r (of)s 11 r (search.)s f4 SF 72 194 p (search)s 2 r 10 1 ru 11 r (phrase)s f0 SF (\(\))s 9 r (=)s f3 SF 364 157 p (n)s f0 SF 391 177 p (1)s 34 r (if)s 11 r (given)s 10 r (phrase)s 11 r (exists)s 391 217 p (0)s 34 r (otherwise)s 0 244 p (The)s 11 r (automatic)s 11 r (language)s 11 r (identi\014cation)s 10 r (mechanism)s 11 r (essentially)s 10 r (dep)s 1 r (ends)s 11 r (on)s 11 r (this)s 11 r (function.)s f4 SF 264 r (*/)s 0 324 p (int)s 17 r (search)s 3 r 10 1 ru 15 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r (char)s 2 r 10 1 ru 15 r (ptr\))s 0 365 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 405 p (char)s 17 r (*char)s 3 r 10 1 ru 15 r (ptr;)s 0 445 p ({)s 70 485 p (char)s 17 r (*c)s 2 r 10 1 ru 16 r (ptr,)s 17 r (c;)s 70 526 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr1,)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr2,)s 17 r (flag;)s 70 606 p (b)s 2 r 10 1 ru 15 r (ptr1)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 70 646 p (flag)s 17 r (=)s 18 r (1;)s 70 687 p (while)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr1)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 17 r (+)s 18 r (\(int\))s 17 r (\(BUFFER)s 2 r 10 1 ru 16 r (SIZE)s 17 r (/)s 18 r (2\)\))s 105 727 p ({)s 174 767 p (b)s 2 r 10 1 ru 16 r (ptr2)s 17 r (=)s 18 r (b)s 2 r 10 1 ru 15 r (ptr1;)s 174 807 p (SkipSpaces1\(b)s 2 r 10 1 ru 16 r (ptr2\);)s 174 848 p (c)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 18 r (char)s 2 r 10 1 ru 15 r (ptr;)s 174 888 p (SkipSpaces1\(c)s 2 r 10 1 ru 16 r (ptr\);)s 174 928 p (while)s 18 r (\(*c)s 2 r 10 1 ru 15 r (ptr)s 18 r (!=)s 17 r ('\\0'\))s 209 968 p ({)s 279 1009 p (c)s 17 r (=)s 18 r (\(char\)*b)s 2 r 10 1 ru 15 r (ptr2;)s 279 1049 p (if)s 17 r (\(\(c)s 18 r (>=)s 17 r ('A'\))s 18 r (&&)s 17 r (\(c)s 18 r (<=)s 17 r ('Z'\)\))s 52 r (/*)s f0 SF 17 r (upp)s 1 r (er)s 16 r (case)s f4 SF 17 r (->)s f0 SF 17 r (low)s -1 r (er)s 15 r (case)s f4 SF 17 r (*/)s 349 1089 p (c)s 17 r (+=)s 18 r (0x20;)s 279 1129 p (flag)s 17 r (=)s 18 r (c)s 17 r (-)s 18 r (*c)s 2 r 10 1 ru 15 r (ptr;)s 279 1170 p (if)s 17 r (\(flag)s 18 r (!=)s 17 r (0\))s 349 1210 p (break;)s 279 1250 p (++b)s 2 r 10 1 ru 15 r (ptr2;)s 279 1291 p (SkipSpaces1\(b)s 2 r 10 1 ru 15 r (ptr2\);)s 279 1331 p (++c)s 2 r 10 1 ru 15 r (ptr;)s 279 1371 p (SkipSpaces1\(c)s 2 r 10 1 ru 15 r (ptr\);)s 209 1411 p (})s 174 1452 p (if)s 18 r (\(flag)s 17 r (==)s 18 r (0\))s 244 1492 p (break;)s 174 1532 p (++b)s 2 r 10 1 ru 16 r (ptr1;)s 105 1572 p (})s 0 1613 p (#ifdef)s 17 r (DEBUGGING)s 70 1653 p (if)s 17 r (\(flag)s 18 r (==)s 17 r (0\))s 105 1693 p (printf\("search)s 2 r 10 1 ru 15 r (phrase\(\):)s 18 r (phrase)s 17 r (\\"%s\\")s 17 r (exists\\n",)s 18 r (char)s 2 r 10 1 ru 15 r (ptr\);)s 70 1733 p (else)s 105 1774 p (printf\("search)s 2 r 10 1 ru 15 r (phrase\(\):)s 18 r (phrase)s 17 r (\\"%s\\")s 17 r (is)s 18 r (not)s 17 r (found\\n",)s 18 r (char)s 2 r 10 1 ru 15 r (ptr\);)s 0 1814 p (#endif)s 70 1854 p (if)s 17 r (\(flag)s 18 r (==)s 17 r (0\))s 105 1894 p (return)s 17 r (1;)s 70 1935 p (else)s 105 1975 p (return)s 17 r (0;)s 0 2015 p (})s 0 2136 p (/*)s 17 r 520 1 ru f0 SF 530 r (search)s 10 r (two)s 10 r (phrases)s 11 r (globally)s 11 r 520 1 ru f4 SF 536 r (*/)s f0 SF 1263 2216 p (lang\015ag.c)s 66 r (page)s 11 r (2)s EP pstopssaved restore %%Page: pstops 3 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 0 33 p (/*)s f0 SF 17 r (This)s 11 r (function)s f4 SF 11 r (search)s 2 r 10 1 ru 10 r (two)s 2 r 10 1 ru 11 r (phrases\(buf)s 2 r 10 1 ru 10 r (ptr,)s 18 r (char)s 2 r 10 1 ru 10 r (ptr1,)s 18 r (char)s 2 r 10 1 ru 10 r (ptr2\))s f0 SF 11 r (searches)s 11 r (the)s 11 r (area)s f4 SF 66 73 p (buf)s 3 r 10 1 ru 10 r (ptr+0,)s 17 r (buf)s 2 r 10 1 ru 11 r (ptr+1)s f0 SF (,)s f2 SF 11 r (\001)s 6 r (\001)s 5 r (\001)s f0 SF (,)s f4 SF 11 r (buf)s 2 r 10 1 ru 11 r (ptr+\(int\)\(BUFFER)s 2 r 10 1 ru 10 r (SIZE/2\)-1)s f0 SF 0 113 p (and)s 12 r (tries)s 12 r (to)s 12 r (\014nd)s 11 r (a)s 12 r (pair)s 12 r (of)s 12 r (phrases)s 12 r (stored)s 12 r (at)s f4 SF 23 r (char)s 2 r 10 1 ru 11 r (ptr1)s f0 SF (=")s f5 SF (phrase1)s f0 SF (",)s f4 SF 24 r (char)s 2 r 10 1 ru 10 r (ptr2)s f0 SF (=")s f5 SF (phrase2)s f0 SF (".)s 17 r (It)s 12 r (returns)s 12 r (the)s 0 153 p (following)s 10 r (v)s -1 r (alues)s 10 r (according)s 11 r (to)s 12 r (the)s 11 r (result)s 11 r (of)s 11 r (search.)s f4 SF 72 203 p (search)s 2 r 10 1 ru 11 r (two)s 2 r 10 1 ru 10 r (phrases)s f0 SF (\(\))s 9 r (=)s f3 SF 446 166 p (n)s f0 SF 474 186 p (1)s 33 r (if)s 11 r (given)s 10 r (phrases)s 11 r (exist)s 474 226 p (0)s 33 r (otherwise)s 0 253 p (The)s 11 r (automatic)s 11 r (language)s 11 r (identi\014cation)s 10 r (mechanism)s 11 r (essentially)s 10 r (dep)s 1 r (ends)s 11 r (on)s 11 r (this)s 11 r (function.)s f4 SF 264 r (*/)s 0 333 p (int)s 17 r (search)s 3 r 10 1 ru 15 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r (char)s 2 r 10 1 ru 16 r (ptr1,)s 17 r (char)s 2 r 10 1 ru 16 r (ptr2\))s 0 373 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 413 p (char)s 17 r (*char)s 3 r 10 1 ru 15 r (ptr1,)s 17 r (*char)s 2 r 10 1 ru 16 r (ptr2;)s 0 453 p ({)s 70 493 p (char)s 17 r (*c)s 2 r 10 1 ru 16 r (ptr,)s 17 r (c;)s 70 533 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr1,)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr2,)s 17 r (i,)s 17 r (flag;)s 70 613 p (b)s 2 r 10 1 ru 15 r (ptr1)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 70 653 p (flag)s 17 r (=)s 18 r (1;)s 70 693 p (while)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr1)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 17 r (+)s 18 r (\(int\))s 17 r (\(BUFFER)s 2 r 10 1 ru 16 r (SIZE)s 17 r (/)s 18 r (2\)\))s 105 734 p ({)s 174 774 p (b)s 2 r 10 1 ru 16 r (ptr2)s 17 r (=)s 18 r (b)s 2 r 10 1 ru 15 r (ptr1;)s 174 814 p (SkipSpaces1\(b)s 2 r 10 1 ru 16 r (ptr2\);)s 174 854 p (c)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 18 r (char)s 2 r 10 1 ru 15 r (ptr1;)s 174 894 p (SkipSpaces1\(c)s 2 r 10 1 ru 16 r (ptr\);)s 174 934 p (while)s 18 r (\(*c)s 2 r 10 1 ru 15 r (ptr)s 18 r (!=)s 17 r ('\\0'\))s 209 974 p ({)s 279 1014 p (c)s 17 r (=)s 18 r (\(char\)*b)s 2 r 10 1 ru 15 r (ptr2;)s 279 1054 p (if)s 17 r (\(\(c)s 18 r (>=)s 17 r ('A'\))s 18 r (&&)s 17 r (\(c)s 18 r (<=)s 17 r ('Z'\)\))s 52 r (/*)s f0 SF 17 r (upp)s 1 r (er)s 16 r (case)s f4 SF 17 r (->)s f0 SF 17 r (low)s -1 r (er)s 15 r (case)s f4 SF 17 r (*/)s 349 1094 p (c)s 17 r (+=)s 18 r (0x20;)s 279 1134 p (flag)s 17 r (=)s 18 r (c)s 17 r (-)s 18 r (*c)s 2 r 10 1 ru 15 r (ptr;)s 279 1174 p (if)s 17 r (\(flag)s 18 r (!=)s 17 r (0\))s 349 1214 p (break;)s 279 1254 p (++b)s 2 r 10 1 ru 15 r (ptr2;)s 279 1294 p (SkipSpaces1\(b)s 2 r 10 1 ru 15 r (ptr2\);)s 279 1335 p (++c)s 2 r 10 1 ru 15 r (ptr;)s 279 1375 p (SkipSpaces1\(c)s 2 r 10 1 ru 15 r (ptr\);)s 209 1415 p (})s 174 1455 p (if)s 18 r (\(flag)s 17 r (==)s 18 r (0\))s 244 1495 p (break;)s 174 1535 p (++b)s 2 r 10 1 ru 16 r (ptr1;)s 105 1575 p (})s 0 1615 p (#ifdef)s 17 r (DEBUGGING)s 70 1655 p (if)s 17 r (\(flag)s 18 r (==)s 17 r (0\))s 105 1695 p (printf\("search)s 2 r 10 1 ru 15 r (two)s 2 r 10 1 ru 16 r (phrases\(\):)s 17 r (phrase)s 17 r (\\"%s\\")s 18 r (exists\\n",)s 17 r (char)s 2 r 10 1 ru 16 r (ptr1\);)s 70 1735 p (else)s 105 1775 p (printf\("search)s 2 r 10 1 ru 15 r (two)s 2 r 10 1 ru 16 r (phrases\(\):)s 17 r (phrase)s 17 r (\\"%s\\")s 18 r (is)s 17 r (not)s 18 r (found\\n",)s 17 r (char)s 2 r 10 1 ru 16 r (ptr1\);)s 0 1815 p (#endif)s 70 1855 p (if)s 17 r (\(flag)s 18 r (!=)s 17 r (0\))s 105 1896 p (return)s 17 r (0;)s 70 1936 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0)s 17 r (;)s 18 r (i)s 17 r (<)s 18 r (40)s 17 r (;)s 18 r (++i\))s 105 1976 p ({)s 174 2016 p (b)s 2 r 10 1 ru 16 r (ptr2)s 17 r (=)s 18 r (b)s 2 r 10 1 ru 15 r (ptr1;)s 174 2056 p (SkipSpaces1\(b)s 2 r 10 1 ru 16 r (ptr2\);)s 174 2096 p (c)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 18 r (char)s 2 r 10 1 ru 15 r (ptr2;)s 174 2136 p (SkipSpaces1\(c)s 2 r 10 1 ru 16 r (ptr\);)s f0 SF 1263 2216 p (lang\015ag.c)s 66 r (page)s 11 r (3)s EP pstopssaved restore %%Page: pstops 4 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 174 33 p (while)s 18 r (\(*c)s 2 r 10 1 ru 15 r (ptr)s 18 r (!=)s 17 r ('\\0'\))s 209 74 p ({)s 279 114 p (c)s 17 r (=)s 18 r (\(char\)*b)s 2 r 10 1 ru 15 r (ptr2;)s 279 155 p (if)s 17 r (\(\(c)s 18 r (>=)s 17 r ('A'\))s 18 r (&&)s 17 r (\(c)s 18 r (<=)s 17 r ('Z'\)\))s 52 r (/*)s f0 SF 17 r (upp)s 1 r (er)s 16 r (case)s f4 SF 17 r (->)s f0 SF 17 r (low)s -1 r (er)s 15 r (case)s f4 SF 17 r (*/)s 349 195 p (c)s 17 r (+=)s 18 r (0x20;)s 279 236 p (flag)s 17 r (=)s 18 r (c)s 17 r (-)s 18 r (*c)s 2 r 10 1 ru 15 r (ptr;)s 279 276 p (if)s 17 r (\(flag)s 18 r (!=)s 17 r (0\))s 349 317 p (break;)s 279 357 p (++b)s 2 r 10 1 ru 15 r (ptr2;)s 279 398 p (SkipSpaces1\(b)s 2 r 10 1 ru 15 r (ptr2\);)s 279 439 p (++c)s 2 r 10 1 ru 15 r (ptr;)s 279 479 p (SkipSpaces1\(c)s 2 r 10 1 ru 15 r (ptr\);)s 209 520 p (})s 174 560 p (if)s 18 r (\(flag)s 17 r (==)s 18 r (0\))s 244 601 p (break;)s 174 641 p (++b)s 2 r 10 1 ru 16 r (ptr1;)s 139 682 p (})s 0 722 p (#ifdef)s 17 r (DEBUGGING)s 70 763 p (if)s 17 r (\(flag)s 18 r (==)s 17 r (0\))s 105 803 p (printf\(")s 383 r (phrase)s 18 r (\\"%s\\")s 17 r (exists\\n",)s 17 r (char)s 3 r 10 1 ru 15 r (ptr2\);)s 70 844 p (else)s 105 884 p (printf\(")s 383 r (phrase)s 18 r (\\"%s\\")s 17 r (is)s 17 r (not)s 18 r (found\\n",)s 17 r (char)s 2 r 10 1 ru 16 r (ptr2\);)s 0 925 p (#endif)s 70 966 p (if)s 17 r (\(flag)s 18 r (==)s 17 r (0\))s 105 1006 p (return)s 17 r (1;)s 70 1047 p (else)s 105 1087 p (return)s 17 r (0;)s 0 1128 p (})s 0 1249 p (/*)s 17 r 576 1 ru f0 SF 587 r (get)s 11 r (a)s 11 r (phrase)s 11 r (lo)s 1 r (cally)s 11 r 576 1 ru f4 SF 593 r (*/)s 0 1290 p (/*)s f0 SF 17 r (This)s 11 r (function)s f4 SF 11 r (get)s 2 r 10 1 ru 10 r (phrase\(buf)s 2 r 10 1 ru 11 r (ptr,)s 17 r (char)s 2 r 10 1 ru 11 r (ptr\))s f0 SF 11 r (searches)s 10 r (the)s 11 r (area)s f4 SF 66 1330 p (buf)s 3 r 10 1 ru 10 r (ptr+0,)s 17 r (buf)s 2 r 10 1 ru 11 r (ptr+1)s f0 SF (,)s f2 SF 11 r (\001)s 6 r (\001)s 5 r (\001)s f0 SF (,)s f4 SF 11 r (buf)s 2 r 10 1 ru 11 r (ptr+63)s f0 SF 0 1371 p (and)s 12 r (tries)s 12 r (to)s 12 r (\014nd)s 13 r (an)s 12 r (exactly)s 12 r (the)s 12 r (same)s 12 r (phrase)s 12 r (stored)s 13 r (at)s f4 SF 12 r (char)s 2 r 10 1 ru 10 r (ptr)s f0 SF (=")s f5 SF (phrase)s f0 SF (".)s 18 r (It)s 12 r (returns)s 13 r (the)s 12 r (following)s 11 r (v)s -1 r (alues)s 0 1411 p (according)s 11 r (to)s 11 r (the)s 11 r (result)s 11 r (of)s 11 r (search.)s f4 SF 72 1469 p (get)s 2 r 10 1 ru 11 r (phrase)s f0 SF (\(\))s 9 r (=)s f3 SF 312 1422 p (\032)s f0 SF 342 1449 p (the)s 11 r (address)s 11 r (of)s 14 r (desired)s 11 r (phrase)s 33 r (if)s 11 r (given)s 10 r (phrase)s 11 r (exists)s 342 1489 p (the)s 11 r (address)s 11 r (of)s 14 r (null)s 10 r (phrase)s 80 r (otherwise)s 11 r (.)s f4 SF 1525 1528 p (*/)s 0 1609 p (int)s 17 r (*get)s 3 r 10 1 ru 15 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r (char)s 2 r 10 1 ru 15 r (ptr\))s 0 1650 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 1690 p (char)s 17 r (*char)s 3 r 10 1 ru 15 r (ptr;)s 0 1731 p ({)s 70 1771 p (char)s 17 r (*c)s 2 r 10 1 ru 16 r (ptr,)s 17 r (c;)s 70 1812 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr1,)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr2,)s 17 r (i,)s 17 r (flag)s 18 r (=)s 17 r (1;)s 70 1852 p (static)s 17 r (int)s 18 r (null)s 2 r 10 1 ru 15 r (phrase[1]={0x00};)s 70 1933 p (b)s 2 r 10 1 ru 15 r (ptr1)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 70 1974 p (for)s 17 r (\(i=0;)s 18 r (i<64;)s 17 r (++i\))s 105 2014 p ({)s 174 2055 p (b)s 2 r 10 1 ru 16 r (ptr2)s 17 r (=)s 18 r (b)s 2 r 10 1 ru 15 r (ptr1;)s 174 2095 p (c)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 18 r (char)s 2 r 10 1 ru 15 r (ptr;)s 174 2136 p (while)s 18 r (\(*c)s 2 r 10 1 ru 15 r (ptr)s 18 r (!=)s 17 r ('\\0'\))s f0 SF 1263 2216 p (lang\015ag.c)s 66 r (page)s 11 r (4)s EP pstopssaved restore %%Page: pstops 5 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 209 33 p ({)s 279 73 p (c)s 17 r (=)s 18 r (\(char\)*b)s 2 r 10 1 ru 15 r (ptr2;)s 279 113 p (if)s 17 r (\(\(c)s 18 r (>=)s 17 r ('A'\))s 18 r (&&)s 17 r (\(c)s 18 r (<=)s 17 r ('Z'\)\))s 52 r (/*)s f0 SF 17 r (upp)s 1 r (er)s 16 r (case)s f4 SF 17 r (->)s f0 SF 17 r (low)s -1 r (er)s 15 r (case)s f4 SF 17 r (*/)s 349 153 p (c)s 17 r (+=)s 18 r (0x20;)s 279 193 p (flag)s 17 r (=)s 18 r (c)s 17 r (-)s 18 r (*c)s 2 r 10 1 ru 15 r (ptr;)s 279 234 p (if)s 17 r (\(flag)s 18 r (!=)s 17 r (0\))s 349 274 p (break;)s 279 314 p (++b)s 2 r 10 1 ru 15 r (ptr2;)s 279 354 p (++c)s 2 r 10 1 ru 15 r (ptr;)s 209 394 p (})s 174 434 p (if)s 18 r (\(flag)s 17 r (==)s 18 r (0\))s 244 474 p (break;)s 174 514 p (++b)s 2 r 10 1 ru 16 r (ptr1;)s 105 554 p (})s 0 594 p (#ifdef)s 17 r (DEBUGGING)s 70 634 p (if)s 17 r (\(flag)s 18 r (==)s 17 r (0\))s 105 674 p (printf\("get)s 2 r 10 1 ru 15 r (phrase\(\):)s 18 r (phrase)s 17 r (\\"%s\\")s 17 r (exists\\n",)s 18 r (char)s 2 r 10 1 ru 15 r (ptr\);)s 70 714 p (else)s 105 754 p (printf\("get)s 2 r 10 1 ru 15 r (phrase\(\):)s 18 r (phrase)s 17 r (\\"%s\\")s 17 r (is)s 18 r (not)s 17 r (found\\n",)s 18 r (char)s 2 r 10 1 ru 15 r (ptr\);)s 0 795 p (#endif)s 70 835 p (if)s 17 r (\(flag)s 18 r (==)s 17 r (0\))s 105 875 p (return)s 17 r (b)s 2 r 10 1 ru 16 r (ptr1;)s 70 915 p (else)s 105 955 p (return)s 17 r (null)s 2 r 10 1 ru 16 r (phrase;)s 0 995 p (})s 0 1115 p (/*)s 17 r 589 1 ru f0 SF 599 r (search)s 10 r (line)s 12 r (locally)s 12 r 589 1 ru f4 SF 605 r (*/)s 0 1155 p (/*)s f0 SF 17 r (This)s 11 r (function)s f4 SF 11 r (search)s 2 r 10 1 ru 10 r (line\(buf)s 2 r 10 1 ru 11 r (ptr,)s 17 r (char)s 2 r 10 1 ru 11 r (ptr\))s f0 SF 11 r (searches)s 10 r (the)s 11 r (area)s f4 SF 66 1195 p (buf)s 3 r 10 1 ru 10 r (ptr+0,)s 17 r (buf)s 2 r 10 1 ru 11 r (ptr+1)s f0 SF (,)s f2 SF 11 r (\001)s 6 r (\001)s 5 r (\001)s f0 SF (,)s f4 SF 11 r (buf)s 2 r 10 1 ru 11 r (ptr+255)s f0 SF 0 1235 p (and)s 14 r (tries)s 13 r (to)s 14 r (\014nd)s 13 r (a)s 14 r (line)s 14 r (of)s 13 r (phrase)s 14 r (stored)s 13 r (at)s f4 SF 14 r (char)s 2 r 10 1 ru 10 r (ptr)s f0 SF 14 r (=")s f5 SF (a)s 14 r (line)s 13 r (of)s 14 r (phrase)s f0 SF (".)s 22 r (It)s 14 r (returns)s 13 r (the)s 14 r (following)s 13 r (v)s -1 r (alues)s 0 1275 p (according)s 11 r (to)s 11 r (the)s 11 r (result)s 11 r (of)s 11 r (search.)s f4 SF 72 1325 p (search)s 2 r 10 1 ru 11 r (line)s f0 SF (\(\))s 9 r (=)s f3 SF 329 1288 p (n)s f0 SF 357 1308 p (1)s 33 r (if)s 11 r (given)s 10 r (line)s 11 r (of)s 11 r (phrase)s 11 r (exists)s 357 1348 p (0)s 33 r (otherwise)s 11 r (.)s f4 SF 1525 1375 p (*/)s 0 1455 p (int)s 17 r (search)s 3 r 10 1 ru 15 r (line\(buf)s 2 r 10 1 ru 15 r (ptr,char)s 2 r 10 1 ru 16 r (ptr\))s 0 1495 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 1535 p (char)s 17 r (*char)s 3 r 10 1 ru 15 r (ptr;)s 0 1575 p ({)s 35 1615 p (char)s 17 r (*c)s 2 r 10 1 ru 16 r (ptr,)s 17 r (c,)s 18 r (line1[256],)s 17 r (line2[256];)s 35 1655 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr,)s 17 r (i,)s 18 r (flag=1;)s 35 1735 p (b)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 35 1775 p (SkipSpaces2\(b)s 2 r 10 1 ru 15 r (ptr\);)s 35 1815 p (c)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (char)s 2 r 10 1 ru 16 r (ptr;)s 35 1855 p (SkipSpaces2\(c)s 2 r 10 1 ru 15 r (ptr\);)s 35 1896 p (for)s 17 r (\(i=0;)s 18 r (\(\(i)s 17 r (<)s 18 r (255\))s 17 r (&&)s 17 r (\(*c)s 3 r 10 1 ru 15 r (ptr)s 17 r (!=)s 18 r (0x00\)\);)s 17 r (++i\))s 70 1936 p ({)s 105 1976 p (c)s 17 r (=)s 17 r (\(char\)*b)s 3 r 10 1 ru 15 r (ptr;)s 105 2016 p (if)s 17 r (\(c)s 17 r (==)s 18 r ('\\n'\))s 139 2056 p (c)s 18 r (=)s 17 r (0x00;)s 105 2096 p (if)s 17 r (\(\(c)s 17 r (>=)s 18 r ('A'\))s 17 r (&&)s 18 r (\(c)s 17 r (<=)s 18 r ('Z'\)\))s 87 r (/*)s f0 SF 16 r (upp)s 1 r (er)s 17 r (case)s f4 SF 17 r (->)s f0 SF 16 r (low)s -1 r (er)s 16 r (case)s f4 SF 17 r (*/)s 139 2136 p (c)s 18 r (+=)s 17 r (0x20;)s f0 SF 1263 2216 p (lang\015ag.c)s 66 r (page)s 11 r (5)s EP pstopssaved restore %%Page: pstops 6 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 105 33 p (line1[i])s 17 r (=)s 17 r (c;)s 105 74 p (line2[i])s 17 r (=)s 17 r (*c)s 3 r 10 1 ru 15 r (ptr;)s 105 114 p (++b)s 2 r 10 1 ru 15 r (ptr;)s 105 155 p (SkipSpaces2\(b)s 2 r 10 1 ru 15 r (ptr\);)s 105 195 p (++c)s 2 r 10 1 ru 15 r (ptr;)s 105 235 p (SkipSpaces2\(c)s 2 r 10 1 ru 15 r (ptr\);)s 70 276 p (})s 35 316 p (line1[i])s 17 r (=)s 18 r (0x00;)s 35 357 p (line2[i])s 17 r (=)s 18 r (0x00;)s 35 397 p (for)s 17 r (\(i=0;)s 18 r (\(\(i)s 17 r (<)s 18 r (256\))s 17 r (&&)s 17 r (\(line2[i])s 18 r (!=)s 17 r (0x00\)\);)s 18 r (++i\))s 70 438 p ({)s 105 478 p (flag)s 17 r (=)s 17 r (line1[i])s 18 r (-)s 17 r (line2[i];)s 105 518 p (if)s 17 r (\(flag)s 17 r (!=)s 18 r (0\))s 139 559 p (break;)s 70 599 p (})s 0 640 p (#ifdef)s 17 r (DEBUGGING)s 70 680 p (if)s 17 r (\(flag)s 18 r (==)s 17 r (0\))s 105 721 p ({)s 139 761 p (printf\("given)s 18 r (line)s 17 r (is)s 18 r (...\\n"\);)s 139 802 p (printf\("\\"%s\\"\\n",)s 18 r (line1\);)s 139 842 p (printf\("searching)s 18 r (a)s 17 r (line)s 18 r (...\\n"\);)s 139 882 p (printf\("\\"%s\\"\\n",)s 18 r (line2\);)s 139 923 p (printf\("search)s 3 r 10 1 ru 15 r (line\(\):)s 17 r (line)s 18 r (\\"%s\\")s 17 r (exists\\n",)s 18 r (char)s 2 r 10 1 ru 15 r (ptr\);)s 105 963 p (})s 70 1004 p (else)s 105 1044 p ({)s 139 1085 p (printf\("given)s 18 r (line)s 17 r (is)s 18 r (...\\n"\);)s 139 1125 p (printf\("\\"%s\\"\\n",)s 18 r (line1\);)s 139 1165 p (printf\("searching)s 18 r (a)s 17 r (line)s 18 r (...\\n"\);)s 139 1206 p (printf\("\\"%s\\"\\n",)s 18 r (line2\);)s 139 1246 p (printf\("search)s 3 r 10 1 ru 15 r (line\(\):)s 17 r (line)s 18 r (\\"%s\\")s 17 r (is)s 18 r (not)s 17 r (found\\n",)s 18 r (char)s 2 r 10 1 ru 15 r (ptr\);)s 105 1287 p (})s 0 1327 p (#endif)s 35 1368 p (if)s 17 r (\(flag)s 18 r (==)s 17 r (0\))s 70 1408 p (return)s 17 r (1;)s 35 1449 p (else)s 70 1489 p (return)s 17 r (0;)s 0 1529 p (})s 0 1651 p (/*)s 17 r 609 1 ru f0 SF 619 r (set)s 11 r (BASIC)s 12 r (\015ag)s 11 r 609 1 ru f4 SF 625 r (*/)s 0 1732 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (bas)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 1772 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 1812 p ({)s 35 1853 p (if)s 17 r (\(M)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 70 1893 p (return;)s 35 1934 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 1974 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("')s 18 r (basic"\);)s 35 2015 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("rem)s 18 r (basic"\);)s 35 2055 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("0)s 17 r ('"\);)s 35 2096 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("1)s 17 r ('"\);)s 35 2136 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("2)s 17 r ('"\);)s f0 SF 1263 2216 p (lang\015ag.c)s 66 r (page)s 11 r (6)s EP pstopssaved restore %%Page: pstops 7 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("3)s 17 r ('"\);)s 35 74 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("4)s 17 r ('"\);)s 35 114 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("5)s 17 r ('"\);)s 35 155 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("6)s 17 r ('"\);)s 35 195 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("7)s 17 r ('"\);)s 35 235 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("8)s 17 r ('"\);)s 35 276 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("9)s 17 r ('"\);)s 35 316 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("0)s 18 r (rem"\);)s 35 357 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("1)s 18 r (rem"\);)s 35 397 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("2)s 18 r (rem"\);)s 35 438 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("3)s 18 r (rem"\);)s 35 478 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("4)s 18 r (rem"\);)s 35 518 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("5)s 18 r (rem"\);)s 35 559 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("6)s 18 r (rem"\);)s 35 599 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("7)s 18 r (rem"\);)s 35 640 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("8)s 18 r (rem"\);)s 35 680 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("9)s 18 r (rem"\);)s 35 721 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("cls"\);)s 35 761 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("defdbl"\);)s 35 802 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("<>"\);)s 35 842 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("gosub"\);)s 35 882 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("then)s 18 r (gosub"\);)s 35 923 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("then)s 18 r (print"\);)s 35 963 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("wend"\);)s 35 1004 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("input)s 17 r (\\""\);)s 35 1044 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("data)s 17 r (\\""\);)s 35 1085 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("print)s 17 r (\\""\);)s 35 1125 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("$=\\""\);)s 35 1165 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("left$\("\);)s 35 1206 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("mid$\("\);)s 35 1246 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("right$\("\);)s 35 1287 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("dir$\("\);)s 35 1327 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("getattr\("\);)s 35 1368 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("chdir)s 17 r (\\""\);)s 35 1408 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("curdir$"\);)s 35 1449 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("select)s 17 r (case"\);)s 35 1489 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("end)s 17 r (select"\);)s 35 1529 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("exit)s 17 r (proc"\);)s 35 1570 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("end)s 17 r (proc"\);)s 35 1610 p (BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("end)s 17 r (sub"\);)s 0 1651 p (#ifdef)s 17 r (DEBUGGING)s 35 1691 p (printf\("set)s 2 r 10 1 ru 15 r (bas)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (BAS)s 2 r 10 1 ru 15 r (flag\);)s 0 1732 p (#endif)s 0 1772 p (})s 0 1893 p (/*)s 17 r 648 1 ru f0 SF 659 r (set)s 11 r (C)s 11 r (\015ag)s 11 r 648 1 ru f4 SF 665 r (*/)s 0 1974 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (c)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 2015 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 2055 p ({)s 35 2096 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 2136 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("/*)s 18 r (c)s 17 r (*/"\);)s f0 SF 1263 2216 p (lang\015ag.c)s 66 r (page)s 11 r (7)s EP pstopssaved restore %%Page: pstops 8 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("//)s 18 r (c"\);)s 35 74 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("/*)s 18 r (objective-c)s 17 r (*/"\);)s 35 114 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("//)s 18 r (objective-c"\);)s 35 155 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("//)s 18 r (//"\);)s 35 195 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#include)s 18 r (<"\);)s 35 235 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#include)s 18 r (\\""\);)s 35 276 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#import)s 18 r (<"\);)s 35 316 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#import)s 18 r (\\""\);)s 35 357 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#define"\);)s 35 397 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#if"\))s 227 438 p (&)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#endif"\)\);)s 35 478 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@implementation"\);)s 35 518 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@interface"\);)s 35 559 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@private"\);)s 35 599 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@protected"\);)s 35 640 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@public"\);)s 35 680 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@selector\("\);)s 35 721 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@def\("\);)s 35 761 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@encode\("\);)s 35 802 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("main\(\))s 18 r ({"\);)s 35 842 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("main\(argc,argv\))s 18 r (int)s 17 r (argc;"\);)s 35 882 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("printf\(\\""\);)s 35 923 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r (";)s 17 r (})s 17 r (}"\);)s 35 963 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("++"\);)s 35 1004 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("--"\);)s 35 1044 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("+="\);)s 35 1085 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("-="\);)s 35 1125 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("*="\);)s 35 1165 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("/="\);)s 35 1206 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("\)&&\("\);)s 35 1246 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("\)||\("\);)s 0 1287 p (#ifdef)s 17 r (DEBUGGING)s 35 1327 p (printf\("set)s 2 r 10 1 ru 15 r (c)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (C)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (C)s 2 r 10 1 ru 15 r (flag\);)s 0 1368 p (#endif)s 0 1408 p (})s 0 1529 p (/*)s 17 r 600 1 ru f0 SF 611 r (set)s 11 r (COBOL)s 11 r (\015ag)s 11 r 600 1 ru f4 SF 617 r (*/)s 0 1610 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (cbl)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 1651 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 1691 p ({)s 35 1732 p (if)s 17 r (\(M)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 70 1772 p (return;)s 35 1812 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 1853 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("*)s 18 r (cobol"\);)s 35 1893 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("/)s 18 r (cobol"\);)s 35 1934 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("identification)s 18 r (division."\);)s 35 1974 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("program-id."\);)s 35 2015 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("author."\);)s 35 2055 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("date-written."\);)s 35 2096 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("date-written."\);)s 35 2136 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("environment)s 18 r (division."\);)s f0 SF 1263 2216 p (lang\015ag.c)s 66 r (page)s 11 r (8)s EP pstopssaved restore %%Page: pstops 9 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("configuration)s 18 r (section."\);)s 35 74 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("source-computer."\);)s 35 114 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("object-computer."\);)s 35 155 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("special-names."\);)s 35 195 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("input-output)s 18 r (section."\);)s 35 235 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("file-contral."\);)s 35 276 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("i-o-contral."\);)s 35 316 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("data)s 18 r (division."\);)s 35 357 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("file)s 18 r (section."\);)s 35 397 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("working-storage)s 18 r (section."\);)s 35 438 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("procedure)s 18 r (division."\);)s 35 478 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("section."\);)s 35 518 p (CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("stop)s 18 r (run."\);)s 0 559 p (#ifdef)s 17 r (DEBUGGING)s 35 599 p (printf\("set)s 2 r 10 1 ru 15 r (cbl)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (CBL)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (CBL)s 2 r 10 1 ru 15 r (flag\);)s 0 640 p (#endif)s 0 680 p (})s 0 802 p (/*)s 17 r 577 1 ru f0 SF 588 r (set)s 11 r (FOR)s -3 r (TRAN)s 10 r (\015ag)s 11 r 577 1 ru f4 SF 594 r (*/)s 0 882 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (f77)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 923 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 963 p ({)s 35 1004 p (if)s 17 r (\(M)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 70 1044 p (return;)s 35 1085 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 1125 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("c)s 18 r (fortran"\);)s 35 1165 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("*)s 18 r (fortran"\);)s 35 1206 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("implicit"\);)s 35 1246 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("logical*2"\);)s 35 1287 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("logical*4"\);)s 35 1327 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("integer*2"\);)s 35 1368 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("integer*4"\);)s 35 1408 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("real*4"\);)s 35 1449 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("real*8"\);)s 35 1489 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("do"\))s 262 1529 p (&)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("continue"\)\);)s 35 1570 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("subroutine"\))s 262 1610 p (&)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("end"\)\);)s 35 1651 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("write\("\))s 262 1691 p (&)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("format\("\)\);)s 35 1732 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("stop)s 17 r (end"\);)s 35 1772 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".lt."\);)s 35 1812 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".le."\);)s 35 1853 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".eq."\);)s 35 1893 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".ne."\);)s 35 1934 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".gt."\);)s 35 1974 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".ge."\);)s 35 2015 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".or."\);)s 35 2055 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".and."\);)s 35 2096 p (F77)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".not."\);)s 0 2136 p (#ifdef)s 17 r (DEBUGGING)s f0 SF 1263 2216 p (lang\015ag.c)s 66 r (page)s 11 r (9)s EP pstopssaved restore %%Page: pstops 10 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (printf\("set)s 2 r 10 1 ru 15 r (f77)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (F77)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (F77)s 2 r 10 1 ru 15 r (flag\);)s 0 74 p (#endif)s 0 114 p (})s 0 235 p (/*)s 17 r 610 1 ru f0 SF 621 r (set)s 11 r (HTML)s 11 r (\015ag)s 11 r 610 1 ru f4 SF 627 r (*/)s 0 316 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (html)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 357 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 397 p ({)s 35 438 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 478 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("/"\);)s 35 518 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 559 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 599 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 640 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 721 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 761 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 802 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 842 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 882 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 923 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 963 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1004 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1044 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1085 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1125 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1165 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1206 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1246 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1287 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1368 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1408 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1449 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1489 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1529 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1570 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1610 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 35 1651 p (HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (""\);)s 0 1691 p (#ifdef)s 17 r (DEBUGGING)s 35 1732 p (printf\("set)s 2 r 10 1 ru 15 r (html)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (HTML)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (HTML)s 2 r 10 1 ru 15 r (flag\);)s 0 1772 p (#endif)s 0 1812 p (})s 0 1934 p (/*)s 17 r 618 1 ru f0 SF 629 r (set)s 11 r (JA)s -3 r (V)s -4 r (A)s 10 r (\015ag)s 11 r 618 1 ru f4 SF 635 r (*/)s 0 2015 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (java)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 2055 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 2096 p ({)s 35 2136 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (10)s EP pstopssaved restore %%Page: pstops 11 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (JAVA)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (C)s 2 r 10 1 ru 16 r (flag;)s 35 74 p (JAVA)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("/*)s 18 r (java)s 17 r (*/"\);)s 35 114 p (JAVA)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("//)s 18 r (java"\);)s 35 155 p (JAVA)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("synchronized"\);)s 35 195 p (JAVA)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("instanceof"\);)s 35 235 p (JAVA)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("import)s 18 r (java."\);)s 35 276 p (JAVA)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@author"\);)s 35 316 p (JAVA)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@version"\);)s 0 357 p (#ifdef)s 17 r (DEBUGGING)s 35 397 p (printf\("set)s 2 r 10 1 ru 15 r (java)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (JAVA)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (JAVA)s 2 r 10 1 ru 15 r (flag\);)s 0 438 p (#endif)s 0 478 p (})s 0 599 p (/*)s 17 r 623 1 ru f0 SF 634 r (set)s 11 r (LISP)s 11 r (\015ag)s 11 r 623 1 ru f4 SF 640 r (*/)s 0 680 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (lisp)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 721 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 761 p ({)s 35 802 p (if)s 17 r (\(M)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 70 842 p (return;)s 35 882 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 923 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (";)s 18 r (lisp"\);)s 35 963 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (";)s 18 r (scheme"\);)s 35 1004 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\)\)\)\)\)"\);)s 35 1044 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\(car"\);)s 35 1085 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\(cdr"\);)s 35 1125 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\(cons"\);)s 35 1165 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("\(list"\);)s 35 1206 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\(setq"\);)s 35 1246 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\(set!"\);)s 35 1287 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\(lambda"\);)s 35 1327 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("\(def"\);)s 35 1368 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\(defun"\);)s 35 1408 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("\(define"\);)s 35 1449 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("\(let"\);)s 35 1489 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("\(+"\);)s 35 1529 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\(/"\);)s 35 1570 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\(cond)s 18 r (\("\);)s 35 1610 p (LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("\(if)s 17 r (\("\);)s 0 1651 p (#ifdef)s 17 r (DEBUGGING)s 35 1691 p (printf\("set)s 2 r 10 1 ru 15 r (lisp)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (LISP)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (LISP)s 2 r 10 1 ru 15 r (flag\);)s 0 1732 p (#endif)s 0 1772 p (})s 0 1893 p (/*)s 17 r 608 1 ru f0 SF 619 r (set)s 11 r (MAKE)s 11 r (\015ag)s 11 r 608 1 ru f4 SF 625 r (*/)s 0 1974 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (make)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 2015 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 2055 p ({)s 35 2096 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr;)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (11)s EP pstopssaved restore %%Page: pstops 12 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (if)s 17 r (\(M)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 70 74 p (return;)s 35 114 p (/*)s f0 SF 16 r (search)s 11 r (MAKE)s 11 r (comment)s 10 r (area)s f4 SF 1019 r (*/)s 35 155 p (b)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 35 195 p (while)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (\(int\))s 17 r (\(BUFFER)s 3 r 10 1 ru 15 r (SIZE)s 17 r (/)s 18 r (2\)\))s 70 235 p ({)s 105 276 p (if)s 17 r (\(\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('\\n'\))s 174 316 p (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (1\))s 18 r (==)s 17 r ('#'\))s 174 357 p (&&)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r (')s 17 r ('\)\)\))s 139 397 p (++MAKE)s 3 r 10 1 ru 15 r (flag;)s 105 438 p (++b)s 2 r 10 1 ru 15 r (ptr;)s 70 478 p (})s 35 518 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 559 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#)s 18 r (makefile"\);)s 35 599 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("all:"\);)s 35 640 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("install:"\);)s 35 680 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("install.man:"\);)s 35 721 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("depend:"\);)s 35 761 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("clean:"\);)s 35 802 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("lint:"\);)s 35 842 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("diff:"\);)s 35 882 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("cc="\);)s 35 923 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("$\(cc\)"\);)s 35 963 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("objs="\);)s 35 1004 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("obj="\);)s 35 1044 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("srcs="\);)s 35 1085 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("src="\);)s 35 1125 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("missing="\);)s 35 1165 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("optimize="\);)s 35 1206 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("parser="\);)s 35 1246 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("flags="\);)s 35 1287 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("ldflags="\);)s 35 1327 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("libdir="\);)s 35 1368 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("bindir="\);)s 35 1408 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("destdir="\);)s 35 1449 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("mandir="\);)s 35 1489 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("docdir="\);)s 35 1529 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@echo"\);)s 35 1570 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@-echo"\);)s 0 1610 p (#ifdef)s 17 r (DEBUGGING)s 35 1651 p (printf\("set)s 2 r 10 1 ru 15 r (make)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (MAKE)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (MAKE)s 2 r 10 1 ru 15 r (flag\);)s 0 1691 p (#endif)s 0 1732 p (})s 0 1853 p (/*)s 17 r 594 1 ru f0 SF 604 r (set)s 11 r (P)s -1 r (ASCAL)s 10 r (\015ag)s 11 r 594 1 ru f4 SF 610 r (*/)s 0 1934 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (pas)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 1974 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 2015 p ({)s 35 2055 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr;)s 35 2136 p (if)s 17 r (\(M)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (12)s EP pstopssaved restore %%Page: pstops 13 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 70 33 p (return;)s 35 74 p (/*)s f0 SF 16 r (search)s 11 r (P)s -2 r (ASCAL)s 10 r (comment)s 10 r (area)s f4 SF 990 r (*/)s 35 114 p (b)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 35 155 p (while)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (\(int\))s 17 r (\(BUFFER)s 3 r 10 1 ru 15 r (SIZE)s 17 r (/)s 18 r (2\)\))s 70 195 p ({)s 105 235 p (if)s 17 r (\(\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('\\n'\))s 174 276 p (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (1\))s 18 r (==)s 17 r ('\('\))s 174 316 p (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r ('*'\))s 174 357 p (&&)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (3\))s 18 r (==)s 17 r (')s 17 r ('\))s 18 r (||)s 17 r (\(*\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (+)s 18 r (3\))s 17 r (==)s 17 r ('*'\)\)\))s 139 397 p (++PAS)s 3 r 10 1 ru 15 r (flag;)s 105 438 p (++b)s 2 r 10 1 ru 15 r (ptr;)s 70 478 p (})s 35 518 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 559 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("{)s 18 r (pascal)s 17 r (}"\);)s 35 599 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\(*)s 18 r (pascal)s 17 r (*\)"\);)s 35 640 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("*\)\(*"\);)s 35 680 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("program"\))s 262 721 p (|)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("procedure"\)\);)s 35 761 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("begin"\))s 262 802 p (&)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("end"\)\);)s 35 842 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("const"\))s 262 882 p (&)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("var"\)\);)s 35 923 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("keypressed\("\);)s 35 963 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("blockread\("\);)s 35 1004 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("blockwrite\("\);)s 35 1044 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("readln\("\);)s 35 1085 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("writeln\("\);)s 35 1125 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("write\('"\);)s 35 1165 p (PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r (":="\);)s 0 1206 p (#ifdef)s 17 r (DEBUGGING)s 35 1246 p (printf\("set)s 2 r 10 1 ru 15 r (pas)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (PAS)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (PAS)s 2 r 10 1 ru 15 r (flag\);)s 0 1287 p (#endif)s 0 1327 p (})s 0 1449 p (/*)s 17 r 615 1 ru f0 SF 626 r (set)s 11 r (PERL)s 11 r (\015ag)s 11 r 615 1 ru f4 SF 631 r (*/)s 0 1529 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (perl)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 1570 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 1610 p ({)s 35 1651 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr;)s 35 1732 p (if)s 17 r (\(M)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 70 1772 p (return;)s 35 1812 p (/*)s f0 SF 16 r (search)s 11 r (PERL)s 11 r (comment)s 10 r (area)s f4 SF 1032 r (*/)s 35 1853 p (b)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 35 1893 p (while)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (\(int\))s 17 r (\(BUFFER)s 3 r 10 1 ru 15 r (SIZE)s 17 r (/)s 18 r (2\)\))s 70 1934 p ({)s 105 1974 p (if)s 17 r (\(\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('\\n'\))s 174 2015 p (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (1\))s 18 r (==)s 17 r ('#'\))s 174 2055 p (&&)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r (')s 17 r ('\)\)\))s 139 2096 p (++PERL)s 3 r 10 1 ru 15 r (flag;)s 105 2136 p (++b)s 2 r 10 1 ru 15 r (ptr;)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (13)s EP pstopssaved restore %%Page: pstops 14 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 70 33 p (})s 35 74 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 114 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#)s 18 r (perl"\);)s 0 155 p (#ifdef)s 17 r (UNIX)s 35 195 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 235 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("/bin/perl"\);)s 35 276 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 316 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("/usr/bin/perl"\);)s 35 357 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 397 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("/usr/local/bin/perl"\);)s 35 438 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 478 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("/bin/jperl"\);)s 35 518 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 559 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("/usr/bin/jperl"\);)s 35 599 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 640 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("/usr/local/bin/jperl"\);)s 0 680 p (#else)s 35 721 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 761 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("\\\\bin\\\\perl"\);)s 35 802 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 842 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("\\\\usr\\\\bin\\\\perl"\);)s 35 882 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 923 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("\\\\usr\\\\local\\\\bin\\\\perl"\);)s 35 963 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1004 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("\\\\bin\\\\jperl"\);)s 35 1044 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1085 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("\\\\usr\\\\bin\\\\jperl"\);)s 35 1125 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1165 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("\\\\usr\\\\local\\\\bin\\\\jperl"\);)s 0 1206 p (#endif)s 35 1246 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".+"\);)s 35 1287 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".-"\);)s 35 1327 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".*"\);)s 35 1368 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("./"\);)s 35 1408 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".\\\\"\);)s 35 1449 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".**"\);)s 35 1489 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".^"\);)s 35 1529 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("~="\);)s 35 1570 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("=~"\);)s 35 1610 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".="\);)s 35 1651 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".'"\);)s 35 1691 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("/^"\);)s 35 1732 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("/\\\\"\);)s 35 1772 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("print)s 17 r (\\""\);)s 35 1812 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("<>"\);)s 35 1853 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("while\(<"\);)s 35 1893 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("$)s 3 r 10 1 ru 15 r ("\);)s 35 1934 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("$."\);)s 35 1974 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("@)s 3 r 10 1 ru 15 r ("\);)s 35 2015 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (")s 3 r 10 1 ru 17 r 10 1 ru 15 r (end)s 2 r 10 1 ru 18 r 10 1 ru 15 r ("\);)s 0 2055 p (#ifdef)s 17 r (DEBUGGING)s 35 2096 p (printf\("set)s 2 r 10 1 ru 15 r (perl)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (PERL)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (PERL)s 2 r 10 1 ru 15 r (flag\);)s 0 2136 p (#endif)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (14)s EP pstopssaved restore %%Page: pstops 15 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 0 33 p (})s 0 155 p (/*)s 17 r 606 1 ru f0 SF 617 r (set)s 11 r (SHELL)s 11 r (\015ag)s 11 r 606 1 ru f4 SF 623 r (*/)s 0 235 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (shell)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 276 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 316 p ({)s 35 357 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr;)s 35 438 p (if)s 17 r (\(M)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 70 478 p (return;)s 35 518 p (/*)s f0 SF 16 r (search)s 11 r (SHELL)s 11 r (comment)s 10 r (area)s f4 SF 1015 r (*/)s 35 559 p (b)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 35 599 p (while)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (\(int\))s 17 r (\(BUFFER)s 3 r 10 1 ru 15 r (SIZE)s 17 r (/)s 18 r (2\)\))s 70 640 p ({)s 105 680 p (if)s 17 r (\(\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('\\n'\))s 174 721 p (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (1\))s 18 r (==)s 17 r ('#'\))s 174 761 p (&&)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r (')s 17 r ('\)\)\))s 139 802 p (++SH)s 3 r 10 1 ru 15 r (flag;)s 105 842 p (++b)s 2 r 10 1 ru 15 r (ptr;)s 70 882 p (})s 35 923 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 963 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#)s 18 r (shell"\);)s 0 1004 p (#ifdef)s 17 r (UNIX)s 35 1044 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/bin/sh"\);)s 35 1085 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/usr/bin/sh"\);)s 35 1125 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/bin/csh"\);)s 35 1165 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/usr/bin/csh"\);)s 35 1206 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/bin/ksh"\);)s 35 1246 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/usr/bin/ksh"\);)s 35 1287 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/bin/tcsh"\);)s 35 1327 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/usr/bin/tcsh"\);)s 35 1368 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/usr/local/bin/tcsh"\);)s 35 1408 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/bin/zsh"\);)s 35 1449 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/usr/bin/zsh"\);)s 35 1489 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/usr/local/bin/zsh"\);)s 35 1529 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/bin/bash"\);)s 35 1570 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/usr/bin/bash"\);)s 35 1610 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("/usr/local/bin/bash"\);)s 0 1651 p (#else)s 35 1691 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("\\\\sh"\);)s 35 1732 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("\\\\csh"\);)s 35 1772 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("\\\\ksh"\);)s 35 1812 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("\\\\tcsh"\);)s 35 1853 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("\\\\zsh"\);)s 35 1893 p (SH)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#!",)s 17 r ("\\\\bash"\);)s 0 1934 p (#endif)s 0 1974 p (#ifdef)s 17 r (DEBUGGING)s 35 2015 p (printf\("set)s 2 r 10 1 ru 15 r (shell)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (SH)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (SH)s 2 r 10 1 ru 15 r (flag\);)s 0 2055 p (#endif)s 0 2096 p (})s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (15)s EP pstopssaved restore %%Page: pstops 16 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 0 74 p (/*)s 17 r 593 1 ru f0 SF 603 r (set)s 11 r (TCL/TK)s 11 r (\015ag)s 11 r 593 1 ru f4 SF 610 r (*/)s 0 155 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (tcl)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 195 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 235 p ({)s 35 276 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr;)s 35 357 p (if)s 17 r (\(M)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 70 397 p (return;)s 35 438 p (/*)s f0 SF 16 r (search)s 11 r (TCL/TK)s 11 r (comment)s 10 r (area)s f4 SF 988 r (*/)s 35 478 p (b)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 35 518 p (while)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (\(int\))s 17 r (\(BUFFER)s 3 r 10 1 ru 15 r (SIZE)s 17 r (/)s 18 r (2\)\))s 70 559 p ({)s 105 599 p (if)s 17 r (\(\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('\\n'\))s 174 640 p (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (1\))s 18 r (==)s 17 r ('#'\))s 174 680 p (&&)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r (')s 17 r ('\)\)\))s 139 721 p (++TCL)s 3 r 10 1 ru 15 r (flag;)s 105 761 p (++b)s 2 r 10 1 ru 15 r (ptr;)s 70 802 p (})s 35 842 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 882 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#)s 18 r (tcl/tk"\);)s 0 923 p (#ifdef)s 17 r (UNIX)s 35 963 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1004 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("/bin/tclsh"\);)s 35 1044 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1085 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("/usr/bin/tclsh"\);)s 35 1125 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1165 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("/usr/local/bin/tclsh"\);)s 35 1206 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1246 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("/bin/wish"\);)s 35 1287 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1327 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("/usr/bin/wish"\);)s 35 1368 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1408 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("/usr/local/bin/wish"\);)s 0 1449 p (#else)s 35 1489 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1529 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("\\\\bin\\\\tclsh"\);)s 35 1570 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1610 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("\\\\usr\\\\bin\\\\tclsh"\);)s 35 1651 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1691 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("\\\\usr\\\\local\\\\bin\\\\tclsh"\);)s 35 1732 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1772 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("\\\\bin\\\\wish"\);)s 35 1812 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1853 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("\\\\usr\\\\bin\\\\wish"\);)s 35 1893 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 70 1934 p (*)s 17 r (search)s 2 r 10 1 ru 16 r (two)s 2 r 10 1 ru 15 r (phrases\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("#!",)s 17 r ("\\\\usr\\\\local\\\\bin\\\\wish"\);)s 0 1974 p (#endif)s 35 2015 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("tcl)s 3 r 10 1 ru 15 r ("\);)s 35 2055 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("tk)s 3 r 10 1 ru 15 r ("\);)s 35 2096 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("button)s 18 r (."\);)s 35 2136 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("pack)s 18 r (."\);)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (16)s EP pstopssaved restore %%Page: pstops 17 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("destroy)s 18 r (."\);)s 35 74 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("entry)s 18 r (."\);)s 35 114 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("label)s 18 r (."\);)s 35 155 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("bind)s 18 r (."\);)s 35 195 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("radiobutton)s 18 r (."\);)s 35 235 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("scale)s 18 r (."\);)s 35 276 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("frame)s 18 r (."\);)s 35 316 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("menu)s 17 r (."\);)s 35 357 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("menubutton)s 18 r (."\);)s 35 397 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("focus)s 18 r (."\);)s 35 438 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("tk)s 3 r 10 1 ru 15 r (menuBar)s 17 r (."\);)s 35 478 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("geometry)s 18 r (."\);)s 35 518 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("title)s 17 r (."\);)s 35 559 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("tkwait"\);)s 35 599 p (TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("blink)s 18 r (."\);)s 0 640 p (#ifdef)s 17 r (DEBUGGING)s 35 680 p (printf\("set)s 2 r 10 1 ru 15 r (tcl)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (TCL)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (TCL)s 2 r 10 1 ru 15 r (flag\);)s 0 721 p (#endif)s 0 761 p (})s 0 882 p (/*)s 17 r 620 1 ru f0 SF 631 r (set)s 11 r (ASIR)s 11 r (\015ag)s 11 r 620 1 ru f4 SF 637 r (*/)s 0 923 p (/*)s f0 SF 17 r (Before)s 11 r (calling)s 11 r (this)s 11 r (function)s f4 SF 11 r (set)s 2 r 10 1 ru 10 r (asr)s 3 r 10 1 ru 10 r (flag\(\))s f0 SF 11 r (we)s 10 r (hav)s -1 r (e)s 10 r (to)s 11 r (call)s f4 SF 12 r (set)s 2 r 10 1 ru 10 r (c)s 2 r 10 1 ru 11 r (flag\(\))s f0 SF 11 r (in)s 11 r (adv)s -1 r (ance.)s f4 SF 223 r (*/)s 0 1004 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (asr)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 1044 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 1085 p ({)s 35 1125 p (if)s 17 r (\(M)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 70 1165 p (return;)s 35 1206 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 1246 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (C)s 2 r 10 1 ru 16 r (flag;)s 35 1287 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("/*)s 18 r (asir)s 17 r (*/"\);)s 35 1327 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("fujitsu)s 17 r (lab"\);)s 35 1368 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("computer)s 17 r (algebra"\);)s 35 1408 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("algebraic"\);)s 35 1449 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("symbolic"\);)s 35 1489 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("ctrl\(\\""\);)s 35 1529 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("})s 17 r (def"\);)s 35 1570 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("*/)s 18 r (def"\);)s 35 1610 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("pari\("\);)s 35 1651 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("setprec\("\);)s 35 1691 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("newvect\("\);)s 35 1732 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("newmat\("\);)s 35 1772 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("functor\("\);)s 35 1812 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("funargs\("\);)s 35 1853 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("rtostr\("\);)s 35 1893 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("strtov\("\);)s 35 1934 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("which\(\\""\);)s 35 1974 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("plotover\("\);)s 35 2015 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("conplot\("\);)s 35 2055 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("ifplot\("\);)s 35 2096 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("grm\("\);)s 35 2136 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("hgr\("\);)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (17)s EP pstopssaved restore %%Page: pstops 18 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("hgrm\("\);)s 35 74 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("newalg\("\);)s 35 114 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("defpoly\("\);)s 35 155 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("ratint\("\);)s 35 195 p (if)s 17 r (\(ASR)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (C)s 2 r 10 1 ru 15 r (flag\))s 70 235 p (ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 0 276 p (#ifdef)s 17 r (DEBUGGING)s 35 316 p (printf\("set)s 2 r 10 1 ru 15 r (asr)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (ASR)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (ASR)s 2 r 10 1 ru 15 r (flag\);)s 0 357 p (#endif)s 0 397 p (})s 0 518 p (/*)s 17 r 572 1 ru f0 SF 582 r (set)s 11 r (MACSYMA)s 10 r (\015ag)s 12 r 572 1 ru f4 SF 588 r (*/)s 0 599 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (mac)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 640 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 680 p ({)s 35 721 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 761 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("/*)s 18 r (macsyma)s 17 r (*/"\);)s 35 802 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("/*)s 18 r (maxima)s 17 r (*/"\);)s 35 842 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("?round"\);)s 35 882 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("?truncate"\);)s 35 923 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("::=)s 18 r ("\);)s 35 963 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r (":="\);)s 35 1004 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("cabs\("\);)s 35 1044 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("declare\("\);)s 35 1085 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("define)s 3 r 10 1 ru 15 r (variable\("\);)s 35 1125 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("diff\("\);)s 35 1165 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("eigenvals\("\);)s 35 1206 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("eigenvects\("\);)s 35 1246 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*search)s 2 r 10 1 ru 15 r (phrase\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("eval)s 2 r 10 1 ru 15 r (when"\);)s 35 1287 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("gendiff\("\);)s 35 1327 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("graph2\("\);)s 35 1368 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("graph3d\("\);)s 35 1408 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("file)s 3 r 10 1 ru 15 r ("\);)s 35 1449 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("grobner)s 3 r 10 1 ru 15 r (basis"\);)s 35 1489 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("mode)s 3 r 10 1 ru 15 r (check)s 2 r 10 1 ru 15 r ("\);)s 35 1529 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("mode)s 3 r 10 1 ru 15 r (declare\("\);)s 35 1570 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("plot2\("\);)s 35 1610 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("plot3d\("\);)s 35 1651 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("resolvante)s 3 r 10 1 ru 15 r ("\);)s 35 1691 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("setup)s 3 r 10 1 ru 15 r (autoload\("\);)s 35 1732 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("solve\("\);)s 35 1772 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("sum\("\);)s 35 1812 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("taylor\("\);)s 35 1853 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("taylor)s 2 r 10 1 ru 15 r ("\);)s 35 1893 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("tr)s 2 r 10 1 ru 15 r ("\);)s 35 1934 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("undiff\("\);)s 35 1974 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("with)s 3 r 10 1 ru 15 r (stdout\("\);)s 35 2015 p (MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("writefile\("\);)s 0 2055 p (#ifdef)s 17 r (DEBUGGING)s 35 2096 p (printf\("set)s 2 r 10 1 ru 15 r (mac)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (MAC)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (MAC)s 2 r 10 1 ru 15 r (flag\);)s 0 2136 p (#endif)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (18)s EP pstopssaved restore %%Page: pstops 19 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 0 33 p (})s 0 155 p (/*)s 17 r 600 1 ru f0 SF 610 r (set)s 11 r (MAPLE)s 11 r (\015ag)s 11 r 600 1 ru f4 SF 616 r (*/)s 0 235 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (map)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 276 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 316 p ({)s 35 357 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr;)s 35 438 p (/*)s f0 SF 16 r (search)s 11 r (MAPLE)s 11 r (comment)s 10 r (area)s f4 SF 1001 r (*/)s 35 478 p (b)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 35 518 p (while)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (\(int\))s 17 r (\(BUFFER)s 3 r 10 1 ru 15 r (SIZE)s 17 r (/)s 18 r (2\)\))s 70 559 p ({)s 105 599 p (if)s 17 r (\(\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('\\n'\))s 174 640 p (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (1\))s 18 r (==)s 17 r ('#'\))s 174 680 p (&&)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r (')s 17 r ('\)\)\))s 139 721 p (++MAP)s 3 r 10 1 ru 15 r (flag;)s 105 761 p (++b)s 2 r 10 1 ru 15 r (ptr;)s 70 802 p (})s 35 842 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 882 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#)s 18 r (maple"\);)s 35 923 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("##"\);)s 35 963 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("###"\);)s 35 1004 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("####"\);)s 35 1044 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("university)s 17 r (of)s 17 r (waterloo"\);)s 35 1085 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("computer)s 17 r (algebra"\);)s 35 1125 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("algebraic"\);)s 35 1165 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("symbolic"\);)s 35 1206 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("mvcal"\);)s 35 1246 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("daub"\);)s 35 1287 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("calcp"\);)s 35 1327 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("calcplot"\);)s 35 1368 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("posets"\);)s 35 1408 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("coxeter"\);)s 35 1449 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("matthews"\);)s 35 1489 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("casa"\);)s 35 1529 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("macro\("\);)s 35 1570 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("with\("\);)s 35 1610 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("fi;"\);)s 35 1651 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("od;"\);)s 35 1691 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("error\(`"\);)s 35 1732 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("`\)"\);)s 35 1772 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("='"\);)s 35 1812 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("=`"\);)s 35 1853 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("`="\);)s 35 1893 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r (":="\);)s 35 1934 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("`:="\);)s 35 1974 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (":=`"\);)s 35 2015 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("<>"\);)s 35 2055 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("proc\("\);)s 35 2096 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("readlib\("\);)s 35 2136 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("readlib\(`"\);)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (19)s EP pstopssaved restore %%Page: pstops 20 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("eigenvals\("\);)s 35 74 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("eigenvects\("\);)s 35 114 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("simplify\("\);)s 35 155 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("sum\("\);)s 35 195 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("diff\("\);)s 35 235 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("int\("\);)s 35 276 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("solve\("\);)s 35 316 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("draw\("\);)s 35 357 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("plot\("\);)s 35 397 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("plot3d\("\);)s 35 438 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("animate\("\);)s 35 478 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("animate3d\("\);)s 35 518 p (MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("save)s 18 r (`"\);)s 0 559 p (#ifdef)s 17 r (DEBUGGING)s 35 599 p (printf\("set)s 2 r 10 1 ru 15 r (map)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (MAP)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (MAP)s 2 r 10 1 ru 15 r (flag\);)s 0 640 p (#endif)s 0 680 p (})s 0 802 p (/*)s 17 r 529 1 ru f0 SF 540 r (set)s 11 r (MA)s -2 r (THEMA)s -2 r (TICA)s 10 r (\015ag)s 11 r 529 1 ru f4 SF 546 r (*/)s 0 882 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (mat)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 923 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 963 p ({)s 35 1004 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr;)s 35 1085 p (/*)s f0 SF 16 r (search)s 11 r (MA)s -2 r (THEMA)s -3 r (TICA)s 10 r (comment)s 10 r (area)s f4 SF 862 r (*/)s 35 1125 p (b)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 35 1165 p (while)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (\(int\))s 17 r (\(BUFFER)s 3 r 10 1 ru 15 r (SIZE)s 17 r (/)s 18 r (2\)\))s 70 1206 p ({)s 105 1246 p (if)s 17 r (\(\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('\\n'\))s 174 1287 p (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (1\))s 18 r (==)s 17 r ('\('\))s 174 1327 p (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r ('*'\))s 174 1368 p (&&)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (3\))s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (3\))s 18 r (==)s 17 r (')s 17 r ('\)\)\))s 139 1408 p (++MAT)s 3 r 10 1 ru 15 r (flag;)s 105 1449 p (++b)s 2 r 10 1 ru 15 r (ptr;)s 70 1489 p (})s 35 1529 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 1570 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\(*)s 18 r (mathematica)s 17 r (*\)"\);)s 35 1610 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("*\)\(*"\);)s 35 1651 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("wolfram)s 17 r (research"\);)s 35 1691 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("computer)s 17 r (algebra"\);)s 35 1732 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("algebraic"\);)s 35 1772 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("symbolic"\);)s 35 1812 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("beginpackage["\);)s 35 1853 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("endpackage["\);)s 35 1893 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("begin["\);)s 35 1934 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("module["\);)s 35 1974 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("block["\);)s 35 2015 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*search)s 2 r 10 1 ru 15 r (phrase\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r ("end["\);)s 35 2055 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("on["\);)s 35 2096 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("off["\);)s 35 2136 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("array["\);)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (20)s EP pstopssaved restore %%Page: pstops 21 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("table["\);)s 35 74 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("vectorq["\);)s 35 114 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("matrixq["\);)s 35 155 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("list["\);)s 35 195 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("evaluate["\);)s 35 235 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("function["\);)s 35 276 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("if["\);)s 35 316 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("switch["\);)s 35 357 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("do["\);)s 35 397 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("while["\);)s 35 438 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("for["\);)s 35 478 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("break["\);)s 35 518 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("continue["\);)s 35 559 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("return["\);)s 35 599 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("label["\);)s 35 640 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("goto["\);)s 35 680 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("sum["\);)s 35 721 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("product["\);)s 35 761 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("expand["\);)s 35 802 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("factor["\);)s 35 842 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("simplify["\);)s 35 882 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("limit["\);)s 35 923 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("d["\))s 262 963 p (|)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("dt["\)\);)s 35 1004 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("integrate["\);)s 35 1044 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("solve["\);)s 35 1085 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("series["\);)s 35 1125 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("show["\);)s 35 1165 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("plot["\);)s 35 1206 p (MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("plot3d["\);)s 0 1246 p (#ifdef)s 17 r (DEBUGGING)s 35 1287 p (printf\("set)s 2 r 10 1 ru 15 r (mat)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (MAT)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (MAT)s 2 r 10 1 ru 15 r (flag\);)s 0 1327 p (#endif)s 0 1368 p (})s 0 1489 p (/*)s 17 r 587 1 ru f0 SF 598 r (set)s 11 r (MA)s -2 r (TLAB)s 10 r (\015ag)s 11 r 587 1 ru f4 SF 604 r (*/)s 0 1570 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (mlab)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 1610 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 1651 p ({)s 35 1691 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr;)s 35 1772 p (/*)s f0 SF 16 r (search)s 11 r (MA)s -2 r (TLAB)s 10 r (or)s 11 r (OCT)s -2 r (A)s -3 r (VE)s 10 r (comment)s 10 r (area)s f4 SF 785 r (*/)s 35 1812 p (b)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 35 1853 p (while)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (\(int\))s 17 r (\(BUFFER)s 3 r 10 1 ru 15 r (SIZE)s 17 r (/)s 18 r (2\)\))s 70 1893 p ({)s 105 1934 p (if)s 17 r (\(\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('\\n'\))s 174 1974 p (&&)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (1\))s 18 r (==)s 17 r ('#'\))s 17 r (||)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (1\))s 18 r (==)s 17 r ('%'\)\))s 174 2015 p (&&)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r (')s 17 r ('\)\)\))s 139 2055 p (++MLAB)s 3 r 10 1 ru 15 r (flag;)s 105 2096 p (++b)s 2 r 10 1 ru 15 r (ptr;)s 70 2136 p (})s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (21)s EP pstopssaved restore %%Page: pstops 22 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 74 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#)s 18 r (matlab"\);)s 35 114 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("%)s 18 r (matlab"\);)s 35 155 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#)s 18 r (octave"\);)s 35 195 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("%)s 18 r (octave"\);)s 35 235 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("#)s 17 r (mathworks"\);)s 35 276 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("%)s 17 r (mathworks"\);)s 35 316 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("endfor"\);)s 35 357 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("function["\);)s 35 397 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("endfunction"\);)s 35 438 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("endwhile"\);)s 35 478 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("end)s 18 r (end"\);)s 35 518 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("plot\("\);)s 35 559 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("plot3d\("\);)s 35 599 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("surf\("\);)s 35 640 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("shg"\);)s 35 680 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("clg"\);)s 35 721 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("gplot"\);)s 35 761 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("gsplot"\);)s 35 802 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("casesen"\);)s 35 842 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("edit)s 3 r 10 1 ru 15 r (history"\);)s 35 882 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("run)s 3 r 10 1 ru 15 r (history"\);)s 35 923 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".+"\);)s 35 963 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".-"\);)s 35 1004 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".*"\);)s 35 1044 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("./"\);)s 35 1085 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".\\\\"\);)s 35 1125 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".**"\);)s 35 1165 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".^"\);)s 35 1206 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("~="\);)s 35 1246 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (".'"\);)s 35 1287 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("<>"\);)s 35 1327 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("printf\(\\""\);)s 35 1368 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("printf\('"\);)s 35 1408 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("disp\('"\);)s 35 1449 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("error\(\\""\);)s 35 1489 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("error\('"\);)s 35 1529 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("nargin"\);)s 35 1570 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("nargout"\);)s 35 1610 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("\(:"\);)s 35 1651 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (4)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r (":\)"\);)s 35 1691 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("zeros\("\);)s 35 1732 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("rot90"\);)s 35 1772 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("fliplr"\);)s 35 1812 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("flipud"\);)s 35 1853 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("diag"\);)s 35 1893 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("tril"\);)s 35 1934 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("triu"\);)s 35 1974 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("title\('"\);)s 35 2015 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("gtext\("\);)s 35 2055 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("ginput\("\);)s 35 2096 p (MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("input\("\);)s 0 2136 p (#ifdef)s 17 r (DEBUGGING)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (22)s EP pstopssaved restore %%Page: pstops 23 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (printf\("set)s 2 r 10 1 ru 15 r (mlab)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (MLAB)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (MLAB)s 2 r 10 1 ru 15 r (flag\);)s 0 74 p (#endif)s 0 114 p (})s 0 235 p (/*)s 17 r 601 1 ru f0 SF 611 r (set)s 11 r (MuP)s -1 r (AD)s 10 r (\015ag)s 11 r 601 1 ru f4 SF 617 r (*/)s 0 316 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (mpad)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 357 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 397 p ({)s 35 438 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr;)s 35 518 p (/*)s f0 SF 16 r (search)s 11 r (MuP)s -2 r (AD)s 10 r (comment)s 10 r (area)s f4 SF 1004 r (*/)s 35 559 p (b)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 35 599 p (while)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (\(int\))s 17 r (\(BUFFER)s 3 r 10 1 ru 15 r (SIZE)s 17 r (/)s 18 r (2\)\))s 70 640 p ({)s 105 680 p (if)s 17 r (\(\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('\\n'\))s 174 721 p (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (1\))s 18 r (==)s 17 r ('#'\))s 174 761 p (&&)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r (')s 17 r ('\)\)\))s 139 802 p (++MPAD)s 3 r 10 1 ru 15 r (flag;)s 105 842 p (++b)s 2 r 10 1 ru 15 r (ptr;)s 70 882 p (})s 35 923 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 963 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("#)s 18 r (mupad)s 17 r (#"\);)s 35 1004 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("##"\);)s 35 1044 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("###"\);)s 35 1085 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("####"\);)s 35 1125 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("computer)s 17 r (algebra"\);)s 35 1165 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("algebraic"\);)s 35 1206 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("symbolic"\);)s 35 1246 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("end)s 3 r 10 1 ru 15 r (case"\);)s 35 1287 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("end)s 3 r 10 1 ru 15 r (for"\);)s 35 1327 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("end)s 3 r 10 1 ru 15 r (if"\);)s 35 1368 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("parbegin"\);)s 35 1408 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("end)s 3 r 10 1 ru 15 r (par"\);)s 35 1449 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("end)s 3 r 10 1 ru 15 r (proc"\);)s 35 1489 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("end)s 3 r 10 1 ru 15 r (repeat"\);)s 35 1529 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (3)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("seqbegin"\);)s 35 1570 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("end)s 3 r 10 1 ru 15 r (seq"\);)s 35 1610 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (5)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("end)s 3 r 10 1 ru 15 r (while"\);)s 35 1651 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r (":="\);)s 35 1691 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("diff\("\);)s 35 1732 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("int\("\);)s 35 1772 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("solve\("\);)s 35 1812 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("plot2d\("\);)s 35 1853 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("plot3d\("\);)s 35 1893 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("simplify\("\);)s 35 1934 p (MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("sum\("\);)s 0 1974 p (#ifdef)s 17 r (DEBUGGING)s 35 2015 p (printf\("set)s 2 r 10 1 ru 15 r (mpad)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (MPAD)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (MPAD)s 2 r 10 1 ru 15 r (flag\);)s 0 2055 p (#endif)s 0 2096 p (})s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (23)s EP pstopssaved restore %%Page: pstops 24 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 0 74 p (/*)s 17 r 588 1 ru f0 SF 599 r (set)s 11 r (REDUCE)s 11 r (\015ag)s 11 r 588 1 ru f4 SF 605 r (*/)s 0 155 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (red)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 195 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 235 p ({)s 35 276 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr;)s 35 357 p (if)s 17 r (\(M)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 70 397 p (return;)s 35 438 p (/*)s f0 SF 16 r (search)s 11 r (REDUCE)s 11 r (comment)s 10 r (area)s f4 SF 979 r (*/)s 35 478 p (b)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s 35 518 p (while)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (\(int\))s 17 r (\(BUFFER)s 3 r 10 1 ru 15 r (SIZE)s 17 r (/)s 18 r (2\)\))s 70 559 p ({)s 105 599 p (if)s 17 r (\(\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('\\n'\))s 174 640 p (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (1\))s 18 r (==)s 17 r ('%'\))s 174 680 p (&&)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (2\))s 18 r (==)s 17 r (')s 17 r ('\)\)\))s 139 721 p (++RED)s 3 r 10 1 ru 15 r (flag;)s 105 761 p (++b)s 2 r 10 1 ru 15 r (ptr;)s 70 802 p (})s 35 842 p (/*)s f0 SF 16 r (search)s 11 r (characteristic)s 10 r (phrases)s f4 SF 1026 r (*/)s 35 882 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (10)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("%)s 18 r (reduce"\);)s 35 923 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r (".)s 17 r (hearn"\);)s 35 963 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("computer)s 17 r (algebra"\);)s 35 1004 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("algebraic"\);)s 35 1044 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("symbolic"\);)s 35 1085 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("arnum"\);)s 35 1125 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("compact"\);)s 35 1165 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("excalc"\);)s 35 1206 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("gentran"\);)s 35 1246 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("orthovec"\);)s 35 1287 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("specfn"\);)s 35 1327 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("fide"\);)s 35 1368 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("physop"\);)s 35 1408 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("reacteqn"\);)s 35 1449 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("rlfi"\);)s 35 1489 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("ghyper"\);)s 35 1529 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("linalg"\);)s 35 1570 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("ncpoly"\);)s 35 1610 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("xideal"\);)s 35 1651 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("zeilberg"\);)s 35 1691 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("out)s 17 r (\\""\);)s 35 1732 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("begin)s 17 r (scalar"\);)s 35 1772 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("off)s 17 r (echo"\))s 262 1812 p (|)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("on)s 18 r (echo"\)\);)s 35 1853 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("on)s 17 r (rational"\))s 262 1893 p (|)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("off)s 18 r (rational"\)\);)s 35 1934 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("on)s 17 r (complex"\))s 262 1974 p (|)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("off)s 18 r (complex"\)\);)s 35 2015 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("on)s 17 r (round"\))s 262 2055 p (|)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("off)s 18 r (round"\)\);)s 35 2096 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("on)s 17 r (factor"\))s 262 2136 p (|)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("off)s 18 r (factor"\)\);)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (24)s EP pstopssaved restore %%Page: pstops 25 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 35 33 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("on)s 17 r (nat"\))s 262 74 p (|)s 17 r (search)s 2 r 10 1 ru 15 r (phrase\(buf)s 3 r 10 1 ru 15 r (ptr,)s 17 r ("off)s 18 r (nat"\)\);)s 35 114 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r (":="\);)s 35 155 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("part\("\);)s 35 195 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("factorize\("\);)s 35 235 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("remainder\("\);)s 35 276 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("mat\(\("\);)s 35 316 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("then<<"\);)s 35 357 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("do<<"\);)s 35 397 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("repeat<<"\);)s 35 438 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (2)s 18 r (*)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("else<<"\);)s 35 478 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("df\("\);)s 35 519 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("int\("\);)s 35 559 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("defint\("\);)s 35 599 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("solve\("\);)s 35 640 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("taylor\("\);)s 35 680 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("groebner\("\);)s 35 721 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("odesolve\("\);)s 35 761 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("root\("\);)s 35 802 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("plot\("\);)s 35 842 p (RED)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("linineq\("\);)s 0 883 p (#ifdef)s 17 r (DEBUGGING)s 35 923 p (printf\("set)s 2 r 10 1 ru 15 r (red)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (RED)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (RED)s 2 r 10 1 ru 15 r (flag\);)s 0 964 p (#endif)s 0 1004 p (})s 0 1125 p (/*)s 17 r 612 1 ru f0 SF 623 r (set)s 11 r (TEXT)s 11 r (\015ag)s 11 r 612 1 ru f4 SF 629 r (*/)s 0 1166 p (/*)s f0 SF 17 r (The)s 13 r (purp)s 1 r (ose)s 13 r (of)s 13 r (this)s 13 r (function)s 13 r (is)s 13 r (to)s 13 r (decide)s 14 r (whether)s 13 r (or)s 13 r (not)s 13 r (the)s 13 r (input)s 13 r (\014le)s 13 r (is)s 13 r (a)s 14 r (plain)s 13 r (text)s 13 r (\014le)s 13 r (or)s 13 r (a)s 13 r (src2tex)s 0 1206 p (format)s 11 r (\014le.)s f4 SF 1365 r (*/)s 0 1287 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (txt)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 1327 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 1367 p ({)s 35 1408 p (int)s 17 r (brace)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 139 r (/*)s f0 SF 17 r (brace)s 11 r (counter)s f4 SF 718 r (*/)s 35 1448 p (int)s 17 r (dollar)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 122 r (/*)s f0 SF 16 r (single)s 11 r (dollar)s 11 r (sign)s 11 r (counter)s f4 SF 552 r (*/)s 35 1489 p (int)s 17 r (ddollar)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 104 r (/*)s f0 SF 17 r (double)s 11 r (dollar)s 11 r (sign)s 11 r (counter)s f4 SF 537 r (*/)s 35 1529 p (int)s 17 r (i,)s 18 r (perl)s 2 r 10 1 ru 15 r (flag,)s 18 r (tmp)s 2 r 10 1 ru 15 r (flag,)s 18 r (*ptr,)s 17 r (*mark)s 2 r 10 1 ru 15 r (ptr;)s 35 1570 p (char)s 17 r (c)s 2 r 10 1 ru 16 r (1,)s 17 r (c0,)s 18 r (c1,)s 17 r (c2;)s 35 1651 p (/*)s f0 SF 16 r (prepare)s 12 r (for)s 11 r (sp)s 1 r (ecial)s 11 r (treatment)s 10 r (of)s 11 r (p)s 1 r (erl)s f4 SF 911 r (*/)s 35 1691 p (tmp)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (PERL)s 2 r 10 1 ru 16 r (flag;)s 35 1731 p (set)s 2 r 10 1 ru 15 r (perl)s 2 r 10 1 ru 16 r (flag\(buf)s 2 r 10 1 ru 15 r (ptr\);)s 35 1772 p (perl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (PERL)s 2 r 10 1 ru 16 r (flag;)s 35 1812 p (PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (tmp)s 2 r 10 1 ru 16 r (flag;)s 35 1893 p (/*)s f0 SF 16 r (initialize)s 12 r (parameters)s 11 r (and)s 11 r (start)s 11 r (chec)s -1 r (king)s f4 SF 864 r (*/)s 35 1934 p (TXT)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 35 1974 p (ptr)s 17 r (=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr;)s 35 2015 p (while)s 17 r (\(ptr)s 18 r (!=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr)s 17 r (+)s 18 r (\(int\)\(BUFFER)s 2 r 10 1 ru 15 r (SIZE)s 17 r (/)s 18 r (2\)\))s 70 2055 p ({)s 105 2095 p (/*)s f0 SF 16 r (increase)s 11 r (counters)s 10 r (if)s 11 r (it)s 12 r (is)s 11 r (necessary)s f4 SF 878 r (*/)s 105 2136 p (if)s 17 r (\(ptr)s 17 r (==)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr\))s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (25)s EP pstopssaved restore %%Page: pstops 26 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 139 33 p (c)s 3 r 10 1 ru 15 r (1)s 17 r (=)s 18 r (0x00;)s 105 74 p (else)s 139 114 p (c)s 3 r 10 1 ru 15 r (1)s 17 r (=)s 18 r (*\(ptr)s 17 r (-)s 18 r (1\);)s 105 155 p (c0)s 17 r (=)s 17 r (*ptr;)s 105 195 p (c1)s 17 r (=)s 17 r (*\(ptr)s 18 r (+)s 17 r (1\);)s 105 235 p (c2)s 17 r (=)s 17 r (*\(ptr)s 18 r (+)s 17 r (2\);)s 105 276 p (++ptr;)s 105 316 p (if)s 17 r (\(\(c)s 2 r 10 1 ru 16 r (1)s 17 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('{'\)\))s 139 357 p (++brace)s 3 r 10 1 ru 15 r (counter;)s 105 397 p (if)s 17 r (\(\(c)s 2 r 10 1 ru 16 r (1)s 17 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('}'\)\))s 139 438 p (--brace)s 3 r 10 1 ru 15 r (counter;)s 105 478 p (if)s 17 r (\(\(c)s 2 r 10 1 ru 16 r (1)s 17 r (!=)s 17 r ('$'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('$'\))s 18 r (&&)s 17 r (\(c1)s 17 r (!=)s 18 r ('$'\)\))s 139 518 p ({)s 174 559 p (mark)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 18 r (ptr;)s 174 599 p (for\(i=0)s 18 r (;)s 17 r (i)s 18 r (<)s 17 r (FORMULA)s 2 r 10 1 ru 16 r (LEN)s 2 r 10 1 ru 15 r (MAX;)s 17 r (++i\))s 209 640 p ({)s 244 680 p (++mark)s 2 r 10 1 ru 16 r (ptr;)s 244 721 p (if\(\(\(char\)*\(mark)s 2 r 10 1 ru 16 r (ptr)s 17 r (-1\))s 17 r (!=)s 18 r ('$'\))s 17 r (&&)s 18 r (\(\(char\)*mark)s 2 r 10 1 ru 15 r (ptr)s 18 r (==)s 17 r ('$'\)\))s 279 761 p (break;)s 209 802 p (})s 174 842 p (if\(\(\(char\)*\(mark)s 2 r 10 1 ru 16 r (ptr)s 17 r (-1\))s 18 r (!=)s 17 r ('$'\))s 18 r (&&)s 17 r (\(\(char\)*mark)s 2 r 10 1 ru 15 r (ptr)s 18 r (==)s 17 r ('$'\)\))s 209 882 p ({)s 244 923 p (++dollar)s 2 r 10 1 ru 16 r (counter;)s 244 963 p (dollar)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 17 r (2;)s 0 1004 p (#ifdef)s 17 r (DEBUGGING)s 244 1044 p (printf\("non-display)s 18 r (style)s 17 r (mathematical)s 17 r (formula)s 18 r (of)s 17 r (the)s 18 r (length)s 17 r ("\);)s 244 1085 p (printf\("%d\\n",)s 18 r (i)s 17 r (+)s 17 r (1\);)s 0 1125 p (#endif)s 209 1165 p (})s 174 1206 p (else)s 209 1246 p (dollar)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 139 1287 p (})s 0 1327 p (#ifdef)s 17 r (LATEX)s 105 1368 p (if)s 17 r (\(\(c0)s 17 r (==)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(c1)s 17 r (==)s 18 r ('\('\)\))s 139 1408 p ({)s 174 1449 p (mark)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 18 r (ptr;)s 174 1489 p (for\(i=0)s 18 r (;)s 17 r (i)s 18 r (<)s 17 r (FORMULA)s 2 r 10 1 ru 16 r (LEN)s 2 r 10 1 ru 15 r (MAX;)s 17 r (++i\))s 209 1529 p ({)s 244 1570 p (++mark)s 2 r 10 1 ru 16 r (ptr;)s 244 1610 p (if\(\(\(char\)*mark)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(\(char\)*\(mark)s 2 r 10 1 ru 16 r (ptr)s 17 r (+)s 18 r (1\))s 17 r (==)s 17 r ('\)'\)\))s 279 1651 p (break;)s 209 1691 p (})s 174 1732 p (if\(\(\(char\)*mark)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(\(char\)*\(mark)s 2 r 10 1 ru 15 r (ptr)s 17 r (+)s 18 r (1\))s 17 r (==)s 18 r ('\)'\)\))s 209 1772 p ({)s 244 1812 p (dollar)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 17 r (1;)s 0 1853 p (#ifdef)s 17 r (DEBUGGING)s 244 1893 p (printf\("non-display)s 18 r (style)s 17 r (mathematical)s 17 r (formula)s 18 r (of)s 17 r (the)s 18 r (length)s 17 r ("\);)s 244 1934 p (printf\("%d\\n",)s 18 r (i\);)s 0 1974 p (#endif)s 209 2015 p (})s 174 2055 p (else)s 209 2096 p (dollar)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 139 2136 p (})s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (26)s EP pstopssaved restore %%Page: pstops 27 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 105 33 p (if)s 17 r (\(\(c0)s 17 r (==)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(c1)s 17 r (==)s 18 r ('\)'\)\))s 139 74 p (dollar)s 3 r 10 1 ru 15 r (counter)s 17 r (=)s 18 r (0;)s 105 114 p (if)s 17 r (\(\(c0)s 17 r (==)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(\(c1)s 17 r (==)s 18 r ('['\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 17 r (']'\)\)\))s 139 155 p ({)s 174 195 p (++ddollar)s 2 r 10 1 ru 16 r (counter;)s 174 235 p (ddollar)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 139 276 p (})s 0 316 p (#else)s 105 357 p (if)s 17 r (\(\(c0)s 17 r (==)s 18 r ('$'\))s 17 r (&&)s 18 r (\(c1)s 17 r (==)s 18 r ('$'\))s 17 r (&&)s 18 r (\(c2)s 17 r (!=)s 17 r ('$'\)\))s 139 397 p ({)s 174 438 p (++ddollar)s 2 r 10 1 ru 16 r (counter;)s 174 478 p (ddollar)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 139 518 p (})s 0 559 p (#endif)s 105 640 p (/*)s f0 SF 16 r (set)s 11 r (or)s 11 r (unset)s 11 r (TXT)s 2 r 10 1 ru 10 r (\015ag)s f4 SF 1052 r (*/)s 105 680 p (if)s 17 r (\(brace)s 2 r 10 1 ru 16 r (counter)s 17 r (>)s 17 r (0\))s 139 721 p ({)s 174 761 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exits)s 11 r (an)s f2 SF 11 r (fn)s f0 SF 11 r (then)s 11 r (src2tex)s 11 r (thinks)s 11 r (that)s 12 r (input)s 11 r (\014le)s 11 r (is)s 11 r (written)s 11 r (in)s 11 r (T)s -2 r (eX.)s f4 SF 249 r (*/)s 174 802 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r ('{'\))s 18 r (&&)s 17 r (\(c0)s 17 r (==)s 18 r ('\\\\'\))s 244 842 p (&&)s 18 r (\(\(\(c1)s 17 r (>=)s 17 r ('a'\))s 18 r (&&)s 17 r (\(c1)s 18 r (<=)s 17 r ('z'\)\))s 314 882 p (||)s 17 r (\(\(c1)s 18 r (>=)s 17 r ('A'\))s 18 r (&&)s 17 r (\(c1)s 17 r (<=)s 18 r ('Z'\)\)\))s 244 923 p (&&)s 18 r (\(\(\(c2)s 17 r (>=)s 17 r ('a'\))s 18 r (&&)s 17 r (\(c2)s 18 r (<=)s 17 r ('z'\)\))s 314 963 p (||)s 17 r (\(\(c2)s 18 r (>=)s 17 r ('A'\))s 18 r (&&)s 17 r (\(c2)s 17 r (<=)s 18 r ('Z'\)\)\)\))s 209 1004 p ({)s 244 1044 p (TXT)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 244 1085 p (break;)s 209 1125 p (})s 174 1165 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r ('{'\))s 18 r (&&)s 17 r (\(c0)s 17 r (==)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(c1)s 17 r (==)s 18 r (')s 17 r ('\)\))s 209 1206 p ({)s 244 1246 p (TXT)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 244 1287 p (break;)s 209 1327 p (})s 139 1368 p (})s 105 1408 p (if)s 17 r (\(\(dollar)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 17 r (1\))s 18 r (||)s 17 r (\(ddollar)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (1\)\))s 139 1449 p ({)s 174 1489 p (/*)s f0 SF 17 r (chec)s -1 r (k)s 10 r (escap)s 1 r (e)s 11 r (sequence)s f4 SF 979 r (*/)s 174 1529 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r ('\\\\'\))s 244 1570 p (&&)s 18 r (\(\(\(c1)s 17 r (>=)s 17 r ('a'\))s 18 r (&&)s 17 r (\(c1)s 18 r (<=)s 17 r ('z'\)\))s 314 1610 p (||)s 17 r (\(\(c1)s 18 r (>=)s 17 r ('A'\))s 18 r (&&)s 17 r (\(c1)s 17 r (<=)s 18 r ('Z'\)\)\))s 244 1651 p (&&)s 18 r (\(\(\(c2)s 17 r (>=)s 17 r ('a'\))s 18 r (&&)s 17 r (\(c2)s 18 r (<=)s 17 r ('z'\)\))s 314 1691 p (||)s 17 r (\(\(c2)s 18 r (>=)s 17 r ('A'\))s 18 r (&&)s 17 r (\(c2)s 17 r (<=)s 18 r ('Z'\)\)\)\))s 209 1732 p ({)s 244 1772 p (TXT)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 0 1812 p (#ifdef)s 17 r (DEBUGGING)s 244 1853 p (printf\("set)s 2 r 10 1 ru 16 r (txt)s 2 r 10 1 ru 15 r (flag\(\):)s 17 r (TeX)s 18 r (escape)s 17 r (sequence)s 18 r (is)s 17 r (found\\n"\);)s 0 1893 p (#endif)s 209 1934 p (})s 174 1974 p (/*)s f0 SF 17 r (If)s 35 r 10 1 ru 49 r (and)s f4 SF 33 r (^)s f0 SF 33 r (are)s 17 r (not)s 16 r (used)s 17 r (prop)s 1 r (erly)s -2 r (,)s 16 r (then)s 16 r (src2tex)s 17 r (thinks)s 17 r (that)s 222 2015 p (input)s 17 r (\014le)s 17 r (is)s 16 r (a)s 17 r (plain)s 17 r (text,)s 16 r (i.e.,)s 17 r (not)s 16 r (a)s 17 r (T)s -2 r (eXt.)s f4 SF 655 r (*/)s 174 2055 p (if)s 18 r (\(\(\(c0)s 17 r (==)s 18 r (')s 2 r 10 1 ru 15 r ('\))s 18 r (||)s 17 r (\(c0)s 17 r (==)s 18 r ('^'\)\))s 17 r (&&)s 18 r (\(perl)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\)\))s 209 2096 p ({)s 244 2136 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 17 r (<=)s 18 r (')s 17 r ('\))s 18 r (||)s 17 r (\(c1)s 18 r (<=)s 17 r (')s 17 r ('\)\))s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (27)s EP pstopssaved restore %%Page: pstops 28 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 279 33 p ({)s 314 74 p (TXT)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 0 114 p (#ifdef)s 17 r (DEBUGGING)s 314 155 p (printf\("set)s 2 r 10 1 ru 15 r (txt)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (TeX)s 18 r (syntax)s 17 r (error)s 17 r (#1\\n"\);)s 314 195 p (printf\(")s 279 r (%c%c%c%c...\\n",)s 17 r (c)s 2 r 10 1 ru 16 r (1,)s 17 r (c0,)s 18 r (c1,)s 17 r (c2\);)s 0 235 p (#endif)s 314 276 p (break;)s 279 316 p (})s 244 357 p (if)s 18 r (\(c1)s 17 r (==)s 17 r ('{'\))s 279 397 p ({)s 314 438 p (TXT)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 314 478 p (break;)s 279 518 p (})s 244 559 p (if)s 18 r (\(\(\(c1)s 17 r (>=)s 17 r ('0'\))s 18 r (&&)s 17 r (\(c1)s 18 r (<=)s 17 r ('9'\)\))s 314 599 p (||)s 17 r (\(\(c1)s 18 r (>=)s 17 r ('a'\))s 18 r (&&)s 17 r (\(c1)s 17 r (<=)s 18 r ('z'\)\)\))s 279 640 p ({)s 314 680 p (if)s 17 r (\(\(\(c2)s 18 r (>=)s 17 r ('0'\))s 18 r (&&)s 17 r (\(c2)s 17 r (<=)s 18 r ('9'\)\))s 384 721 p (||)s 17 r (\(\(c2)s 17 r (>=)s 18 r ('a'\))s 17 r (&&)s 18 r (\(c2)s 17 r (<=)s 18 r ('z'\)\)\))s 349 761 p ({)s 384 802 p (TXT)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 0 842 p (#ifdef)s 17 r (DEBUGGING)s 384 882 p (printf\("set)s 2 r 10 1 ru 15 r (txt)s 2 r 10 1 ru 15 r (flag\(\):)s 18 r (TeX)s 17 r (syntax)s 18 r (error)s 17 r (#2\\n"\);)s 384 923 p (printf\(")s 278 r (%c%c%c%c...\\n",)s 18 r (c)s 2 r 10 1 ru 15 r (1,)s 18 r (c0,)s 17 r (c1,)s 18 r (c2\);)s 0 963 p (#endif)s 384 1004 p (break;)s 349 1044 p (})s 314 1085 p (else)s 349 1125 p ({)s 384 1165 p (TXT)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 349 1206 p (})s 279 1246 p (})s 209 1287 p (})s 139 1327 p (})s 70 1368 p (})s 35 1408 p (/*)s f0 SF 16 r (Any)s 11 r (news)s 11 r (article)s 11 r (or)s 11 r (mail)s 11 r (is)s 11 r (considered)s 11 r (as)s 11 r (a)s 11 r (text)s 11 r (\014le.)s f4 SF 685 r (*/)s 35 1449 p (if)s 17 r (\(\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("from:"\))s 17 r (!=)s 18 r (0\))s 105 1489 p (&&)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("newsgroups:"\))s 18 r (!=)s 17 r (0\))s 105 1529 p (&&)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("subject:"\))s 18 r (!=)s 17 r (0\))s 105 1570 p (&&)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("date:"\))s 18 r (!=)s 17 r (0\))s 105 1610 p (&&)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("organization:"\))s 18 r (!=)s 17 r (0\))s 105 1651 p (&&)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("path:"\))s 18 r (!=)s 17 r (0\)\))s 70 1691 p (TXT)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 35 1732 p (if)s 17 r (\(\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r ("from:"\))s 17 r (!=)s 18 r (0\))s 105 1772 p (&&)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("subject:"\))s 18 r (!=)s 17 r (0\))s 105 1812 p (&&)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("date:"\))s 18 r (!=)s 17 r (0\))s 105 1853 p (&&)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("to:"\))s 18 r (!=)s 17 r (0\))s 105 1893 p (&&)s 17 r (\(search)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,)s 17 r ("return-path:"\))s 18 r (!=)s 17 r (0\)\))s 70 1934 p (TXT)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 0 1974 p (#ifdef)s 17 r (DEBUGGING)s 35 2015 p (printf\("set)s 2 r 10 1 ru 15 r (txt)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (TXT)s 2 r 10 1 ru 16 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 17 r (%d\\n",)s 18 r (TXT)s 2 r 10 1 ru 15 r (flag\);)s 0 2055 p (#endif)s 0 2096 p (})s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (28)s EP pstopssaved restore %%Page: pstops 29 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 0 33 p (/*)s 17 r 482 1 ru f0 SF 492 r (initialize)s 11 r (language)s 11 r (and)s 12 r (text)s 11 r (\015ags)s 11 r 482 1 ru f4 SF 498 r (*/)s 0 74 p (/*)s f0 SF 17 r (In)s 9 r (this)s 9 r (function)s 10 r (we)s 8 r (just)s 9 r (see)s 10 r (the)s 9 r (su\016x)s 9 r (of)s 10 r (input)s 9 r (\014le)s 9 r (name)s 10 r (and)s 9 r (determine)s 9 r (language)s 10 r (type.)s 14 r (F)s -2 r (or)s 8 r (further)s 10 r (details,)s 0 114 p (it)s 11 r (would)s 10 r (b)s 1 r (e)s 11 r (b)s 1 r (etter)s 11 r (to)s 11 r (read)s 11 r (the)s 11 r (following)s 11 r (de\014nition)s 11 r (of)s 11 r (function)s f4 SF 11 r (init)s 2 r 10 1 ru 10 r (lang)s 2 r 10 1 ru 11 r (flag\(\))s f0 SF (.)s f4 SF 345 r (*/)s 0 194 p (void)s 17 r (init)s 3 r 10 1 ru 15 r (lang)s 2 r 10 1 ru 15 r (flag\(cptr\))s 0 235 p (char)s 17 r (*cptr[];)s 0 275 p ({)s 35 316 p (char)s 17 r (*ptr,)s 18 r (c0,)s 17 r (c1,)s 18 r (c2,)s 17 r (c3,)s 17 r (c4;)s 35 397 p (/*)s 17 r (set)s 18 r (language)s 17 r (flag)s 18 r (according)s 17 r (to)s 17 r (the)s 18 r (file)s 17 r (name)s 18 r (*/)s 35 437 p (ptr)s 17 r (=)s 18 r (cptr[0];)s 35 478 p (c0)s 17 r (=)s 18 r (*ptr;)s 35 518 p (c1)s 17 r (=)s 18 r (*++ptr;)s 35 558 p (c2)s 17 r (=)s 18 r (*++ptr;)s 35 599 p (c3)s 17 r (=)s 18 r (*++ptr;)s 35 639 p (c4)s 17 r (=)s 18 r (*++ptr;)s 35 680 p (if)s 17 r (\(\(\(c0)s 18 r (==)s 17 r ('M'\))s 18 r (||)s 17 r (\(c0)s 17 r (==)s 18 r ('m'\)\))s 244 r (/*)s f0 SF 17 r (MAKE)s f4 SF 533 r (*/)s 105 720 p (&&)s 17 r (\(\(c1)s 17 r (==)s 18 r ('A'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('a'\)\))s 105 761 p (&&)s 17 r (\(\(c2)s 17 r (==)s 18 r ('K'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 18 r ('k'\)\))s 105 801 p (&&)s 17 r (\(\(c3)s 17 r (==)s 18 r ('E'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 18 r ('e'\)\))s 105 842 p (&&)s 17 r (\(\(c4)s 17 r (==)s 18 r ('F'\))s 17 r (||)s 18 r (\(c4)s 17 r (==)s 18 r ('f'\)\)\))s 70 882 p (MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 35 922 p (/*)s f0 SF 16 r (search)s 16 r (the)s 17 r (su\016x)s 16 r (of)s 17 r (\014le)s 17 r (name)s f4 SF 996 r (*/)s 35 963 p (for)s 17 r (\(ptr)s 18 r (=)s 17 r (cptr[0];)s 18 r (*ptr)s 17 r (!=)s 17 r ('\\0';)s 18 r (++ptr\);)s 35 1003 p (for)s 17 r (\(;)s 18 r (\(*ptr)s 17 r (!=)s 18 r ('.'\))s 17 r (&&)s 17 r (\(ptr)s 18 r (!=)s 17 r (cptr[0]\);)s 18 r (--ptr\);)s 35 1044 p (/*)s f0 SF 16 r (set)s 17 r (language)s 17 r (\015ags)s 16 r (according)s 17 r (to)s 16 r (the)s 17 r (su\016x)s f4 SF 816 r (*/)s 35 1084 p (if)s 17 r (\(*ptr)s 18 r (==)s 17 r ('.'\))s 70 1125 p ({)s 105 1165 p (c1)s 17 r (=)s 17 r (*++ptr;)s 105 1206 p (c2)s 17 r (=)s 17 r (*++ptr;)s 105 1246 p (c3)s 17 r (=)s 17 r (*++ptr;)s 105 1287 p (c4)s 17 r (=)s 17 r (*++ptr;)s 105 1327 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('A'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('a'\)\))s 174 r (/*)s f0 SF 17 r (TEXT)s f4 SF 541 r (*/)s 174 1367 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('W'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('w'\)\))s 174 1408 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('K'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('k'\)\)\))s 139 1448 p (TXT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1489 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('B'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('b'\)\))s 174 1529 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('A'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('a'\)\))s 174 1570 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('t'\)\)\))s 139 1610 p (TXT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1651 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('c'\)\))s 174 1691 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('O'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('o'\)\))s 174 1731 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('N'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('n'\)\))s 174 1772 p (&&)s 18 r (\(\(c4)s 17 r (==)s 18 r ('F'\))s 17 r (||)s 18 r (\(c4)s 17 r (==)s 17 r ('f'\)\)\))s 139 1812 p (TXT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1853 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('D'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('d'\)\))s 174 1893 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('O'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('o'\)\))s 174 1934 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('c'\)\)\))s 139 1974 p (TXT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 2015 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('L'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('l'\)\))s 174 2055 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('E'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('e'\)\))s 174 2095 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('t'\)\)\))s 139 2136 p (TXT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (29)s EP pstopssaved restore %%Page: pstops 30 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 105 33 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('L'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('l'\)\))s 174 74 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('O'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('o'\)\))s 174 114 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('G'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('g'\)\)\))s 139 155 p (TXT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 195 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('S'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('s'\)\))s 174 235 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('E'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('e'\)\))s 174 276 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('D'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('d'\)\)\))s 139 316 p (TXT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 357 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('S'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('s'\)\))s 174 397 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('Y'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('y'\)\))s 174 438 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('S'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('s'\)\)\))s 139 478 p (TXT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 518 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('t'\)\))s 174 559 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('E'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('e'\)\))s 174 599 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('X'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('x'\)\)\))s 139 640 p (TXT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 680 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('t'\)\))s 174 721 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('X'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('x'\)\))s 174 761 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('t'\)\)\))s 139 802 p (TXT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 842 p (if)s 17 r (\(\(c1)s 17 r (==)s 18 r ('B'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('b'\)\))s 191 r (/*)s f0 SF 17 r (BASIC)s f4 SF 534 r (*/)s 139 882 p (BAS)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 923 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('V'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('v'\)\))s 174 963 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('B'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('b'\)\)\))s 139 1004 p (BAS)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1044 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('c'\)\))s 174 r (/*)s f0 SF 17 r (C)s f4 SF 612 r (*/)s 174 1085 p (&&)s 18 r (\(c2)s 17 r (!=)s 18 r ('B'\))s 17 r (&&)s 18 r (\(c2)s 17 r (!=)s 17 r ('b'\))s 174 1125 p (&&)s 18 r (\(c2)s 17 r (!=)s 18 r ('O'\))s 17 r (&&)s 18 r (\(c2)s 17 r (!=)s 17 r ('o'\))s 174 1165 p (&&)s 18 r (\(c2)s 17 r (!=)s 18 r ('S'\))s 17 r (&&)s 18 r (\(c2)s 17 r (!=)s 17 r ('s'\)\))s 139 1206 p (C)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1246 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('V'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('v'\)\))s 174 1287 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('c'\)\)\))s 139 1327 p (C)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1368 p (if)s 17 r (\(\(c1)s 17 r (==)s 18 r ('H'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('h'\)\))s 139 1408 p (C)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1449 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('c'\)\))s 174 r (/*)s f0 SF 17 r (COBOL)s f4 SF 516 r (*/)s 174 1489 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('B'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('b'\)\))s 174 1529 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('L'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('l'\)\)\))s 139 1570 p (CBL)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1610 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('c'\)\))s 174 1651 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('O'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('o'\)\))s 174 1691 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('B'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('b'\)\)\))s 139 1732 p (CBL)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1772 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('A'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('a'\)\))s 174 r (/*)s f0 SF 17 r (ASIR)s f4 SF 557 r (*/)s 174 1812 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('S'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('s'\)\))s 174 1853 p (&&)s 18 r (\(\(\(c3)s 17 r (>=)s 18 r ('0'\))s 17 r (&&)s 18 r (\(c3)s 17 r (<=)s 17 r ('9'\)\))s 244 1893 p (||)s 18 r (\(\(c3)s 17 r (>=)s 17 r ('A'\))s 18 r (&&)s 17 r (\(c3)s 18 r (<=)s 17 r ('Z'\)\))s 244 1934 p (||)s 18 r (\(\(c3)s 17 r (>=)s 17 r ('a'\))s 18 r (&&)s 17 r (\(c3)s 18 r (<=)s 17 r ('z'\)\)\)\))s 139 1974 p (ASR)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 2015 p (if)s 17 r (\(\(c1)s 17 r (==)s 18 r ('F'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('f'\)\))s 191 r (/*)s f0 SF 17 r (FOR)s -3 r (TRAN)s f4 SF 470 r (*/)s 139 2055 p (F77)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 2096 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('H'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('h'\)\))s 174 r (/*)s f0 SF 17 r (HTML)s f4 SF 536 r (*/)s 174 2136 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('t'\)\))s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (30)s EP pstopssaved restore %%Page: pstops 31 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 174 33 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('m'\)\))s 174 74 p (&&)s 18 r (\(\(c4)s 17 r (==)s 18 r ('L'\))s 17 r (||)s 18 r (\(c4)s 17 r (==)s 17 r ('l'\)\)\))s 139 114 p (HTML)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 155 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('J'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('j'\)\))s 174 r (/*)s f0 SF 17 r (JA)s -3 r (V)s -4 r (A)s f4 SF 552 r (*/)s 174 195 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('A'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('a'\)\))s 174 235 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('V'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('v'\)\))s 174 276 p (&&)s 18 r (\(\(c4)s 17 r (==)s 18 r ('A'\))s 17 r (||)s 18 r (\(c4)s 17 r (==)s 17 r ('a'\)\)\))s 139 316 p (JAVA)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 357 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('L'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('l'\)\))s 174 r (/*)s f0 SF 17 r (LISP)s f4 SF 563 r (*/)s 174 397 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('S'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('s'\)\)\))s 139 438 p (LISP)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 478 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('S'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('s'\)\))s 174 518 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('c'\)\)\))s 139 559 p (LISP)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 599 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('E'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('e'\)\))s 174 640 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('L'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('l'\)\)\))s 139 680 p (LISP)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 721 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('P'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('p'\)\))s 174 r (/*)s f0 SF 17 r (P)s -2 r (ASCAL)s f4 SF 503 r (*/)s 174 761 p (&&)s 18 r (\(c2)s 17 r (!=)s 18 r ('L'\))s 17 r (&&)s 18 r (\(c2)s 17 r (!=)s 17 r ('l'\))s 174 802 p (&&)s 18 r (\(c2)s 17 r (!=)s 18 r ('R'\))s 17 r (&&)s 18 r (\(c2)s 17 r (!=)s 17 r ('r'\)\))s 139 842 p (PAS)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 882 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('t'\)\))s 174 923 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('P'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('p'\)\)\))s 139 963 p (PAS)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1004 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('P'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('p'\)\))s 174 r (/*)s f0 SF 17 r (PERL)s f4 SF 546 r (*/)s 174 1044 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('L'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('l'\)\)\))s 139 1085 p (PERL)s 3 r 10 1 ru 15 r (flag)s 17 r (=1;)s 105 1125 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('P'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('p'\)\))s 174 1165 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('R'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('r'\)\))s 174 1206 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('L'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('l'\)\)\))s 139 1246 p (PERL)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1287 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('P'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('p'\)\))s 174 1327 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('H'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('h'\)\)\))s 139 1368 p (PERL)s 3 r 10 1 ru 15 r (flag)s 17 r (=1;)s 105 1408 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('P'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('p'\)\))s 174 1449 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('m'\)\)\))s 139 1489 p (PERL)s 3 r 10 1 ru 15 r (flag)s 17 r (=1;)s 105 1529 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('S'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('s'\)\))s 174 r (/*)s f0 SF 17 r (SHELL)s f4 SF 529 r (*/)s 174 1570 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('H'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('h'\)\)\))s 139 1610 p (SH)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1651 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('c'\)\))s 174 1691 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('S'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('s'\)\))s 174 1732 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('H'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('h'\)\)\))s 139 1772 p (SH)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1812 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('K'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('k'\)\))s 174 1853 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('S'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('s'\)\))s 174 1893 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('H'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('h'\)\)\))s 139 1934 p (SH)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1974 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('Z'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('Z'\)\))s 174 2015 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('S'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('s'\)\))s 174 2055 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('H'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('h'\)\)\))s 139 2096 p (SH)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 2136 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('t'\)\))s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (31)s EP pstopssaved restore %%Page: pstops 32 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 174 33 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('c'\)\))s 174 74 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('S'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('s'\)\))s 174 114 p (&&)s 18 r (\(\(c4)s 17 r (==)s 18 r ('H'\))s 17 r (||)s 18 r (\(c4)s 17 r (==)s 17 r ('h'\)\)\))s 139 155 p (SH)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 195 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('t'\)\))s 174 r (/*)s f0 SF 17 r (TCL)s f4 SF (/)s f0 SF (TK)s f4 SF 500 r (*/)s 174 235 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('c'\)\))s 174 276 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('L'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('l'\)\)\))s 139 316 p (TCL)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 357 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('t'\)\))s 174 397 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('K'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('k'\)\)\))s 139 438 p (TCL)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 478 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('m'\)\))s 174 r (/*)s f0 SF 17 r (MACSYMA,)s 15 r (MAXIMA)s f4 SF 287 r (*/)s 174 518 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('A'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('a'\)\))s 174 559 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('c'\)\)\))s 139 599 p (MAC)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 640 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('m'\)\))s 174 680 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('A'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('a'\)\))s 174 721 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('X'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('x'\)\)\))s 139 761 p (MAC)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 802 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('m'\)\))s 174 r (/*)s f0 SF 17 r (MAPLE)s f4 SF 515 r (*/)s 174 842 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('A'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('a'\)\))s 174 882 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('P'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('p'\)\)\))s 139 923 p (MAP)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 963 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('m'\)\))s 174 1004 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('P'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('p'\)\))s 174 1044 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('L'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('l'\)\)\))s 139 1085 p (MAP)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1125 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('m'\)\))s 174 r (/*)s f0 SF 17 r (MA)s -2 r (THEMA)s -3 r (TICA)s f4 SF 374 r (*/)s 174 1165 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('A'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('a'\)\))s 174 1206 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('t'\)\)\))s 139 1246 p (MAT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1287 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('m'\)\))s 174 1327 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('m'\)\))s 174 1368 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('A'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('a'\)\)\))s 139 1408 p (MAT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1449 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('m'\)\))s 174 r (/*)s f0 SF 17 r (MA)s -2 r (TLAB,)s 15 r (OCT)s -1 r (A)s -4 r (VE)s f4 SF 324 r (*/)s 174 1489 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('L'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('l'\)\)\))s 139 1529 p (MLAB)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1570 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('m'\)\))s 174 1610 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('t'\)\))s 174 1651 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('L'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('l'\)\)\))s 139 1691 p (MLAB)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1732 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('O'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('o'\)\))s 174 1772 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('c'\)\))s 174 1812 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('T'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('t'\)\)\))s 139 1853 p (MLAB)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 1893 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('m'\)\))s 174 r (/*)s f0 SF 17 r (MuP)s -2 r (AD)s f4 SF 517 r (*/)s 174 1934 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('U'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('u'\)\)\))s 139 1974 p (MPAD)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 2015 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('R'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('r'\)\))s 174 r (/*)s f0 SF 17 r (REDUCE)s f4 SF 492 r (*/)s 174 2055 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('E'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('e'\)\))s 174 2096 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('D'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('d'\)\)\))s 139 2136 p (RED)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (32)s EP pstopssaved restore %%Page: pstops 33 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 105 33 p (if)s 17 r (\(\(\(c1)s 17 r (==)s 18 r ('R'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('r'\)\))s 174 74 p (&&)s 18 r (\(\(c2)s 17 r (==)s 18 r ('D'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 17 r ('d'\)\))s 174 114 p (&&)s 18 r (\(\(c3)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c3)s 17 r (==)s 17 r ('c'\)\)\))s 139 155 p (RED)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 105 195 p (if)s 17 r (\(\(c1)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('m'\)\))s 191 r (/*)s f0 SF 17 r (M)s f4 SF (-)s f0 SF (\014le)s f4 SF 547 r (*/)s 139 236 p (M)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 70 276 p (})s 0 316 p (#ifdef)s 17 r (DEBUGGING)s 35 357 p (printf\("init)s 2 r 10 1 ru 15 r (lang)s 2 r 10 1 ru 16 r (flag\(\):\\n"\);)s 35 397 p (printf\("TXT)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (TXT)s 2 r 10 1 ru 15 r (flag\);)s 35 438 p (printf\("BAS)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (BAS)s 2 r 10 1 ru 15 r (flag\);)s 35 478 p (printf\("C)s 2 r 10 1 ru 15 r (flag)s 70 r (=%d\\n",)s 18 r (C)s 2 r 10 1 ru 15 r (flag\);)s 35 519 p (printf\("CBL)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (CBL)s 2 r 10 1 ru 15 r (flag\);)s 35 559 p (printf\("F77)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (F77)s 2 r 10 1 ru 15 r (flag\);)s 35 600 p (printf\("HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (HTML)s 2 r 10 1 ru 16 r (flag\);)s 35 640 p (printf\("JAVA)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (JAVA)s 2 r 10 1 ru 16 r (flag\);)s 35 681 p (printf\("LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (LISP)s 2 r 10 1 ru 16 r (flag\);)s 35 721 p (printf\("MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (MAKE)s 2 r 10 1 ru 16 r (flag\);)s 35 762 p (printf\("PAS)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (PAS)s 2 r 10 1 ru 15 r (flag\);)s 35 802 p (printf\("PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (PERL)s 2 r 10 1 ru 16 r (flag\);)s 35 842 p (printf\("SH)s 2 r 10 1 ru 15 r (flag)s 53 r (=%d\\n",)s 17 r (SH)s 2 r 10 1 ru 16 r (flag\);)s 35 883 p (printf\("TCL)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (TCL)s 2 r 10 1 ru 15 r (flag\);)s 35 923 p (printf\("ASR)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (ASR)s 2 r 10 1 ru 15 r (flag\);)s 35 964 p (printf\("MAC)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (MAC)s 2 r 10 1 ru 15 r (flag\);)s 35 1004 p (printf\("MAP)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (MAP)s 2 r 10 1 ru 15 r (flag\);)s 35 1045 p (printf\("MAT)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (MAT)s 2 r 10 1 ru 15 r (flag\);)s 35 1085 p (printf\("MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (MLAB)s 2 r 10 1 ru 16 r (flag\);)s 35 1126 p (printf\("MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (MPAD)s 2 r 10 1 ru 16 r (flag\);)s 35 1166 p (printf\("RED)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (RED)s 2 r 10 1 ru 15 r (flag\);)s 35 1207 p (printf\("M)s 2 r 10 1 ru 15 r (flag)s 70 r (=%d\\n",)s 18 r (M)s 2 r 10 1 ru 15 r (flag\);)s 0 1247 p (#endif)s 0 1287 p (})s 0 1368 p (/*)s 17 r 590 1 ru f0 SF 601 r (set)s 11 r (language)s 11 r (\015ags)s 11 r 590 1 ru f4 SF 606 r (*/)s 0 1409 p (/*)s f0 SF 17 r (If)s 9 r (no)s 9 r (language)s 9 r (\015ags)s 9 r (are)s 9 r (set)s 9 r (to)s 9 r (1,)s 10 r (then)s f4 SF 9 r (set)s 2 r 10 1 ru 11 r (lang)s 2 r 10 1 ru 10 r (flag\(\))s f0 SF 9 r (tries)s 9 r (to)s 9 r (determine)s 10 r (language)s 9 r (type)s 9 r (by)s 8 r (reading)s 9 r (input)s 0 1449 p (source)s 12 r (program)s 12 r (carefully)s -2 r (.)s 16 r (And)s 11 r (also,)s f4 SF 12 r (set)s 2 r 10 1 ru 11 r (lang)s 2 r 10 1 ru 10 r (flag\(\))s f0 SF 12 r (decides)s 12 r (whether)s 12 r (or)s 12 r (not)s 11 r (the)s 12 r (user)s 12 r (knows)s 11 r (the)s 11 r (grammar)s 0 1489 p (of)s 11 r (T)s -2 r (eX.)s f4 SF 1416 r (*/)s 0 1569 p (void)s 17 r (set)s 3 r 10 1 ru 15 r (lang)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 1610 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 1650 p ({)s 70 1691 p (char)s 17 r (*cptr;)s 70 1731 p (int)s 17 r (flag,)s 18 r (max)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 70 1812 p (/*)s f0 SF 16 r (plain)s 17 r (text)s 17 r (\014le?)s 16 r (or)s 17 r (src2tex)s 16 r (format)s 17 r (\014le?)s f4 SF 829 r (*/)s 70 1853 p (/*)s f0 SF 16 r (If)s 17 r (all)s 17 r (language)s 16 r (\015ags)s 17 r (are)s 16 r (still)s 17 r (equal)s 17 r (to)s 16 r (0,)s 17 r (then)s 16 r (they)s 17 r (are)s f4 SF 569 r (*/)s 70 1893 p (/*)s f0 SF 16 r (determined)s 17 r (by)s 16 r (searching)s 15 r (reserved)s 16 r (words)s 16 r (of)s 16 r (each)s 16 r (language.)s f4 SF 527 r (*/)s 70 1934 p (if)s 17 r (\(TXT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 105 1974 p (set)s 2 r 10 1 ru 15 r (txt)s 2 r 10 1 ru 16 r (flag\(buf)s 2 r 10 1 ru 15 r (ptr\);)s 70 2015 p (flag)s 17 r (=)s 18 r (BAS)s 2 r 10 1 ru 15 r (flag;)s 70 2055 p (flag)s 17 r (+=)s 18 r (C)s 2 r 10 1 ru 15 r (flag;)s 70 2095 p (flag)s 17 r (+=)s 18 r (CBL)s 2 r 10 1 ru 15 r (flag;)s 70 2136 p (flag)s 17 r (+=)s 18 r (F77)s 2 r 10 1 ru 15 r (flag;)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (33)s EP pstopssaved restore %%Page: pstops 34 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 70 33 p (flag)s 17 r (+=)s 18 r (HTML)s 2 r 10 1 ru 15 r (flag;)s 70 74 p (flag)s 17 r (+=)s 18 r (JAVA)s 2 r 10 1 ru 15 r (flag;)s 70 114 p (flag)s 17 r (+=)s 18 r (LISP)s 2 r 10 1 ru 15 r (flag;)s 70 155 p (flag)s 17 r (+=)s 18 r (MAKE)s 2 r 10 1 ru 15 r (flag;)s 70 195 p (flag)s 17 r (+=)s 18 r (PAS)s 2 r 10 1 ru 15 r (flag;)s 70 235 p (flag)s 17 r (+=)s 18 r (PERL)s 2 r 10 1 ru 15 r (flag;)s 70 276 p (flag)s 17 r (+=)s 18 r (SH)s 2 r 10 1 ru 15 r (flag;)s 70 316 p (flag)s 17 r (+=)s 18 r (TCL)s 2 r 10 1 ru 15 r (flag;)s 70 357 p (flag)s 17 r (+=)s 18 r (ASR)s 2 r 10 1 ru 15 r (flag;)s 70 397 p (flag)s 17 r (+=)s 18 r (MAP)s 2 r 10 1 ru 15 r (flag;)s 70 438 p (flag)s 17 r (+=)s 18 r (MAC)s 2 r 10 1 ru 15 r (flag;)s 70 478 p (flag)s 17 r (+=)s 18 r (MAT)s 2 r 10 1 ru 15 r (flag;)s 70 518 p (flag)s 17 r (+=)s 18 r (MLAB)s 2 r 10 1 ru 15 r (flag;)s 70 559 p (flag)s 17 r (+=)s 18 r (MPAD)s 2 r 10 1 ru 15 r (flag;)s 70 599 p (flag)s 17 r (+=)s 18 r (RED)s 2 r 10 1 ru 15 r (flag;)s 70 640 p (flag)s 17 r (+=)s 18 r (TXT)s 2 r 10 1 ru 15 r (flag;)s 70 680 p (/*)s f0 SF 16 r (set)s 11 r (language)s 11 r (\015ags)s 12 r (and)s 11 r (max)s 2 r 10 1 ru 10 r (\015ag)s f4 SF 947 r (*/)s 70 721 p (if)s 17 r (\(flag)s 18 r (==)s 17 r (0\))s 105 761 p ({)s 0 802 p (#ifdef)s 17 r (LATEX)s 139 842 p (fprintf\(stderr,"src2latex:)s 18 r ("\);)s 0 882 p (#else)s 139 923 p (fprintf\(stderr,"src2tex:)s 18 r ("\);)s 0 963 p (#endif)s 139 1004 p (fprintf\(stderr,)s 18 r ("trying)s 17 r (to)s 18 r (identify)s 17 r (language)s 18 r ("\);)s 139 1044 p (set)s 3 r 10 1 ru 15 r (bas)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 1085 p (fprintf\(stderr,)s 18 r ("."\);)s 139 1125 p (if)s 18 r (\(BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1165 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (BAS)s 2 r 10 1 ru 15 r (flag;)s 139 1206 p (set)s 3 r 10 1 ru 15 r (c)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 1246 p (fprintf\(stderr,)s 18 r ("."\);)s 139 1287 p (if)s 18 r (\(C)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1327 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (C)s 2 r 10 1 ru 15 r (flag;)s 139 1368 p (set)s 3 r 10 1 ru 15 r (cbl)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 1408 p (fprintf\(stderr,)s 18 r ("."\);)s 139 1449 p (if)s 18 r (\(CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1489 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (CBL)s 2 r 10 1 ru 15 r (flag;)s 139 1529 p (set)s 3 r 10 1 ru 15 r (f77)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 1570 p (fprintf\(stderr,)s 18 r ("."\);)s 139 1610 p (if)s 18 r (\(F77)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1651 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (F77)s 2 r 10 1 ru 15 r (flag;)s 139 1691 p (set)s 3 r 10 1 ru 15 r (html)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 1732 p (fprintf\(stderr,)s 18 r ("."\);)s 139 1772 p (if)s 18 r (\(HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1812 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (HTML)s 2 r 10 1 ru 15 r (flag;)s 139 1853 p (set)s 3 r 10 1 ru 15 r (java)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 1893 p (fprintf\(stderr,)s 18 r ("."\);)s 139 1934 p (if)s 18 r (\(JAVA)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1974 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (JAVA)s 2 r 10 1 ru 15 r (flag;)s 139 2015 p (set)s 3 r 10 1 ru 15 r (lisp)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 2055 p (fprintf\(stderr,)s 18 r ("."\);)s 139 2096 p (if)s 18 r (\(LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 2136 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (LISP)s 2 r 10 1 ru 15 r (flag;)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (34)s EP pstopssaved restore %%Page: pstops 35 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 139 33 p (set)s 3 r 10 1 ru 15 r (make)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 74 p (fprintf\(stderr,)s 18 r ("."\);)s 139 114 p (if)s 18 r (\(MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 155 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (MAKE)s 2 r 10 1 ru 15 r (flag;)s 139 195 p (set)s 3 r 10 1 ru 15 r (pas)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 235 p (fprintf\(stderr,)s 18 r ("."\);)s 139 276 p (if)s 18 r (\(PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 316 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (PAS)s 2 r 10 1 ru 15 r (flag;)s 139 357 p (set)s 3 r 10 1 ru 15 r (perl)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 397 p (fprintf\(stderr,)s 18 r ("."\);)s 139 438 p (if)s 18 r (\(PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 478 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (PERL)s 2 r 10 1 ru 15 r (flag;)s 139 518 p (set)s 3 r 10 1 ru 15 r (shell)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 559 p (fprintf\(stderr,)s 18 r ("."\);)s 139 599 p (if)s 18 r (\(SH)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 640 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (SH)s 2 r 10 1 ru 15 r (flag;)s 139 680 p (set)s 3 r 10 1 ru 15 r (tcl)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 721 p (fprintf\(stderr,)s 18 r ("."\);)s 139 761 p (if)s 18 r (\(TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 802 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (TCL)s 2 r 10 1 ru 15 r (flag;)s 139 842 p (set)s 3 r 10 1 ru 15 r (asr)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 882 p (fprintf\(stderr,)s 18 r ("."\);)s 139 923 p (if)s 18 r (\(ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 963 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (ASR)s 2 r 10 1 ru 15 r (flag;)s 139 1004 p (set)s 3 r 10 1 ru 15 r (mac)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 1044 p (fprintf\(stderr,)s 18 r ("."\);)s 139 1085 p (if)s 18 r (\(MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1125 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (MAC)s 2 r 10 1 ru 15 r (flag;)s 139 1165 p (set)s 3 r 10 1 ru 15 r (map)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 1206 p (fprintf\(stderr,)s 18 r ("."\);)s 139 1246 p (if)s 18 r (\(MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1287 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (MAP)s 2 r 10 1 ru 15 r (flag;)s 139 1327 p (set)s 3 r 10 1 ru 15 r (mat)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 1368 p (fprintf\(stderr,)s 18 r ("."\);)s 139 1408 p (if)s 18 r (\(MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1449 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (MAT)s 2 r 10 1 ru 15 r (flag;)s 139 1489 p (set)s 3 r 10 1 ru 15 r (mlab)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 1529 p (fprintf\(stderr,)s 18 r ("."\);)s 139 1570 p (if)s 18 r (\(MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1610 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (MLAB)s 2 r 10 1 ru 15 r (flag;)s 139 1651 p (set)s 3 r 10 1 ru 15 r (mpad)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 1691 p (fprintf\(stderr,)s 18 r ("."\);)s 139 1732 p (if)s 18 r (\(MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1772 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (MPAD)s 2 r 10 1 ru 15 r (flag;)s 139 1812 p (set)s 3 r 10 1 ru 15 r (red)s 2 r 10 1 ru 15 r (flag\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 139 1853 p (fprintf\(stderr,)s 18 r ("."\);)s 139 1893 p (if)s 18 r (\(RED)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1934 p (max)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (RED)s 2 r 10 1 ru 15 r (flag;)s 139 1974 p (fprintf\(stderr,)s 18 r (")s 17 r (done\\n"\);)s 139 2015 p (/*)s f0 SF 17 r (normalize)s 11 r (language)s 11 r (\015ags)s f4 SF 980 r (*/)s 139 2055 p (if)s 18 r (\(BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 2096 p (BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 2136 p (else)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (35)s EP pstopssaved restore %%Page: pstops 36 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 174 33 p (BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 74 p (if)s 18 r (\(C)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 114 p (C)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 155 p (else)s 174 195 p (C)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 235 p (if)s 18 r (\(CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 276 p (CBL)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 316 p (else)s 174 357 p (CBL)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 397 p (if)s 18 r (\(F77)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 438 p (F77)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 478 p (else)s 174 518 p (F77)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 559 p (if)s 18 r (\(HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 599 p (HTML)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 640 p (else)s 174 680 p (HTML)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 721 p (if)s 18 r (\(JAVA)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 761 p (JAVA)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 802 p (else)s 174 842 p (JAVA)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 882 p (if)s 18 r (\(LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 923 p (LISP)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 963 p (else)s 174 1004 p (LISP)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 1044 p (if)s 18 r (\(MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1085 p (MAKE)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 1125 p (else)s 174 1165 p (MAKE)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 1206 p (if)s 18 r (\(PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1246 p (PAS)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 1287 p (else)s 174 1327 p (PAS)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 1368 p (if)s 18 r (\(PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1408 p (PERL)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 1449 p (else)s 174 1489 p (PERL)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 1529 p (if)s 18 r (\(SH)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1570 p (SH)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 1610 p (else)s 174 1651 p (SH)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 1691 p (if)s 18 r (\(TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1732 p (TCL)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 1772 p (else)s 174 1812 p (TCL)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 1853 p (if)s 18 r (\(ASR)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 1893 p (ASR)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 1934 p (else)s 174 1974 p (ASR)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 2015 p (if)s 18 r (\(MAC)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 2055 p (MAC)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 2096 p (else)s 174 2136 p (MAC)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (36)s EP pstopssaved restore %%Page: pstops 37 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 139 33 p (if)s 18 r (\(MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 74 p (MAP)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 114 p (else)s 174 155 p (MAP)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 195 p (if)s 18 r (\(MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 235 p (MAT)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 276 p (else)s 174 316 p (MAT)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 357 p (if)s 18 r (\(MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 397 p (MLAB)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 438 p (else)s 174 478 p (MLAB)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 518 p (if)s 18 r (\(MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 559 p (MPAD)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 599 p (else)s 174 640 p (MPAD)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 680 p (if)s 18 r (\(RED)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (max)s 2 r 10 1 ru 16 r (flag\))s 174 721 p (RED)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 761 p (else)s 174 802 p (RED)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 105 842 p (})s 70 882 p (/*)s f0 SF 16 r (If)s 11 r (sum)s 11 r (of)s 12 r (all)s 11 r (language)s 11 r (\015ags)s f1 SF 11 r (>)s f0 SF 9 r (1,)s f4 SF 941 r (*/)s 70 923 p (/*)s f0 SF 16 r (i.e.,)s 11 r (if)s 11 r (we)s 11 r (cannot)s 11 r (identify)s 10 r (language)s 11 r (type,)s 11 r (then)s 11 r (we)s 10 r (reset)s 11 r (all)s 11 r (language)s 11 r (\015ags)s 11 r (to)s 12 r (0.)s f4 SF 279 r (*/)s 70 963 p (flag)s 17 r (=)s 18 r (BAS)s 2 r 10 1 ru 15 r (flag;)s 70 1004 p (flag)s 17 r (+=)s 18 r (C)s 2 r 10 1 ru 15 r (flag;)s 70 1044 p (flag)s 17 r (+=)s 18 r (CBL)s 2 r 10 1 ru 15 r (flag;)s 70 1085 p (flag)s 17 r (+=)s 18 r (F77)s 2 r 10 1 ru 15 r (flag;)s 70 1125 p (flag)s 17 r (+=)s 18 r (HTML)s 2 r 10 1 ru 15 r (flag;)s 70 1165 p (flag)s 17 r (+=)s 18 r (JAVA)s 2 r 10 1 ru 15 r (flag;)s 70 1206 p (flag)s 17 r (+=)s 18 r (LISP)s 2 r 10 1 ru 15 r (flag;)s 70 1246 p (flag)s 17 r (+=)s 18 r (MAKE)s 2 r 10 1 ru 15 r (flag;)s 70 1287 p (flag)s 17 r (+=)s 18 r (PAS)s 2 r 10 1 ru 15 r (flag;)s 70 1327 p (flag)s 17 r (+=)s 18 r (PERL)s 2 r 10 1 ru 15 r (flag;)s 70 1368 p (flag)s 17 r (+=)s 18 r (SH)s 2 r 10 1 ru 15 r (flag;)s 70 1408 p (flag)s 17 r (+=)s 18 r (TCL)s 2 r 10 1 ru 15 r (flag;)s 70 1449 p (flag)s 17 r (+=)s 18 r (ASR)s 2 r 10 1 ru 15 r (flag;)s 70 1489 p (flag)s 17 r (+=)s 18 r (MAC)s 2 r 10 1 ru 15 r (flag;)s 70 1529 p (flag)s 17 r (+=)s 18 r (MAP)s 2 r 10 1 ru 15 r (flag;)s 70 1570 p (flag)s 17 r (+=)s 18 r (MAT)s 2 r 10 1 ru 15 r (flag;)s 70 1610 p (flag)s 17 r (+=)s 18 r (MLAB)s 2 r 10 1 ru 15 r (flag;)s 70 1651 p (flag)s 17 r (+=)s 18 r (MPAD)s 2 r 10 1 ru 15 r (flag;)s 70 1691 p (flag)s 17 r (+=)s 18 r (RED)s 2 r 10 1 ru 15 r (flag;)s 70 1732 p (if)s 17 r (\(flag)s 18 r (>)s 17 r (1\))s 105 1772 p ({)s 139 1812 p (BAS)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 1853 p (C)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 1893 p (CBL)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 1934 p (F77)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 1974 p (HTML)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 2015 p (JAVA)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 2055 p (LISP)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 2096 p (MAKE)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 2136 p (PAS)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (37)s EP pstopssaved restore %%Page: pstops 38 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 139 33 p (PERL)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 74 p (SH)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 114 p (TCL)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 155 p (ASR)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 195 p (MAC)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 235 p (MAP)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 276 p (MAT)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 316 p (MLAB)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 357 p (MPAD)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 139 397 p (RED)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 105 438 p (})s 70 478 p (/*)s f0 SF 16 r (Here,)s 11 r (we)s 11 r (simply)s 11 r (identify)s 10 r (ASIR)s 11 r (with)s 11 r (C)s 11 r (;)s 11 r (actually)s -2 r (,)s 10 r (we)s 10 r (don't)s 12 r (use)s f4 SF 11 r (ASR)s 2 r 10 1 ru 10 r (flag)s f0 SF 11 r (in)s f5 SF 22 r (text2tex.c)s f0 SF 25 r (\014le)s f4 SF 86 r (*/)s 70 518 p (C)s 2 r 10 1 ru 15 r (flag)s 18 r (+=)s 17 r (ASR)s 2 r 10 1 ru 16 r (flag;)s 0 559 p (#ifdef)s 17 r (DEBUGGING)s 70 599 p (printf\("set)s 2 r 10 1 ru 15 r (lang)s 2 r 10 1 ru 16 r (flag\(\):\\n"\);)s 70 640 p (printf\("TXT)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (TXT)s 2 r 10 1 ru 15 r (flag\);)s 70 680 p (printf\("BAS)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (BAS)s 2 r 10 1 ru 15 r (flag\);)s 70 721 p (printf\("C)s 2 r 10 1 ru 15 r (flag)s 70 r (=%d\\n",)s 17 r (C)s 2 r 10 1 ru 16 r (flag\);)s 70 761 p (printf\("CBL)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (CBL)s 2 r 10 1 ru 15 r (flag\);)s 70 802 p (printf\("F77)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (F77)s 2 r 10 1 ru 15 r (flag\);)s 70 842 p (printf\("HTML)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (HTML)s 2 r 10 1 ru 16 r (flag\);)s 70 882 p (printf\("JAVA)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (JAVA)s 2 r 10 1 ru 16 r (flag\);)s 70 923 p (printf\("LISP)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (LISP)s 2 r 10 1 ru 16 r (flag\);)s 70 963 p (printf\("MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (MAKE)s 2 r 10 1 ru 16 r (flag\);)s 70 1004 p (printf\("PAS)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (PAS)s 2 r 10 1 ru 15 r (flag\);)s 70 1044 p (printf\("PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (PERL)s 2 r 10 1 ru 16 r (flag\);)s 70 1085 p (printf\("SH)s 2 r 10 1 ru 15 r (flag)s 53 r (=%d\\n",)s 17 r (SH)s 2 r 10 1 ru 15 r (flag\);)s 70 1125 p (printf\("TCL)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (TCL)s 2 r 10 1 ru 15 r (flag\);)s 70 1165 p (printf\("ASR)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (ASR)s 2 r 10 1 ru 15 r (flag\);)s 70 1206 p (printf\("MAC)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (MAC)s 2 r 10 1 ru 15 r (flag\);)s 70 1246 p (printf\("MAP)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (MAP)s 2 r 10 1 ru 15 r (flag\);)s 70 1287 p (printf\("MAT)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (MAT)s 2 r 10 1 ru 15 r (flag\);)s 70 1327 p (printf\("MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (MLAB)s 2 r 10 1 ru 16 r (flag\);)s 70 1368 p (printf\("MPAD)s 2 r 10 1 ru 15 r (flag)s 18 r (=%d\\n",)s 17 r (MPAD)s 2 r 10 1 ru 16 r (flag\);)s 70 1408 p (printf\("RED)s 2 r 10 1 ru 15 r (flag)s 35 r (=%d\\n",)s 18 r (RED)s 2 r 10 1 ru 15 r (flag\);)s 0 1449 p (#endif)s 70 1489 p (/*)s f0 SF 16 r (display)s 10 r (title,)s 12 r (version)s 10 r (and)s 11 r (conv)s -1 r (ersion)s 10 r (type)s f4 SF 809 r (*/)s 0 1529 p (#ifdef)s 17 r (LATEX)s 70 1570 p (fprintf\(stderr,"src2latex:)s 17 r (version)s 18 r ("\);)s 0 1610 p (#else)s 70 1651 p (fprintf\(stderr,"src2tex:)s 17 r (version)s 18 r ("\);)s 0 1691 p (#endif)s 70 1732 p (fprintf\(stderr,VERSION\);)s 0 1772 p (#ifdef)s 17 r (LATEX)s 70 1812 p (cptr)s 17 r (=)s 18 r ("\(TEXT->LaTeX\)";)s 70 1853 p (if)s 17 r (\(BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1893 p (cptr)s 17 r (=)s 17 r ("\(BASIC->LaTeX\)";)s 70 1934 p (if)s 17 r (\(C)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1974 p (cptr)s 17 r (=)s 17 r ("\(C,C++,OBJECTIVE-C->LaTeX\)";)s 70 2015 p (if)s 17 r (\(CBL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 2055 p (cptr)s 17 r (=)s 17 r ("\(COBOL->LaTeX\)";)s 70 2096 p (if)s 17 r (\(HTML)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 2136 p (cptr)s 17 r (=)s 17 r ("\(HTML->LaTeX\)";)s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (38)s EP pstopssaved restore %%Page: pstops 39 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 70 33 p (if)s 17 r (\(JAVA)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 74 p (cptr)s 17 r (=)s 17 r ("\(JAVA->LaTeX\)";)s 70 114 p (if)s 17 r (\(LISP)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 155 p (cptr)s 17 r (=)s 17 r ("\(LISP,SCHEME->LaTeX\)";)s 70 195 p (if)s 17 r (\(MAKE)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 235 p (cptr)s 17 r (=)s 17 r ("\(MAKE->LaTeX\)";)s 70 276 p (if)s 17 r (\(F77)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 316 p (cptr)s 17 r (=)s 17 r ("\(FORTRAN->LaTeX\)";)s 70 357 p (if)s 17 r (\(PAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 397 p (cptr)s 17 r (=)s 17 r ("\(PASCAL->LaTeX\)";)s 70 438 p (if)s 17 r (\(PERL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 478 p (cptr)s 17 r (=)s 17 r ("\(PERL->LaTeX\)";)s 70 518 p (if)s 17 r (\(SH)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 559 p (cptr)s 17 r (=)s 17 r ("\(SHELL->LaTeX\)";)s 70 599 p (if)s 17 r (\(TCL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 640 p (cptr)s 17 r (=)s 17 r ("\(TCL/TK->LaTeX\)";)s 70 680 p (if)s 17 r (\(ASR)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 721 p (cptr)s 17 r (=)s 17 r ("\(ASIR->LaTeX\)";)s 70 761 p (if)s 17 r (\(MAC)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 802 p (cptr)s 17 r (=)s 17 r ("\(MACSYMA,MAXIMA->LaTeX\)";)s 70 842 p (if)s 17 r (\(MAP)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 882 p (cptr)s 17 r (=)s 17 r ("\(MAPLE->LaTeX\)";)s 70 923 p (if)s 17 r (\(MAT)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 963 p (cptr)s 17 r (=)s 17 r ("\(MATHEMATICA->LaTeX\)";)s 70 1004 p (if)s 17 r (\(MLAB)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1044 p (cptr)s 17 r (=)s 17 r ("\(MATLAB,OCTAVE->LaTeX\)";)s 70 1085 p (if)s 17 r (\(MPAD)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1125 p (cptr)s 17 r (=)s 17 r ("\(MuPAD->LaTeX\)";)s 70 1165 p (if)s 17 r (\(RED)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1206 p (cptr)s 17 r (=)s 17 r ("\(REDUCE->LaTeX\)";)s 0 1246 p (#else)s 70 1287 p (cptr)s 17 r (=)s 18 r ("\(TEXT->TeX\)";)s 70 1327 p (if)s 17 r (\(BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1368 p (cptr)s 17 r (=)s 17 r ("\(BASIC->TeX\)";)s 70 1408 p (if)s 17 r (\(C)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1449 p (cptr)s 17 r (=)s 17 r ("\(C,C++,OBJECTIVE-C->TeX\)";)s 70 1489 p (if)s 17 r (\(CBL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1529 p (cptr)s 17 r (=)s 17 r ("\(COBOL->TeX\)";)s 70 1570 p (if)s 17 r (\(HTML)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1610 p (cptr)s 17 r (=)s 17 r ("\(HTML->TeX\)";)s 70 1651 p (if)s 17 r (\(JAVA)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1691 p (cptr)s 17 r (=)s 17 r ("\(JAVA->TeX\)";)s 70 1732 p (if)s 17 r (\(LISP)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1772 p (cptr)s 17 r (=)s 17 r ("\(LISP,SCHEME->TeX\)";)s 70 1812 p (if)s 17 r (\(MAKE)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1853 p (cptr)s 17 r (=)s 17 r ("\(MAKE->TeX\)";)s 70 1893 p (if)s 17 r (\(F77)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1934 p (cptr)s 17 r (=)s 17 r ("\(FORTRAN->TeX\)";)s 70 1974 p (if)s 17 r (\(PAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 2015 p (cptr)s 17 r (=)s 17 r ("\(PASCAL->TeX\)";)s 70 2055 p (if)s 17 r (\(PERL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 2096 p (cptr)s 17 r (=)s 17 r ("\(PERL->TeX\)";)s 70 2136 p (if)s 17 r (\(SH)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (39)s EP pstopssaved restore %%Page: pstops 40 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 105 33 p (cptr)s 17 r (=)s 17 r ("\(SHELL->TeX\)";)s 70 73 p (if)s 17 r (\(TCL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 113 p (cptr)s 17 r (=)s 17 r ("\(TCL/TK->TeX\)";)s 70 153 p (if)s 17 r (\(ASR)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 193 p (cptr)s 17 r (=)s 17 r ("\(ASIR->TeX\)";)s 70 232 p (if)s 17 r (\(MAC)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 272 p (cptr)s 17 r (=)s 17 r ("\(MACSYMA,MAXIMA->TeX\)";)s 70 312 p (if)s 17 r (\(MAP)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 352 p (cptr)s 17 r (=)s 17 r ("\(MAPLE->TeX\)";)s 70 392 p (if)s 17 r (\(MAT)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 432 p (cptr)s 17 r (=)s 17 r ("\(MATHEMATICA->TeX\)";)s 70 472 p (if)s 17 r (\(MLAB)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 511 p (cptr)s 17 r (=)s 17 r ("\(MATLAB,OCTAVE->TeX\)";)s 70 551 p (if)s 17 r (\(MPAD)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 591 p (cptr)s 17 r (=)s 17 r ("\(MuPAD->TeX\)";)s 70 631 p (if)s 17 r (\(RED)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 671 p (cptr)s 17 r (=)s 17 r ("\(REDUCE->TeX\)";)s 0 711 p (#endif)s 70 751 p (fprintf\(stderr,")s 17 r (%s)s 18 r (\\n",)s 17 r (cptr\);)s 0 790 p (})s f0 SF 1246 2216 p (lang\015ag.c)s 67 r (page)s 11 r (40)s EP pstopssaved restore %%Trailer %%Pages: 40 END %%EOF src2tex-2.12h.orig/modflag.c100644 1750 1750 74742 6133406551 15700 0ustar kawamurakawamura/* {\hrulefill} * {\ % beginning of TeX mode \input fonts.tex % define fonts \input title.tex % title and authors % end of TeX mode} * {\hrulefill} */ /* {\hrulefill\ modflag.c\ \hrulefill} */ #include #include "src2tex.h" extern int BAS_flag; extern int C_flag; extern int CBL_flag; extern int F77_flag; extern int HTML_flag; extern int JAVA_flag; extern int LISP_flag; extern int MAKE_flag; extern int PAS_flag; extern int PERL_flag; extern int SH_flag; extern int TCL_flag; extern int MAC_flag; extern int MAP_flag; extern int MAT_flag; extern int MLAB_flag; extern int MPAD_flag; extern int RED_flag; extern int *dec_buf_ptr(); extern int *inc_buf_ptr(); extern void set_lang_flag(); /* {\hrulefill\ get comment flag\ \hrulefill} */ /* {\rm When {\tt stat\_flag}$=0$, the function {\tt get\_comment\_flag()} increases {\tt stat\_flag} first and determines language type by using functions \smallskip \qquad {\tt set\_bas\_flag()}, {\tt set\_c\_flag()}, {\tt set\_f77\_flag()}, {\tt set\_lisp\_flag()}, {\tt set\_pas\_flag()}, etc. \smallskip \noindent For instance, if input file is written in C, then language flags {\tt BAS\_flag}, {\tt C\_flag}, {\tt F77\_flag}, {\tt LISP\_flag}, {\tt PAS\_flag}, {\it etc\/\ } are set as follows: \smallskip $\qquad\displaystyle {\tt BAS\_flag}=0, {\tt C\_flag}=1, {\tt F77\_flag}=0, {\tt LISP\_flag}=0, {\tt PAS\_flag}=0\ , \cdots .$ \smallskip \noindent In the main part of function {\tt get\_comment\_flag()}, the procedure is branched into five cases. In each case, comment flag {\tt com\_flag} is set to 1, {\it i.e.\/}, {\tt com\_flag}$=1$, if and only if integer pointer {\tt buf\_ptr} points a character of comment area of source program. $\qquad\displaystyle {\tt com\_flag}=\cases{ 1 &if {\tt buf\_ptr} points a character of comment area\cr 0 &otherwise\ .\cr}$ \noindent As is easily seen, it is not so difficult to distinguish comment area from program area, if language type is determined in advance. \hfill} */ int get_comment_flag(buf_ptr) int *buf_ptr; { static int stat_flag = 0; /* {\ status flag \hfill} */ static int paren_counter = 0; /* {\ parentheses counter \hfill} */ static int brace_counter = 0; /* {\ brace counter \hfill} */ static int com_flag = 0; /* {\ comment flag \hfill} */ static int char_counter = 0; /* {\ character counter \hfill} */ static int qt_counter = 0; /* {\ single quotation counter \hfill} */ static int bqt_counter = 0; /* {\ back quotation counter \hfill} */ static int dqt_counter = 0; /* {\ double quotation counter \hfill} */ static int slash_counter = 0; /* {\ slash counter \hfill} */ static int rgx_counter = 0; /* {\ regular expression counter \hfill} */ static int warn_flag = 0; /* {\ warning flag \hfill} */ int *ptr; char c_2, c_1, c0, c1, c2, c3, c4, c5, c6; /* {\ determine language \hfill} */ if (stat_flag == 0) { ++stat_flag; set_lang_flag(buf_ptr); } /* {\ get a neighborhood of buf\_ptr \hfill} */ ptr = dec_buf_ptr(buf_ptr); c_1 = *ptr; ptr = dec_buf_ptr(ptr); c_2 = *ptr; c0 = *buf_ptr; ptr = inc_buf_ptr(buf_ptr); c1 = *ptr; ptr = inc_buf_ptr(ptr); c2 = *ptr; ptr = inc_buf_ptr(ptr); c3 = *ptr; ptr = inc_buf_ptr(ptr); c4 = *ptr; ptr = inc_buf_ptr(ptr); c5 = *ptr; ptr = inc_buf_ptr(ptr); c6 = *ptr; /* {\ set comment flag of BASIC \hfill} */ if (BAS_flag == 1) { if ((c0 == '"') && (com_flag == 0)) { ++dqt_counter; dqt_counter %= 2; } if (dqt_counter == 0) { if ((com_flag == 1) && (c_1 == '\n')) com_flag = 0; if (char_counter == 0) { if ((com_flag == 0) && (c_1 <= ' ') && (c0 == 0x27)) { com_flag = 1; if ((c1 == '{') && (c2 == '\\') & (c3 == ' ')) *buf_ptr = ' '; } if ((com_flag == 0) && (c_1 <= ' ') && ((c0 == 'R') || (c0 == 'r')) && ((c1 == 'E') || (c1 == 'e')) && ((c2 == 'M') || (c2 == 'm'))) com_flag = 1; } } if (c0 == '\n') char_counter = 0; else { if (char_counter != 0) ++char_counter; else if ((c0 > '9') || ((c0 > ' ') && (c0 < '0'))) ++char_counter; } return com_flag; } /* {\ set comment flag of C or MACSYMA\hfill} */ if ((C_flag == 1) || (MAC_flag == 1)) { if ((((c_2 == '\\') && (c_1 == '\\')) || (c_1 != '\\')) && (c0 == '"') && ((c_1 != 0x27) || (c1 != 0x27)) && (com_flag == 0)) { ++dqt_counter; dqt_counter %= 2; } if (dqt_counter == 0) { if ((com_flag == 1) && (c_2 == '*') && (c_1 == '/')) com_flag = 0; if ((com_flag == 3) && ( c_1 == '\n')) com_flag = 0; if ((com_flag == 0) && (c0 == '/') && (c1 == '*')) com_flag = 1; if ((com_flag == 0) && (c0 == '/') && (c1 == '/')) com_flag = 3; } return (com_flag % 2); } /* {\ set comment flag of COBOL \hfill} */ if (CBL_flag == 1) { if ((com_flag == 1) && (char_counter == 0) && (c_1 == '\n')) com_flag = 0; if ((com_flag == 0) && (char_counter == 0) && ((c6 == '*') || (c6 == '/'))) com_flag = 1; if (c0 == '\n') char_counter = 0; else ++char_counter; return com_flag; } /* {\ set comment flag of FORTRAN \hfill} */ if (F77_flag == 1) { if ((c0 == 0x27) && (com_flag == 0)) { ++qt_counter; qt_counter %= 2; } if (qt_counter == 0) { if((com_flag == 1) && ((c_1 == '\r') || (c_1 == '\n'))) com_flag = 0; if ((com_flag == 1) && ((c_1 == 'C') || (c_1 == 'c') || (c_1 == '*')) && ((c0 == '\r') || (c0 == '\n'))) com_flag = 0; if (char_counter == 0) { if ((com_flag == 0) && ((c0 == 'C') || (c0 == 'c'))) com_flag = 1; if ((com_flag == 0) && (c0 == '*')) { com_flag = 1; if ((c1 == '{') && (c2 == '\\') & (c3 == ' ')) *buf_ptr = ' '; } } } if (c0 == '\n') char_counter = 0; else ++char_counter; return com_flag; } /* {\ set comment flag of HTML \hfill} */ if (HTML_flag == 1) { if ((((c_2 == '\\') && (c_1 == '\\')) || (c_1 != '\\')) && (c0 == '"') && ((c_1 != 0x27) || (c1 != 0x27)) && (com_flag == 0)) { ++dqt_counter; dqt_counter %= 2; } if (dqt_counter == 0) { if ((com_flag == 1) && (c_2 == '-') && (c_1 == '>')) com_flag = 0; if ((com_flag == 0) && (c0 == '<') && (c1 == '!') && (c2 = '-')) com_flag = 1; } return com_flag; } /* {\ set comment flag of JAVA \hfill} */ if (JAVA_flag == 1) { if ((((c_2 == '\\') && (c_1 == '\\')) || (c_1 != '\\')) && (c0 == '"') && ((c_1 != 0x27) || (c1 != 0x27)) && (com_flag == 0)) { ++dqt_counter; dqt_counter %= 2; } if (dqt_counter == 0) { if ((com_flag == 1) && (c_2 == '*') && (c_1 == '/')) com_flag = 0; if ((com_flag == 3) && ( c_1 == '\n')) com_flag = 0; if ((com_flag == 0) && (c0 == '/') && (c1 == '*')) com_flag = 1; if ((com_flag == 0) && (c0 == '/') && (c1 == '/')) com_flag = 3; } return (com_flag % 2); } /* {\ set comment flag of LISP \hfill} */ if (LISP_flag == 1) { if ((c0 == '"') && (com_flag == 0)) { ++dqt_counter; dqt_counter %= 2; } if (dqt_counter == 0) { if ((com_flag == 1) && ( c_1 == '\n')) com_flag = 0; if ((com_flag == 0) && (c0 == ';')) { com_flag = 1; if ((c1 == '{') && (c2 == '\\') & (c3 == ' ')) *buf_ptr = ' '; } } return com_flag; } /* {\ set comment flag of MAKE \hfill} */ if (MAKE_flag == 1) { if ((c0 == 0x27) && (com_flag == 0) && (bqt_counter == 0) && (dqt_counter == 0)) { ++qt_counter; qt_counter %= 2; } if ((c0 == 0x60) && (com_flag == 0) && (qt_counter == 0) && (dqt_counter == 0)) { ++bqt_counter; bqt_counter %= 2; } if ((c0 == '"') && (com_flag == 0) && (qt_counter == 0) && (bqt_counter == 0)) { ++dqt_counter; dqt_counter %= 2; } if ((qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0)) { if ((com_flag == 1) && (c_2 != '\\') && ((c_1 == '\r') || (c_1 == '\n'))) com_flag = 0; if ((com_flag == 1) && (c_1 == '#') && ((c0 == '\r') || (c0 == '\n'))) com_flag = 0; if ((com_flag == 0) && (c0 == '#')) { com_flag = 1; if ((c1 == '{') && (c2 == '\\') & (c3 == ' ')) *buf_ptr = ' '; } } return com_flag; } /* {\ set comment flag of MuPAD \hfill} */ if (MPAD_flag == 1) { if ((c0 == 0x27) && (com_flag == 0) && (bqt_counter == 0) && (dqt_counter == 0)) { ++qt_counter; qt_counter %= 2; } if ((c0 == 0x60) && (com_flag == 0) && (qt_counter == 0) && (dqt_counter == 0)) { ++bqt_counter; bqt_counter %= 2; } if ((c0 == '"') && (com_flag == 0) && (qt_counter == 0) && (bqt_counter == 0)) { ++dqt_counter; dqt_counter %= 2; } if ((qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0)) { if ((com_flag == 1) && (c_1 != '\\') && (c0 == '#')) com_flag = 0; if ((com_flag == 0) && ((c_1 <= 0x20) || (c_1 == ';')) && (c0 == '#')) com_flag = 1; } return com_flag; } /* {\ set comment flag of PASCAL \hfill} */ if (PAS_flag == 1) { if ((c0 == 0x27) && (com_flag == 0)) { ++qt_counter; qt_counter %= 2; } if ((qt_counter == 0) && (c_1 != '\\') && (c0 == '{')) ++brace_counter; if ((qt_counter == 0) && (c_1 != '\\') && (c0 == '}')) --brace_counter; if (qt_counter == 0) { if ((brace_counter == 0) && (com_flag == 1) && (c_1 == '}')) com_flag = 0; if ((brace_counter == 1) && (com_flag == 0) && (c0 == '{')) com_flag = 1; if ((com_flag == 3) && (c_2 == '*') && (c_1 == ')')) com_flag = 0; if ((com_flag == 0) && (c0 == '(') && (c1 == '*')) com_flag = 3; } return (com_flag % 2); } /* {\ set comment flag of PERL \hfill} */ if (PERL_flag == 1) { if ((((c_2 != '$') && (c_1 == 'm') && (c0 == '!')) || ((c_1 != '\\') && (c0 == '?'))) && (com_flag == 0) && (rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 0) && (qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0) && (slash_counter == 0)) ++rgx_counter; if ((c_1 != '\\') && ((c0 == '!') || (c0 == '?')) && (com_flag == 0) && (rgx_counter == 1) && (paren_counter == 0) && (brace_counter == 0) && (qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0) && (slash_counter == 0)) --rgx_counter; if ((c_1 != '\\') && ((c0 == '(') || (c0 == ')')) && (com_flag == 0) && (rgx_counter == 0) && (brace_counter == 0) && (qt_counter == 0) && (dqt_counter == 0) && (bqt_counter == 0) && (slash_counter == 0)) { ++paren_counter; paren_counter %= 2; } if ((c_1 != '\\') && (c0 == '{') && (((c_1 >= 'A') && (c_1 <= 'Z')) || ((c_1 >= 'a') && (c_1 <= 'z'))) && (com_flag == 0) && (rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 0) && (qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0) && (slash_counter == 0)) ++brace_counter; if ((c_1 != '\\') && (c0 == '}') && (com_flag == 0) && (rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 1) && (qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0) && (slash_counter == 0)) --brace_counter; if ((c_1 != '\\') && (c0 == 0x27) && (com_flag == 0) && (rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0) && (slash_counter == 0)) { ++qt_counter; qt_counter %= 2; } if ( (((c_1 == 'q') && (c0 == '|')) || ((c_1 != '\\') && (c0 == '|'))) && (com_flag == 0) && (rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0) && (slash_counter == 0)) { qt_counter += 2; qt_counter %= 4; } if ((c_1 != '\\') && (c0 == 0x60) && (com_flag == 0) && (rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 0) && (qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0) && (slash_counter == 0)) bqt_counter = 1; if ((c_1 != '\\') && (c0 == 0x60) && (com_flag == 0) && (rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 0) && (qt_counter == 0) && (bqt_counter == 1) && (dqt_counter == 0) && (slash_counter == 0)) bqt_counter = 0; if ((c_1 != '\\') && (c0 == '"') && (com_flag == 0) && (rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 0) && (qt_counter == 0) && (bqt_counter == 0) && (slash_counter == 0)) { ++dqt_counter; dqt_counter %= 2; } if ((c_1 == ' ') && (c0 == '/') && (com_flag == 0) && (rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 0) && (qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0) && (slash_counter == 0)) slash_counter = 2; if ((c_2 != '$') && ((c_1 >= 'a') && (c_1 <= 'z')) && (c0 == '/') && (com_flag == 0) && (rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 0) && (qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0) && (slash_counter == 0)) slash_counter = 3; if ((((c_1 != '\\') || ((c_2 == '\\') && (c_1 == '\\'))) && (c0 == '/')) && (com_flag == 0) && (rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 0) && (qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0) && (slash_counter != 0)) --slash_counter; if ((rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 0) && (qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0) && (slash_counter == 0)) { /* if ((com_flag == 1) && (c_2 != '\\') && ((c_1 == '\r') || (c_1 == '\n'))) com_flag = 0; */ if ((com_flag == 1) && ((c_1 == '\r') || (c_1 == '\n'))) com_flag = 0; if ((com_flag == 1) && (c_1 == '#') && ((c0 == '\r') || (c0 == '\n'))) com_flag = 0; if ((com_flag == 0) && (rgx_counter == 0) && (paren_counter == 0) && (brace_counter == 0) && (qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0) && (slash_counter == 0) && ((stat_flag++ == 1) || (c_1 == '\t') || (c_1 == '\n') || (c_1 == ' ') || (c_1 == ';')) && (c0 == '#')) { com_flag = 1; if ((c1 == '{') && (c2 == '\\') & (c3 == ' ')) *buf_ptr = ' '; } } if (c0 == '\n') char_counter = 0; else ++char_counter; return com_flag; } /* {\ set comment flag of SHELL \hfill} */ if (SH_flag == 1) { if ((c0 == 0x27) && (com_flag == 0) && (bqt_counter == 0) && (dqt_counter == 0)) { ++qt_counter; qt_counter %= 2; } if ((c0 == 0x60) && (com_flag == 0) && (qt_counter == 0) && (dqt_counter == 0)) { ++bqt_counter; bqt_counter %= 2; } if ((c0 == '"') && (com_flag == 0) && (qt_counter == 0) && (bqt_counter == 0)) { ++dqt_counter; dqt_counter %= 2; } if ((qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0)) { if ((com_flag == 1) && (c_2 != '\\') && ((c_1 == '\r') || (c_1 == '\n'))) com_flag = 0; if ((com_flag == 1) && (c_1 == '#') && ((c0 == '\r') || (c0 == '\n'))) com_flag = 0; if ((com_flag == 0) && (c_1 != '$') && (c0 == '#')) { com_flag = 1; if ((c1 == '{') && (c2 == '\\') & (c3 == ' ')) *buf_ptr = ' '; } } return com_flag; } /* {\ set comment flag of TCL/TK \hfill} */ if (TCL_flag == 1) { if ((c0 == 0x27) && (com_flag == 0) && (bqt_counter == 0) && (dqt_counter == 0)) { ++qt_counter; qt_counter %= 2; } if ((c0 == 0x60) && (com_flag == 0) && (qt_counter == 0) && (dqt_counter == 0)) { ++bqt_counter; bqt_counter %= 2; } if ((c0 == '"') && (com_flag == 0) && (qt_counter == 0) && (bqt_counter == 0)) { ++dqt_counter; dqt_counter %= 2; } if ((qt_counter == 0) && (bqt_counter == 0) && (dqt_counter == 0)) { if ((com_flag == 1) && (c_2 != '\\') && ((c_1 == '\r') || (c_1 == '\n'))) com_flag = 0; if ((com_flag == 1) && (c_1 == '#') && ((c0 == '\r') || (c0 == '\n'))) com_flag = 0; if ((com_flag == 0) && (c0 == '#')) { com_flag = 1; if ((c1 == '{') && (c2 == '\\') & (c3 == ' ')) *buf_ptr = ' '; } } return com_flag; } /* {\ set comment flag of MAPLE \hfill} */ if (MAP_flag == 1) { if ((com_flag == 0) && (c_1 != 0x27) && (c0 == 0x27) && (c1 != 0x27)) { ++qt_counter; qt_counter %= 2; } if (qt_counter == 0) { if ((com_flag == 1) && (c_2 != '\\') && ((c_1 == '\r') || (c_1 == '\n'))) com_flag = 0; if ((com_flag == 1) && (c_1 == '#') && ((c0 == '\r') || (c0 == '\n'))) com_flag = 0; if ((com_flag == 0) && (c0 == '#')) { com_flag = 1; if ((c1 == '{') && (c2 == '\\') & (c3 == ' ')) *buf_ptr = ' '; } } return com_flag; } /* {\ set comment flag of MATHEMATICA \hfill} */ if (MAT_flag == 1) { if ((c0 == '"') && (com_flag == 0)) { ++dqt_counter; dqt_counter %= 2; } if (dqt_counter == 0) { if ((com_flag == 1) && (c_2 == '*') && (c_1 == ')')) com_flag = 0; if ((com_flag == 0) && (c0 == '(') && (c1 == '*')) com_flag = 1; } return com_flag; } /* {\ set comment flag of MATLAB \hfill} */ if (MLAB_flag == 1) { if ((c0 == 0x27) && (qt_counter == 1)) qt_counter = 0; if (((c_1 < '0') || ((c_1 > '9') && (c_1 < 'A')) || ((c_1 > 'Z') && (c_1 < 'a')) || (c_1 > 'z')) && (c_1 != '\\') && (c_1 != '.') && (c_1 != ')') && (c_1 != ']') && (c0 == 0x27) && (com_flag == 0)) qt_counter = 1; if ((c_1 != '\\') && (c0 == '"') && (com_flag == 0)) { ++dqt_counter; dqt_counter %= 2; } if ((qt_counter == 0) && (dqt_counter == 0)) { if ((com_flag == 1) && ( c_1 == '\n')) com_flag = 0; if ((com_flag == 0) && ((c0 == '#') || (c0 == '%'))) { com_flag = 1; if ((c1 == '{') && (c2 == '\\') & (c3 == ' ')) *buf_ptr = ' '; } } return com_flag; } /* {\ set comment flag of REDUCE \hfill} */ if (RED_flag == 1) { if ((c0 == '"') && (com_flag == 0)) { ++dqt_counter; dqt_counter %= 2; } if (dqt_counter == 0) { if ((com_flag == 1) && ( c_1 == '\n')) com_flag = 0; if ((com_flag == 0) && (c0 == '%')) { com_flag = 1; if ((c1 == '{') && (c2 == '\\') & (c3 == ' ')) *buf_ptr = ' '; } if ((com_flag == 3) && (c_1 == ';')) com_flag = 0; if ((com_flag == 0) && ((c0 == 'C') || (c0 == 'c')) && ((c1 == 'O') || (c1 == 'o')) && ((c2 == 'M') || (c2 == 'm')) && ((c3 == 'M') || (c3 == 'm')) && ((c4 == 'E') || (c4 == 'e')) && ((c5 == 'N') || (c5 == 'n')) && ((c6 == 'T') || (c6 == 't'))) com_flag = 3; } return (com_flag % 2); } return com_flag; } /* {\hrulefill\ get {\TeX} mode flag\ \hrulefill} */ /* {\rm This function sets math flag {\tt math\_flag} and escape flag {\tt esc\_flag} as follows: $\qquad\displaystyle {\tt math\_flag}\cases{ \not=0 &if {\tt buf\_ptr} points between \$ and \$ \quad(or\ $\backslash$( and $\backslash$)\ )\cr \not=0 &if {\tt buf\_ptr} points between \$\$ and \$\$ \quad(or\ $\backslash$[ and $\backslash$]\ )\cr =0 &otherwise\ ,\cr}$ \smallskip $\qquad\displaystyle {\tt esc\_flag}\kern.62em \cases{ \not=0 &if {\tt buf\_ptr} points between $\{\backslash$ and $\}$\cr =0 &otherwise\ .\cr}$ \noindent And it returns \qquad {\tt tex\_flag} = {\tt ((maht\_flag != 0) | (esc\_flag != 0))} \noindent at the last stage.\hfill} */ int get_tex_flag(buf_ptr) int *buf_ptr; { static int math_flag = 0; /* {\ math flag \hfill} */ static int ds_flag = 0; /* {\ display math flag \hfill} */ static int esc_flag = 0; /* {\ escape from quasi-TeX flag \hfill} */ static int rcs_flag = 0; /* {\ RCS flag \hfill} */ static int brace_counter = 0; /* {\ brace counter \hfill} */ char a[4], b[10]; /* {\ mini buffer a[3]...a[0]= b[0]...b[9] \hfill} */ char c0, c1, c2; int i, *ptr, *ptr1, *ptr2, tex_flag, tex_counter; /* {\ unset math\_flag and esc\_flag (\TeX$\to$quasi-\TeX) \hfill} */ ptr = buf_ptr; a[0] = *ptr; ptr = dec_buf_ptr(ptr); a[1] = *ptr; ptr = dec_buf_ptr(ptr); a[2] = *ptr; ptr = dec_buf_ptr(ptr); a[3] = *ptr; #ifdef LATEX if (rcs_flag != 0) /* {\ reset RCS flag \hfill} */ if ((a[2] != '\\') && (a[2] != '$') && (a[1] == '$') && (a[0] != '$')) --rcs_flag; if (math_flag != 0) /* {\ reset LaTeX math flag \hfill} */ { if (ds_flag == 0) { if ((a[1] == '$') && (a[0] != '$')) if ((a[2] != '\\') && (a[2] != '$')) --math_flag; if ((a[2] == '\\') && (a[1] == ')')) math_flag = 0; } else { if ((a[2] == '\\') && (a[1] == ']')) { math_flag = 0; ds_flag = 0; } } } #else if (rcs_flag != 0) /* {\ reset RCS flag \hfill} */ if ((a[2] != '\\') && (a[2] != '$') && (a[1] == '$') && (a[0] != '$')) --rcs_flag; if (math_flag != 0) /* {\ reset TeX math flag \hfill} */ { if ((a[1] == '$') && (a[0] != '$')) { if (ds_flag == 0) { if ((a[2] != '\\') && (a[2] != '$')) --math_flag; } else { if ((a[3] != '\\') && (a[3] != '$') && (a[2] == '$')) --math_flag; if (math_flag == 0) ds_flag = 0; } } } #endif if (esc_flag != 0) { if ((a[1] != '\\') && (a[0] == '{')) ++brace_counter; if ((a[1] != '\\') && (a[0] == '}')) --brace_counter; if (esc_flag == 2) { if (brace_counter == 0) { if (a[0] != '}') { fprintf(stderr, "\nError: brace counter error !!\n"); exit(EXIT_FAILURE); } --esc_flag; *buf_ptr = ' '; /* {\ replace a \TeX-mode-end-brace with a space \hfill} */ } } else --esc_flag; } /* {\ set math\_flag and esc\_flag (quasi-\TeX$\to$\TeX) \hfill} */ ptr = buf_ptr; b[0] = *ptr; ptr = inc_buf_ptr(ptr); b[1] = *ptr; ptr = inc_buf_ptr(ptr); b[2] = *ptr; ptr = inc_buf_ptr(ptr); b[3] = *ptr; ptr = inc_buf_ptr(ptr); b[4] = *ptr; ptr = inc_buf_ptr(ptr); b[5] = *ptr; ptr = inc_buf_ptr(ptr); b[6] = *ptr; ptr = inc_buf_ptr(ptr); b[7] = *ptr; ptr = inc_buf_ptr(ptr); b[8] = *ptr; ptr = inc_buf_ptr(ptr); b[9] = *ptr; #ifdef LATEX if (math_flag == 0) { if ((a[1] != '\\') && (a[1] != '$') && (b[0] == '$')) { if (b[1] != '$') /* {\ check RCS keywords here \hfill} */ { if ((b[1] == 'A') && (b[2] == 'u') && (b[3] == 't') && (b[4] == 'h') && (b[5] == 'o') && (b[6] == 'r') && ((b[7] == ':') || (b[7] == '$'))) rcs_flag = 2; if ((b[1] == 'D') && (b[2] == 'a') && (b[3] == 't') && (b[4] == 'e') && ((b[5] == ':') || (b[5] == '$'))) rcs_flag = 2; if ((b[1] == 'H') && (b[2] == 'e') && (b[3] == 'a') && (b[4] == 'd') && (b[5] == 'e') && (b[6] == 'r') && ((b[7] == ':') || (b[7] == '$'))) rcs_flag = 2; if ((b[1] == 'I') && (b[2] == 'd') && ((b[3] == ':') || (b[3] == '$'))) rcs_flag = 2; if ((b[1] == 'L') && (b[2] == 'o') && (b[3] == 'c') && (b[4] == 'k') && (b[5] == 'e') && (b[6] == 'r') && ((b[7] == ':') || (b[7] == '$'))) rcs_flag = 2; if ((b[1] == 'L') && (b[2] == 'o') && (b[3] == 'g') && ((b[4] == ':') || (b[4] == '$'))) rcs_flag = 2; if ((b[1] == 'R') && (b[2] == 'e') && (b[3] == 'v') && (b[4] == 'i') && (b[5] == 's') && (b[6] == 'i') && (b[7] == 'o') && (b[8] == 'n') && ((b[9] == ':') || (b[9] == '$'))) rcs_flag = 2; if ((b[1] == 'R') && (b[2] == 'C') && (b[3] == 'S') && (b[4] == 'f') && (b[5] == 'i') && (b[6] == 'l') && (b[7] == 'e') && ((b[8] == ':') || (b[8] == '$'))) rcs_flag = 2; if ((b[1] == 'S') && (b[2] == 'o') && (b[3] == 'n') && (b[4] == 'y') && (b[5] == 'I') && (b[6] == 'd') && ((b[7] == ':') || (b[7] == '$'))) rcs_flag = 2; if ((b[1] == 'S') && (b[2] == 'o') && (b[3] == 'u') && (b[4] == 'r') && (b[5] == 'c') && (b[6] == 'e') && ((b[7] == ':') || (b[7] == '$'))) rcs_flag = 2; if ((b[1] == 'S') && (b[2] == 't') && (b[3] == 'a') && (b[4] == 't') && (b[5] == 'e') && ((b[6] == ':') || (b[6] == '$'))) rcs_flag = 2; } if ((BAS_flag == 0) && (PERL_flag == 0)) { if (b[1] != '$') math_flag = 2; } else /* {\ else-part takes care of BASIC or PERL string variables \hfill} */ { if ((BAS_flag != 0) && (b[1] != '$') && ((a[1] < '0') || (a[1] > '9')) && ((a[1] < 'A') || (a[1] > 'Z')) && ((a[1] < 'a') || (a[1] > 'z'))) math_flag = 2; if ((PERL_flag != 0) && (b[1] != '$') && ((b[1] < 'A') || (b[1] > 'Z')) && ((b[1] < 'a') || (b[1] > 'z'))) math_flag = 2; } } /* {\ If LaTeX is not used properly, then {\bf src2latex} simply unset math\_flag . \hfill} */ if ((math_flag != 0) && ((MAKE_flag != 0) || (PERL_flag != 0) || (SH_flag != 0) || (TCL_flag != 0))) { ptr = buf_ptr; tex_counter = 0; for (i = 0; i < (int)(FORMULA_LEN_MAX); ++i) { c0 = *ptr; ptr1 = inc_buf_ptr(ptr); c1 = *ptr1; ptr2 = inc_buf_ptr(ptr1); c2 = *ptr2; if ((c0 == '\n') && (c1 != '#')) break; if ((c0 != '\\') && (c1 == '$') && (c2 <= ' ')) break; if ((c0 == '_') || (c0 == '^') || (c0 == '\\')) ++tex_counter; ptr = ptr1; } if (i >= (int)(FORMULA_LEN_MAX)) math_flag = 0; if ((c0 == '\n') && (c1 != '#')) math_flag = 0; if ((c0 != '\\') && (c1 == '$') && (c2 <= ' ') && (tex_counter == 0)) math_flag = 0; #ifdef DEBUGGING printf ("get_tex_flag(): math_flag is set to %d\n", math_flag); #endif } if ((b[1] <= ' ') && (b[0] == '\\') && (b[1] == '(') && (((b[2] >= '0') && (b[2] <= '9')) || ((b[2] >= 'a') && (b[2] <= 'z')) || ((b[2] == '\\') && (b[3] >= 'a') && (b[3] <= 'z')) || (b[2] == '{'))) math_flag = 2; if ((b[1] <= ' ') && (b[0] == '\\') && (b[1] == '[') && (((b[2] >= '0') && (b[2] <= '9')) || ((b[2] >= 'a') && (b[2] <= 'z')) || ((b[2] == '\\') && (b[3] >= 'a') && (b[3] <= 'z')) || (b[2] == '{'))) { math_flag = 2; ds_flag = 1; } } #else if (math_flag == 0) { if ((a[1] != '\\') && (a[1] != '$') && (b[0] == '$')) { if (b[1] != '$') /* {\ check RCS keywords here \hfill} */ { if ((b[1] == 'A') && (b[2] == 'u') && (b[3] == 't') && (b[4] == 'h') && (b[5] == 'o') && (b[6] == 'r') && ((b[7] == ':') || (b[7] == '$'))) rcs_flag = 2; if ((b[1] == 'D') && (b[2] == 'a') && (b[3] == 't') && (b[4] == 'e') && ((b[5] == ':') || (b[5] == '$'))) rcs_flag = 2; if ((b[1] == 'H') && (b[2] == 'e') && (b[3] == 'a') && (b[4] == 'd') && (b[5] == 'e') && (b[6] == 'r') && ((b[7] == ':') || (b[7] == '$'))) rcs_flag = 2; if ((b[1] == 'I') && (b[2] == 'd') && ((b[3] == ':') || (b[3] == '$'))) rcs_flag = 2; if ((b[1] == 'L') && (b[2] == 'o') && (b[3] == 'c') && (b[4] == 'k') && (b[5] == 'e') && (b[6] == 'r') && ((b[7] == ':') || (b[7] == '$'))) rcs_flag = 2; if ((b[1] == 'L') && (b[2] == 'o') && (b[3] == 'g') && ((b[4] == ':') || (b[4] == '$'))) rcs_flag = 2; if ((b[1] == 'R') && (b[2] == 'e') && (b[3] == 'v') && (b[4] == 'i') && (b[5] == 's') && (b[6] == 'i') && (b[7] == 'o') && (b[8] == 'n') && ((b[9] == ':') || (b[9] == '$'))) rcs_flag = 2; if ((b[1] == 'R') && (b[2] == 'C') && (b[3] == 'S') && (b[4] == 'f') && (b[5] == 'i') && (b[6] == 'l') && (b[7] == 'e') && ((b[8] == ':') || (b[8] == '$'))) rcs_flag = 2; if ((b[1] == 'S') && (b[2] == 'o') && (b[3] == 'u') && (b[4] == 'r') && (b[5] == 'c') && (b[6] == 'e') && ((b[7] == ':') || (b[7] == '$'))) rcs_flag = 2; if ((b[1] == 'S') && (b[2] == 't') && (b[3] == 'a') && (b[4] == 't') && (b[5] == 'e') && ((b[6] == ':') || (b[6] == '$'))) rcs_flag = 2; } if ( (BAS_flag == 0) && (PERL_flag == 0)) { if (b[1] != '$') math_flag = 2; } else /* {\ else-part takes care of BASIC or PERL string variables \hfill} */ { if ((BAS_flag != 0) && (b[1] != '$') && ((a[1] < '0') || (a[1] > '9')) && ((a[1] < 'A') || (a[1] > 'Z')) && ((a[1] < 'a') || (a[1] > 'z'))) math_flag = 2; if ((PERL_flag != 0) && (b[1] != '$') && ((b[1] < 'A') || (b[1] > 'Z')) && ((b[1] < 'a') || (b[1] > 'z'))) math_flag = 2; } /* {\ If TeX is not used properly, then {\bf src2tex} simply unset math\_flag . \hfill} */ if ((math_flag != 0) && ((MAKE_flag != 0) || (PERL_flag != 0) || (SH_flag != 0) || (TCL_flag != 0))) { ptr = buf_ptr; tex_counter = 0; for (i = 0; i < (int)(FORMULA_LEN_MAX); ++i) { c0 = *ptr; ptr1 = inc_buf_ptr(ptr); c1 = *ptr1; ptr2 = inc_buf_ptr(ptr1); c2 = *ptr2; if ((c0 == '\n') && (c1 != '#')) break; if ((c0 != '\\') && (c1 == '$') && (c2 <= ' ')) break; if ((c0 == '_') || (c0 == '^') || (c0 == '\\')) ++tex_counter; ptr = ptr1; } if (i >= (int)(FORMULA_LEN_MAX)) math_flag = 0; if ((c0 == '\n') && (c1 != '#')) math_flag = 0; if ((c0 != '\\') && (c1 == '$') && (c2 <= ' ') && (tex_counter == 0)) math_flag = 0; #ifdef DEBUGGING printf ("get_tex_flag(): math_flag is reset to %d\n", math_flag); #endif } if ((b[1] == '$') && (b[2] != '$')) { math_flag = 2; ds_flag = 1; } } } #endif if ((math_flag == 0) && (esc_flag == 0)) { if ((a[1] != '\\') && (b[0] == '{')) { if ((b[1] == '\\') || ((b[1] == '{') && (b[2] == '\\'))) { brace_counter = 1; esc_flag = 2; *buf_ptr = ' '; /* {\ replace a \TeX-mode-start-brace with a space \hfill} */ } if ((b[1] == '\\') && (b[2] == ' ')) { /* {\ replace a \TeX-mode-start-backslash with a blank space \hfill} */ ptr = inc_buf_ptr(buf_ptr); *ptr = '{'; ptr = inc_buf_ptr(ptr); *ptr = '}'; } if ((b[1] == '{') && (b[2] == '\\') && (b[3] == ' ')) { /* {\ replace a \TeX-mode-start-backslash with a blank space \hfill} */ ptr = inc_buf_ptr(buf_ptr); ptr = inc_buf_ptr(ptr); *ptr = '{'; ptr = inc_buf_ptr(ptr); *ptr = '}'; } } } if (rcs_flag != 0) tex_flag = (esc_flag != 0); else tex_flag = ((math_flag != 0) | (esc_flag != 0)); return tex_flag; } src2tex-2.12h.orig/modflag.c.ps100644 1750 1750 410242 6266067317 16340 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: modflag.c.dvi %%Pages: 21 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 122 /f0 NF f0 SF [ 24 23 -1 0 24.906] 65 D [ 24 23 -1 0 23.522] 66 D [<00FC000382000E01001C0080380040380040780020700020F00020F00000F00000F00000F00000F00000F000207000207800 203800603800601C00E00E01E003826000FC20> 24 23 -2 0 23.984] 67 D [ 24 23 -1 0 25.367] 68 D [ 24 23 -1 0 22.600] 69 D [ 24 23 -1 0 21.678] 70 D [ 24 23 -1 0 24.906] 72 D [ 16 23 0 0 11.992] 73 D [<3E004300C180E1C0E1C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF8> 16 23 -2 0 17.065] 74 D [ 24 23 -1 0 25.829] 75 D [ 24 23 -1 0 20.755] 76 D [ 32 23 -1 0 30.441] 77 D [ 24 23 -1 0 24.906] 78 D [<01FC000707000E03801C01C03800E03800E07800F0700070F00078F00078F00078F00078F00078F00078F000787000707800 F03800E03800E01C01C00E038007070001FC00> 24 23 -2 0 25.829] 79 D [ 24 23 -1 0 22.600] 80 D [ 24 23 -1 0 24.445] 82 D [<8F80F060C030C01080188018801800180038007003F01FE03FC07E00F000E000C010C010C0104030603030F01F10> 16 23 -2 0 18.449] 83 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<007C000183000700800E00400C00401C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00 201C00201C00201C00201C00201C0070FF81FC> 24 23 -1 0 24.906] 85 D [<00300000300000300000780000780000FC0000E40000E40001C20001C20001C2000381000381000381000700800700800F00 400E00400E00401C00201C00203C0070FF81FC> 24 23 -1 0 24.906] 86 D [<0040040000C0060000E00E0000E00E0001E00F0001D01D0001D01D0001D01D0003901C800388388003883880070838400704 7040070470400E0470200E02E0200E02E0200E02E0201C03E0101C01C0101C01C0103C03C038FF0FF8FE> 32 23 -1 0 34.131] 87 D [ 24 23 -1 0 24.906] 88 D [<00FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00003E00003A0000710000F10000E08001E08001C0 400380400780200700200F00101E0038FFC07F> 24 23 0 0 24.906] 89 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [<78EEE6470707070707070707070707070707073F0000000000060F0F06> 8 29 2 6 10.147] 106 D [ 24 23 0 0 17.527] 107 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [<00FF80001C00001C00001C00001C00001C00079C00185C00303C00701C00601C00E01C00E01C00E01C00E01C00601C00701C 00303C001C6C00078400> 24 20 -1 6 17.526] 113 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<07FC00E000E000E000E000E0FFFCC0E040E020E030E010E008E004E004E002E001E001E000E000600060> 16 21 -1 0 16.604] 52 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<04000E000E000E000E000E0006000600060002000300010001000080004080408020C0107FF87FF87FFC4000> 16 22 -2 0 16.604] 55 D [<0FC038306018C008C00CC00CC01C603C607831F00FE00F801FC03C307810601860186018203018600FC0> 16 21 -1 0 16.604] 56 D [<1F0020C060607030703000380018001C0F9C185C303C603CE01CE01CE01CE018E0186038303018600F80> 16 21 -1 0 16.604] 57 D [<020002001F0022C0426042208230E230E2304230027002E003E01FC03F807E00E200E200C270C270C2304210622032400F80 02000200> 16 27 -2 2 16.604] 36 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<060006000600C630E6703FC00F000F003FC0E670C630060006000600> 16 14 -2 -11 16.604] 42 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [ 16 33 -2 8 16.604] 47 D [<60F0F06000000000000060F0F060> 8 14 -2 0 9.224] 58 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D [<00FF000701E008003810000020F0E0218D904307884703888603888E03888E03888E03888E03888E03888603884703904304 10218C2020F02010004008008007070000F800> 24 23 -2 0 25.829] 64 D [ 8 33 -3 8 9.224] 91 D [ 8 33 0 8 9.224] 93 D [ 24 23 0 0 19.371] 11 D [ 24 23 0 0 18.449] 12 D [ 24 23 0 0 18.449] 13 D [ 32 23 0 0 27.673] 14 D [ 8 2 0 -6 11.069] 45 D 1.000 60 /f1 NF f1 SF [<60F0F060> 8 4 -2 0 9.224] 58 D [<40402020101070F0F060> 8 10 -2 6 9.224] 59 D 1.000 123 /f2 NF f2 SF [<00000400000002000000010000000100000000C0FFFFFFF0FFFFFFF0000000C000000100000001000000020000000400> 32 12 -2 -2 33.208] 33 D [<00100030003000600060006000C000C000C00180018001800300030003000600060006000C000C000C001800180018003000 30003000600060006000C000C000C000> 16 33 -2 8 16.604] 110 D [<60F0F060> 8 4 -2 -6 9.224] 1 D [<00F001800300060006000600060006000600060006000600060006000C001800F00018000C00060006000600060006000600 060006000600060006000300018000F0> 16 33 -2 8 16.604] 102 D [ 16 33 -2 8 16.604] 103 D [<4000C00060006000300030001800180018000C000C0006000600030003000180018000C000C0006000600030003000300018 0018000C000C00060006> 16 30 -5 7 0.000] 54 D [<0C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C00FFC0FFC00C000C000C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 121 D [<0C000C000C000C000C000C00FFC0FFC00C000C000C000C000C000C0000000C000C000C000C000C000C00FFC0FFC00C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 122 D 1.000 111 /f3 NF f3 SF [<0038007800E001C0038007000700070007000700070007000700070007000700070007000700070007000700070007000E00 0E001C007800E000E00078001C000E000E000700070007000700070007000700070007000700070007000700070007000700 070007000700038001C000E000780038> 16 58 -4 57 22.139] 110 D [ 16 30 -13 31 29.518] 56 D [<00C003C007800F001E001C003C003800780078007000F000F000F000F000F000F000F000F000F000F000F000F000F000F000 F000F000F000F000F000> 16 30 -13 29 29.518] 58 D [<01E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E003C003C003C007800780 0F000E001C0038007000E000E000700038001C000E000F000780078003C003C003C001E001E001E001E001E001E001E001E0 01E001E001E001E001E001E001E001E001E001E001E001E0> 16 62 -6 61 29.518] 60 D 1.000 121 /f4 NF f4 SF [<1F8780786F80F02E00F01E00F01E00781E003C1E001F1E0001FE00001E00301E00781E00783C007038001FE000> 24 15 -1 0 18.564] 97 D [<07E01C38380C780C7000F000F000F000F000F0007018783C383C1C1C07F0> 16 15 -1 0 16.973] 99 D [<07F01C18380C78067000F000F000FFFEF00EF00E700E700C381C1C3807E0> 16 15 -1 0 17.503] 101 D [ 8 23 -1 0 10.608] 108 D [ 16 15 -1 0 15.728] 114 D [ 16 15 -1 0 15.063] 115 D [<0F801C403C603C603C603C603C003C003C003C003C003C003C00FFC03FC01C001C000C000C000C000C00> 16 21 -1 0 14.851] 116 D [ 24 15 -1 0 20.155] 120 D [ 16 21 -2 0 19.095] 50 D 1.000 126 /f5 NF f5 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 66 D [<07C00FE01C303838701C701C601CE000E000E000E000E000E000601C701C701C383C1C7C0FFC07CC> 16 20 -1 0 17.434] 67 D [ 16 20 -1 0 17.434] 68 D [ 16 20 -1 0 17.434] 69 D [ 16 20 -1 0 17.434] 70 D [<07B80FF81878387870387038E038E038E0FCE0FCE000E000E000E03870387038387818780FF80798> 16 20 -1 0 17.434] 71 D [ 16 20 -1 0 17.434] 72 D [ 16 20 -3 0 17.434] 73 D [<3E007F00E180E1C041C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF01FF0> 16 20 -2 0 17.434] 74 D [ 16 20 -1 0 17.434] 75 D [ 16 20 -1 0 17.434] 76 D [ 16 20 -1 0 17.434] 77 D [ 16 20 -1 0 17.434] 78 D [<3FC07FE070E0E070E070E070E070E070E070E070E070E070E070E070E070E070E07070E07FE03FC0> 16 20 -2 0 17.434] 79 D [ 16 20 -1 0 17.434] 80 D [ 16 20 -1 0 17.434] 82 D [ 16 20 -2 0 17.434] 83 D [<1FF01FF00380038003800380038003800380038003800380038003800380E39CE39CE39CFFFC7FFC> 16 20 -1 0 17.434] 84 D [<03C007E00C301C38381C381C381C381C381C381C381C381C381C381C381C381C381C381CFE7FFE7F> 16 20 0 0 17.434] 85 D [<0780078007800CC00CC00CC00CC00CC01CE01CE01CE01CE01CE038703870387038707878FCFCFCFC> 16 20 -1 0 17.434] 86 D [ 16 20 -1 0 17.434] 88 D [ 16 20 -2 0 17.434] 90 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [ 16 20 -1 0 17.434] 107 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [<00FE00FE003800380038003800380FB81FF8387870786038E038E038E038E0386038707838781FF807B8> 16 21 -1 7 17.434] 113 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<078007800FC00CC00CC00CC01CE01CE01CE01CE038703870FCFCFCFC> 16 14 -1 0 17.434] 118 D [<18E03DF03DF035B035B035B037B037B03030703870387038FFFCFFFC> 16 14 -1 0 17.434] 119 D [ 16 14 -1 0 17.434] 120 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [ 16 14 -1 0 17.434] 122 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0FC03FE07070E038E01C401C001C001C0038007007E007E00070003000382038703870703FE00FC0> 16 20 -1 0 17.434] 51 D [<07FC07FC00E000E000E000E0FFFCFFFCE0E070E030E038E018E01CE00CE006E006E002E003E001E0> 16 20 -1 0 17.434] 52 D [<1F003F8071C0E0E0E070E07040700070006060E07FC07F007000700070007000700070007FE07FE0> 16 20 -2 0 17.434] 53 D [<07C01FE038707038701C601CE01CE01CE01CF038F870EFE0E7C070007000303838381E3807F003E0> 16 20 -1 0 17.434] 54 D [<04000E000E000E000E000E0006000700070007000380038001C001C000E00060E070E038FFFCFFFCE000> 16 21 -1 0 17.434] 55 D [<0FC03FF078787038E01CE01CE01CE01C7038387007800FC03870703870387038703838701FE00FC0> 16 20 -1 0 17.434] 56 D [<1F003FC070E07070703000380018001C0F9C1FFC387C703CE01CE01CE018E038703838701FE00F80> 16 20 -1 0 17.434] 57 D [<0200060006001F003FC076E0E620E630E6304630067006E00FC03F807F007600C620C670C670467076E03FC00F8006000600 0200> 16 26 -2 3 17.434] 36 D [<3C707FF8679CE39CE788EFC0EFC07DC03CE01CE03CE03E703F7C3B7C3B803B803B801B801F000E00> 16 20 -1 0 17.434] 38 D [<0C001E001E000C0000000000000000000E000E000E000E00070003C001E04070E070E0F07FE01F80> 16 20 -2 0 17.434] 63 D [<60F0F0600000000070F0F0F0F0F0F0F0F0F0F060> 8 20 -6 0 17.434] 33 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<80C060303018181878F8F060> 8 12 -6 -8 17.434] 39 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<60F0F06000000000000060F0F060> 8 14 -6 0 17.434] 58 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [ 16 26 -6 3 17.434] 91 D [ 16 26 -1 3 17.434] 93 D [<4080F3C0FFC03F000C00> 16 5 -3 -15 17.434] 94 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00300070007000E000E001C001C001C0038003800700070007000E000E000E001C001C0038003800380070007000E000E000 C000> 16 26 -2 3 17.434] 92 D [ 8 26 -7 3 17.434] 124 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 117 /f6 NF f6 SF [<3C00630040804040C000C000600060006000300031C019C00CC00780> 16 14 -4 0 15.276] 99 D [<38004600C10080808000C000C000C000FE0041006080308018800F00> 16 14 -5 0 15.276] 101 D [<306864646430303018984C4C4838000000000000060706> 8 23 -3 0 10.184] 105 D [<38646462626030303030181818FF0C0C0C0C0606> 8 20 -3 0 11.032] 116 D [<60F07830> 8 4 -3 0 10.184] 46 D 1.000 123 /f7 NF f7 SF [ 24 23 -1 0 27.027] 65 D [ 24 23 -1 0 27.996] 75 D [ 24 23 -1 0 27.027] 78 D [<87C0D830E018C008800C800C800C000C001C003803F81FF03FE07F00F000E000C008C008C0084018603830580F88> 16 23 -2 0 20.294] 83 D [ 24 17 -1 0 20.368] 97 D [<01F8000E0600180100300100700080600080E00000E00000E00000E00000E000006000807000803001801803800E058001F8 80> 24 17 -1 0 19.629] 99 D [ 24 17 -1 0 20.737] 100 D [ 24 17 -1 0 20.368] 104 D [ 16 17 0 0 10.036] 105 D [ 24 17 -1 0 24.795] 109 D [ 24 17 -1 0 20.368] 110 D [<03F0000E1C00180600300300700380600180E001C0E001C0E001C0E001C0E001C06001807003803003001806000E1C0003F0 00> 24 17 -1 0 21.105] 111 D [<0FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00081C08081C08081C08081C080C1C180FFFF 80> 24 17 -1 0 19.629] 116 D [<03E0000E18001C0400180400380200380200380200380200380200380200380200380200380200380200380200380700FE0F 80> 24 17 -1 0 20.368] 117 D [ 16 17 -1 0 16.678] 122 D 1.000 121 /f8 NF f8 SF [<03F00FFC1F063C037C007800F800F800F800F800F800F800781C783E3C3E1E3E0FFC03F8> 16 18 -2 0 20.367] 99 D [<01FC000FFF001F01803E00C07C0000780000F80000F80000F80000FFFFC0FFFFC0F803C07803C07C03803C07801E0F000FFE 0003F800> 24 18 -1 0 21.004] 101 D [ 16 18 -1 0 18.873] 114 D [ 16 18 -2 0 18.076] 115 D [<03E00FF00F101F181F181F181F181F001F001F001F001F001F001F001F001F00FFF8FFF83F000F0007000700030003000300> 16 25 -1 0 17.822] 116 D [ 24 18 -1 0 24.186] 120 D [ 24 26 -2 0 22.913] 50 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f8 SF 479 158 p (src2tex)s f0 SF (*)s 45 r (version)s 10 r (2.12)s 33 r (\(Sep)s 11 r (9,)s 11 r (1996\))s f7 SF 466 240 p (Kazuo)s 13 r (Amano)s f2 SF (y)s f7 SF 12 r (and)s 13 r (Shinichi)s 13 r (Nomoto)s f2 SF (z)s f5 SF 0 365 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 486 p (/*)s 17 r 648 1 ru f0 SF 658 r (mo)s 1 r (d\015ag.c)s 11 r 648 1 ru f5 SF 665 r (*/)s 0 608 p (#include)s 17 r ()s 0 648 p (#include)s 17 r ("src2tex.h")s 0 729 p (extern)s 17 r (int)s 18 r (BAS)s 2 r 10 1 ru 15 r (flag;)s 0 769 p (extern)s 17 r (int)s 18 r (C)s 2 r 10 1 ru 15 r (flag;)s 0 810 p (extern)s 17 r (int)s 18 r (CBL)s 2 r 10 1 ru 15 r (flag;)s 0 850 p (extern)s 17 r (int)s 18 r (F77)s 2 r 10 1 ru 15 r (flag;)s 0 891 p (extern)s 17 r (int)s 18 r (HTML)s 2 r 10 1 ru 15 r (flag;)s 0 931 p (extern)s 17 r (int)s 18 r (JAVA)s 2 r 10 1 ru 15 r (flag;)s 0 971 p (extern)s 17 r (int)s 18 r (LISP)s 2 r 10 1 ru 15 r (flag;)s 0 1012 p (extern)s 17 r (int)s 18 r (MAKE)s 2 r 10 1 ru 15 r (flag;)s 0 1052 p (extern)s 17 r (int)s 18 r (PAS)s 2 r 10 1 ru 15 r (flag;)s 0 1093 p (extern)s 17 r (int)s 18 r (PERL)s 2 r 10 1 ru 15 r (flag;)s 0 1133 p (extern)s 17 r (int)s 18 r (SH)s 2 r 10 1 ru 15 r (flag;)s 0 1174 p (extern)s 17 r (int)s 18 r (TCL)s 2 r 10 1 ru 15 r (flag;)s 0 1254 p (extern)s 17 r (int)s 18 r (MAC)s 2 r 10 1 ru 15 r (flag;)s 0 1295 p (extern)s 17 r (int)s 18 r (MAP)s 2 r 10 1 ru 15 r (flag;)s 0 1335 p (extern)s 17 r (int)s 18 r (MAT)s 2 r 10 1 ru 15 r (flag;)s 0 1376 p (extern)s 17 r (int)s 18 r (MLAB)s 2 r 10 1 ru 15 r (flag;)s 0 1416 p (extern)s 17 r (int)s 18 r (MPAD)s 2 r 10 1 ru 15 r (flag;)s 0 1457 p (extern)s 17 r (int)s 18 r (RED)s 2 r 10 1 ru 15 r (flag;)s 0 1538 p (extern)s 17 r (int)s 18 r (*dec)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(\);)s 0 1578 p (extern)s 17 r (int)s 18 r (*inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(\);)s 0 1618 p (extern)s 17 r (void)s 18 r (set)s 2 r 10 1 ru 15 r (lang)s 2 r 10 1 ru 16 r (flag\(\);)s 0 1740 p (/*)s 17 r 592 1 ru f0 SF 603 r (get)s 11 r (comment)s 10 r (\015ag)s 11 r 592 1 ru f5 SF 609 r (*/)s 0 1780 p (/*)s f0 SF 17 r (When)s f5 SF 13 r (stat)s 2 r 10 1 ru 10 r (flag)s f0 SF (=)s 13 r (0,)s 14 r (the)s 14 r (function)s f5 SF 13 r (get)s 2 r 10 1 ru 10 r (comment)s 3 r 10 1 ru 10 r (flag\(\))s f0 SF 13 r (increases)s f5 SF 14 r (stat)s 2 r 10 1 ru 10 r (flag)s f0 SF 14 r (\014rst)s 13 r (and)s 13 r (determines)s 13 r (lan-)s 0 1820 p (guage)s 11 r (type)s 11 r (by)s 10 r (using)s 11 r (functions)s 0 1860 p 480 1 ru 33 1897 p (*)s 17 r (Permission)s 8 r (to)s 9 r (use,)s 10 r (copy)s -3 r (,)s 9 r (and)s 9 r (mo)s 1 r (dify)s 9 r (this)s 10 r (softw)s -1 r (are)s 8 r (and)s 9 r (its)s 10 r (do)s 1 r (cumentation)s 8 r (is)s 9 r (granted)s 9 r (under)s 9 r (no)s 9 r (conditions.)s 0 1937 p (How)s -1 r (ev)s -1 r (er,)s 11 r (the)s 12 r (authors)s 11 r (would)s 11 r (b)s 1 r (e)s 12 r (very)s 11 r (happy)s 10 r (if)s 12 r (users)s 12 r (could)s 11 r (inform)s 12 r (any)s 11 r (mo)s 1 r (di\014cations)s 12 r (to)s 11 r (k)s -1 r (amano@tansei.cc.u-)s 0 1977 p (tokyo.ac.jp.)s 14 r (Since)s 11 r (src2tex)s 11 r (is)s 11 r (a)s 11 r (free)s 11 r (softw)s -1 r (are,)s 10 r (there)s 11 r (is)s 12 r (no)s 11 r (warran)s -1 r (t)s -1 r (y)s 10 r (of)s 11 r (any)s 10 r (kind)s 11 r (for)s 11 r (the)s 11 r (program.)s f2 SF 33 2016 p (y)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -3 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -1 r (AN)s 10 r (\(k)s -1 r (amano@)s 0 2056 p (p)s 1 r (o.iijnet.or.jp\))s f2 SF 33 2096 p (z)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -2 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -2 r (AN)s 11 r (\(m93093@)s 0 2136 p (crescent.josai.ac.jp\))s 1260 2216 p (mo)s 1 r (d\015ag.c)s 67 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 133 33 p (set)s 2 r 10 1 ru 10 r (bas)s 2 r 10 1 ru 11 r (flag\(\))s f0 SF (,)s f5 SF 11 r (set)s 2 r 10 1 ru 11 r (c)s 2 r 10 1 ru 10 r (flag\(\))s f0 SF (,)s f5 SF 11 r (set)s 2 r 10 1 ru 11 r (f77)s 2 r 10 1 ru 10 r (flag\(\))s f0 SF (,)s f5 SF 11 r (set)s 2 r 10 1 ru 11 r (lisp)s 2 r 10 1 ru 10 r (flag\(\))s f0 SF (,)s f5 SF 12 r (set)s 2 r 10 1 ru 10 r (pas)s 2 r 10 1 ru 11 r (flag\(\))s f0 SF (,)s 11 r (etc.)s 0 84 p (F)s -2 r (or)s 15 r (instance,)s 17 r (if)s 16 r (input)s 16 r (\014le)s 15 r (is)s 16 r (written)s 16 r (in)s 16 r (C,)s 16 r (then)s 15 r (language)s 16 r (\015ags)s f5 SF 16 r (BAS)s 2 r 10 1 ru 11 r (flag)s f0 SF (,)s f5 SF 17 r (C)s 2 r 10 1 ru 10 r (flag)s f0 SF (,)s f5 SF 17 r (F77)s 2 r 10 1 ru 11 r (flag)s f0 SF (,)s f5 SF 17 r (LISP)s 2 r 10 1 ru 10 r (flag)s f0 SF (,)s f5 SF 0 124 p (PAS)s 2 r 10 1 ru 11 r (flag)s f0 SF (,)s f6 SF 11 r (etc)s f0 SF 24 r (are)s 12 r (set)s 11 r (as)s 11 r (follows:)s f5 SF 133 174 p (BAS)s 2 r 10 1 ru 10 r (flag)s f0 SF 10 r (=)s 9 r (0)s f1 SF (;)s f5 SF 5 r (C)s 2 r 10 1 ru 11 r (flag)s f0 SF 9 r (=)s 9 r (1)s f1 SF (;)s f5 SF 6 r (F77)s 2 r 10 1 ru 10 r (flag)s f0 SF 10 r (=)s 9 r (0)s f1 SF (;)s f5 SF 5 r (LISP)s 3 r 10 1 ru 10 r (flag)s f0 SF 9 r (=)s 9 r (0)s f1 SF (;)s f5 SF 6 r (PAS)s 2 r 10 1 ru 11 r (flag)s f0 SF 9 r (=)s 9 r (0)s f1 SF 11 r (;)s f2 SF 6 r (\001)s 5 r (\001)s 6 r (\001)s f1 SF 5 r (:)s f0 SF 0 225 p (In)s 12 r (the)s 12 r (main)s 12 r (part)s 12 r (of)s 12 r (function)s f5 SF 12 r (get)s 2 r 10 1 ru 11 r (comment)s 2 r 10 1 ru 10 r (flag\(\))s f0 SF (,)s 12 r (the)s 12 r (pro)s 1 r (cedure)s 12 r (is)s 12 r (branched)s 11 r (into)s 11 r (\014ve)s 11 r (cases.)s 18 r (In)s 12 r (each)s 11 r (case,)s 0 265 p (comment)s 8 r (\015ag)s f5 SF 9 r (com)s 2 r 10 1 ru 10 r (flag)s f0 SF 9 r (is)s 9 r (set)s 9 r (to)s 9 r (1,)s f6 SF 9 r (i.e.)s f0 SF (,)s f5 SF 9 r (com)s 2 r 10 1 ru 11 r (flag)s f0 SF (=)s 9 r (1,)s 9 r (if)s 9 r (and)s 9 r (only)s 9 r (if)s 8 r (integer)s 8 r (p)s 1 r (ointer)s f5 SF 8 r (buf)s 2 r 10 1 ru 11 r (ptr)s f0 SF 9 r (points)s 8 r (a)s 9 r (character)s 0 305 p (of)s 11 r (comment)s 10 r (area)s 11 r (of)s 11 r (source)s 11 r (program.)s f5 SF 133 355 p (com)s 2 r 10 1 ru 10 r (flag)s f0 SF 10 r (=)s f3 SF 312 318 p (n)s f0 SF 339 338 p (1)s 34 r (if)s f5 SF 11 r (buf)s 2 r 10 1 ru 10 r (ptr)s f0 SF 11 r (p)s 1 r (oints)s 10 r (a)s 11 r (character)s 11 r (of)s 11 r (comment)s 10 r (area)s 339 378 p (0)s 34 r (otherwise)s 11 r (.)s 0 405 p (As)s 13 r (is)s 13 r (easily)s 12 r (seen,)s 14 r (it)s 12 r (is)s 13 r (not)s 13 r (so)s 13 r (di\016cult)s 13 r (to)s 13 r (distinguish)s 12 r (comment)s 12 r (area)s 13 r (from)s 13 r (program)s 13 r (area,)s 13 r (if)s 13 r (language)s 13 r (type)s 12 r (is)s 0 444 p (determined)s 11 r (in)s 11 r (adv)s -1 r (ance.)s f5 SF 1188 r (*/)s 0 525 p (int)s 17 r (get)s 3 r 10 1 ru 15 r (comment)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 565 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 606 p ({)s 70 646 p (static)s 17 r (int)s 18 r (stat)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 192 r (/*)s f0 SF 16 r (status)s 11 r (\015ag)s f5 SF 627 r (*/)s 70 686 p (static)s 17 r (int)s 18 r (paren)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (0;)s 122 r (/*)s f0 SF 17 r (parentheses)s 10 r (counter)s f5 SF 489 r (*/)s 70 726 p (static)s 17 r (int)s 18 r (brace)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (0;)s 122 r (/*)s f0 SF 17 r (brace)s 11 r (counter)s f5 SF 578 r (*/)s 70 767 p (static)s 17 r (int)s 18 r (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 209 r (/*)s f0 SF 17 r (comment)s 10 r (\015ag)s f5 SF 581 r (*/)s 70 807 p (static)s 17 r (int)s 18 r (char)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (0;)s 139 r (/*)s f0 SF 17 r (character)s 10 r (counter)s f5 SF 522 r (*/)s 70 847 p (static)s 17 r (int)s 18 r (qt)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (0;)s 174 r (/*)s f0 SF 17 r (single)s 11 r (quotation)s 11 r (counter)s f5 SF 425 r (*/)s 70 887 p (static)s 17 r (int)s 18 r (bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (0;)s 157 r (/*)s f0 SF 16 r (back)s 11 r (quotation)s 11 r (counter)s f5 SF 439 r (*/)s 70 928 p (static)s 17 r (int)s 18 r (dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (0;)s 157 r (/*)s f0 SF 16 r (double)s 12 r (quotation)s 11 r (counter)s f5 SF 410 r (*/)s 70 968 p (static)s 17 r (int)s 18 r (slash)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (0;)s 122 r (/*)s f0 SF 17 r (slash)s 11 r (counter)s f5 SF 585 r (*/)s 70 1008 p (static)s 17 r (int)s 18 r (rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (0;)s 157 r (/*)s f0 SF 16 r (regular)s 12 r (expression)s 11 r (counter)s f5 SF 394 r (*/)s 70 1049 p (static)s 17 r (int)s 18 r (warn)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 192 r (/*)s f0 SF 16 r (warning)s 10 r (\015ag)s f5 SF 599 r (*/)s 70 1089 p (int)s 17 r (*ptr;)s 70 1129 p (char)s 17 r (c)s 2 r 10 1 ru 16 r (2,)s 17 r (c)s 2 r 10 1 ru 16 r (1,)s 17 r (c0,)s 17 r (c1,)s 18 r (c2,)s 17 r (c3,)s 18 r (c4,)s 17 r (c5,)s 18 r (c6;)s 70 1210 p (/*)s f0 SF 16 r (determine)s 11 r (language)s f5 SF 1122 r (*/)s 70 1250 p (if)s 17 r (\(stat)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 105 1290 p ({)s 174 1330 p (++stat)s 2 r 10 1 ru 16 r (flag;)s 174 1371 p (set)s 2 r 10 1 ru 16 r (lang)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\);)s 105 1411 p (})s 70 1451 p (/*)s f0 SF 16 r (get)s 11 r (a)s 11 r (neighborho)s 1 r (o)s 1 r (d)s 11 r (of)s 11 r (buf)s 2 r 10 1 ru 10 r (ptr)s f5 SF 972 r (*/)s 70 1492 p (ptr)s 17 r (=)s 18 r (dec)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(buf)s 2 r 10 1 ru 15 r (ptr\);)s 70 1532 p (c)s 2 r 10 1 ru 15 r (1)s 18 r (=)s 17 r (*ptr;)s 70 1572 p (ptr)s 17 r (=)s 18 r (dec)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 1612 p (c)s 2 r 10 1 ru 15 r (2)s 18 r (=)s 17 r (*ptr;)s 70 1653 p (c0)s 17 r (=)s 18 r (*buf)s 2 r 10 1 ru 15 r (ptr;)s 70 1693 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(buf)s 2 r 10 1 ru 15 r (ptr\);)s 70 1733 p (c1)s 17 r (=)s 18 r (*ptr;)s 70 1773 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 1814 p (c2)s 17 r (=)s 18 r (*ptr;)s 70 1854 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 1894 p (c3)s 17 r (=)s 18 r (*ptr;)s 70 1935 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 1975 p (c4)s 17 r (=)s 18 r (*ptr;)s 70 2015 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 2055 p (c5)s 17 r (=)s 18 r (*ptr;)s 70 2096 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 2136 p (c6)s 17 r (=)s 18 r (*ptr;)s f0 SF 1260 2216 p (mo)s 1 r (d\015ag.c)s 67 r (page)s 11 r (2)s EP pstopssaved restore %%Page: pstops 3 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 70 33 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (BASIC)s f5 SF 1005 r (*/)s 70 74 p (if)s 17 r (\(BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 114 p ({)s 139 155 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r ('"'\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\)\))s 174 195 p ({)s 209 235 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 276 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 316 p (})s 139 357 p (if)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 174 397 p ({)s 209 438 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r ('\\n'\)\))s 244 478 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 518 p (if)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 244 559 p ({)s 279 599 p (if)s 17 r (\(\(com)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 17 r (<=)s 18 r (')s 17 r ('\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r (0x27\)\))s 314 640 p ({)s 349 680 p (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 349 721 p (if)s 17 r (\(\(c1)s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(c2)s 17 r (==)s 18 r ('\\\\'\))s 17 r (&)s 18 r (\(c3)s 17 r (==)s 17 r (')s 18 r ('\)\))s 384 761 p (*buf)s 2 r 10 1 ru 15 r (ptr)s 17 r (=)s 18 r (')s 17 r (';)s 314 802 p (})s 279 842 p (if)s 17 r (\(\(com)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 17 r (<=)s 18 r (')s 17 r ('\))s 349 882 p (&&)s 17 r (\(\(c0)s 18 r (==)s 17 r ('R'\))s 17 r (||)s 18 r (\(c0)s 17 r (==)s 18 r ('r'\)\))s 349 923 p (&&)s 17 r (\(\(c1)s 18 r (==)s 17 r ('E'\))s 17 r (||)s 18 r (\(c1)s 17 r (==)s 18 r ('e'\)\))s 349 963 p (&&)s 17 r (\(\(c2)s 18 r (==)s 17 r ('M'\))s 17 r (||)s 18 r (\(c2)s 17 r (==)s 18 r ('m'\)\)\))s 314 1004 p (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 244 1044 p (})s 174 1085 p (})s 139 1125 p (if)s 18 r (\(c0)s 17 r (==)s 18 r ('\\n'\))s 174 1165 p (char)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 139 1206 p (else)s 174 1246 p ({)s 209 1287 p (if)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 18 r (!=)s 17 r (0\))s 244 1327 p (++char)s 2 r 10 1 ru 16 r (counter;)s 209 1368 p (else)s 244 1408 p (if)s 18 r (\(\(c0)s 17 r (>)s 17 r ('9'\))s 18 r (||)s 17 r (\(\(c0)s 18 r (>)s 17 r (')s 18 r ('\))s 17 r (&&)s 17 r (\(c0)s 18 r (<)s 17 r ('0'\)\)\))s 279 1449 p (++char)s 2 r 10 1 ru 15 r (counter;)s 174 1489 p (})s 139 1529 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 1570 p (})s 70 1610 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (C)s 11 r (or)s 11 r (MACSYMA)s f5 SF 855 r (*/)s 70 1651 p (if)s 17 r (\(\(C)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 17 r (||)s 17 r (\(MAC)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\)\))s 105 1691 p ({)s 139 1732 p (if)s 18 r (\(\(\(\(c)s 2 r 10 1 ru 15 r (2)s 18 r (==)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 17 r ('\\\\'\)\))s 18 r (||)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (!=)s 18 r ('\\\\'\)\))s 209 1772 p (&&)s 18 r (\(c0)s 17 r (==)s 18 r ('"'\))s 209 1812 p (&&)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r (0x27\))s 17 r (||)s 18 r (\(c1)s 17 r (!=)s 18 r (0x27\)\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 17 r (==)s 18 r (0\)\))s 174 1853 p ({)s 209 1893 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 1934 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1974 p (})s 139 2015 p (if)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 174 2055 p ({)s 209 2096 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (2)s 18 r (==)s 17 r ('*'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 17 r ('/'\)\))s 244 2136 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s f0 SF 1260 2216 p (mo)s 1 r (d\015ag.c)s 67 r (page)s 11 r (3)s EP pstopssaved restore %%Page: pstops 4 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 209 33 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (3\))s 17 r (&&)s 18 r (\()s 17 r (c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('\\n'\)\))s 244 74 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 114 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 18 r ('/'\))s 17 r (&&)s 18 r (\(c1)s 17 r (==)s 17 r ('*'\)\))s 244 155 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (1;)s 209 195 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 18 r ('/'\))s 17 r (&&)s 18 r (\(c1)s 17 r (==)s 17 r ('/'\)\))s 244 235 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (3;)s 174 276 p (})s 139 316 p (return)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (%)s 17 r (2\);)s 105 357 p (})s 70 397 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (COBOL)s f5 SF 988 r (*/)s 70 438 p (if)s 17 r (\(CBL)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 478 p ({)s 139 518 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 18 r (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 17 r (0\))s 209 559 p (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r ('\\n'\)\))s 174 599 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 640 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 17 r (0\))s 209 680 p (&&)s 18 r (\(\(c6)s 17 r (==)s 18 r ('*'\))s 17 r (||)s 17 r (\(c6)s 18 r (==)s 17 r ('/'\)\)\))s 174 721 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 139 761 p (if)s 18 r (\(c0)s 17 r (==)s 18 r ('\\n'\))s 174 802 p (char)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 139 842 p (else)s 174 882 p (++char)s 2 r 10 1 ru 16 r (counter;)s 139 923 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 963 p (})s 70 1004 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (FOR)s -3 r (TRAN)s f5 SF 941 r (*/)s 70 1044 p (if)s 17 r (\(F77)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 1085 p ({)s 139 1125 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r (0x27\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\)\))s 174 1165 p ({)s 209 1206 p (++qt)s 2 r 10 1 ru 16 r (counter;)s 209 1246 p (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1287 p (})s 139 1327 p (if)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 174 1368 p ({)s 209 1408 p (if\(\(com)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 17 r (&&)s 17 r (\(\(c)s 3 r 10 1 ru 15 r (1)s 17 r (==)s 18 r ('\\r'\))s 17 r (||)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r ('\\n'\)\)\))s 244 1449 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 1489 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 1529 p (&&)s 17 r (\(\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('C'\))s 17 r (||)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 17 r (==)s 18 r ('c'\))s 17 r (||)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r ('*'\)\))s 279 1570 p (&&)s 17 r (\(\(c0)s 18 r (==)s 17 r ('\\r'\))s 18 r (||)s 17 r (\(c0)s 18 r (==)s 17 r ('\\n'\)\)\))s 244 1610 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 1651 p (if)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 244 1691 p ({)s 279 1732 p (if)s 17 r (\(\(com)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(\(c0)s 17 r (==)s 17 r ('C'\))s 18 r (||)s 17 r (\(c0)s 18 r (==)s 17 r ('c'\)\)\))s 314 1772 p (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1812 p (if)s 17 r (\(\(com)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 17 r ('*'\)\))s 314 1853 p ({)s 349 1893 p (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 349 1934 p (if)s 17 r (\(\(c1)s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(c2)s 17 r (==)s 18 r ('\\\\'\))s 17 r (&)s 18 r (\(c3)s 17 r (==)s 17 r (')s 18 r ('\)\))s 384 1974 p (*buf)s 2 r 10 1 ru 15 r (ptr)s 17 r (=)s 18 r (')s 17 r (';)s 314 2015 p (})s 244 2055 p (})s 174 2096 p (})s 139 2136 p (if)s 18 r (\(c0)s 17 r (==)s 18 r ('\\n'\))s f0 SF 1260 2216 p (mo)s 1 r (d\015ag.c)s 67 r (page)s 11 r (4)s EP pstopssaved restore %%Page: pstops 5 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 174 33 p (char)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 139 74 p (else)s 174 114 p (++char)s 2 r 10 1 ru 16 r (counter;)s 139 155 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 195 p (})s 70 235 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (HTML)s f5 SF 1008 r (*/)s 70 276 p (if)s 17 r (\(HTML)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 316 p ({)s 139 357 p (if)s 18 r (\(\(\(\(c)s 2 r 10 1 ru 15 r (2)s 18 r (==)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 17 r ('\\\\'\)\))s 18 r (||)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (!=)s 18 r ('\\\\'\)\))s 209 397 p (&&)s 18 r (\(c0)s 17 r (==)s 18 r ('"'\))s 209 438 p (&&)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r (0x27\))s 17 r (||)s 18 r (\(c1)s 17 r (!=)s 18 r (0x27\)\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 17 r (==)s 18 r (0\)\))s 174 478 p ({)s 209 518 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 559 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 599 p (})s 139 640 p (if)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 174 680 p ({)s 209 721 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (2)s 18 r (==)s 17 r ('-'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 17 r ('>'\)\))s 244 761 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 802 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 279 842 p (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('<'\))s 18 r (&&)s 17 r (\(c1)s 18 r (==)s 17 r ('!'\))s 17 r (&&)s 18 r (\(c2)s 17 r (=)s 18 r ('-'\)\))s 244 882 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (1;)s 174 923 p (})s 139 963 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 1004 p (})s 70 1044 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (JA)s -3 r (V)s -4 r (A)s f5 SF 1023 r (*/)s 70 1085 p (if)s 17 r (\(JAVA)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 1125 p ({)s 139 1165 p (if)s 18 r (\(\(\(\(c)s 2 r 10 1 ru 15 r (2)s 18 r (==)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 17 r ('\\\\'\)\))s 18 r (||)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (!=)s 18 r ('\\\\'\)\))s 209 1206 p (&&)s 18 r (\(c0)s 17 r (==)s 18 r ('"'\))s 209 1246 p (&&)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r (0x27\))s 17 r (||)s 18 r (\(c1)s 17 r (!=)s 18 r (0x27\)\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 17 r (==)s 18 r (0\)\))s 174 1287 p ({)s 209 1327 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 1368 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1408 p (})s 139 1449 p (if)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 174 1489 p ({)s 209 1529 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (2)s 18 r (==)s 17 r ('*'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 17 r ('/'\)\))s 244 1570 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 1610 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (3\))s 17 r (&&)s 18 r (\()s 17 r (c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('\\n'\)\))s 244 1651 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 1691 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 18 r ('/'\))s 17 r (&&)s 18 r (\(c1)s 17 r (==)s 17 r ('*'\)\))s 244 1732 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (1;)s 209 1772 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 18 r ('/'\))s 17 r (&&)s 18 r (\(c1)s 17 r (==)s 17 r ('/'\)\))s 244 1812 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (3;)s 174 1853 p (})s 139 1893 p (return)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (%)s 17 r (2\);)s 105 1934 p (})s 70 1974 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (LISP)s f5 SF 1034 r (*/)s 70 2015 p (if)s 17 r (\(LISP)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 2055 p ({)s 139 2096 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r ('"'\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\)\))s 174 2136 p ({)s f0 SF 1260 2216 p (mo)s 1 r (d\015ag.c)s 67 r (page)s 11 r (5)s EP pstopssaved restore %%Page: pstops 6 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 209 33 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 74 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 114 p (})s 139 155 p (if)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 174 195 p ({)s 209 235 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 17 r (&&)s 18 r (\()s 17 r (c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('\\n'\)\))s 244 276 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 316 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 18 r (';'\)\))s 244 357 p ({)s 279 397 p (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 438 p (if)s 17 r (\(\(c1)s 18 r (==)s 17 r ('{'\))s 18 r (&&)s 17 r (\(c2)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&)s 18 r (\(c3)s 17 r (==)s 18 r (')s 17 r ('\)\))s 314 478 p (*buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (')s 18 r (';)s 244 518 p (})s 174 559 p (})s 139 599 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 640 p (})s 70 680 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (MAKE)s f5 SF 1004 r (*/)s 70 721 p (if)s 17 r (\(MAKE)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 761 p ({)s 139 802 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r (0x27\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 842 p (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 882 p ({)s 209 923 p (++qt)s 2 r 10 1 ru 16 r (counter;)s 209 963 p (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1004 p (})s 139 1044 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r (0x60\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 1085 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1125 p ({)s 209 1165 p (++bqt)s 2 r 10 1 ru 16 r (counter;)s 209 1206 p (bqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1246 p (})s 139 1287 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r ('"'\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 1327 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1368 p ({)s 209 1408 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 1449 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1489 p (})s 139 1529 p (if)s 18 r (\(\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(bqt)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (0\)\))s 174 1570 p ({)s 209 1610 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 1651 p (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (2)s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 17 r (==)s 18 r ('\\r'\))s 17 r (||)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r ('\\n'\)\)\))s 244 1691 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 1732 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 1772 p (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('#'\))s 17 r (&&)s 18 r (\(\(c0)s 17 r (==)s 17 r ('\\r'\))s 18 r (||)s 17 r (\(c0)s 18 r (==)s 17 r ('\\n'\)\)\))s 244 1812 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 1853 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 279 1893 p (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('#'\)\))s 244 1934 p ({)s 279 1974 p (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 2015 p (if)s 17 r (\(\(c1)s 18 r (==)s 17 r ('{'\))s 18 r (&&)s 17 r (\(c2)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&)s 18 r (\(c3)s 17 r (==)s 18 r (')s 17 r ('\)\))s 314 2055 p (*buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (')s 18 r (';)s 244 2096 p (})s 174 2136 p (})s f0 SF 1260 2216 p (mo)s 1 r (d\015ag.c)s 67 r (page)s 11 r (6)s EP pstopssaved restore %%Page: pstops 7 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 139 33 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 74 p (})s 70 114 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (MuP)s -2 r (AD)s f5 SF 988 r (*/)s 70 155 p (if)s 17 r (\(MPAD)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 195 p ({)s 139 235 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r (0x27\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 276 p (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 316 p ({)s 209 357 p (++qt)s 2 r 10 1 ru 16 r (counter;)s 209 397 p (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 438 p (})s 139 478 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r (0x60\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 518 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 559 p ({)s 209 599 p (++bqt)s 2 r 10 1 ru 16 r (counter;)s 209 640 p (bqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 680 p (})s 139 721 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r ('"'\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 761 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 802 p ({)s 209 842 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 882 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 923 p (})s 139 963 p (if)s 18 r (\(\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(bqt)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (0\)\))s 174 1004 p ({)s 209 1044 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 1085 p (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 17 r ('#'\)\))s 244 1125 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 1165 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 279 1206 p (&&)s 17 r (\(\(c)s 2 r 10 1 ru 16 r (1)s 17 r (<=)s 18 r (0x20\))s 17 r (||)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 17 r (==)s 18 r (';'\)\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 18 r ('#'\)\))s 244 1246 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (1;)s 174 1287 p (})s 139 1327 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 1368 p (})s 70 1408 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (P)s -2 r (ASCAL)s f5 SF 975 r (*/)s 70 1449 p (if)s 17 r (\(PAS)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 1489 p ({)s 139 1529 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r (0x27\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\)\))s 174 1570 p ({)s 209 1610 p (++qt)s 2 r 10 1 ru 16 r (counter;)s 209 1651 p (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1691 p (})s 174 1732 p (if)s 18 r (\(\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('{'\)\))s 209 1772 p (++brace)s 2 r 10 1 ru 16 r (counter;)s 174 1812 p (if)s 18 r (\(\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('}'\)\))s 209 1853 p (--brace)s 2 r 10 1 ru 16 r (counter;)s 139 1893 p (if)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 174 1934 p ({)s 209 1974 p (if)s 18 r (\(\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 17 r ('}'\)\))s 244 2015 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 2055 p (if)s 18 r (\(\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (1\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(c0)s 17 r (==)s 18 r ('{'\)\))s 244 2096 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (1;)s 209 2136 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (3\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (2)s 18 r (==)s 17 r ('*'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 17 r ('\)'\)\))s f0 SF 1260 2216 p (mo)s 1 r (d\015ag.c)s 67 r (page)s 11 r (7)s EP pstopssaved restore %%Page: pstops 8 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 244 33 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 74 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 18 r ('\('\))s 17 r (&&)s 18 r (\(c1)s 17 r (==)s 17 r ('*'\)\))s 244 114 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (3;)s 174 155 p (})s 139 195 p (return)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (%)s 17 r (2\);)s 105 235 p (})s 70 276 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (PERL)s f5 SF 1018 r (*/)s 70 316 p (if)s 17 r (\(PERL)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 357 p ({)s 139 397 p (if)s 18 r (\(\(\(\(c)s 2 r 10 1 ru 15 r (2)s 18 r (!=)s 17 r ('$'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 17 r ('m'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('!'\)\))s 227 438 p (||)s 17 r (\(\(c)s 2 r 10 1 ru 16 r (1)s 17 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('?'\)\)\))s 209 478 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 518 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 559 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 599 p (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 209 640 p (++rgx)s 2 r 10 1 ru 16 r (counter;)s 139 680 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(\(c0)s 18 r (==)s 17 r ('!'\))s 17 r (||)s 18 r (\(c0)s 17 r (==)s 18 r ('?'\)\))s 209 721 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (1\))s 209 761 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 802 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 842 p (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 209 882 p (--rgx)s 2 r 10 1 ru 16 r (counter;)s 139 923 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(\(c0)s 18 r (==)s 17 r ('\('\))s 17 r (||)s 18 r (\(c0)s 17 r (==)s 18 r ('\)'\)\))s 209 963 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1004 p (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1044 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1085 p (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1125 p ({)s 209 1165 p (++paren)s 2 r 10 1 ru 16 r (counter;)s 209 1206 p (paren)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1246 p (})s 139 1287 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('{'\))s 209 1327 p (&&)s 18 r (\(\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (>=)s 17 r ('A'\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (<=)s 17 r ('Z'\)\))s 279 1368 p (||)s 17 r (\(\(c)s 2 r 10 1 ru 16 r (1)s 17 r (>=)s 18 r ('a'\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 17 r (<=)s 18 r ('z'\)\)\))s 209 1408 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1449 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1489 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1529 p (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1570 p (++brace)s 2 r 10 1 ru 16 r (counter;)s 139 1610 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('}'\))s 209 1651 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1691 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (1\))s 209 1732 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1772 p (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1812 p (--brace)s 2 r 10 1 ru 16 r (counter;)s 139 1853 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r (0x27\))s 209 1893 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1934 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1974 p (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 2015 p (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 2055 p ({)s 209 2096 p (++qt)s 2 r 10 1 ru 16 r (counter;)s 209 2136 p (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s f0 SF 1260 2216 p (mo)s 1 r (d\015ag.c)s 67 r (page)s 11 r (8)s EP pstopssaved restore %%Page: pstops 9 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 174 33 p (})s 139 74 p (if)s 18 r (\()s 17 r (\(\(\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('q'\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 17 r ('|'\)\))s 244 114 p (||)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 18 r ('|'\)\)\))s 209 155 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 195 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 235 p (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 276 p (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 316 p ({)s 209 357 p (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (+=)s 18 r (2;)s 209 397 p (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (4;)s 174 438 p (})s 139 478 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r (0x60\))s 209 518 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 559 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 599 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 640 p (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 680 p (bqt)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (1;)s 139 721 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r (0x60\))s 209 761 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 802 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 842 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (1\))s 209 882 p (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 923 p (bqt)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 139 963 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('"'\))s 209 1004 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1044 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1085 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1125 p (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1165 p ({)s 209 1206 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 1246 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1287 p (})s 139 1327 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r (')s 18 r ('\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 17 r ('/'\))s 209 1368 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1408 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1449 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1489 p (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1529 p (slash)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (2;)s 139 1570 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (2)s 18 r (!=)s 17 r ('$'\))s 18 r (&&)s 17 r (\(\(c)s 2 r 10 1 ru 16 r (1)s 17 r (>=)s 17 r ('a'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (<=)s 18 r ('z'\)\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 17 r ('/'\))s 209 1610 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1651 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1691 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1732 p (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1772 p (slash)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (3;)s 139 1812 p (if)s 18 r (\(\(\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (||)s 17 r (\(\(c)s 2 r 10 1 ru 16 r (2)s 17 r (==)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('\\\\'\)\)\))s 227 1853 p (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('/'\)\))s 209 1893 p (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1934 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 1974 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 2015 p (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (!=)s 17 r (0\)\))s 174 2055 p (--slash)s 2 r 10 1 ru 16 r (counter;)s 139 2096 p (if)s 18 r (\(\(rgx)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 2136 p (&&)s 18 r (\(paren)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s f0 SF 1260 2216 p (mo)s 1 r (d\015ag.c)s 67 r (page)s 11 r (9)s EP pstopssaved restore %%Page: pstops 10 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 209 33 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 209 74 p (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 114 p ({)s 0 155 p (/*)s 209 195 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 235 p (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (2)s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 17 r (==)s 18 r ('\\r'\))s 17 r (||)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r ('\\n'\)\)\))s 244 276 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 0 316 p (*/)s 209 357 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 397 p (&&)s 17 r (\(\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('\\r'\))s 17 r (||)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 17 r (==)s 18 r ('\\n'\)\)\))s 244 438 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 478 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 518 p (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('#'\))s 17 r (&&)s 18 r (\(\(c0)s 17 r (==)s 17 r ('\\r'\))s 18 r (||)s 17 r (\(c0)s 18 r (==)s 17 r ('\\n'\)\)\))s 244 559 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 599 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 279 640 p (&&)s 17 r (\(rgx)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (0\))s 279 680 p (&&)s 17 r (\(paren)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 17 r (==)s 18 r (0\))s 279 721 p (&&)s 17 r (\(qt)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 17 r (==)s 18 r (0\))s 279 761 p (&&)s 17 r (\(dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(slash)s 2 r 10 1 ru 15 r (counter)s 17 r (==)s 18 r (0\))s 279 802 p (&&)s 17 r (\(\(stat)s 2 r 10 1 ru 16 r (flag++)s 17 r (==)s 18 r (1\))s 349 842 p (||)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 17 r ('\\t'\))s 18 r (||)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('\\n'\))s 349 882 p (||)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 17 r (')s 18 r ('\))s 17 r (||)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r (';'\)\))s 279 923 p (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('#'\)\))s 244 963 p ({)s 279 1004 p (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1044 p (if)s 17 r (\(\(c1)s 18 r (==)s 17 r ('{'\))s 18 r (&&)s 17 r (\(c2)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&)s 18 r (\(c3)s 17 r (==)s 18 r (')s 17 r ('\)\))s 314 1085 p (*buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (')s 18 r (';)s 244 1125 p (})s 174 1165 p (})s 139 1206 p (if)s 18 r (\(c0)s 17 r (==)s 18 r ('\\n'\))s 174 1246 p (char)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 139 1287 p (else)s 174 1327 p (++char)s 2 r 10 1 ru 16 r (counter;)s 139 1368 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 1408 p (})s 70 1449 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (SHELL)s f5 SF 1001 r (*/)s 70 1489 p (if)s 17 r (\(SH)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 1529 p ({)s 139 1570 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r (0x27\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 1610 p (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1651 p ({)s 209 1691 p (++qt)s 2 r 10 1 ru 16 r (counter;)s 209 1732 p (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1772 p (})s 139 1812 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r (0x60\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 1853 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1893 p ({)s 209 1934 p (++bqt)s 2 r 10 1 ru 16 r (counter;)s 209 1974 p (bqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 2015 p (})s 139 2055 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r ('"'\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 2096 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 2136 p ({)s f0 SF 1244 2216 p (mod\015ag.c)s 67 r (page)s 11 r (10)s EP pstopssaved restore %%Page: pstops 11 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 209 33 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 74 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 114 p (})s 139 155 p (if)s 18 r (\(\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(bqt)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (0\)\))s 174 195 p ({)s 209 235 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 276 p (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (2)s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 17 r (==)s 18 r ('\\r'\))s 17 r (||)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r ('\\n'\)\)\))s 244 316 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 357 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 397 p (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('#'\))s 17 r (&&)s 18 r (\(\(c0)s 17 r (==)s 17 r ('\\r'\))s 18 r (||)s 17 r (\(c0)s 18 r (==)s 17 r ('\\n'\)\)\))s 244 438 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 478 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 279 518 p (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (!=)s 18 r ('$'\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 17 r ('#'\)\))s 244 559 p ({)s 279 599 p (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 640 p (if)s 17 r (\(\(c1)s 18 r (==)s 17 r ('{'\))s 18 r (&&)s 17 r (\(c2)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&)s 18 r (\(c3)s 17 r (==)s 18 r (')s 17 r ('\)\))s 314 680 p (*buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (')s 18 r (';)s 244 721 p (})s 174 761 p (})s 139 802 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 842 p (})s 70 882 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (TCL/TK)s f5 SF 973 r (*/)s 70 923 p (if)s 17 r (\(TCL)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 963 p ({)s 139 1004 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r (0x27\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 1044 p (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1085 p ({)s 209 1125 p (++qt)s 2 r 10 1 ru 16 r (counter;)s 209 1165 p (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1206 p (})s 139 1246 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r (0x60\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 1287 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1327 p ({)s 209 1368 p (++bqt)s 2 r 10 1 ru 16 r (counter;)s 209 1408 p (bqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1449 p (})s 139 1489 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r ('"'\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 1529 p (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(bqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1570 p ({)s 209 1610 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 1651 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1691 p (})s 139 1732 p (if)s 18 r (\(\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(bqt)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (0\)\))s 174 1772 p ({)s 209 1812 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 1853 p (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (2)s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 17 r (==)s 18 r ('\\r'\))s 17 r (||)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r ('\\n'\)\)\))s 244 1893 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 1934 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 1974 p (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('#'\))s 17 r (&&)s 18 r (\(\(c0)s 17 r (==)s 17 r ('\\r'\))s 18 r (||)s 17 r (\(c0)s 18 r (==)s 17 r ('\\n'\)\)\))s 244 2015 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 2055 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 279 2096 p (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('#'\)\))s 244 2136 p ({)s f0 SF 1244 2216 p (mod\015ag.c)s 67 r (page)s 11 r (11)s EP pstopssaved restore %%Page: pstops 12 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 279 33 p (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 74 p (if)s 17 r (\(\(c1)s 18 r (==)s 17 r ('{'\))s 18 r (&&)s 17 r (\(c2)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&)s 18 r (\(c3)s 17 r (==)s 18 r (')s 17 r ('\)\))s 314 114 p (*buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (')s 18 r (';)s 244 155 p (})s 174 195 p (})s 139 235 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 276 p (})s 70 316 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (MAPLE)s f5 SF 987 r (*/)s 70 357 p (if)s 17 r (\(MAP)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 397 p ({)s 139 438 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 478 p (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r (0x27\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 18 r (0x27\))s 17 r (&&)s 18 r (\(c1)s 17 r (!=)s 17 r (0x27\)\))s 174 518 p ({)s 209 559 p (++qt)s 2 r 10 1 ru 16 r (counter;)s 209 599 p (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 640 p (})s 139 680 p (if)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 174 721 p ({)s 209 761 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 802 p (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (2)s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 17 r (==)s 18 r ('\\r'\))s 17 r (||)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r ('\\n'\)\)\))s 244 842 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 882 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 279 923 p (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('#'\))s 17 r (&&)s 18 r (\(\(c0)s 17 r (==)s 17 r ('\\r'\))s 18 r (||)s 17 r (\(c0)s 18 r (==)s 17 r ('\\n'\)\)\))s 244 963 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 1004 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 279 1044 p (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('#'\)\))s 244 1085 p ({)s 279 1125 p (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1165 p (if)s 17 r (\(\(c1)s 18 r (==)s 17 r ('{'\))s 18 r (&&)s 17 r (\(c2)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&)s 18 r (\(c3)s 17 r (==)s 18 r (')s 17 r ('\)\))s 314 1206 p (*buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (')s 18 r (';)s 244 1246 p (})s 174 1287 p (})s 139 1327 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 1368 p (})s 70 1408 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (MA)s -2 r (THEMA)s -3 r (TICA)s f5 SF 846 r (*/)s 70 1449 p (if)s 17 r (\(MAT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 1489 p ({)s 139 1529 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r ('"'\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\)\))s 174 1570 p ({)s 209 1610 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 1651 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1691 p (})s 139 1732 p (if)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 174 1772 p ({)s 209 1812 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (2)s 18 r (==)s 17 r ('*'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 17 r ('\)'\)\))s 244 1853 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 1893 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 18 r ('\('\))s 17 r (&&)s 18 r (\(c1)s 17 r (==)s 17 r ('*'\)\))s 244 1934 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (1;)s 174 1974 p (})s 139 2015 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 2055 p (})s 70 2096 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (MA)s -2 r (TLAB)s f5 SF 962 r (*/)s 70 2136 p (if)s 17 r (\(MLAB)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s f0 SF 1244 2216 p (mod\015ag.c)s 67 r (page)s 11 r (12)s EP pstopssaved restore %%Page: pstops 13 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 105 33 p ({)s 139 74 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r (0x27\))s 17 r (&&)s 18 r (\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (1\)\))s 174 114 p (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 139 155 p (if)s 18 r (\(\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (<)s 17 r ('0'\))s 18 r (||)s 17 r (\(\(c)s 2 r 10 1 ru 16 r (1)s 17 r (>)s 17 r ('9'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (<)s 18 r ('A'\)\))s 227 195 p (||)s 17 r (\(\(c)s 2 r 10 1 ru 16 r (1)s 17 r (>)s 17 r ('Z'\))s 18 r (&&)s 17 r (\(c)s 2 r 10 1 ru 16 r (1)s 17 r (<)s 18 r ('a'\)\))s 17 r (||)s 17 r (\(c)s 3 r 10 1 ru 15 r (1)s 17 r (>)s 18 r ('z'\)\))s 209 235 p (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('.'\))s 209 276 p (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\)'\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r (']'\))s 209 316 p (&&)s 18 r (\(c0)s 17 r (==)s 18 r (0x27\))s 17 r (&&)s 17 r (\(com)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\)\))s 174 357 p (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (1;)s 139 397 p (if)s 18 r (\(\(c)s 2 r 10 1 ru 15 r (1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c0)s 18 r (==)s 17 r ('"'\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\)\))s 174 438 p ({)s 209 478 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 518 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 559 p (})s 139 599 p (if)s 18 r (\(\(qt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 17 r (0\)\))s 174 640 p ({)s 209 680 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 17 r (&&)s 18 r (\()s 17 r (c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('\\n'\)\))s 244 721 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 761 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(\(c0)s 17 r (==)s 18 r ('#'\))s 17 r (||)s 18 r (\(c0)s 17 r (==)s 17 r ('%'\)\)\))s 244 802 p ({)s 279 842 p (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 882 p (if)s 17 r (\(\(c1)s 18 r (==)s 17 r ('{'\))s 18 r (&&)s 17 r (\(c2)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&)s 18 r (\(c3)s 17 r (==)s 18 r (')s 17 r ('\)\))s 314 923 p (*buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (')s 18 r (';)s 244 963 p (})s 174 1004 p (})s 139 1044 p (return)s 18 r (com)s 2 r 10 1 ru 15 r (flag;)s 105 1085 p (})s 70 1125 p (/*)s f0 SF 16 r (set)s 11 r (comment)s 11 r (\015ag)s 11 r (of)s 11 r (REDUCE)s f5 SF 964 r (*/)s 70 1165 p (if)s 17 r (\(RED)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 105 1206 p ({)s 139 1246 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r ('"'\))s 17 r (&&)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\)\))s 174 1287 p ({)s 209 1327 p (++dqt)s 2 r 10 1 ru 16 r (counter;)s 209 1368 p (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (%=)s 18 r (2;)s 174 1408 p (})s 139 1449 p (if)s 18 r (\(dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 174 1489 p ({)s 209 1529 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (1\))s 17 r (&&)s 18 r (\()s 17 r (c)s 2 r 10 1 ru 16 r (1)s 17 r (==)s 18 r ('\\n'\)\))s 244 1570 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 1610 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(c0)s 17 r (==)s 18 r ('%'\)\))s 244 1651 p ({)s 279 1691 p (com)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1732 p (if)s 17 r (\(\(c1)s 18 r (==)s 17 r ('{'\))s 18 r (&&)s 17 r (\(c2)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&)s 18 r (\(c3)s 17 r (==)s 18 r (')s 17 r ('\)\))s 314 1772 p (*buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (')s 18 r (';)s 244 1812 p (})s 209 1853 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (3\))s 17 r (&&)s 18 r (\(c)s 2 r 10 1 ru 15 r (1)s 18 r (==)s 17 r (';'\)\))s 244 1893 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 1934 p (if)s 18 r (\(\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 279 1974 p (&&)s 17 r (\(\(c0)s 18 r (==)s 17 r ('C'\))s 18 r (||)s 17 r (\(c0)s 18 r (==)s 17 r ('c'\)\))s 279 2015 p (&&)s 17 r (\(\(c1)s 18 r (==)s 17 r ('O'\))s 18 r (||)s 17 r (\(c1)s 18 r (==)s 17 r ('o'\)\))s 279 2055 p (&&)s 17 r (\(\(c2)s 18 r (==)s 17 r ('M'\))s 18 r (||)s 17 r (\(c2)s 18 r (==)s 17 r ('m'\)\))s 279 2096 p (&&)s 17 r (\(\(c3)s 18 r (==)s 17 r ('M'\))s 18 r (||)s 17 r (\(c3)s 18 r (==)s 17 r ('m'\)\))s 279 2136 p (&&)s 17 r (\(\(c4)s 18 r (==)s 17 r ('E'\))s 18 r (||)s 17 r (\(c4)s 18 r (==)s 17 r ('e'\)\))s f0 SF 1244 2216 p (mod\015ag.c)s 67 r (page)s 11 r (13)s EP pstopssaved restore %%Page: pstops 14 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 279 33 p (&&)s 17 r (\(\(c5)s 18 r (==)s 17 r ('N'\))s 18 r (||)s 17 r (\(c5)s 18 r (==)s 17 r ('n'\)\))s 279 74 p (&&)s 17 r (\(\(c6)s 18 r (==)s 17 r ('T'\))s 18 r (||)s 17 r (\(c6)s 18 r (==)s 17 r ('t'\)\)\))s 244 114 p (com)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (3;)s 174 155 p (})s 139 195 p (return)s 18 r (\(com)s 2 r 10 1 ru 15 r (flag)s 18 r (%)s 17 r (2\);)s 105 236 p (})s 70 277 p (return)s 17 r (com)s 2 r 10 1 ru 16 r (flag;)s 0 317 p (})s 0 439 p (/*)s 17 r 583 1 ru f0 SF 593 r (get)s 12 r (T)s 719 446 p (E)s 738 439 p (X)s 11 r (mo)s 1 r (de)s 11 r (\015ag)s 11 r 583 1 ru f5 SF 599 r (*/)s 0 479 p (/*)s f0 SF 17 r (This)s 11 r (function)s 11 r (sets)s 11 r (math)s 11 r (\015ag)s f5 SF 11 r (math)s 2 r 10 1 ru 11 r (flag)s f0 SF 11 r (and)s 11 r (escap)s 1 r (e)s 11 r (\015ag)s f5 SF 11 r (esc)s 2 r 10 1 ru 10 r (flag)s f0 SF 11 r (as)s 11 r (follows:)s f5 SF 133 559 p (math)s 2 r 10 1 ru 10 r (flag)s f3 SF 290 491 p (8)s 290 521 p (<)s 290 580 p (:)s f2 SF 325 520 p (6)s f0 SF (=)s 10 r (0)s 33 r (if)s f5 SF 11 r (buf)s 2 r 10 1 ru 10 r (ptr)s f0 SF 12 r (points)s 11 r (b)s 1 r (etw)s -1 r (een)s 10 r ($)s 11 r (and)s 11 r ($)s 44 r (\(or)s f2 SF 11 r (n)s f0 SF (\()s 11 r (and)s f2 SF 11 r (n)s f0 SF (\))s 11 r (\))s f2 SF 325 560 p (6)s f0 SF (=)s 10 r (0)s 33 r (if)s f5 SF 11 r (buf)s 2 r 10 1 ru 10 r (ptr)s f0 SF 12 r (points)s 11 r (b)s 1 r (etw)s -1 r (een)s 10 r ($$)s 11 r (and)s 11 r ($$)s 44 r (\(or)s f2 SF 11 r (n)s f0 SF ([)s 11 r (and)s f2 SF 11 r (n)s f0 SF (])s 11 r (\))s 325 599 p (=)s 10 r (0)s 33 r (otherwise)s 11 r (,)s f5 SF 133 666 p (esc)s 2 r 10 1 ru 10 r (flag)s f3 SF 294 629 p (n)s f2 SF 321 650 p (6)s f0 SF (=)s 9 r (0)s 34 r (if)s f5 SF 11 r (buf)s 2 r 10 1 ru 10 r (ptr)s f0 SF 11 r (p)s 1 r (oints)s 10 r (b)s 1 r (etw)s -1 r (een)s f2 SF 11 r (fn)s f0 SF 11 r (and)s f2 SF 11 r (g)s f0 SF 321 690 p (=)s 9 r (0)s 34 r (otherwise)s 11 r (.)s 0 717 p (And)s 11 r (it)s 11 r (returns)s f5 SF 133 757 p (tex)s 2 r 10 1 ru 10 r (flag)s f0 SF 11 r (=)s f5 SF 12 r (\(\(maht)s 2 r 10 1 ru 10 r (flag)s 18 r (!=)s 17 r (0\))s 17 r (|)s 18 r (\(esc)s 2 r 10 1 ru 10 r (flag)s 18 r (!=)s 17 r (0\)\))s f0 SF 0 798 p (at)s 11 r (the)s 11 r (last)s 11 r (stage.)s f5 SF 1281 r (*/)s 0 879 p (int)s 17 r (get)s 3 r 10 1 ru 15 r (tex)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 919 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 960 p ({)s 70 1001 p (static)s 17 r (int)s 18 r (math)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 192 r (/*)s f0 SF 16 r (math)s 11 r (\015ag)s f5 SF 638 r (*/)s 70 1041 p (static)s 17 r (int)s 18 r (ds)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 227 r (/*)s f0 SF 16 r (display)s 10 r (math)s 11 r (\015ag)s f5 SF 526 r (*/)s 70 1082 p (static)s 17 r (int)s 18 r (esc)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 209 r (/*)s f0 SF 17 r (escap)s 1 r (e)s 11 r (from)s 11 r (quasi-T)s -2 r (eX)s 10 r (\015ag)s f5 SF 384 r (*/)s 70 1122 p (static)s 17 r (int)s 18 r (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 209 r (/*)s f0 SF 17 r (RCS)s 10 r (\015ag)s f5 SF 647 r (*/)s 70 1163 p (static)s 17 r (int)s 18 r (brace)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (0;)s 122 r (/*)s f0 SF 17 r (brace)s 11 r (counter)s f5 SF 578 r (*/)s 70 1203 p (char)s 17 r (a[4],)s 18 r (b[10];)s 331 r (/*)s f0 SF 16 r (mini)s 12 r (bu\013er)s 11 r (a[3]...a[0]=)s 11 r (b[0]...b[9])s f5 SF 303 r (*/)s 70 1244 p (char)s 17 r (c0,)s 18 r (c1,)s 17 r (c2;)s 70 1284 p (int)s 17 r (i,)s 18 r (*ptr,)s 17 r (*ptr1,)s 17 r (*ptr2,)s 18 r (tex)s 2 r 10 1 ru 15 r (flag,)s 18 r (tex)s 2 r 10 1 ru 15 r (counter;)s 70 1366 p (/*)s f0 SF 16 r (unset)s 11 r (math)s 2 r 10 1 ru 10 r (\015ag)s 11 r (and)s 12 r (esc)s 1 r 10 1 ru 10 r (\015ag)s 12 r (\(T)s 574 1373 p (E)s 592 1366 p (X)s f2 SF (!)s f0 SF (quasi-T)s 754 1373 p (E)s 773 1366 p (X\))s f5 SF 714 r (*/)s 70 1406 p (ptr)s 17 r (=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr;)s 70 1447 p (a[0])s 17 r (=)s 18 r (*ptr;)s 70 1487 p (ptr)s 17 r (=)s 18 r (dec)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 1528 p (a[1])s 17 r (=)s 18 r (*ptr;)s 70 1568 p (ptr)s 17 r (=)s 18 r (dec)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 1609 p (a[2])s 17 r (=)s 18 r (*ptr;)s 70 1649 p (ptr)s 17 r (=)s 18 r (dec)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 1690 p (a[3])s 17 r (=)s 18 r (*ptr;)s 0 1730 p (#ifdef)s 17 r (LATEX)s 70 1771 p (if)s 17 r (\(rcs)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 313 r (/*)s f0 SF 17 r (reset)s 11 r (RCS)s 10 r (\015ag)s f5 SF 568 r (*/)s 105 1812 p (if)s 17 r (\(\(a[2])s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(a[2])s 17 r (!=)s 18 r ('$'\))s 174 1852 p (&&)s 18 r (\(a[1])s 17 r (==)s 18 r ('$'\))s 17 r (&&)s 18 r (\(a[0])s 17 r (!=)s 17 r ('$'\)\))s 139 1893 p (--rcs)s 3 r 10 1 ru 15 r (flag;)s 70 1933 p (if)s 17 r (\(math)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 296 r (/*)s f0 SF 16 r (reset)s 12 r (LaT)s -2 r (eX)s 10 r (math)s 11 r (\015ag)s f5 SF 449 r (*/)s 105 1974 p ({)s 139 2014 p (if)s 18 r (\(ds)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 174 2055 p ({)s 209 2095 p (if)s 18 r (\(\(a[1])s 17 r (==)s 18 r ('$'\))s 17 r (&&)s 17 r (\(a[0])s 18 r (!=)s 17 r ('$'\)\))s 244 2136 p (if)s 18 r (\(\(a[2])s 17 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(a[2])s 18 r (!=)s 17 r ('$'\)\))s f0 SF 1244 2216 p (mod\015ag.c)s 67 r (page)s 11 r (14)s EP pstopssaved restore %%Page: pstops 15 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 279 33 p (--math)s 2 r 10 1 ru 15 r (flag;)s 209 74 p (if)s 18 r (\(\(a[2])s 17 r (==)s 18 r ('\\\\'\))s 17 r (&&)s 17 r (\(a[1])s 18 r (==)s 17 r ('\)'\)\))s 244 114 p (math)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 174 155 p (})s 139 195 p (else)s 174 235 p ({)s 209 276 p (if)s 18 r (\(\(a[2])s 17 r (==)s 18 r ('\\\\'\))s 17 r (&&)s 17 r (\(a[1])s 18 r (==)s 17 r (']'\)\))s 244 316 p ({)s 279 357 p (math)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 397 p (ds)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 244 438 p (})s 174 478 p (})s 105 518 p (})s 0 559 p (#else)s 70 599 p (if)s 17 r (\(rcs)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 313 r (/*)s f0 SF 17 r (reset)s 11 r (RCS)s 10 r (\015ag)s f5 SF 568 r (*/)s 105 640 p (if)s 17 r (\(\(a[2])s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(a[2])s 17 r (!=)s 18 r ('$'\))s 174 680 p (&&)s 18 r (\(a[1])s 17 r (==)s 18 r ('$'\))s 17 r (&&)s 18 r (\(a[0])s 17 r (!=)s 17 r ('$'\)\))s 139 721 p (--rcs)s 3 r 10 1 ru 15 r (flag;)s 70 761 p (if)s 17 r (\(math)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 296 r (/*)s f0 SF 16 r (reset)s 12 r (T)s -2 r (eX)s 10 r (math)s 11 r (\015ag)s f5 SF 486 r (*/)s 105 802 p ({)s 174 842 p (if)s 18 r (\(\(a[1])s 17 r (==)s 18 r ('$'\))s 17 r (&&)s 18 r (\(a[0])s 17 r (!=)s 17 r ('$'\)\))s 209 882 p ({)s 244 923 p (if)s 18 r (\(ds)s 2 r 10 1 ru 15 r (flag)s 17 r (==)s 18 r (0\))s 279 963 p ({)s 314 1004 p (if)s 17 r (\(\(a[2])s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(a[2])s 17 r (!=)s 18 r ('$'\)\))s 349 1044 p (--math)s 2 r 10 1 ru 15 r (flag;)s 279 1085 p (})s 244 1125 p (else)s 279 1165 p ({)s 314 1206 p (if)s 17 r (\(\(a[3])s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(a[3])s 17 r (!=)s 18 r ('$'\))s 17 r (&&)s 18 r (\(a[2])s 17 r (==)s 18 r ('$'\)\))s 349 1246 p (--math)s 2 r 10 1 ru 15 r (flag;)s 314 1287 p (if)s 17 r (\(math)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 349 1327 p (ds)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 1368 p (})s 209 1408 p (})s 105 1449 p (})s 0 1489 p (#endif)s 70 1529 p (if)s 17 r (\(esc)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 1570 p ({)s 139 1610 p (if)s 18 r (\(\(a[1])s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(a[0])s 17 r (==)s 18 r ('{'\)\))s 174 1651 p (++brace)s 2 r 10 1 ru 16 r (counter;)s 139 1691 p (if)s 18 r (\(\(a[1])s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(a[0])s 17 r (==)s 18 r ('}'\)\))s 174 1732 p (--brace)s 2 r 10 1 ru 16 r (counter;)s 139 1772 p (if)s 18 r (\(esc)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (2\))s 174 1812 p ({)s 209 1853 p (if)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 244 1893 p ({)s 279 1934 p (if)s 17 r (\(a[0])s 18 r (!=)s 17 r ('}'\))s 314 1974 p ({)s 349 2015 p (fprintf\(stderr,)s 17 r ("\\nError:)s 18 r (brace)s 17 r (counter)s 17 r (error)s 18 r (!!\\n"\);)s 349 2055 p (exit\(EXIT)s 2 r 10 1 ru 15 r (FAILURE\);)s 314 2096 p (})s 279 2136 p (--esc)s 2 r 10 1 ru 15 r (flag;)s f0 SF 1244 2216 p (mod\015ag.c)s 67 r (page)s 11 r (15)s EP pstopssaved restore %%Page: pstops 16 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 279 33 p (*buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (')s 18 r (';)s 157 r (/*)s f0 SF 16 r (replace)s 11 r (a)s 11 r (T)s 908 40 p (E)s 926 33 p (X-mo)s 1 r (de-end-brace)s 11 r (with)s 11 r (a)s 11 r (space)s f5 SF 141 r (*/)s 244 74 p (})s 174 114 p (})s 139 155 p (else)s 174 195 p (--esc)s 2 r 10 1 ru 16 r (flag;)s 105 235 p (})s 70 316 p (/*)s f0 SF 16 r (set)s 11 r (math)s 2 r 10 1 ru 10 r (\015ag)s 11 r (and)s 12 r (esc)s 1 r 10 1 ru 10 r (\015ag)s 12 r (\(quasi-T)s 623 323 p (E)s 641 316 p (X)s f2 SF (!)s f0 SF (T)s 718 323 p (E)s 736 316 p (X\))s f5 SF 751 r (*/)s 70 357 p (ptr)s 17 r (=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr;)s 70 397 p (b[0])s 17 r (=)s 18 r (*ptr;)s 70 438 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 478 p (b[1])s 17 r (=)s 18 r (*ptr;)s 70 518 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 559 p (b[2])s 17 r (=)s 18 r (*ptr;)s 70 599 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 640 p (b[3])s 17 r (=)s 18 r (*ptr;)s 70 680 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 721 p (b[4])s 17 r (=)s 18 r (*ptr;)s 70 761 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 802 p (b[5])s 17 r (=)s 18 r (*ptr;)s 70 842 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 882 p (b[6])s 17 r (=)s 18 r (*ptr;)s 70 923 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 963 p (b[7])s 17 r (=)s 18 r (*ptr;)s 70 1004 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 1044 p (b[8])s 17 r (=)s 18 r (*ptr;)s 70 1085 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 70 1125 p (b[9])s 17 r (=)s 18 r (*ptr;)s 0 1165 p (#ifdef)s 17 r (LATEX)s 70 1206 p (if)s 17 r (\(math)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 105 1246 p ({)s 139 1287 p (if)s 18 r (\(\(a[1])s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(a[1])s 17 r (!=)s 18 r ('$'\))s 17 r (&&)s 17 r (\(b[0])s 18 r (==)s 17 r ('$'\)\))s 174 1327 p ({)s 209 1368 p (if)s 18 r (\(b[1])s 17 r (!=)s 18 r ('$'\))s 69 r (/*)s f0 SF 17 r (chec)s -1 r (k)s 10 r (RCS)s 10 r (keyw)s -1 r (ords)s 10 r (here)s f5 SF 545 r (*/)s 244 1408 p ({)s 279 1449 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('A'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('u'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('t'\))s 349 1489 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('h'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('o'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('r'\))s 349 1529 p (&&)s 17 r (\(\(b[7])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[7])s 17 r (==)s 18 r ('$'\)\)\))s 314 1570 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 1610 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('D'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('a'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('t'\))s 349 1651 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('e'\))s 349 1691 p (&&)s 17 r (\(\(b[5])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[5])s 17 r (==)s 18 r ('$'\)\)\))s 314 1732 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 1772 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('H'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('e'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('a'\))s 349 1812 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('d'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('e'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('r'\))s 349 1853 p (&&)s 17 r (\(\(b[7])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[7])s 17 r (==)s 18 r ('$'\)\)\))s 314 1893 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 1934 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('I'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('d'\))s 349 1974 p (&&)s 17 r (\(\(b[3])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[3])s 17 r (==)s 18 r ('$'\)\)\))s 314 2015 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 2055 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('L'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('o'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('c'\))s 349 2096 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('k'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('e'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('r'\))s 349 2136 p (&&)s 17 r (\(\(b[7])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[7])s 17 r (==)s 18 r ('$'\)\)\))s f0 SF 1244 2216 p (mod\015ag.c)s 67 r (page)s 11 r (16)s EP pstopssaved restore %%Page: pstops 17 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 314 33 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 74 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('L'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('o'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('g'\))s 349 114 p (&&)s 17 r (\(\(b[4])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[4])s 17 r (==)s 18 r ('$'\)\)\))s 314 155 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 195 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('R'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('e'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('v'\))s 349 235 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('i'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('s'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('i'\))s 349 276 p (&&)s 17 r (\(b[7])s 18 r (==)s 17 r ('o'\))s 17 r (&&)s 18 r (\(b[8])s 17 r (==)s 18 r ('n'\))s 349 316 p (&&)s 17 r (\(\(b[9])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[9])s 17 r (==)s 18 r ('$'\)\)\))s 314 357 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 397 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('R'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('C'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('S'\))s 349 438 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('f'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('i'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('l'\))s 349 478 p (&&)s 17 r (\(b[7])s 18 r (==)s 17 r ('e'\))s 349 518 p (&&)s 17 r (\(\(b[8])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[8])s 17 r (==)s 18 r ('$'\)\)\))s 314 559 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 599 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('S'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('o'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('n'\))s 349 640 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('y'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('I'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('d'\))s 349 680 p (&&)s 17 r (\(\(b[7])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[7])s 17 r (==)s 18 r ('$'\)\)\))s 314 721 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 761 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('S'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('o'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('u'\))s 349 802 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('r'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('c'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('e'\))s 349 842 p (&&)s 17 r (\(\(b[7])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[7])s 17 r (==)s 18 r ('$'\)\)\))s 314 882 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 923 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('S'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('t'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('a'\))s 349 963 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('t'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('e'\))s 349 1004 p (&&)s 17 r (\(\(b[6])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[6])s 17 r (==)s 18 r ('$'\)\)\))s 314 1044 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 244 1085 p (})s 209 1125 p (if)s 18 r (\(\(BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\)\))s 244 1165 p ({)s 279 1206 p (if)s 17 r (\(b[1])s 18 r (!=)s 17 r ('$'\))s 314 1246 p (math)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 244 1287 p (})s 209 1327 p (else)s 279 r (/*)s f0 SF 17 r (else-part)s 11 r (takes)s 10 r (care)s 11 r (of)s 11 r (BASIC)s 11 r (or)s 11 r (PERL)s 11 r (string)s 11 r (variables)s f5 SF 109 r (*/)s 244 1368 p ({)s 279 1408 p (if)s 17 r (\(\(BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 349 1449 p (&&)s 17 r (\(b[1])s 18 r (!=)s 17 r ('$'\))s 349 1489 p (&&)s 17 r (\(\(a[1])s 18 r (<)s 17 r ('0'\))s 17 r (||)s 18 r (\(a[1])s 17 r (>)s 18 r ('9'\)\))s 349 1529 p (&&)s 17 r (\(\(a[1])s 18 r (<)s 17 r ('A'\))s 17 r (||)s 18 r (\(a[1])s 17 r (>)s 18 r ('Z'\)\))s 349 1570 p (&&)s 17 r (\(\(a[1])s 18 r (<)s 17 r ('a'\))s 17 r (||)s 18 r (\(a[1])s 17 r (>)s 18 r ('z'\)\)\))s 314 1610 p (math)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 1651 p (if)s 17 r (\(\(PERL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 349 1691 p (&&)s 17 r (\(b[1])s 18 r (!=)s 17 r ('$'\))s 349 1732 p (&&)s 17 r (\(\(b[1])s 18 r (<)s 17 r ('A'\))s 17 r (||)s 18 r (\(b[1])s 17 r (>)s 18 r ('Z'\)\))s 349 1772 p (&&)s 17 r (\(\(b[1])s 18 r (<)s 17 r ('a'\))s 17 r (||)s 18 r (\(b[1])s 17 r (>)s 18 r ('z'\)\)\))s 314 1812 p (math)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 244 1853 p (})s 174 1893 p (})s 139 1934 p (/*)s f0 SF 17 r (If)s 11 r (LaT)s -2 r (eX)s 10 r (is)s 12 r (not)s 11 r (used)s 11 r (prop)s 1 r (erly)s -2 r (,)s 10 r (then)s f4 SF 11 r (src2latex)s f0 SF 11 r (simply)s 11 r (unset)s 11 r (math)s 2 r 10 1 ru 10 r (\015ag)s 11 r (.)s f5 SF 294 r (*/)s 139 1974 p (if)s 18 r (\(\(math)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 209 2015 p (&&)s 18 r (\(\(MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 17 r (||)s 18 r (\(PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 279 2055 p (||)s 17 r (\(SH)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 17 r (||)s 18 r (\(TCL)s 2 r 10 1 ru 15 r (flag)s 17 r (!=)s 18 r (0\)\)\))s 174 2096 p ({)s 209 2136 p (ptr)s 18 r (=)s 17 r (buf)s 2 r 10 1 ru 16 r (ptr;)s f0 SF 1244 2216 p (mod\015ag.c)s 67 r (page)s 11 r (17)s EP pstopssaved restore %%Page: pstops 18 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 209 33 p (tex)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 209 74 p (for)s 18 r (\(i)s 17 r (=)s 18 r (0;)s 17 r (i)s 17 r (<)s 18 r (\(int\)\(FORMULA)s 2 r 10 1 ru 15 r (LEN)s 2 r 10 1 ru 16 r (MAX\);)s 17 r (++i\))s 244 114 p ({)s 279 155 p (c0)s 17 r (=)s 18 r (*ptr;)s 279 195 p (ptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr\);)s 279 235 p (c1)s 17 r (=)s 18 r (*ptr1;)s 279 276 p (ptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr1\);)s 279 316 p (c2)s 17 r (=)s 18 r (*ptr2;)s 279 357 p (if)s 17 r (\(\(c0)s 18 r (==)s 17 r ('\\n'\))s 18 r (&&)s 17 r (\(c1)s 18 r (!=)s 17 r ('#'\)\))s 314 397 p (break;)s 279 438 p (if)s 17 r (\(\(c0)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c1)s 18 r (==)s 17 r ('$'\))s 17 r (&&)s 18 r (\(c2)s 17 r (<=)s 18 r (')s 17 r ('\)\))s 314 478 p (break;)s 279 518 p (if)s 17 r (\(\(c0)s 18 r (==)s 17 r (')s 2 r 10 1 ru 16 r ('\))s 17 r (||)s 18 r (\(c0)s 17 r (==)s 17 r ('^'\))s 18 r (||)s 17 r (\(c0)s 18 r (==)s 17 r ('\\\\'\)\))s 314 559 p (++tex)s 2 r 10 1 ru 15 r (counter;)s 279 599 p (ptr)s 17 r (=)s 18 r (ptr1;)s 244 640 p (})s 209 680 p (if)s 18 r (\(i)s 17 r (>=)s 18 r (\(int\)\(FORMULA)s 2 r 10 1 ru 15 r (LEN)s 2 r 10 1 ru 15 r (MAX\)\))s 244 721 p (math)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 761 p (if)s 18 r (\(\(c0)s 17 r (==)s 18 r ('\\n'\))s 17 r (&&)s 17 r (\(c1)s 18 r (!=)s 17 r ('#'\)\))s 244 802 p (math)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 209 842 p (if)s 18 r (\(\(c0)s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 17 r (\(c1)s 18 r (==)s 17 r ('$'\))s 18 r (&&)s 17 r (\(c2)s 18 r (<=)s 17 r (')s 17 r ('\))s 279 882 p (&&)s 17 r (\(tex)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (0\)\))s 244 923 p (math)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 17 r (0;)s 0 963 p (#ifdef)s 17 r (DEBUGGING)s 209 1004 p (printf)s 18 r (\("get)s 2 r 10 1 ru 15 r (tex)s 2 r 10 1 ru 16 r (flag\(\):)s 17 r (math)s 2 r 10 1 ru 15 r (flag)s 18 r (is)s 17 r (set)s 18 r (to)s 17 r (%d\\n",)s 349 1044 p (math)s 2 r 10 1 ru 15 r (flag\);)s 0 1085 p (#endif)s 174 1125 p (})s 139 1165 p (if)s 18 r (\(\(b[1])s 17 r (<=)s 18 r (')s 17 r ('\))s 18 r (&&)s 17 r (\(b[0])s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(b[1])s 17 r (==)s 18 r ('\('\))s 209 1206 p (&&)s 18 r (\(\(\(b[2])s 17 r (>=)s 18 r ('0'\))s 17 r (&&)s 17 r (\(b[2])s 18 r (<=)s 17 r ('9'\)\))s 279 1246 p (||)s 17 r (\(\(b[2])s 18 r (>=)s 17 r ('a'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (<=)s 17 r ('z'\)\))s 279 1287 p (||)s 17 r (\(\(b[2])s 18 r (==)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(b[3])s 18 r (>=)s 17 r ('a'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (<=)s 18 r ('z'\)\))s 279 1327 p (||)s 17 r (\(b[2])s 18 r (==)s 17 r ('{'\)\)\))s 174 1368 p (math)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (2;)s 139 1408 p (if)s 18 r (\(\(b[1])s 17 r (<=)s 18 r (')s 17 r ('\))s 18 r (&&)s 17 r (\(b[0])s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(b[1])s 17 r (==)s 18 r ('['\))s 209 1449 p (&&)s 18 r (\(\(\(b[2])s 17 r (>=)s 18 r ('0'\))s 17 r (&&)s 17 r (\(b[2])s 18 r (<=)s 17 r ('9'\)\))s 279 1489 p (||)s 17 r (\(\(b[2])s 18 r (>=)s 17 r ('a'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (<=)s 17 r ('z'\)\))s 279 1529 p (||)s 17 r (\(\(b[2])s 18 r (==)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(b[3])s 18 r (>=)s 17 r ('a'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (<=)s 18 r ('z'\)\))s 279 1570 p (||)s 17 r (\(b[2])s 18 r (==)s 17 r ('{'\)\)\))s 174 1610 p ({)s 209 1651 p (math)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (2;)s 209 1691 p (ds)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (1;)s 174 1732 p (})s 105 1772 p (})s 0 1812 p (#else)s 70 1853 p (if)s 17 r (\(math)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 105 1893 p ({)s 139 1934 p (if)s 18 r (\(\(a[1])s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(a[1])s 17 r (!=)s 18 r ('$'\))s 17 r (&&)s 17 r (\(b[0])s 18 r (==)s 17 r ('$'\)\))s 174 1974 p ({)s 209 2015 p (if)s 18 r (\(b[1])s 17 r (!=)s 18 r ('$'\))s 69 r (/*)s f0 SF 17 r (chec)s -1 r (k)s 10 r (RCS)s 10 r (keyw)s -1 r (ords)s 10 r (here)s f5 SF 545 r (*/)s 244 2055 p ({)s 279 2096 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('A'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('u'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('t'\))s 349 2136 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('h'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('o'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('r'\))s f0 SF 1244 2216 p (mod\015ag.c)s 67 r (page)s 11 r (18)s EP pstopssaved restore %%Page: pstops 19 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 349 33 p (&&)s 17 r (\(\(b[7])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[7])s 17 r (==)s 18 r ('$'\)\)\))s 314 74 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 114 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('D'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('a'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('t'\))s 349 155 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('e'\))s 349 195 p (&&)s 17 r (\(\(b[5])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[5])s 17 r (==)s 18 r ('$'\)\)\))s 314 235 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 276 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('H'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('e'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('a'\))s 349 316 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('d'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('e'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('r'\))s 349 357 p (&&)s 17 r (\(\(b[7])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[7])s 17 r (==)s 18 r ('$'\)\)\))s 314 397 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 438 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('I'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('d'\))s 349 478 p (&&)s 17 r (\(\(b[3])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[3])s 17 r (==)s 18 r ('$'\)\)\))s 314 518 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 559 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('L'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('o'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('c'\))s 349 599 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('k'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('e'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('r'\))s 349 640 p (&&)s 17 r (\(\(b[7])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[7])s 17 r (==)s 18 r ('$'\)\)\))s 314 680 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 721 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('L'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('o'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('g'\))s 349 761 p (&&)s 17 r (\(\(b[4])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[4])s 17 r (==)s 18 r ('$'\)\)\))s 314 802 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 842 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('R'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('e'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('v'\))s 349 882 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('i'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('s'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('i'\))s 349 923 p (&&)s 17 r (\(b[7])s 18 r (==)s 17 r ('o'\))s 17 r (&&)s 18 r (\(b[8])s 17 r (==)s 18 r ('n'\))s 349 963 p (&&)s 17 r (\(\(b[9])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[9])s 17 r (==)s 18 r ('$'\)\)\))s 314 1004 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 1044 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('R'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('C'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('S'\))s 349 1085 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('f'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('i'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('l'\))s 349 1125 p (&&)s 17 r (\(b[7])s 18 r (==)s 17 r ('e'\))s 349 1165 p (&&)s 17 r (\(\(b[8])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[8])s 17 r (==)s 18 r ('$'\)\)\))s 314 1206 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 1246 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('S'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('o'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('u'\))s 349 1287 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('r'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('c'\))s 17 r (&&)s 18 r (\(b[6])s 17 r (==)s 17 r ('e'\))s 349 1327 p (&&)s 17 r (\(\(b[7])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[7])s 17 r (==)s 18 r ('$'\)\)\))s 314 1368 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 1408 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('S'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('t'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r ('a'\))s 349 1449 p (&&)s 17 r (\(b[4])s 18 r (==)s 17 r ('t'\))s 17 r (&&)s 18 r (\(b[5])s 17 r (==)s 18 r ('e'\))s 349 1489 p (&&)s 17 r (\(\(b[6])s 18 r (==)s 17 r (':'\))s 17 r (||)s 18 r (\(b[6])s 17 r (==)s 18 r ('$'\)\)\))s 314 1529 p (rcs)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 244 1570 p (})s 209 1610 p (if)s 18 r (\()s 17 r (\(BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(PERL)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\)\))s 244 1651 p ({)s 279 1691 p (if)s 17 r (\(b[1])s 18 r (!=)s 17 r ('$'\))s 314 1732 p (math)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 244 1772 p (})s 209 1812 p (else)s 279 r (/*)s f0 SF 17 r (else-part)s 11 r (takes)s 10 r (care)s 11 r (of)s 11 r (BASIC)s 11 r (or)s 11 r (PERL)s 11 r (string)s 11 r (variables)s f5 SF 109 r (*/)s 244 1853 p ({)s 279 1893 p (if)s 17 r (\(\(BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 349 1934 p (&&)s 17 r (\(b[1])s 18 r (!=)s 17 r ('$'\))s 349 1974 p (&&)s 17 r (\(\(a[1])s 18 r (<)s 17 r ('0'\))s 17 r (||)s 18 r (\(a[1])s 17 r (>)s 18 r ('9'\)\))s 349 2015 p (&&)s 17 r (\(\(a[1])s 18 r (<)s 17 r ('A'\))s 17 r (||)s 18 r (\(a[1])s 17 r (>)s 18 r ('Z'\)\))s 349 2055 p (&&)s 17 r (\(\(a[1])s 18 r (<)s 17 r ('a'\))s 17 r (||)s 18 r (\(a[1])s 17 r (>)s 18 r ('z'\)\)\))s 314 2096 p (math)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 2136 p (if)s 17 r (\(\(PERL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s f0 SF 1244 2216 p (mod\015ag.c)s 67 r (page)s 11 r (19)s EP pstopssaved restore %%Page: pstops 20 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 349 33 p (&&)s 17 r (\(b[1])s 18 r (!=)s 17 r ('$'\))s 349 74 p (&&)s 17 r (\(\(b[1])s 18 r (<)s 17 r ('A'\))s 17 r (||)s 18 r (\(b[1])s 17 r (>)s 18 r ('Z'\)\))s 349 114 p (&&)s 17 r (\(\(b[1])s 18 r (<)s 17 r ('a'\))s 17 r (||)s 18 r (\(b[1])s 17 r (>)s 18 r ('z'\)\)\))s 314 155 p (math)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 244 195 p (})s 209 235 p (/*)s f0 SF 17 r (If)s 11 r (T)s -2 r (eX)s 10 r (is)s 11 r (not)s 11 r (used)s 11 r (prop)s 1 r (erly)s -1 r (,)s 10 r (then)s f4 SF 11 r (src2tex)s f0 SF 11 r (simply)s 11 r (unset)s 11 r (math)s 2 r 10 1 ru 10 r (\015ag)s 11 r (.)s f5 SF 291 r (*/)s 209 276 p (if)s 18 r (\(\(math)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 279 316 p (&&)s 17 r (\(\(MAKE)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 17 r (||)s 18 r (\(PERL)s 2 r 10 1 ru 15 r (flag)s 17 r (!=)s 18 r (0\))s 349 357 p (||)s 17 r (\(SH)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 17 r (0\))s 18 r (||)s 17 r (\(TCL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\)\)\))s 244 397 p ({)s 279 438 p (ptr)s 17 r (=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr;)s 279 478 p (tex)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (0;)s 279 518 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 18 r (i)s 17 r (<)s 18 r (\(int\)\(FORMULA)s 2 r 10 1 ru 15 r (LEN)s 2 r 10 1 ru 15 r (MAX\);)s 18 r (++i\))s 314 559 p ({)s 349 599 p (c0)s 17 r (=)s 18 r (*ptr;)s 349 640 p (ptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(ptr\);)s 349 680 p (c1)s 17 r (=)s 18 r (*ptr1;)s 349 721 p (ptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(ptr1\);)s 349 761 p (c2)s 17 r (=)s 18 r (*ptr2;)s 349 802 p (if)s 17 r (\(\(c0)s 18 r (==)s 17 r ('\\n'\))s 17 r (&&)s 18 r (\(c1)s 17 r (!=)s 18 r ('#'\)\))s 384 842 p (break;)s 349 882 p (if)s 17 r (\(\(c0)s 18 r (!=)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(c1)s 17 r (==)s 18 r ('$'\))s 17 r (&&)s 18 r (\(c2)s 17 r (<=)s 17 r (')s 18 r ('\)\))s 384 923 p (break;)s 349 963 p (if)s 17 r (\(\(c0)s 18 r (==)s 17 r (')s 2 r 10 1 ru 15 r ('\))s 18 r (||)s 17 r (\(c0)s 18 r (==)s 17 r ('^'\))s 18 r (||)s 17 r (\(c0)s 17 r (==)s 18 r ('\\\\'\)\))s 384 1004 p (++tex)s 2 r 10 1 ru 15 r (counter;)s 349 1044 p (ptr)s 17 r (=)s 18 r (ptr1;)s 314 1085 p (})s 279 1125 p (if)s 17 r (\(i)s 18 r (>=)s 17 r (\(int\)\(FORMULA)s 2 r 10 1 ru 16 r (LEN)s 2 r 10 1 ru 15 r (MAX\)\))s 314 1165 p (math)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 1206 p (if)s 17 r (\(\(c0)s 18 r (==)s 17 r ('\\n'\))s 18 r (&&)s 17 r (\(c1)s 18 r (!=)s 17 r ('#'\)\))s 314 1246 p (math)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 1287 p (if)s 17 r (\(\(c0)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(c1)s 18 r (==)s 17 r ('$'\))s 17 r (&&)s 18 r (\(c2)s 17 r (<=)s 18 r (')s 17 r ('\))s 349 1327 p (&&)s 17 r (\(tex)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 17 r (0\)\))s 314 1368 p (math)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 0 1408 p (#ifdef)s 17 r (DEBUGGING)s 279 1449 p (printf)s 17 r (\("get)s 2 r 10 1 ru 16 r (tex)s 2 r 10 1 ru 15 r (flag\(\):)s 18 r (math)s 2 r 10 1 ru 15 r (flag)s 18 r (is)s 17 r (reset)s 18 r (to)s 17 r (%d\\n",)s 418 1489 p (math)s 3 r 10 1 ru 15 r (flag\);)s 0 1529 p (#endif)s 244 1570 p (})s 209 1610 p (if)s 18 r (\(\(b[1])s 17 r (==)s 18 r ('$'\))s 17 r (&&)s 17 r (\(b[2])s 18 r (!=)s 17 r ('$'\)\))s 244 1651 p ({)s 279 1691 p (math)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (2;)s 279 1732 p (ds)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 244 1772 p (})s 174 1812 p (})s 105 1853 p (})s 0 1893 p (#endif)s 70 1934 p (if)s 17 r (\(\(math)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 17 r (&&)s 17 r (\(esc)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\)\))s 105 1974 p ({)s 174 2015 p (if)s 18 r (\(\(a[1])s 17 r (!=)s 18 r ('\\\\'\))s 17 r (&&)s 18 r (\(b[0])s 17 r (==)s 17 r ('{'\)\))s 209 2055 p ({)s 279 2096 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('\\\\'\))s 18 r (||)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(b[2])s 17 r (==)s 18 r ('\\\\'\)\)\))s 314 2136 p ({)s f0 SF 1244 2216 p (mod\015ag.c)s 67 r (page)s 11 r (20)s EP pstopssaved restore %%Page: pstops 21 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 384 33 p (brace)s 2 r 10 1 ru 15 r (counter)s 17 r (=)s 18 r (1;)s 384 73 p (esc)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 384 113 p (*buf)s 2 r 10 1 ru 15 r (ptr)s 17 r (=)s 18 r (')s 17 r (';)s 53 r (/*)s f0 SF 16 r (replace)s 11 r (a)s 11 r (T)s 908 120 p (E)s 926 113 p (X-mo)s 1 r (de-start-brace)s 11 r (with)s 11 r (a)s 11 r (space)s f5 SF 125 r (*/)s 314 153 p (})s 279 193 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r (')s 17 r ('\)\))s 314 232 p ({)s 349 272 p (/*)s f0 SF 16 r (replace)s 11 r (a)s 11 r (T)s 559 279 p (E)s 577 272 p (X-mo)s 1 r (de-start-backslash)s 10 r (with)s 11 r (a)s 12 r (blank)s 11 r (space)s f5 SF 322 r (*/)s 349 312 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 349 352 p (*ptr)s 17 r (=)s 18 r ('{';)s 349 392 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(ptr\);)s 349 432 p (*ptr)s 17 r (=)s 18 r ('}';)s 314 472 p (})s 279 511 p (if)s 17 r (\(\(b[1])s 18 r (==)s 17 r ('{'\))s 18 r (&&)s 17 r (\(b[2])s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(b[3])s 17 r (==)s 18 r (')s 17 r ('\)\))s 314 551 p ({)s 349 591 p (/*)s f0 SF 16 r (replace)s 11 r (a)s 11 r (T)s 559 598 p (E)s 577 591 p (X-mo)s 1 r (de-start-backslash)s 10 r (with)s 11 r (a)s 12 r (blank)s 11 r (space)s f5 SF 322 r (*/)s 349 631 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(buf)s 3 r 10 1 ru 15 r (ptr\);)s 349 671 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(ptr\);)s 349 711 p (*ptr)s 17 r (=)s 18 r ('{';)s 349 751 p (ptr)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(ptr\);)s 349 790 p (*ptr)s 17 r (=)s 18 r ('}';)s 314 830 p (})s 209 870 p (})s 105 910 p (})s 70 950 p (if)s 17 r (\(rcs)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 105 990 p (tex)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (\(esc)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\);)s 70 1029 p (else)s 105 1069 p (tex)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (\(\(math)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 18 r (|)s 17 r (\(esc)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 17 r (0\)\);)s 70 1109 p (return)s 17 r (tex)s 2 r 10 1 ru 16 r (flag;)s 0 1149 p (})s f0 SF 1244 2216 p (mod\015ag.c)s 67 r (page)s 11 r (21)s EP pstopssaved restore %%Trailer %%Pages: 21 END %%EOF src2tex-2.12h.orig/newton.c100644 1750 1750 4147 5733240161 15547 0ustar kawamurakawamura/* {\hrulefill} * {\bf Newton-Raphson 法} 方程式 $f(x)=0$ を解くためには、漸化式 $\displaystyle\qquad x_0=a,\quad x_{n+1}=x_n-{f(x_n)\over f'(x_n)} \qquad\cdots\cdots\ (\star)$ を、適当な初期値 $a$ に対して解いて、数列 $\{x_n\}$ を構成する。 初期値 $a$ がうまく与えられれば、この数列は上述の方程式の 1つの解 $\alpha$ に、収束することが知られている, {\it i.e.}, $\displaystyle\qquad \exists\ \alpha=\lim_{n\to\infty}x_n \quad such\ that\quad f(\alpha)=0\ .$ 漸化式 $(\star)$ の意味とその収束の様子は、次の図と式を見れば 一目瞭然である。 {\special{epsfile=newton.eps hscale=.7 vscale=.7 hoffset=25} \vskip 12cm} $\displaystyle\qquad y-f(x_n)=f'(x_n)(x-x_n) \qquad\cdots\cdots\ \hbox{点}\ (x_n,f(x_n))\ \hbox{を通る接線の方程式}$ $\displaystyle\qquad x_n-{f(x_n)\over f'(x_n)} \qquad\cdots\cdots\ \hbox{上記の接線と}\ x\ \hbox{軸との交点の} \ x\ \hbox{座標}$ 数列 $\{x_n\}$ の収束性の証明および収束のオーダーの評価は、 それほど簡単なことではない。$\epsilon$-$\delta$ 論法と解析学に関する 知識が必要とされる。興味のある学生には、参考文献を紹介する。 以下のCソース newton.c は、方程式 $\qquad\displaystyle x^2-5=0$ の解の1つが $\sqrt{5}$ であることに注目して、Newton-Raphson 法で $\sqrt{5}$ を求めるプログラムである。{\tt A, F(X), DF(X)} の定義をいろいろ と変えて、各人で数値実験を行ってみよう。 * {\hrulefill} */ /* {\hrulefill\ newton.c\ \hrulefill} */ #include #define A 4. /* 初期値 {\hfill} */ #define F(X) ((X)*(X)-5.) /* 与えられた関数 {\hfill} */ #define DF(X) (2.*(X)) /* その導関数 {\hfill} */ main() { double x, y; /* 倍精度で計算する {\hfill} */ x = A; /* $\displaystyle x_0=a$ {\hfill} */ printf("%.16f\n", x); /* $x_0$ の表示 {\hfill} */ y = x - F(x) / DF(x); /* $\displaystyle x_1=x_0 - {f(x_0)\over f'(x_0)}$ {\hfill} */ printf("%.16f\n", y); /* $x_1$ の表示 {\hfill} */ while (x != y) /* {\ iteration をやっても 値が変わらなくなったら終了 \hfill} */ { x = y; y = x - F(x) / DF(x); /* $\displaystyle x_{n+1}=x_n - {f(x_n)\over f'(x_n)}$ {\hfill} */ printf("%.16f\n", y); /* $x_{n+1}$ の表示 {\hfill} */ } } src2tex-2.12h.orig/newton.c.ps100644 1750 1750 167311 6266067323 16244 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: newton.c.dvi %%Pages: 2 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 121 /f0 NF f0 SF [<00FC000382000E01001C0080380040380040780020700020F00020F00000F00000F00000F00000F00000F000207000207800 203800603800601C00E00E01E003826000FC20> 24 23 -2 0 23.984] 67 D [ 24 23 -1 0 24.906] 78 D [ 24 23 -1 0 24.445] 82 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D 1.000 51 /f1 NF f1 SF [<1E0021006180C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C04080408021001E00> 16 15 -1 0 13.237] 48 D [ 8 15 -2 0 13.237] 49 D [ 16 15 -1 0 13.237] 50 D [<00C00000C00000C00000C00000C00000C00000C000FFFF80FFFF8000C00000C00000C00000C00000C00000C00000C000> 24 16 -1 2 20.386] 43 D 1.000 122 /f2 NF f2 SF [<1C7062C841C440C4C0C4C0C06060606060603060303018700C700390> 16 14 -1 0 17.553] 97 D [<3E004180C040802080008000C000C000C000600060E030E018400780> 16 14 -2 0 14.371] 99 D [<7000C800E4006600060006000300030003000300030001800180018001800180018000C000C007FC00C000C0006000600060 006C002E0036001C> 16 29 -1 6 16.258] 102 D [ 16 23 -2 0 19.133] 104 D [<3E00C300C180E0C060C000C007C01F801E00380018E018E00C400780> 16 14 -2 0 15.566] 115 D [<1C003200310031003100300018001800180018000C000C000C00FF80060006000600060003000300> 16 20 -1 0 11.992] 116 D [<071C08F218711831183118300C180C180C188618460C460C260C1C04> 16 14 -1 0 19.010] 117 D [<78E0C510E708C30403040300018001800180418020C620C711A30F1E> 16 14 -1 0 18.979] 120 D [<3C006300718070C000C00060076008E018701830183018300C180C180C188618460C460C260C1C04> 16 20 -1 6 16.281] 121 D [<3E0C4192C070803080308038C034C034C03260326031306118410780> 16 14 -2 0 21.243] 11 D [<3C004200C100810080808080C0C0C040C040604060C030C01980078007000C0018001800180008000C10061001E0> 16 23 -2 0 14.759] 14 D [<1E0021804000C000C000C000C000C000FF00600060003000180007C0> 16 14 -2 0 13.479] 15 D [<60F0F060> 8 4 -2 0 9.224] 58 D [<40402020101070F0F060> 8 10 -2 6 9.224] 59 D [<1004000808000C180006300002200003600001C00007F0001FFC00F08780008000008000008000008000008000008000> 24 16 0 0 16.604] 63 D 1.000 111 /f3 NF f3 SF [<61C06320331031903180318098C098C09CC07380> 16 10 -1 0 16.416] 110 D 1.000 113 /f4 NF f4 SF [ 24 2 -3 -7 25.829] 0 D [ 16 23 -2 0 18.449] 57 D [<60F0F060> 8 4 -2 -6 9.224] 1 D [<00F001800300060006000600060006000600060006000600060006000C001800F00018000C00060006000600060006000600 060006000600060006000300018000F0> 16 33 -2 8 16.604] 102 D [ 16 33 -2 8 16.604] 103 D [<006000000060000000F0000000F000000198000001980000030C0000030C000006060000060600000C0300000C0300000C01 8000180180001800C000F000C00030006000000060000000300000003000000018000000180000000C0000000C0000000600 0000060000000300000003000000018000000180000000C0000000C00000006000000020> 32 34 -2 32 27.673] 112 D 1.000 50 /f5 NF f5 SF [<000040000040000020FFFFF8FFFFFC000020000040000040> 24 8 -1 -2 26.474] 33 D [<1E01E02187B040CE0880780480380480700480780441CC083786101E01E0> 24 10 -1 0 26.474] 49 D [ 8 12 -1 -1 7.656] 48 D 1.000 120 /f6 NF f6 SF [ 32 23 -1 0 29.887] 78 D [ 32 23 -1 0 28.642] 82 D [<1F8780786F80F02E00F01E00F01E00781E003C1E001F1E0001FE00001E00301E00781E00783C007038001FE000> 24 15 -1 0 18.564] 97 D [<07F01C18380C78067000F000F000FFFEF00EF00E700E700C381C1C3807E0> 16 15 -1 0 17.503] 101 D [ 24 23 -1 0 21.216] 104 D [ 24 15 -1 0 21.216] 110 D [<07E01C38381C700E700EF00FF00FF00FF00FF00F700E700E381C1C3807E0> 16 15 -1 0 19.095] 111 D [ 24 21 -1 6 21.216] 112 D [ 16 15 -1 0 15.063] 115 D [<0F801C403C603C603C603C603C003C003C003C003C003C003C00FFC03FC01C001C000C000C000C000C00> 16 21 -1 0 14.851] 116 D [<0380E0000380E00003C1E00007C1F00007C1F00007E3F0000F6398000F7798000F3798001E370C001E3F0C003E1E0E003C1E 0600FE7F9F80FE7F9F80> 32 15 -1 0 27.581] 119 D [ 16 3 0 -6 12.730] 45 D 1.000 126 /f7 NF f7 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 68 D [ 16 20 -1 0 17.434] 70 D [ 16 20 -1 0 17.434] 88 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<18E03DF03DF035B035B035B037B037B03030703870387038FFFCFFFC> 16 14 -1 0 17.434] 119 D [ 16 14 -1 0 17.434] 120 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<07FC07FC00E000E000E000E0FFFCFFFCE0E070E030E038E018E01CE00CE006E006E002E003E001E0> 16 20 -1 0 17.434] 52 D [<1F003F8071C0E0E0E070E07040700070006060E07FC07F007000700070007000700070007FE07FE0> 16 20 -2 0 17.434] 53 D [<07C01FE038707038701C601CE01CE01CE01CF038F870EFE0E7C070007000303838381E3807F003E0> 16 20 -1 0 17.434] 54 D [<60F0F0600000000070F0F0F0F0F0F0F0F0F0F060> 8 20 -6 0 17.434] 33 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00300070007000E000E001C001C001C0038003800700070007000E000E000E001C001C0038003800380070007000E000E000 C000> 16 26 -2 3 17.434] 92 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 106 /f8 NF f8 SF [<38004600C10080808000C000C000C000FE0041006080308018800F00> 16 14 -5 0 15.276] 101 D [<306864646430303018984C4C4838000000000000060706> 8 23 -3 0 10.184] 105 D [<60F07830> 8 4 -3 0 10.184] 46 D 1.000 256 /f9 NF f9 SF [<00F00070003E0070600780F0F801C0E0FE0071C01F803F800FC01E000CF01C000C3C0C000C070E000C018E000C0046000C00 06000C0006000C0007000C0007000C0007000C0387000C0786000C0706000C0F06000C1E06000C3807000C6007000E000780 0C000780> 32 26 -1 3 30.399] 32 D [<307FFE00787FFF1838600E381C6006380C60C6700C61C06004718180037700000300030003FFFF00030003000300030003FF FF0003000300030003000300038003FFFF0000000000FFFFFFFC001840780038603000387000007038003FFFFFF0000301F0 000300C00003800000038000> 32 28 0 4 30.399] 33 D [ 32 4 -1 -9 30.399] 34 D [<0006000000060000000600000006000000060000000600000006000000060000000600000006000000060000000603800006 078000060F0000061E0000067C000007F000000600000006000000060000000600000006000000060000FFFFFFF8000001F0 000000E0> 32 26 -1 3 30.399] 35 D [<070000000703FFF00703FFF00703006007030060070300600703006007030020070300000703000087030000C70300006703 000077030000370300001F03C0001F0370000F033E000F030F80070307E0070301E0070300C0038300000383000003C30000 01C3800001C3C00000030000> 32 28 -1 4 30.399] 36 D [<0C0000000C6000000C6000600C6000600C7FFFE00C638C600C638C600C638C600C638C600C638C600C638C600C638C600C63 8C608C638C60CC638C606C638C606C638C603C638C703C7FFFF81E638C701C038C001C038C000C038C000E038C000EFFFFF8 070000780780003007000000> 32 28 0 4 30.399] 37 D [ 32 26 0 3 30.399] 38 D [<0680600006E0F0000671F03006383070061C3070060E30E00607B1C00607B78086023000C6003000667FFFFC366000383EE0 00001EEFFFE01FC001E00E0000800E0C00E00E0FFFE00E0CCCE0060CCCE0FFFCCCE006EDDCE0060FFFE00600CC800600CC00 06FFFFF80700007807000020> 32 28 0 4 30.399] 39 D [<1E0000001FC000781FFC00FC007FC3E00063FF80E0601E003C601C000F60380003E0300001F0780000F0EE000078C780003C 8380000F80007FFFFFF8000300780003007000030000000300000FFFFFE0000303C000030180000300003FFFFFF8000300F0 000300700003800000038000> 32 28 0 4 30.399] 40 D [<0000180060601C0060601C007FE01C0060601C0060601C0060601C0060601C0060601C0060701C007FF01C0060601C000000 FC00003F9FFC7FE00E7800C00F3000019D0000019D807FE39DC000C39CC000031CE0FFFE1CF000FC1C7800701C6000001C00 7FFFFFF801E0007800C00000> 32 28 0 4 30.399] 41 D [ 32 27 0 3 30.399] 42 D [<7E0000200FC007F001F83FF8003EFF80E01FF0003807C0000E0FE000071CF00003F87C0001F03F0000FFFF00787C0E001F3E 0000039EF00001E1F000C0F7F0187070303C383830781E3830F80F3831F0079833C003983E00001830007FFFFFF8000380F8 00038070000380000003C000> 32 28 0 4 30.399] 43 D [<0000F0006001F8001807FC000E001C0007000E0003800E0001C0060000E00700006007000070030000380300003803000018 0300001C0380001C0380000FFFC0000E0380000E0000000E0000000E000000060000FFFFFFF8000600F0000600E000060000 000600000007000000070000> 32 28 -1 4 30.399] 44 D [<7000000078C0006070FC00F071FFF0E0711FFFC0700C03C0F0060780F0070E0070033800300380003801C0001801E0001801 E0000FFFFFF03C00E0F03400E0607600E000F600E0008200E0000300E0000100E00001FFFFF00080E0E00E80E0400E40E000 1E00E0003800F0000000C000> 32 28 -1 4 30.399] 45 D [<0006000000060000000600000006000000060000FFFFFFF0000600E00C0603400C0603000FFFFF000C0603000C0603000C06 03000C0603000FFFFF000C0603000C0603000C0603000C0603800FFFFF80080043000386600003863000070E1C00070E1E00 0E0C0F000C18070010300000> 32 28 -1 4 30.399] 46 D [<38C0000038FFFFF038FFFFF038C000E038CE000038CE030038CFFF0038CE030038CE030038CE030038CFFF0038CE030038CE 0300B8CE0300B8CE0300F8CFFF0078CE030078EE0300788E0380380FFF80300CC3803800C0001800C0001DFFFFF00C00E0F0 0F0060600F00700000006000> 32 28 -1 4 30.399] 47 D [ 32 27 0 3 30.399] 48 D [<380000003FFFFFF83FFFFFF8380030703800302038003000300030007800300078003000180030001C0030000C3FFFF00E00 30F0060030603E0030003B0030003B00300071803000E18030000080300000FFF7F800400CF8004030700380700007007000 0700E0000E01C00018030000> 32 28 0 4 30.399] 49 D [<000FFFF0707FFFF8F0FFFFFC79C000001F1831C00F1833E006183660061830600618306006183060061FFFE0061830600618 306006183060079830607F1FFFE0061830600018306000183060001FFFF0001FFFF000003800060070000E00FE000E038780 0C0403E0183FFFE0200000C0> 32 28 0 4 30.399] 50 D [ 32 28 -1 4 30.399] 51 D [<03000000037FFFFC037FFFFC03001878030018300300180003001800C3001800631FFFF8330018F0331818601B3818001F78 18000FF018000F1FFFF8070000700700006007018000FFFD80C0033DFFE0031980E0030180E0030180E0C30180E07F0180E0 0FE180F003F1FFF000E000C0> 32 28 0 4 30.399] 52 D [<201FFFF070FFFFF8F9FFFFF83F8000C00F6001F0066603F0066606700667FE700666067006660670066606700667FE700766 6E707F60607004606070007FFFF0006063F00060627000606070007FFFF0006718700C071C000E060E001C0C0F001CFFFFFC 700060780000603000007000> 32 28 0 4 30.399] 53 D [<60300000F038707078387070383870E0183071E00830E1C00861C700000000000600000006000E0007FFFE0007FFFE000600 0E0006000E0006000E0006000E0006000E0007FFFF00060606000006000000060000000600000007FF800006070000060200 0007000000070000> 32 27 -1 4 30.399] 54 D [<840000E047F007F8603E1FE0300FFC003803E0001803E000180370001C0638001C0C1C000C081E000C180F000DFFFF800C00 06000C1C10000C1C18000C1FF8000C1C18000C1C18000C1C18000FFFFFF80C1C18780C1C1C200C1818000FFFFFFC0E038078 000380300003C0000003C000> 32 28 0 4 30.399] 55 D [<7FF0000000FE0000000F80007E03F00007E0FC0000F83F80403E0F00380F86000F03E060C3C1F1F070F063E0383C07800E1F 0F00070F9C000387380001C0300000E06000FFFFFFF0007001E0003800C0003C0300381C07003FFC0F007FFFFE0000C01C00 00607800007CE0000038000000100000> 32 29 -1 4 30.399] 56 D [ 32 29 -1 5 30.399] 57 D [<001C0000003E0000007E00000007000000070000000700000007000000070000000700000006000000060000000600000006 000000060000FFFFFFF8000600F000060060000600000006000000060000000700000005C0000000E0000000780000003F00 00001F801FFFFF0000000600> 32 28 -1 4 30.399] 58 D [<0E000020230000F079C001F0786003E07030078070380700701C0E00700C1C00700E1800F006380070073000380320001983 600018C3E0000CC3C0000C61C0000671C4000231C3000339E3800119C1C0019C01F01C8FFFF01CCE00E03C4600C078270000 602700000007800000030000> 32 28 -1 4 30.399] 59 D [<000C0000001E0000007F000080070000E00700E0600700E0300701E0180701C01C0703C00E0703800707070003070C0003C7 180001C72000000700000007000000070000FFFFFFF8000000F000000060000000000000000000000000000000000FFFFF00 00001F0000000E00> 32 27 -1 4 30.399] 60 D [<0000001800000078200001F8780003F87F8007981FF80E0800FF8E0800C05C0000C0180000C0380000C0300000C0700000C0 700000C070007FFF6000000FE000000EE0000000E0000000E0000000E0000000E000FFFFFFF80000C3F80000C3700000C700 0000EE000000F80000008000> 32 28 0 4 30.399] 61 D [<000180006000E018619838387F987C78619FFEF8619877D8619873D861987188619FF3C0619873E061987360619873707FD8 7378619FF33800102320000007007FC0070001BFFFF80006C6707FC6C60001CE6600008C7630001C7670FFFFFE7000DFFEE0 000316007FC3060001C3870000038600> 32 29 0 5 30.399] 62 D [<060000000603806006038060060380600703FFE006038C6006038C60FFFF8C60063B8C6046038C6066338C607FF38C606633 FFE066338C6066338C607FF38C6066338C6066338C60663B8C607FF3FFF006030C6006000C0006000C00FFFC0C0006380C00 07000C0007000E0006000800> 32 28 -1 4 30.399] 63 D [ 32 28 0 4 30.399] 64 D [<00F0000000DC007000C700FC00C381F000C1C7C000C0EF8070C07E00F8C03C00FEC03C001FC03C001BC07E0018F0660018FC E70018C6C30018C0C38018C1C38018C1818018C181C018C181C018C181C018C100C018C100E018C100F018C100F01CCFFFE0 18C0004000E0000000C00000> 32 28 0 4 30.399] 65 D [<06000180060003808600078086001F00C6387C00C639F000663B000066300E0076700E007EE03C007EDCF878060701F8E61B 83E0FF38C780FFF87F0018703E000CE03C0006C83C00070C7E000F8667001F87C7003DC3C38078F381C0CCF1FFE00E01C1F0 0700E0C00780F0000700F00000004000> 32 29 -1 4 30.399] 66 D [<20000000F07FFFF0F8FFFFF81DC000000F00600006C0600006706000063860E0061860E0061C60E0060C60C0060C60C0060C 61C0070C61807F0E6300070E6600000E6600000E6000000060000000600001FFFFF800006070060060A00E0061C00E006380 0C0067801800760000007000> 32 28 0 4 30.399] 67 D [<00C000007F000003E00000F03C003C7F701CE7E00E61E00760F00730F80338DC030CCC0707C60603C70E01FBBC00FFF000C3 C000C38000C7000FE0003FFC00307F800063C000700000F00001E000> 24 26 -3 3 30.399] 68 D [<0700000F00001F00001F00003B800731807F31801F60C00660600E60600C60301C601838600FF06001807000006000006000 00C00000> 24 18 -4 -1 30.399] 69 D [<3C000F00038001C000E000700038003800380018001C001C401CE018F838FC70CFE0E000600030001C000FE003E00FC01E00 1800> 16 26 -8 3 30.399] 70 D [ 24 25 -4 2 30.399] 71 D [<03C0000003C0000067C00000FCC7F000F8DC78000ED81C0007C00C0003C00C0001E01C0000F8380000CFF00000C00E0000C0 07C000C003801FC003803FF0FF0030FC3C0000DE000000C4000001C0000001E0000007800000> 32 22 -3 1 30.399] 72 D [ 32 24 -2 2 30.399] 73 D [<00300070007000E001C0038007000E001C0038007000E000C000E000700038001C000E00078003C001E000E000E001C0> 16 24 -8 2 30.399] 74 D [<07FF003FFF80780000E00000C00000C00000800000800000C00000C000006000003000001800001C00000F000003C0001FFC 003FFE00600C00C00000> 24 20 -7 0 30.399] 75 D [<01FF0007FF001F00003C00003800003000003000003001801807800FFF8001FF00000600000E00001C000018007FB800E7F0 00C07E00006F800067C000E1C000C00001E00007C000010000> 24 25 -5 2 30.399] 76 D [<07F8000FFE001C07801801C01800701800381800081800001800001800001800001800001800001800001800001800001800 001C00001C00001C00001C00003C0000F80000> 24 23 -6 2 30.399] 77 D [<0200000003E0000000780000001C0000000E0000000600000007000000030000001F0000003F800000738000006380000063 800000338000003F800000018000000180007E0180007FF18000C3FFFFE00003FFE000018000000180000001800000038000 0003C000000F8000> 32 27 -1 4 30.399] 78 D [<0001E0000FF0003E0000700000600000E00000C00000C00000C000C06000F830003F38000FFC00037F00018FFC01C0FC00E0 00007000003800071C000FCE000FFF00007F00001E00> 24 24 -4 2 30.399] 79 D [<0003FEC00FFEE01C00E038007030007030003030003830001818001C0C000C06000EC3800E79FC061FFC0703E00300007F80 00FFE00081FC0000DC0000E00000F00000F00003E000010000> 24 25 -4 2 30.399] 80 D [<03E000007E000007800001C00000E0000060000070000030780030FC0020CF006003C1C0007F80> 24 13 -5 1 30.399] 81 D [<00FC0000001FC0000000F00000003C0000000E00000007000000078000000380000003800000018078000180FE000180DF00 038083C0030000F00E00003E7C00000FF000> 32 17 -2 -1 30.399] 82 D [<0001FC000007FC00001F0000003C000000380000007000000060000000600000006000000060000000600000003000000030 000000180000781C00007F8E0000E3FF8000C03FF0000003FF8000003F80> 32 20 -2 1 30.399] 83 D [<00000C000001FC000007FC00000F0000001C0000003800000030000000300000003000000030000000300000003001800018 0380001803A07C0C0770FF8E0CF0C3F701E0007FC100000FF0000001FF0000001F00> 32 21 -1 1 30.399] 84 D [<3FFE7FFEE000C00080008000C000C000600038001E0007C007FE063E060C0618060006000600060007003E001C00> 16 23 -8 1 30.399] 85 D [<0FFF003FFF00700000600000C00000C000006000006000003000001C00000F000003E00003FE00033F00030E00030C000300 000300000300E00301E00783C817031C0E0038000070000040> 24 25 -6 1 30.399] 86 D [<00380000FE0C018F3C01077C0183F0E0FFC0603F007003003807003806003C06001C06001E06000F060C0F833C06E1F8063F F0031F803F0000FFE00081FC0001FC0000C00000E00000E00003C000> 24 26 -4 3 30.399] 87 D [<3000007000007007FE701FFE707CF870700070E00078C000D8C00058C0006CC0006CC000646000666000723000731800318C 0030EF00303FF83007F0300000600000> 24 22 -4 1 30.399] 88 D [<003C00000F800001E03800787E003C7E000EE7000EC38007C18007C1C003C0C003C0E00760600760700730300E18380E1C38 1C07307803F3E0007F80> 24 20 -3 1 30.399] 89 D [<300000703F06707F9EF041FCF060F0F07FC0F000C0D000C0D000C0D800C0C800C0E800C06C00C06400C06600C07301C031FF FE3000FE3000C03800C03801C01801C03003C0200700> 24 24 -4 2 30.399] 90 D [<30000000703F0600707F9E007043FC00F061F800F03FF000F000C000F000C000D800C000D801C000D801C0006C01C0006C01 C0006601C00066018000730F800031FFFE003001800038018000380180003801CE001801CE001807BDC0100001C000000380 00000400> 32 26 -3 2 30.399] 91 D [<07E000001FF80000383C0000301C0000700E00006006000060030000600300006003070060037F0020018E0030019C003001 B8001001F0001801E0001801E0000C01C0000E01C0000701C0007F818000EFC01C0081C01C00000039800000638000000780 00000800> 32 26 -3 2 30.399] 92 D [<300000701F06707FDEF061FEE060F8E03FE0F004C0F000C0F000C0D800C0D800C0C800C0C800C06C7FE06473FE6660DE6260 C06331C0733F80719C0070EF00307FF82007F8600000> 24 24 -4 2 30.399] 93 D [<07F0300FF8F00C3BF00C1FC007FE0003F80000180000180000180000180007F8000FFF80061FE00619E00318000198007FF8 00FFFE00C01FE00019F0001830001800001C0000FC0000F000> 24 25 -4 2 30.399] 94 D [<00100000001C0000000600000007000000038000780180007C01C040CE00C1C06300E7C063807F803983FC000FFFF00000F0 7000006030000060380000303800003070000030E0000018000000180000001C000003CE000007FE0000067C000000180000> 32 25 -2 3 30.399] 95 D [<001000001F800003E07800787C003CEEE01EC7E00EC3C00763800723C00333E0031F60030E300707380E07D81E0EFC7C0C1F F00C0E000C0700180300300380001FC0000F00> 24 23 -3 1 30.399] 96 D [<01F8030E0606060706030603060307E31FE77E06660E470C6318633033001F003F807B80E1808180018001C001C003800700> 16 25 -7 2 30.399] 97 D [<0006000000070000000E0000000E0000001C0000001C000000180000003800000030000000700000006000007CE00000FFDF FE00CFC00F8003E0038003F801C0071E01C0070781C00607FF80070E7E0001FE0000000C0000000C00000018000000180000 00180000> 32 26 -2 3 30.399] 98 D [<7F8000F7C7E0C1C3C0C1CF80F1FE007FF00000C00000C00000C00000C00000C00000C00000C00000C00000C00000C00000FF 8000FFC000C1C001C00001C00001E0000FC000020000> 24 24 -6 1 30.399] 99 D [<06000001F800003E00000F806003C07001E0F000E0F80070FC0070EE0070E700706380E060F1C0603F806000006000006000 006000006000003F80000F80000380000700000E0000180000> 24 25 -6 2 30.399] 100 D [<03F8000FFE001C6F0018E38019C3C00F81C00001C0C000C0E000C07001C03C01803E07801FFE000E700007000003800001C0 0001C00000E0001070003E38003FDC0021FC00001800> 24 24 -6 2 30.399] 101 D [<020000000300000003001E0007007F00E70073C07F0060E03B0060601F0060300F0070100F007000070030000380300003C0 300013E030007DB030007FD8300003CC380001C638000183B0000181F000018000000180000001C0000007C0000007800000> 32 25 -1 3 30.399] 102 D [<07F000007E00000F800003C00000E0000070C00070E00038F000387800383C00301E00700F80E00FF3C0073F0003800001C0 0000E00000E0000070003C38003F1C0037FE0018FE00081000> 24 25 -5 2 30.399] 103 D [<010000038000038F004383E0E780F875803C79801E39800E1D80071D80070F800307800303800303C00701E00779B80EFFCF FC07E1E001E00001E00001800001800001C00001C000078000020000> 24 26 -3 3 30.399] 104 D [<01FFE003FFE007000006300006380006380003380001B80000F800607800703C003C3F001E3BE00F30F80FF07C06003C0300 780380007F8000FFF80080FE0000EE0000600000F00001E000> 24 25 -4 2 30.399] 105 D [<200030003C0030000E003000070030000380300001C0300000E030000060300000603000007030000070300080703000E030 300030303000183030300C3030F8073031F803B037C001B83F0001F83E0000E03800007070000038E000001CC000001D8000 000F00000007800000060000> 32 28 0 4 30.399] 106 D [<40180300607C0300600C0300300C0300300C0300380C0300180C0300180FFF1C180F87FC1FFF033018CD830018CD830018CC C30018CCFF981FFC7FF818CC733018CE7B0018CFB380D8CDC0007FFFE3C03FFE67E038C4306018E038701C7038300FF81830 0E381C380F23FFF80780003004000000> 32 29 0 4 30.399] 107 D [<018000000180180001FFF8000180180001801800018018000180180081801800718018001D801CC007FFFBF003C00FC000E0 3F00407078006039E000301F8000180F00000C0F00000E1B80000731C0000330E00001E0700001C0700000FFFC0000E03800 0078000000780000> 32 27 -1 4 30.399] 108 D [<000E0000003F0000006F00000003000000030000000300000003000000030000FFFFFFF8000300F800030070000380000003 C0000000E00000003E0000001F0073FFFF00F0000EC0780000E0380000781FFFFFF81800307011C3980001C38C0003C70E00 078707800E0C078000000200> 32 28 0 4 30.399] 109 D [<00000080306000E030601BF030601870307FF8303060183030601830307FF8303060183030601830307FFC30306018303000 0030301860303FF87FF03FF87FF0301860303FF87FF030186030301860303FFE7FF8F8DE673060E3070030E3070019C18700 1FFEFFF80C1EE0780F0CF0300F007000> 32 29 0 5 30.399] 110 D [ 32 28 -2 4 30.399] 111 D [<801C00C0C00601E0600303E030078060380EC0601C0EE0600F1C60600738606004606060FFFFF0600C1BB0600C1930600C18 3FE00C1830600FF830600C1830600C1830600C1830600FF83FE00C1830600C1830600C183060FFFFF060FFFFF0600C1B3FF0 0E1830600E1C000000100000> 32 28 -1 4 30.399] 112 D [<30000000306007E03060FFF83FE0FFFC3060C0383060C0183060C0183060C0183060C0083070C0003FF0C0002060C0000000 C0007FF8C0007FF8C0600070C0600000FFE07FF8806000F800600060006000000060FFFE0060003C0060001800600001FFF0 3FF800700078000000200000> 32 28 0 4 30.399] 113 D [<03C000780FC001F000C007F000DF0F3038C3FC107FC078087FF03E0000FF7F8000C1E78000C0E100FFFFFFF800C0C6787CE0 C7300FFCCE0000FCFC00000080007FFFFFF8000300780003003007FFFFC007FFFFC0000303803FFFFFF83FFFF0F000186070 003870000030380000E03800> 32 28 0 4 30.399] 114 D [<01C001C003C003C007C00F801E003800E000> 16 9 -1 3 30.399] 115 D [<1C007F00C380C180808080808180C18077003C00> 16 10 -2 3 30.399] 116 D [<3800007FFFFFFFFFFEC00000> 24 4 -3 -8 30.399] 117 D [<0600030007C00300076003000730030007180300070C0300070E0300C70603006707030067070300370303003F3303001F73 03001FF303000FE303000F0383000F03FFFC0703FFF80703807807038020670380007FFB800007338000072380000703E000 0703FFF0070007F0070000E0> 32 28 0 4 30.399] 118 D [<1FF000C03E3E01C07E0787C00601EF8006087E000638F800061FFC00060E1C00060E0E004607070076C30780FEFFFFF83F01 807807C1C02006E0C0000610E00006FFFFF8060198F806038C607FE38C007FE38E0006C3070006060700063FFFF8060030F0 060030600700700004007800> 32 28 0 4 30.399] 119 D [<0C0070000CC1F0788C6030F08C3031E0CC1C31C0CCCE3380CCC633006CC736006DC3BE006DBDFF807D3FF9F07F00B8F00C06 3000CC67FFE0FE67FFE0BFE600E030C600E0198600E00D07FFE01E0600E03F0600E03B8600E071E600E0D1E7FFE018C030C0 1C0038000E003C000C003C00> 32 28 -1 4 30.399] 120 D [<30070080380780C0380660C0380660C0300630C0700638C0700618C037FFF8C03806F8C018C60CC018C66CC00CFFECC00CC6 6CC00CC66CC01CC66CC03EFFECC03AC66FF8F2C66C7803C66C3001FFFC0001C6CC0000060C0000060C0007FFEC000706EFF8 0F06C1F83E06003000060000> 32 28 0 4 30.399] 121 D [<3000000078307030383870701C3870700C1870E0EC1860E03810C3801C80822006700078031C01F8038E01E001C7038080C3 870041E1C60063F0CE0033B0EC001F306800187878000C7FFFFC0EFC307807CC3030070C31C0030F31C003FF33C0038E3F00 0380380001C03C0001C03C00> 32 28 0 4 30.399] 122 D [<00030000C0030000780300601C0300FC0F0301F0078307C003C30F0000E31E0000733800003B7000061F6000060FC18007FF FF80060301800603018006030180060301800603018006F301C0071FFF80040301000003000000030000FFFFFFF8000300F8 00030070000380000003800000020000> 32 29 0 4 30.399] 123 D [<0000070000001F8040003F8060000180380C01801C1C01800E1C0180073C018003B8018001F0318000E0718001E0718003E0 E1800770C1800E318180183B018030180180201C0180001E0180FFFFFFFCE1FFC3F8018601B0018001800180018001800180 01C0018001C001C001800100> 32 28 0 4 30.399] 124 D [<0000038000000380FFFFFF800000038000000380000003800000038000000380000003807FFFFF8000000380000003800000 03800000038000000380FFFFFFC0000E8380018EC000038E6000038E7000070E3800070E1C000E0E1F001C0E0F00000F0C00 000F0000> 32 26 -2 3 30.399] 125 D [<00000C0000001F00000E3F00000E0300001C030000380300FFFFFFFC00000378200003B8700FFFE0787FFFF81DE007F80718 0000061800C0061FFFC0061800C0061800C0061FFFC0071800C0FF1FFFC0061800C0001800C0001FFFE00018E0C00700E000 0F7FFFF81E039C7818038E3000070F0000040400> 32 30 0 5 30.399] 126 D [<0E1800C00E1800C00E1FFFC00E1800C00E1800C00E1800C00E1800C00E1800C00E1800C00E1800C00E1FFFE08E1000C0CE00 00006E0000002FFFFFF83E0210F01E0718601E071C001E070C000C070E000C060F000E0C07000E000400067FFFF0070060E0 070060000780700003807000> 32 28 0 4 30.399] 127 D [<03B00000039801C0038C07E003870460038380700381C0300380E030038E6030039E7030039C3030C3B8303063F038303BE0 38301FB018300F98183007CF183003C7183001C6183001E0183000F018300070183000381830FFFFFFF8039DFFF803800030 0380000003C0000003C00000> 32 28 0 4 30.399] 128 D [<060000000603004006030060860300608603FFE0C6030060C663006066730060667300607663006036C300603E8300700603 FFF0FE7A0040FFEC07008CE61F800FC321C0070180C01B01C0E01B80C0E039C0E06071E0E060D8C060600C0060600E0FF070 0F0FFFF006000060> 32 27 -1 4 30.399] 129 D [<3000000030000000303000003FFFFFF83035C7F83031C6303031C6003031C6003031C6003031C6003FF9C6003031C6000001 C6000001C6003FF9C7FC0071C6780021C6380001E6003FF9E600007806000020060000000600FFFE0600003C0600001FFFFC 000000F87FF8007800F0002000600000> 32 29 0 5 30.399] 130 D [ 32 25 0 2 30.399] 131 D [ 32 26 -1 3 30.399] 132 D [ 32 27 -2 4 30.399] 133 D [ 32 28 0 4 30.399] 134 D [<180000001C0000001FFFFFF01C0060F01C0060601C0060001C0060001C0060001C0060001C0060001E0060001D7FFFF01D80 60E01DC060C0DCC06000FCE06000FC606000FDE060007FB060005F3FFFF05E3860F01C3860601C3860001C1C60001C1E6000 1C1C60001C0060001E00700000007000> 32 29 -1 5 30.399] 135 D [<0180007080E001F0803803E0C1CC07E043E70E2067E39C306061F8002060F000306070003070F0003070F8003060D8003061 DC0030618C003FF18E0030738F0030438700300307003003000030030000300300003FFFFFF0300305E000030EC000031E00 00033C000003E00000038000> 32 28 -1 4 30.399] 136 D [ 32 27 0 3 30.399] 137 D [<060603C0060707E0060700E0060700E0060700E0060700E04607FFE0660700E0360700E0367700E01E77FFE01EE700E00FC7 00E00E07FFF00E0700E0060000C0060000007FFFFFFC067018383780181036C7FFF036C41DF036601840667018006677FFF8 8760187807001C2006001C00> 32 28 0 4 30.399] 138 D [<001E0000007E000000FF00000007000000070000000700000007000000070000000700000007000000070000000700000007 000000070000000700000007000000070000000780000006E0000000780000003C0000000F00000007C0FFFFFFF0000001E0 000000C0> 32 26 -1 3 30.399] 139 D [<06018040038FC0E0C1C1C1E0E0F0C1C0E738C380E71CC600FF18D800E730C600E73FFE00E7380600E7380600E7380600FF38 0600E73FFE00E7F80600E77806F0E73807F0E73FFFC0FF1C0F00E73E1C00E73E1F00E77733C0E783E1C0E703C000E7FFFFF0 FF01C0E0C600E0400000E000> 32 28 -1 4 30.399] 140 D [<000001C0700001E01C0007F006000070030000700180187000C01C7000E01C7000701C7040301C7020F81C7030FC1C7019DC 1C701F8C1C700E0E1C700E061C7006061C7007071C7003FF9C7003071C7003821C7003801C7001801C7001C01E7001C01870 FFFFE0700003C07800010000> 32 28 0 4 30.399] 141 D [<20060070300661F030667730306677303FE6773030667730306677303067FFF03067FFF0306677303FF6773030E677300006 77380007FFF8000000207FF8000000CFFF80000E03FC7FF603F000F301E0006383C000018380FFFEC7000018E60000007C00 3FF87C0000F07C0000603800> 32 28 0 4 30.399] 142 D [<03FC003807CF007C0CE380E0C061C1C0E070E380F83073007B3036005FF3340076F33C3001FBFFF0219B1830301B18303FFF 1830339B1C303383FFF833831C303FF81C003FF81C0033BFFFC0338203B8338101FC3FF181E033B0C1C03380E30033806600 33803C003FF83C0020303800> 32 28 0 4 30.399] 143 D [ 32 28 -1 4 30.399] 144 D [<0C0000000C1C01C00C1C07C00C1C00C00C1C00C00C1C00C00C1C00C00DFFFFFCCC1C70F8CC1C70C06C1C70C06C1FFFC02CDC 70C03DDC70C03FDFFFE01F1C70E01C0070001DFFFFFC1D83FEF81C038C380C038C00FFFFFFF00DC38EF00CC38C600C7B8C00 0C7FFFF80C038C700E03CE200E03CE00> 32 29 0 5 30.399] 145 D [<0001C0000003F000000FF80000001C0000000E0001000E000180070001C0030001C003C0E1FFFFC079C001801EC0000007FE 000001EFF80000F0FE0000F80C00000E000000070000FFFFFFF0000DE0E0000CF000000C3800000C1C003FFFEE00000CC700 000C0780000E0300000E0000> 32 28 -1 4 30.399] 146 D [<06000E0006007F00060007000600030006000300060003000600030006000300060003000600030046000300660003003600 03003E0003001F0003000F000300077FFFF80780007803C0003001E0000001E00000E0C00000380000001E0000000F1FFFF8 03C000F801E0007000E00000> 32 28 0 4 30.399] 147 D [<8000000080000000FFFFFFF0C00301E06003004060030000600300007003000037FFFFE0300303C03C0301C0341F0180361F C1C0331B638031BB338031E33E0030C3180030C31C0030E30E0030730F003043840030038000300000003FFFFFF0200300E0 0003004000038000> 32 27 -1 4 30.399] 148 D [<0000600000006000000060003C006000070060F8038061F000C061C0C0706380C0386700C19C6E00C18E6C00C1877C00FF83 F800C181F000C181F000C1FFFFF0C18061F0C18060E0C1806000C1806000C1806000C183E000C1FEFFE0FFC061E0E3806000 000060000000700000006000> 32 28 -1 4 30.399] 149 D [<0000060003800F8000C03F80006001800030018000180180C0180180C00C0180C0CC0180C0CE0180FFCE0180C0C7FF80C0C6 0180C0C60180C0C60180C0C60180C0C60180FFC60180C0C7FF80C0C60180C0C60180C0C60180C0C60180C0E60180FFE601C0 E0C7FFC000060180> 32 27 -2 4 30.399] 150 D [ 24 27 -6 4 30.399] 151 D [<0003E0000007F000001FF00000003800000038000000180000001C0000001C0000001C0000001C00FFFFFFFC00000C780000 0C0003000C0003800C0003800E0001FFFF0001C00E0001C0000000C0000000C0000000E0000000FFFFF0006001F0007000C0 007000000038000000300000> 32 28 0 4 30.399] 152 D [<0C00E0000C03F0000C6070780CF030FC0CFC31E00C1E33808C07B700CC00FE006C033C006C073E003CC733803DCE31F03DD8 30F01F8030401C7FFFFC1C00307C1C0030300C0030000C1FFFF0FFE030F00CE030600C0030000C3FFFF80C0118F00C038C20 0E038E000E0707800C0C0700> 32 28 0 4 30.399] 153 D [<000000107FF800F8003E01F0000787E00001FF800383FC0003FFF00001C0380000E0380000E01C0000701E00FFFFFFFC0038 0078001E0030180F0000180E00601FFFFFE018186060181860601818606018186060181860701FFFFFF01018606000186000 001860007FFFFFFC000000F800000070> 32 29 0 5 30.399] 154 D [<7FC01E000E000E000E000E000E000E000E000E000E000E000E000E000E000E001E00FE003E000E000600> 16 21 -10 -2 30.399] 155 D [<001C0000003E0000007E0000E00601F0F00603F0F80607C03C060F001F061E0007863C0001C6780000F67000003EE000030E E0000707B80007071C000F070F001C0607C0380603800006000000060000FFFFFFF0000601F000061CE000063C4000067800 0006E0000007000000060000> 32 28 -1 4 30.399] 156 D [<80000060F00000E03C0003E00F0007C007C00F0001E038000080E000FFFFFFF830C061F030C061A030D9E18030DFE1C030D9 E1C03FD9FFC037D9E1C030D9E1C030DFE1C030C061C030C07FC03FFFFFC036FFE0C030C060C030C060C070C060C078FFFFE0 6FC060E007000080> 32 27 -1 4 30.399] 157 D [<6000180060601800606018007FE0180060601800606018006060180060601800607018007FF0180060601800000018000000 18007FF8180000F0180000601800000018007FFFFFF0006018F000001860FFFC1800003C1800001818000000180000001800 7FF8180000701C0000201C00> 32 28 -1 4 30.399] 158 D [<000300006187807061BFC0F06187C0E0618361C0618361C061837380618333807FFF330061FF3300619B360061833E006183 1E007FFF1C0063DB1C0067631C0066731C006C73FFF0606398E07FFF1840418218C0018019C001801980FFFF9B8001879A00 0182180001C01C0001C01C00> 32 28 -1 4 30.399] 159 D [ 32 28 -1 4 30.399] 160 D [<00080000001E0000C07E000060CE0000380600001C0600000F0600000386000001C6000000E6000000E6000000760000003E 0000003E0000783E0000FFFE0F00DFFFFF80000EFF00000E0000000E0000000E0000004E0000003E0000> 32 23 -3 2 30.399] 161 D [ 24 24 -4 1 30.399] 162 D [ 24 17 -4 -2 30.399] 163 D [<800000E000001800000E000007000003800001C00000E000007000003800003800001C00000C001C0E001C07001C07003803 003003806003C0000380000700> 24 21 -6 1 30.399] 164 D [ 32 24 -4 1 30.399] 165 D [<7800001C00000E000003800001C00000E000007000003800001C00001C00000E00000E000007000003000003807F01C07FFF E0C00FC080018800003E00003300003300003E00001C> 24 24 -5 0 30.399] 166 D [<00001870001CFFE03CFFFFFCCC0FF80600780600700700E00301C003838001800001C00000E00000E000007000007000007C 0000380000F000> 24 19 -4 -1 30.399] 167 D [<6000003800000E000007000003C00001E000007000007800003C00001C00000E00000F000007000003800003C07801E0FFFF E0E3FFC08000000000000FC0001FFF80383F80> 24 23 -6 2 30.399] 168 D [<1800001800003FFF803FFF803806003807003807003803003003803003803003803003E03FFFE0F07FC0000100> 24 15 -6 -2 30.399] 169 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f7 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f6 SF 0 116 p (Newton-Raphson)s f9 SF 13 r (-)s 0 198 p (,4=)s f2 SF 17 r (f)s f0 SF 3 r (\()s f2 SF (x)s f0 SF (\))s 9 r (=)s 10 r (0)s f9 SF 16 r (ikJP`XZsy$=)s f2 SF 66 291 p (x)s f1 SF 85 296 p (0)s f0 SF 110 291 p (=)s f2 SF 9 r (a;)s 38 r (x)s f3 SF 229 296 p (n)s f1 SF (+1)s f0 SF 290 291 p (=)s f2 SF 9 r (x)s f3 SF 344 296 p (n)s f4 SF 369 291 p (\000)s f2 SF 411 269 p (f)s f0 SF 4 r (\()s f2 SF (x)s f3 SF 463 274 p (n)s f0 SF 481 269 p (\))s 407 284 p 92 1 ru f2 SF 407 314 p (f)s f5 SF 427 304 p (0)s f0 SF 436 314 p (\()s f2 SF (x)s f3 SF 468 319 p (n)s f0 SF 486 314 p (\))s f4 SF 575 291 p (\001)s 5 r (\001)s 6 r (\001)s 5 r (\001)s 6 r (\001)s 5 r (\001)s f0 SF 17 r (\()s f2 SF (?)s f0 SF (\))s f9 SF 0 374 p (is5}W\200p/)s f2 SF 17 r (a)s f9 SF 16 r (X|MSkESs\206\215)s f4 SF 17 r (f)s f2 SF (x)s f3 SF 650 379 p (n)s f4 SF 668 374 p (g)s f9 SF 17 r (i\221\210Net)s 0 415 p (\200p/)s f2 SF 17 r (a)s f9 SF 16 r (IF^J\230Gdff[sKY\206\215Z\203CY,4=Y)s 0 456 p (\233RYk)s f2 SF 17 r (\013)s f9 SF 16 r (XsA{NeKUI0dfSEe)s f0 SF (,)s f8 SF 17 r (i.e.)s f0 SF 15 r (,)s f4 SF 66 538 p (9)s f2 SF 11 r (\013)s f0 SF 10 r (=)s 21 r (lim)s f3 SF 162 558 p (n)s f5 SF (!1)s f2 SF 236 538 p (x)s f3 SF 255 543 p (n)s f2 SF 307 538 p (such)s 11 r (that)s 33 r (f)s f0 SF 4 r (\()s f2 SF (\013)s f0 SF (\))s 9 r (=)s 9 r (0)s f2 SF 11 r (:)s f9 SF 0 621 p (y$=)s f0 SF 17 r (\()s f2 SF (?)s f0 SF (\))s f9 SF 16 r (Y!\225UOYA{Y\231:Zs;Y\205U=i\240f[)s 0 662 p ("\227\214zTDet)s 0 744 p 1.000 @beginspecial @epsf 0.700000 @hscale 0.700000 @vscale 25.000000 @hoffset 0.000000 0.000000 489.000000 459.000000 @bbox @setspecial %%BeginDocument: newton.eps %! %%Title: /tmp/xfig-export000644 %%Creator: fig2dev %%CreationDate: Sat Jan 8 15:08:28 1994 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 489 459 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def /DrawSplineSection { /y3 exch def /x3 exch def /y2 exch def /x2 exch def /y1 exch def /x1 exch def /xa x1 x2 x1 sub 0.666667 mul add def /ya y1 y2 y1 sub 0.666667 mul add def /xb x3 x2 x3 sub 0.666667 mul add def /yb y3 y2 y3 sub 0.666667 mul add def x1 y1 lineto xa ya xb yb x3 y3 curveto } def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -24 35 translate 0.0 459.0 translate 0.900 -0.900 scale 2.000 setlinewidth % Polyline n 29 500 m 566 500 l gs col-1 s gr n 550.000 496.000 m 566.000 500.000 l 550.000 504.000 l gs 2 setlinejoin col-1 s gr 0.500 setlinewidth % Polyline n 497 501 m 497 159 l 371 499 l 371 344 l 257 499 l 257 448 l 200 500 l gs col-1 s gr 2.000 setlinewidth % Open spline n 530.000 86.000 m 501.500 152.000 l 501.500 152.000 473.000 218.000 422.000 284.000 DrawSplineSection 422.000 284.000 371.000 350.000 309.500 405.500 DrawSplineSection 309.500 405.500 248.000 461.000 179.000 497.000 DrawSplineSection 179.000 497.000 110.000 533.000 68.000 540.500 DrawSplineSection 26.000 548.000 l gs col-1 s gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 512 56 m gs 1 -1 scale (y=f\(x\) ) col-1 show gr /Symbol findfont 20.00 scalefont setfont 170 476 m gs 1 -1 scale (a) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 251 527 m gs 1 -1 scale (x) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 365 527 m gs 1 -1 scale (x) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 488 527 m gs 1 -1 scale (x) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 12.00 scalefont setfont 500 530 m gs 1 -1 scale (0) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 12.00 scalefont setfont 263 530 m gs 1 -1 scale (2) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 12.00 scalefont setfont 377 529 m gs 1 -1 scale (1) col-1 show gr $F2psEnd %%EndDocument @endspecial f2 SF 66 1960 p (y)s f4 SF 9 r (\000)s f2 SF 7 r (f)s f0 SF 4 r (\()s f2 SF (x)s f3 SF 176 1965 p (n)s f0 SF 194 1960 p (\))s 10 r (=)s f2 SF 9 r (f)s f5 SF 271 1947 p (0)s f0 SF 281 1960 p (\()s f2 SF (x)s f3 SF 313 1965 p (n)s f0 SF 331 1960 p (\)\()s f2 SF (x)s f4 SF 7 r (\000)s f2 SF 7 r (x)s f3 SF 435 1965 p (n)s f0 SF 453 1960 p (\))s f4 SF 72 r (\001)s 6 r (\001)s 5 r (\001)s 6 r (\001)s 5 r (\001)s 6 r (\001)s f9 SF 16 r (6)s f0 SF 11 r (\()s f2 SF (x)s f3 SF 711 1965 p (n)s f2 SF 729 1960 p (;)s 6 r (f)s f0 SF 3 r (\()s f2 SF (x)s f3 SF 795 1965 p (n)s f0 SF 814 1960 p (\)\))s f9 SF 11 r (i2ewxY,4=)s f2 SF 66 2054 p (x)s f3 SF 85 2059 p (n)s f4 SF 111 2054 p (\000)s f2 SF 153 2031 p (f)s f0 SF 3 r (\()s f2 SF (x)s f3 SF 204 2036 p (n)s f0 SF 223 2031 p (\))s 148 2046 p 92 1 ru f2 SF 148 2076 p (f)s f5 SF 168 2067 p (0)s f0 SF 177 2076 p (\()s f2 SF (x)s f3 SF 209 2081 p (n)s f0 SF 227 2076 p (\))s f4 SF 316 2054 p (\001)s 6 r (\001)s 5 r (\001)s 6 r (\001)s 5 r (\001)s 6 r (\001)s f9 SF 16 r (\203qYwxU)s f2 SF 11 r (x)s f9 SF 11 r (?UY\2206Y)s f2 SF 11 r (x)s f9 SF 12 r (\224')s 0 2136 p (\206\215)s f4 SF 17 r (f)s f2 SF (x)s f3 SF 113 2141 p (n)s f4 SF 131 2136 p (g)s f9 SF 17 r (YA{\207Y\202\226Hc\\A{Y\241u\245uY\)%Zs)s f0 SF 1270 2216 p (newton.c)s 67 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f9 SF 0 33 p (Of]Vn.WKUTZWEt)s f2 SF 8 r (\017)s f7 SF (-)s f2 SF (\016)s f9 SF 17 r (\216-UkvmXoNe)s 0 73 p (0>I&\232ULfet\235\225YDem\211XZs8\222*\237i\201jNet)s 0 153 p ( #Y)s f0 SF 8 r (C)s f9 SF 7 r (\244u\243)s f0 SF 17 r (newton.c)s f9 SF 16 r (Zs,4=)s f2 SF 66 232 p (x)s f1 SF 85 219 p (2)s f4 SF 108 232 p (\000)s f0 SF 7 r (5)s 9 r (=)s 10 r (0)s f9 SF 0 312 p (YkY\233RI)s f4 SF 199 285 p (p)s 17 1 ru f0 SF 227 312 p (5)s f9 SF 16 r (TDeKUX1\227MSs)s f0 SF 8 r (Newton)s f7 SF (-)s f0 SF (Raphson)s f9 SF 16 r (-T)s f4 SF 951 285 p (p)s 17 1 ru f0 SF 979 312 p (5)s f9 SF 0 352 p (i\234`e\246\251\242\250\247TDet)s f7 SF 11 r (A,)s 18 r (F\(X\),)s 17 r (DF\(X\))s f9 SF 34 r (Y3riEgEg)s 0 392 p (U+GSsl\204T\206/@\217i\223QS_cFt)s f7 SF 0 472 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 591 p (/*)s 17 r 653 1 ru f0 SF 664 r (newton.c)s 11 r 653 1 ru f7 SF 669 r (*/)s 0 711 p (#include)s 17 r ()s 0 751 p (#define)s 17 r (A)s 18 r (4.)s 488 r (/*)s f9 SF 17 r (\200p/)s f7 SF 685 r (*/)s 0 790 p (#define)s 17 r (F\(X\))s 18 r (\(\(X\)*\(X\)-5.\))s 261 r (/*)s f9 SF 17 r (\230GdfPo\206)s f7 SF 563 r (*/)s 0 830 p (#define)s 17 r (DF\(X\))s 18 r (\(2.*\(X\)\))s 314 r (/*)s f9 SF 16 r (OY~o\206)s f7 SF 625 r (*/)s 0 910 p (main\(\))s 0 950 p ({)s 70 990 p (double)s 17 r (x,)s 18 r (y;)s 418 r (/*)s f9 SF 17 r (\177\2127T\2369Ne)s f7 SF 533 r (*/)s 70 1069 p (x)s 17 r (=)s 18 r (A;)s 523 r (/*)s f2 SF 16 r (x)s f1 SF 768 1074 p (0)s f0 SF 792 1069 p (=)s f2 SF 9 r (a)s f7 SF 681 r (*/)s 70 1109 p (printf\("%.16f\\n",)s 17 r (x\);)s 262 r (/*)s f2 SF 16 r (x)s f1 SF 768 1114 p (0)s f9 SF 799 1109 p (Y\(<)s f7 SF 635 r (*/)s 70 1167 p (y)s 17 r (=)s 18 r (x)s 17 r (-)s 17 r (F\(x\))s 18 r (/)s 17 r (DF\(x\);)s 262 r (/*)s f2 SF 16 r (x)s f1 SF 768 1172 p (1)s f0 SF 792 1167 p (=)s f2 SF 9 r (x)s f1 SF 846 1172 p (0)s f4 SF 868 1167 p (\000)s f2 SF 910 1145 p (f)s f0 SF 4 r (\()s f2 SF (x)s f1 SF 962 1150 p (0)s f0 SF 977 1145 p (\))s 905 1160 p 89 1 ru f2 SF 905 1190 p (f)s f5 SF 925 1180 p (0)s f0 SF 935 1190 p (\()s f2 SF (x)s f1 SF 966 1195 p (0)s f0 SF 981 1190 p (\))s f7 SF 1525 1225 p (*/)s 70 1265 p (printf\("%.16f\\n",)s 17 r (y\);)s 262 r (/*)s f2 SF 16 r (x)s f1 SF 768 1270 p (1)s f9 SF 799 1265 p (Y\(<)s f7 SF 635 r (*/)s 70 1304 p (while)s 17 r (\(x)s 18 r (!=)s 17 r (y\))s 384 r (/*)s f0 SF 16 r (iteration)s f9 SF 11 r (ibQSa/I+hdWJWQPdB\213)s f7 SF 95 r (*/)s 70 1344 p ({)s 139 1384 p (x)s 18 r (=)s 17 r (y;)s 139 1442 p (y)s 18 r (=)s 17 r (x)s 18 r (-)s 17 r (F\(x\))s 18 r (/)s 17 r (DF\(x\);)s 192 r (/*)s f2 SF 16 r (x)s f3 SF 768 1447 p (n)s f1 SF (+1)s f0 SF 829 1442 p (=)s f2 SF 9 r (x)s f3 SF 883 1447 p (n)s f4 SF 908 1442 p (\000)s f2 SF 950 1420 p (f)s f0 SF 4 r (\()s f2 SF (x)s f3 SF 1002 1425 p (n)s f0 SF 1020 1420 p (\))s 945 1435 p 92 1 ru f2 SF 945 1465 p (f)s f5 SF 965 1455 p (0)s f0 SF 975 1465 p (\()s f2 SF (x)s f3 SF 1006 1470 p (n)s f0 SF 1025 1465 p (\))s f7 SF 1525 1442 p (*/)s 139 1502 p (printf\("%.16f\\n",)s 18 r (y\);)s 192 r (/*)s f2 SF 16 r (x)s f3 SF 768 1507 p (n)s f1 SF (+1)s f9 SF 836 1502 p (Y\(<)s f7 SF 598 r (*/)s 70 1542 p (})s 0 1582 p (})s f0 SF 1270 2216 p (newton.c)s 67 r (page)s 11 r (2)s EP pstopssaved restore %%Trailer %%Pages: 2 END %%EOF src2tex-2.12h.orig/newton.eps100644 1750 1750 5372 5553626721 16127 0ustar kawamurakawamura%! %%Title: /tmp/xfig-export000644 %%Creator: fig2dev %%CreationDate: Sat Jan 8 15:08:28 1994 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 489 459 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def /DrawSplineSection { /y3 exch def /x3 exch def /y2 exch def /x2 exch def /y1 exch def /x1 exch def /xa x1 x2 x1 sub 0.666667 mul add def /ya y1 y2 y1 sub 0.666667 mul add def /xb x3 x2 x3 sub 0.666667 mul add def /yb y3 y2 y3 sub 0.666667 mul add def x1 y1 lineto xa ya xb yb x3 y3 curveto } def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -24 35 translate 0.0 459.0 translate 0.900 -0.900 scale 2.000 setlinewidth % Polyline n 29 500 m 566 500 l gs col-1 s gr n 550.000 496.000 m 566.000 500.000 l 550.000 504.000 l gs 2 setlinejoin col-1 s gr 0.500 setlinewidth % Polyline n 497 501 m 497 159 l 371 499 l 371 344 l 257 499 l 257 448 l 200 500 l gs col-1 s gr 2.000 setlinewidth % Open spline n 530.000 86.000 m 501.500 152.000 l 501.500 152.000 473.000 218.000 422.000 284.000 DrawSplineSection 422.000 284.000 371.000 350.000 309.500 405.500 DrawSplineSection 309.500 405.500 248.000 461.000 179.000 497.000 DrawSplineSection 179.000 497.000 110.000 533.000 68.000 540.500 DrawSplineSection 26.000 548.000 l gs col-1 s gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 512 56 m gs 1 -1 scale (y=f\(x\) ) col-1 show gr /Symbol findfont 20.00 scalefont setfont 170 476 m gs 1 -1 scale (a) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 251 527 m gs 1 -1 scale (x) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 365 527 m gs 1 -1 scale (x) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 488 527 m gs 1 -1 scale (x) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 12.00 scalefont setfont 500 530 m gs 1 -1 scale (0) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 12.00 scalefont setfont 263 530 m gs 1 -1 scale (2) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 12.00 scalefont setfont 377 529 m gs 1 -1 scale (1) col-1 show gr $F2psEnd src2tex-2.12h.orig/options.c100644 1750 1750 17377 5736523131 15765 0ustar kawamurakawamura/* {\hrulefill} * {\ % beginning of TeX mode \input fonts.tex % define fonts \input title.tex % title and authors % end of TeX mode} * {\hrulefill} */ /* {\hrulefill\ options.c\ \hrulefill} */ #include #include "src2tex.h" extern int *inc_buf_ptr(); extern int *dec_buf_ptr(); int Htab_Size = HTAB_SKIP; /*{\ horizontal tabulation skip amount \hfill} */ int Vtab_Size = VTAB_SKIP; /*{\ vertical tabulation skip amount \hfill} */ #ifdef ASCII /* {\ ASCII J\TeX \hfill} */ char Bold[] = "\\bf\\gt "; /* bold type {\hfill} */ char Italic[] = "\\it\\mc "; /* italic type {\hfill} */ char Roman[] = "\\rm\\mc "; /* roman type {\hfill} */ char SmallCaps[] = "\\sc\\gt "; /* small caps type {\hfill} */ char Slant[] = "\\sl\\mc "; /* slanted type {\hfill} */ char Typewriter[] = "\\tt\\mc "; /* typewriter type {\hfill} */ #else #ifdef NTT /* {\ NTT J\TeX \hfill} */ char Bold[] = "\\bf\\dg "; /* bold type {\hfill} */ char Italic[] = "\\it\\dm "; /* italic type {\hfill} */ char Roman[] = "\\rm\\dm "; /* roman type {\hfill} */ char SmallCaps[] = "\\sc\\dg "; /* small caps type {\hfill} */ char Slant[] = "\\sl\\dm "; /* slanted type {\hfill} */ char Typewriter[] = "\\tt\\dm "; /* typewriter type {\hfill} */ #else /* {\ \TeX \hfill} */ char Bold[] = "\\bf "; /* bold type {\hfill} */ char Italic[] = "\\it "; /* italic type {\hfill} */ char Roman[] = "\\rm "; /* roman type {\hfill} */ char SmallCaps[] = "\\sc "; /* small caps type {\hfill} */ char Slant[] = "\\sl "; /* slanted type {\hfill} */ char Typewriter[] = "\\tt "; /* typewriter type {\hfill} */ #endif #endif char *TextModeFont = Typewriter; /* text mode font {\hfill} */ char *TeXModeFont = Roman; /*{\ quasi-\TeX\ and \TeX\ mode font \hfill} */ /* {\hrulefill\ string comparison\ \hrulefill} */ /* {\ Like {\tt strcmp()}, this function {\tt str\_cmp()} compares two strings stored at integer pointer {\tt iptr} and character pointer {\tt cptr}. {\tt Str\_cmp()} returns 0 if and only if given two strings are identical. \hfill} */ int str_cmp(iptr, cptr) int *iptr; char *cptr; { while ((char)*iptr == *cptr) { if (*(cptr + 1) == '\0') break; iptr = inc_buf_ptr(iptr); ++cptr; } return (char)*iptr - *cptr; } /* {\hrulefill\ ascii to integer\ \hrulefill} */ /* {\null{\tt Asc2int()} is a substitute of {\tt atoi()}. We just want to keep our source code closed under {\sl stdio.h} in order to remain it highly portable.\hfill} */ int asc2int(iptr) int *iptr; { int value = 0; while (((char)*iptr >= '0') && ((char)*iptr <= '9')) { value = 10 * value + (int)((char)*iptr - '0'); iptr = inc_buf_ptr(iptr); } return value; } /* {\hrulefill\ search next word\ \hrulefill} */ /* {\ This function {\tt next\_word(iptr1,iptr2)} simply increases buffer pointer {\tt iptr1} until either it comes to the first character of the next word or it coincides with iptr2, and returns {\tt iptr1}.\hfill} */ int *next_word(iptr1, iptr2) int *iptr1, *iptr2; { if (iptr1 == iptr2) return iptr1; while ((iptr1 = inc_buf_ptr(iptr1)) != iptr2) { if (((((char)*(iptr1 - 1) < 'a') || ((char)*(iptr1 - 1) > 'z')) && (((char)*(iptr1 - 1) < '0') || ((char)*(iptr1 - 1) > '9'))) && ((((char)*iptr1 >= 'a') && ((char)*iptr1 <= 'z')) || (((char)*iptr1 >= '0') && ((char)*iptr1 <='9')))) break; } return iptr1; } /* {\hrulefill\ parse options\ \hrulefill} */ /* {\ {\tt\ Parse\_options()\ } changes several environment variables of {\bf src2tex} and {\bf src2latex} dynamically. Since using src2tex escape sequence is pretty tricky, we have decided to make very strict syntax checking before parsing options. Function {\tt\ parse\_options()\ } returns \ 1\ , if src2tex escape sequence is found, and returns \ 0\ otherwise.\hfill}*/ int parse_options(ptr) flag_char *ptr; { int brace_counter = 0; int error_flag = 0; int i, *iptr1, *iptr2, *iptr3; iptr1 = ptr->buffer; while (((char)*iptr1 != '\\') && ((char)*iptr1 != '\n') && (*iptr1 != EOF)) { if ((((char)*iptr1 >= 'A') && ((char)*iptr1 <= 'Z')) || (((char)*iptr1 >= 'a') && ((char)*iptr1 <= 'z'))) ++error_flag; iptr1 = inc_buf_ptr(iptr1); } /* checking syntax {\hfill} */ if (str_cmp(iptr1, "\\src2tex{") != 0) return 0; if (error_flag != 0) { fprintf(stderr, "\nError: syntax error of src2tex escape sequence\n"); fprintf(stderr, " \\src2tex{...} is not written properly\n"); fprintf(stderr, " junks are found before \\src2tex sequence\n"); exit(EXIT_FAILURE); } if (ptr->flag == 1) { iptr2 = dec_buf_ptr(iptr1); if (*iptr2 != '{') { fprintf(stderr, "\nError: syntax error of src2tex escape sequence\n"); fprintf(stderr, " \\src2tex{...} is not written properly\n"); fprintf(stderr, " missing a left brace { \n"); exit(EXIT_FAILURE); } } for (i = 0, iptr2 = iptr1; i < 256; ++i, iptr2 = inc_buf_ptr(iptr2)) { if ((char)*iptr2 == '{') ++brace_counter; if ((char)*iptr2 == '}') --brace_counter; if (((char)*iptr2 == '}') && (brace_counter == 0)) break; if (((char)*iptr2 == '\n') || (*iptr2 == EOF)) break; } if (((char)*iptr2 != '}') || (brace_counter != 0)) { fprintf(stderr, "\nError: syntax error of src2tex escape sequence\n"); fprintf(stderr, " \\src2tex{...} is not written properly\n"); fprintf(stderr, " missing right brace } \n"); exit(EXIT_FAILURE); } iptr3 = iptr2; while (((char)*iptr3 != '\n') && (*iptr3 != EOF)) { if ((((char)*iptr3 >= 'A') && ((char)*iptr3 <= 'Z')) || (((char)*iptr3 >= 'a') && ((char)*iptr3 <= 'z'))) { fprintf(stderr, "\nError: syntax error of src2tex escape sequence\n"); fprintf(stderr, " \\src2tex{...} is not written properly\n"); fprintf(stderr, " junks are found after \\src2tex sequence\n"); exit(EXIT_FAILURE); } iptr3 = inc_buf_ptr(iptr3); } #ifdef DEBUGGING printf("parse_options():\n"); #endif /* start parsing {\hfill} */ for (i = 1; i == 8; ++i) iptr1 = inc_buf_ptr(iptr1); iptr1 = next_word(iptr1, iptr2); while(iptr1 != iptr2) { /* parsing htab option {\hfill} */ if (str_cmp(iptr1, "htab") == 0) { iptr1 = next_word(iptr1, iptr2); if (((char)*iptr1 >= '0') && ((char)*iptr1 <= '9')) Htab_Size = asc2int(iptr1); } /* parsing vtab option {\hfill} */ if (str_cmp(iptr1, "vtab") == 0) { iptr1 = next_word(iptr1, iptr2); if (((char)*iptr1 >= '0') && ((char)*iptr1 <= '9')) Vtab_Size = asc2int(iptr1); } /* TeXt font {\hfill} */ if (str_cmp(iptr1, "textfont") == 0) { iptr1 = next_word(iptr1, iptr2); if (str_cmp(iptr1, "bf") == 0) TextModeFont = Bold; if (str_cmp(iptr1, "it") == 0) TextModeFont = Italic; if (str_cmp(iptr1, "rm") == 0) TextModeFont = Roman; if (str_cmp(iptr1, "sc") == 0) TextModeFont = SmallCaps; if (str_cmp(iptr1, "sl") == 0) TextModeFont = Slant; if (str_cmp(iptr1, "tt") == 0) TextModeFont = Typewriter; } /* TeX font {\hfill} */ if (str_cmp(iptr1, "texfont") == 0) { iptr1 = next_word(iptr1, iptr2); if (str_cmp(iptr1, "bf") == 0) TeXModeFont = Bold; if (str_cmp(iptr1, "it") == 0) TeXModeFont = Italic; if (str_cmp(iptr1, "rm") == 0) TeXModeFont = Roman; if (str_cmp(iptr1, "sc") == 0) TeXModeFont = SmallCaps; if (str_cmp(iptr1, "sl") == 0) TeXModeFont = Slant; if (str_cmp(iptr1, "tt") == 0) TeXModeFont = Typewriter; } iptr1 = next_word(iptr1, iptr2); } #ifdef DEBUGGING printf("Htab_Size=%d\n",Htab_Size); printf("Vtab_Size=%d\n",Vtab_Size); printf("TextModeFont=%s\n",TextModeFont); printf("TeXModeFont=%s\n",TeXModeFont); #endif return 1; } src2tex-2.12h.orig/options.c.ps100644 1750 1750 144342 6266067332 16424 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: options.c.dvi %%Pages: 6 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 123 /f0 NF f0 SF [ 24 23 -1 0 24.906] 65 D [<00FC000382000E01001C0080380040380040780020700020F00020F00000F00000F00000F00000F00000F000207000207800 203800603800601C00E00E01E003826000FC20> 24 23 -2 0 23.984] 67 D [ 24 23 -1 0 25.367] 68 D [ 24 23 -1 0 22.600] 69 D [ 24 23 -1 0 21.678] 70 D [ 24 23 -1 0 24.906] 72 D [ 16 23 0 0 11.992] 73 D [<3E004300C180E1C0E1C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF8> 16 23 -2 0 17.065] 74 D [ 24 23 -1 0 25.829] 75 D [ 24 23 -1 0 20.755] 76 D [ 32 23 -1 0 30.441] 77 D [ 24 23 -1 0 24.906] 78 D [ 24 23 -1 0 22.600] 80 D [<8F80F060C030C01080188018801800180038007003F01FE03FC07E00F000E000C010C010C0104030603030F01F10> 16 23 -2 0 18.449] 83 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<007C000183000700800E00400C00401C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00 201C00201C00201C00201C00201C0070FF81FC> 24 23 -1 0 24.906] 85 D [<0040040000C0060000E00E0000E00E0001E00F0001D01D0001D01D0001D01D0003901C800388388003883880070838400704 7040070470400E0470200E02E0200E02E0200E02E0201C03E0101C01C0101C01C0103C03C038FF0FF8FE> 32 23 -1 0 34.131] 87 D [ 24 23 -1 0 24.906] 88 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [<78EEE6470707070707070707070707070707073F0000000000060F0F06> 8 29 2 6 10.147] 106 D [ 24 23 0 0 17.527] 107 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [<00FF80001C00001C00001C00001C00001C00079C00185C00303C00701C00601C00E01C00E01C00E01C00E01C00601C00701C 00303C001C6C00078400> 24 20 -1 6 17.526] 113 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [ 16 14 -1 0 14.759] 122 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<07FC00E000E000E000E000E0FFFCC0E040E020E030E010E008E004E004E002E001E001E000E000600060> 16 21 -1 0 16.604] 52 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<1F0020C060607030703000380018001C0F9C185C303C603CE01CE01CE01CE018E0186038303018600F80> 16 21 -1 0 16.604] 57 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<060006000600C630E6703FC00F000F003FC0E670C630060006000600> 16 14 -2 -11 16.604] 42 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [<00FF000701E008003810000020F0E0218D904307884703888603888E03888E03888E03888E03888E03888603884703904304 10218C2020F02010004008008007070000F800> 24 23 -2 0 25.829] 64 D [ 24 23 0 0 19.371] 11 D [ 24 23 0 0 18.449] 12 D [ 8 2 0 -6 11.069] 45 D 1.000 123 /f1 NF f1 SF [<0C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C00FFC0FFC00C000C000C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 121 D [<0C000C000C000C000C000C00FFC0FFC00C000C000C000C000C000C0000000C000C000C000C000C000C00FFC0FFC00C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 122 D 1.000 121 /f2 NF f2 SF [<1F8780786F80F02E00F01E00F01E00781E003C1E001F1E0001FE00001E00301E00781E00783C007038001FE000> 24 15 -1 0 18.564] 97 D [<07E01C38380C780C7000F000F000F000F000F0007018783C383C1C1C07F0> 16 15 -1 0 16.973] 99 D [<07F01C18380C78067000F000F000FFFEF00EF00E700E700C381C1C3807E0> 16 15 -1 0 17.503] 101 D [ 8 23 -1 0 10.608] 108 D [ 16 15 -1 0 15.728] 114 D [ 16 15 -1 0 15.063] 115 D [<0F801C403C603C603C603C603C003C003C003C003C003C003C00FFC03FC01C001C000C000C000C000C00> 16 21 -1 0 14.851] 116 D [ 24 15 -1 0 20.155] 120 D [ 16 21 -2 0 19.095] 50 D 1.000 126 /f3 NF f3 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 66 D [<07C00FE01C303838701C701C601CE000E000E000E000E000E000601C701C701C383C1C7C0FFC07CC> 16 20 -1 0 17.434] 67 D [ 16 20 -1 0 17.434] 68 D [ 16 20 -1 0 17.434] 69 D [ 16 20 -1 0 17.434] 70 D [<07B80FF81878387870387038E038E038E0FCE0FCE000E000E000E03870387038387818780FF80798> 16 20 -1 0 17.434] 71 D [ 16 20 -1 0 17.434] 72 D [ 16 20 -3 0 17.434] 73 D [ 16 20 -1 0 17.434] 75 D [ 16 20 -1 0 17.434] 76 D [ 16 20 -1 0 17.434] 77 D [ 16 20 -1 0 17.434] 78 D [<3FC07FE070E0E070E070E070E070E070E070E070E070E070E070E070E070E070E07070E07FE03FC0> 16 20 -2 0 17.434] 79 D [ 16 20 -1 0 17.434] 80 D [ 16 20 -1 0 17.434] 82 D [ 16 20 -2 0 17.434] 83 D [<1FF01FF00380038003800380038003800380038003800380038003800380E39CE39CE39CFFFC7FFC> 16 20 -1 0 17.434] 84 D [<03C007E00C301C38381C381C381C381C381C381C381C381C381C381C381C381C381C381CFE7FFE7F> 16 20 0 0 17.434] 85 D [<0780078007800CC00CC00CC00CC00CC01CE01CE01CE01CE01CE038703870387038707878FCFCFCFC> 16 20 -1 0 17.434] 86 D [ 16 20 -1 0 17.434] 88 D [ 16 20 -2 0 17.434] 90 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [<7E00FF00E38041C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C03FC03FC00000000000000180 03C003C00180> 16 28 -2 7 17.434] 106 D [ 16 20 -1 0 17.434] 107 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [<00FE00FE003800380038003800380FB81FF8387870786038E038E038E038E0386038707838781FF807B8> 16 21 -1 7 17.434] 113 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<078007800FC00CC00CC00CC01CE01CE01CE01CE038703870FCFCFCFC> 16 14 -1 0 17.434] 118 D [<18E03DF03DF035B035B035B037B037B03030703870387038FFFCFFFC> 16 14 -1 0 17.434] 119 D [ 16 14 -1 0 17.434] 120 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [ 16 14 -1 0 17.434] 122 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0FC03FE07070E038E01C401C001C001C0038007007E007E00070003000382038703870703FE00FC0> 16 20 -1 0 17.434] 51 D [<1F003F8071C0E0E0E070E07040700070006060E07FC07F007000700070007000700070007FE07FE0> 16 20 -2 0 17.434] 53 D [<07C01FE038707038701C601CE01CE01CE01CF038F870EFE0E7C070007000303838381E3807F003E0> 16 20 -1 0 17.434] 54 D [<0FC03FF078787038E01CE01CE01CE01C7038387007800FC03870703870387038703838701FE00FC0> 16 20 -1 0 17.434] 56 D [<1F003FC070E07070703000380018001C0F9C1FFC387C703CE01CE01CE018E038703838701FE00F80> 16 20 -1 0 17.434] 57 D [<3C707FF8679CE39CE788EFC0EFC07DC03CE01CE03CE03E703F7C3B7C3B803B803B801B801F000E00> 16 20 -1 0 17.434] 38 D [<60F0F0600000000070F0F0F0F0F0F0F0F0F0F060> 8 20 -6 0 17.434] 33 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<80C060303018181878F8F060> 8 12 -6 -8 17.434] 39 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<60F0F06000000000000060F0F060> 8 14 -6 0 17.434] 58 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [ 16 26 -6 3 17.434] 91 D [ 16 26 -1 3 17.434] 93 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00300070007000E000E001C001C001C0038003800700070007000E000E000E001C001C0038003800380070007000E000E000 C000> 16 26 -2 3 17.434] 92 D [ 8 26 -7 3 17.434] 124 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 117 /f4 NF f4 SF [<1F7E30F060706038E038E038E038E0386038701C301C181C0C3C03DC001C000E000E000E000E000E000E000F003F> 16 23 -2 0 18.449] 100 D [ 16 23 -1 0 18.449] 104 D [ 8 23 -1 0 9.224] 105 D [<1F8030E06070E038E018E01CE01CE01C601C701C301C18180C3003E0> 16 14 -2 0 16.604] 111 D [<9F00E180C0C0404040E001E00FC03FC03F00380030203020186007A0> 16 14 -1 0 13.099] 115 D [<3C00720072007100710071007000700070003800380038003800FF8038001C000C00040004000400> 16 20 -3 0 12.914] 116 D [<60F07070> 8 4 -2 0 9.224] 46 D 1.000 123 /f5 NF f5 SF [ 24 23 -1 0 27.027] 65 D [ 24 23 -1 0 27.996] 75 D [ 24 23 -1 0 27.027] 78 D [<87C0D830E018C008800C800C800C000C001C003803F81FF03FE07F00F000E000C008C008C0084018603830580F88> 16 23 -2 0 20.294] 83 D [ 24 17 -1 0 20.368] 97 D [<01F8000E0600180100300100700080600080E00000E00000E00000E00000E000006000807000803001801803800E058001F8 80> 24 17 -1 0 19.629] 99 D [ 24 17 -1 0 20.737] 100 D [ 24 17 -1 0 20.368] 104 D [ 16 17 0 0 10.036] 105 D [ 24 17 -1 0 24.795] 109 D [ 24 17 -1 0 20.368] 110 D [<03F0000E1C00180600300300700380600180E001C0E001C0E001C0E001C0E001C06001807003803003001806000E1C0003F0 00> 24 17 -1 0 21.105] 111 D [<0FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00081C08081C08081C08081C080C1C180FFFF 80> 24 17 -1 0 19.629] 116 D [<03E0000E18001C0400180400380200380200380200380200380200380200380200380200380200380200380200380700FE0F 80> 24 17 -1 0 20.368] 117 D [ 16 17 -1 0 16.678] 122 D 1.000 121 /f6 NF f6 SF [<03F00FFC1F063C037C007800F800F800F800F800F800F800781C783E3C3E1E3E0FFC03F8> 16 18 -2 0 20.367] 99 D [<01FC000FFF001F01803E00C07C0000780000F80000F80000F80000FFFFC0FFFFC0F803C07803C07C03803C07801E0F000FFE 0003F800> 24 18 -1 0 21.004] 101 D [ 16 18 -1 0 18.873] 114 D [ 16 18 -2 0 18.076] 115 D [<03E00FF00F101F181F181F181F181F001F001F001F001F001F001F001F001F00FFF8FFF83F000F0007000700030003000300> 16 25 -1 0 17.822] 116 D [ 24 18 -1 0 24.186] 120 D [ 24 26 -2 0 22.913] 50 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f6 SF 479 151 p (src2tex)s f0 SF (*)s 45 r (version)s 10 r (2.12)s 33 r (\(Sep)s 11 r (9,)s 11 r (1996\))s f5 SF 466 230 p (Kazuo)s 13 r (Amano)s f1 SF (y)s f5 SF 12 r (and)s 13 r (Shinichi)s 13 r (Nomoto)s f1 SF (z)s f3 SF 0 349 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 468 p (/*)s 17 r 653 1 ru f0 SF 663 r (options.c)s 12 r 653 1 ru f3 SF 669 r (*/)s 0 588 p (#include)s 17 r ()s 0 628 p (#include)s 17 r ("src2tex.h")s 0 707 p (extern)s 17 r (int)s 18 r (*inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(\);)s 0 747 p (extern)s 17 r (int)s 18 r (*dec)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(\);)s 0 827 p (int)s 17 r (Htab)s 3 r 10 1 ru 15 r (Size)s 17 r (=)s 18 r (HTAB)s 2 r 10 1 ru 15 r (SKIP;)s 244 r (/*)s f0 SF 11 r (horizontal)s 11 r (tabulation)s 11 r (skip)s 11 r (amount)s f3 SF 285 r (*/)s 0 867 p (int)s 17 r (Vtab)s 3 r 10 1 ru 15 r (Size)s 17 r (=)s 18 r (VTAB)s 2 r 10 1 ru 15 r (SKIP;)s 244 r (/*)s f0 SF 11 r (vertical)s 11 r (tabulation)s 11 r (skip)s 11 r (amount)s f3 SF 323 r (*/)s 0 906 p (#ifdef)s 17 r (ASCII)s 0 946 p (/*)s f0 SF 17 r (ASCI)s 1 r (I)s 11 r (JT)s 190 953 p (E)s 209 946 p (X)s f3 SF 1291 r (*/)s 0 986 p (char)s 17 r (Bold[])s 18 r (=)s 17 r ("\\\\bf\\\\gt)s 18 r (";)s 244 r (/*)s f0 SF 16 r (b)s 1 r (old)s 17 r (type)s f3 SF 632 r (*/)s 0 1026 p (char)s 17 r (Italic[])s 18 r (=)s 17 r ("\\\\it\\\\mc)s 18 r (";)s 209 r (/*)s f0 SF 17 r (italic)s 16 r (type)s f3 SF 624 r (*/)s 0 1066 p (char)s 17 r (Roman[])s 18 r (=)s 17 r ("\\\\rm\\\\mc)s 18 r (";)s 226 r (/*)s f0 SF 17 r (roman)s 17 r (type)s f3 SF 603 r (*/)s 0 1106 p (char)s 17 r (SmallCaps[])s 18 r (=)s 17 r ("\\\\sc\\\\gt)s 18 r (";)s 157 r (/*)s f0 SF 16 r (small)s 17 r (caps)s 16 r (type)s f3 SF 541 r (*/)s 0 1146 p (char)s 17 r (Slant[])s 18 r (=)s 17 r ("\\\\sl\\\\mc)s 18 r (";)s 226 r (/*)s f0 SF 17 r (slanted)s 16 r (type)s f3 SF 593 r (*/)s 0 1185 p (char)s 17 r (Typewriter[])s 18 r (=)s 17 r ("\\\\tt\\\\mc)s 18 r (";)s 139 r (/*)s f0 SF 17 r (typewriter)s 16 r (type)s f3 SF 546 r (*/)s 0 1225 p (#else)s 0 1265 p (#ifdef)s 17 r (NTT)s 0 1305 p (/*)s f0 SF 17 r (NTT)s 11 r (JT)s 171 1312 p (E)s 189 1305 p (X)s f3 SF 1311 r (*/)s 0 1345 p (char)s 17 r (Bold[])s 18 r (=)s 17 r ("\\\\bf\\\\dg)s 18 r (";)s 244 r (/*)s f0 SF 16 r (b)s 1 r (old)s 17 r (type)s f3 SF 632 r (*/)s 0 1385 p (char)s 17 r (Italic[])s 18 r (=)s 17 r ("\\\\it\\\\dm)s 18 r (";)s 209 r (/*)s f0 SF 17 r (italic)s 16 r (type)s f3 SF 624 r (*/)s 0 1425 p (char)s 17 r (Roman[])s 18 r (=)s 17 r ("\\\\rm\\\\dm)s 18 r (";)s 226 r (/*)s f0 SF 17 r (roman)s 17 r (type)s f3 SF 603 r (*/)s 0 1464 p (char)s 17 r (SmallCaps[])s 18 r (=)s 17 r ("\\\\sc\\\\dg)s 18 r (";)s 157 r (/*)s f0 SF 16 r (small)s 17 r (caps)s 16 r (type)s f3 SF 541 r (*/)s 0 1504 p (char)s 17 r (Slant[])s 18 r (=)s 17 r ("\\\\sl\\\\dm)s 18 r (";)s 226 r (/*)s f0 SF 17 r (slanted)s 16 r (type)s f3 SF 593 r (*/)s 0 1544 p (char)s 17 r (Typewriter[])s 18 r (=)s 17 r ("\\\\tt\\\\dm)s 18 r (";)s 139 r (/*)s f0 SF 17 r (typewriter)s 16 r (type)s f3 SF 546 r (*/)s 0 1584 p (#else)s 0 1624 p (/*)s f0 SF 17 r (T)s 70 1631 p (E)s 88 1624 p (X)s f3 SF 1412 r (*/)s 0 1664 p (char)s 17 r (Bold[])s 18 r (=)s 17 r ("\\\\bf)s 18 r (";)s 314 r (/*)s f0 SF 16 r (b)s 1 r (old)s 17 r (type)s f3 SF 632 r (*/)s 0 1703 p (char)s 17 r (Italic[])s 18 r (=)s 17 r ("\\\\it)s 18 r (";)s 279 r (/*)s f0 SF 16 r (italic)s 17 r (type)s f3 SF 624 r (*/)s 0 1743 p (char)s 17 r (Roman[])s 18 r (=)s 17 r ("\\\\rm)s 18 r (";)s 296 r (/*)s f0 SF 17 r (roman)s 16 r (type)s f3 SF 604 r (*/)s 0 1783 p (char)s 17 r (SmallCaps[])s 18 r (=)s 17 r ("\\\\sc)s 18 r (";)s 226 r (/*)s f0 SF 17 r (small)s 17 r (caps)s 16 r (type)s f3 SF 541 r (*/)s 0 1823 p (char)s 17 r (Slant[])s 18 r (=)s 17 r ("\\\\sl)s 18 r (";)s 296 r (/*)s f0 SF 17 r (slanted)s 15 r (type)s f3 SF 594 r (*/)s 0 1860 p 480 1 ru f0 SF 33 1897 p (*)s 17 r (Permission)s 8 r (to)s 9 r (use,)s 10 r (copy)s -3 r (,)s 9 r (and)s 9 r (mo)s 1 r (dify)s 9 r (this)s 10 r (softw)s -1 r (are)s 8 r (and)s 9 r (its)s 10 r (do)s 1 r (cumentation)s 8 r (is)s 9 r (granted)s 9 r (under)s 9 r (no)s 9 r (conditions.)s 0 1937 p (How)s -1 r (ev)s -1 r (er,)s 11 r (the)s 12 r (authors)s 11 r (would)s 11 r (b)s 1 r (e)s 12 r (very)s 11 r (happy)s 10 r (if)s 12 r (users)s 12 r (could)s 11 r (inform)s 12 r (any)s 11 r (mo)s 1 r (di\014cations)s 12 r (to)s 11 r (k)s -1 r (amano@tansei.cc.u-)s 0 1977 p (tokyo.ac.jp.)s 14 r (Since)s 11 r (src2tex)s 11 r (is)s 11 r (a)s 11 r (free)s 11 r (softw)s -1 r (are,)s 10 r (there)s 11 r (is)s 12 r (no)s 11 r (warran)s -1 r (t)s -1 r (y)s 10 r (of)s 11 r (any)s 10 r (kind)s 11 r (for)s 11 r (the)s 11 r (program.)s f1 SF 33 2016 p (y)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -3 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -1 r (AN)s 10 r (\(k)s -1 r (amano@)s 0 2056 p (p)s 1 r (o.iijnet.or.jp\))s f1 SF 33 2096 p (z)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -2 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -2 r (AN)s 11 r (\(m93093@)s 0 2136 p (crescent.josai.ac.jp\))s 1270 2216 p (options.c)s 67 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 0 33 p (char)s 17 r (Typewriter[])s 18 r (=)s 17 r ("\\\\tt)s 18 r (";)s 209 r (/*)s f0 SF 17 r (typewriter)s 16 r (type)s f3 SF 546 r (*/)s 0 74 p (#endif)s 0 114 p (#endif)s 0 155 p (char)s 17 r (*TextModeFont)s 18 r (=)s 17 r (Typewriter;)s 140 r (/*)s f0 SF 16 r (text)s 17 r (mo)s 1 r (de)s 17 r (font)s f3 SF 548 r (*/)s 0 195 p (char)s 17 r (*TeXModeFont)s 18 r (=)s 17 r (Roman;)s 244 r (/*)s f0 SF 11 r (quasi-T)s 848 202 p (E)s 866 195 p (X)s 11 r (and)s 11 r (T)s 985 202 p (E)s 1004 195 p (X)s 11 r (mo)s 1 r (de)s 11 r (font)s f3 SF 338 r (*/)s 0 317 p (/*)s 17 r 588 1 ru f0 SF 599 r (string)s 11 r (comparison)s 11 r 588 1 ru f3 SF 604 r (*/)s 0 357 p (/*)s f0 SF 17 r (Like)s f3 SF 7 r (strcmp\(\))s f0 SF (,)s 8 r (this)s 8 r (function)s f3 SF 8 r (str)s 2 r 10 1 ru 11 r (cmp\(\))s f0 SF 8 r (compares)s 8 r (tw)s -1 r (o)s 7 r (strings)s 8 r (stored)s 8 r (at)s 8 r (integer)s 7 r (p)s 1 r (ointer)s f3 SF 7 r (iptr)s f0 SF 8 r (and)s 8 r (character)s 0 397 p (p)s 1 r (ointer)s f3 SF 10 r (cptr)s f0 SF (.)s f3 SF 15 r (Str)s 2 r 10 1 ru 10 r (cmp\(\))s f0 SF 11 r (returns)s 12 r (0)s 11 r (if)s 11 r (and)s 11 r (only)s 11 r (if)s 11 r (given)s 10 r (tw)s -1 r (o)s 10 r (strings)s 11 r (are)s 11 r (identical.)s f3 SF 368 r (*/)s 0 478 p (int)s 17 r (str)s 3 r 10 1 ru 15 r (cmp\(iptr,)s 17 r (cptr\))s 0 518 p (int)s 35 r (*iptr;)s 0 559 p (char)s 17 r (*cptr;)s 0 599 p ({)s 35 640 p (while)s 17 r (\(\(char\)*iptr)s 18 r (==)s 17 r (*cptr\))s 70 680 p ({)s 105 721 p (if)s 17 r (\(*\(cptr)s 17 r (+)s 18 r (1\))s 17 r (==)s 18 r ('\\0'\))s 139 761 p (break;)s 105 802 p (iptr)s 17 r (=)s 17 r (inc)s 3 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(iptr\);)s 105 842 p (++cptr;)s 70 883 p (})s 35 923 p (return)s 17 r (\(char\)*iptr)s 18 r (-)s 17 r (*cptr;)s 0 963 p (})s 0 1085 p (/*)s 17 r 611 1 ru f0 SF 621 r (ascii)s 12 r (to)s 11 r (integer)s 10 r 611 1 ru f3 SF 627 r (*/)s 0 1125 p (/*)s 17 r (Asc2int\(\))s f0 SF 10 r (is)s 10 r (a)s 10 r (substitute)s 10 r (of)s f3 SF 10 r (atoi\(\))s f0 SF (.)s 15 r (W)s -2 r (e)s 9 r (just)s 10 r (want)s 9 r (to)s 10 r (keep)s 9 r (our)s 10 r (source)s 10 r (co)s 1 r (de)s 11 r (closed)s 10 r (under)s f4 SF 10 r (stdio.h)s f0 SF 10 r (in)s 10 r (order)s 0 1165 p (to)s 11 r (remain)s 11 r (it)s 11 r (highly)s 11 r (p)s 1 r (ortable.)s f3 SF 1110 r (*/)s 0 1246 p (int)s 17 r (asc2int\(iptr\))s 0 1287 p (int)s 17 r (*iptr;)s 0 1327 p ({)s 35 1368 p (int)s 17 r (value)s 18 r (=)s 17 r (0;)s 35 1449 p (while)s 17 r (\(\(\(char\)*iptr)s 18 r (>=)s 17 r ('0'\))s 18 r (&&)s 17 r (\(\(char\)*iptr)s 17 r (<=)s 18 r ('9'\)\))s 70 1489 p ({)s 105 1529 p (value)s 17 r (=)s 17 r (10)s 18 r (*)s 17 r (value)s 18 r (+)s 17 r (\(int\)\(\(char\)*iptr)s 18 r (-)s 17 r ('0'\);)s 105 1570 p (iptr)s 17 r (=)s 17 r (inc)s 3 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(iptr\);)s 70 1610 p (})s 35 1651 p (return)s 17 r (value;)s 0 1691 p (})s 0 1813 p (/*)s 17 r 594 1 ru f0 SF 605 r (search)s 10 r (next)s 11 r (word)s 10 r 594 1 ru f3 SF 611 r (*/)s 0 1853 p (/*)s f0 SF 17 r (This)s 13 r (function)s f3 SF 13 r (next)s 2 r 10 1 ru 11 r (word\(iptr1,iptr2\))s f0 SF 13 r (simply)s 13 r (increases)s 14 r (bu\013er)s 13 r (p)s 1 r (ointer)s f3 SF 12 r (iptr1)s f0 SF 13 r (until)s 13 r (either)s 13 r (it)s 13 r (comes)s 14 r (to)s 0 1893 p (the)s 11 r (\014rst)s 11 r (character)s 10 r (of)s 11 r (the)s 11 r (next)s 11 r (word)s 11 r (or)s 11 r (it)s 11 r (coincides)s 11 r (with)s 11 r (iptr2,)s 11 r (and)s 11 r (returns)s f3 SF 11 r (iptr1)s f0 SF (.)s f3 SF 346 r (*/)s 0 1974 p (int)s 17 r (*next)s 3 r 10 1 ru 15 r (word\(iptr1,)s 17 r (iptr2\))s 0 2015 p (int)s 17 r (*iptr1,)s 18 r (*iptr2;)s 0 2055 p ({)s 35 2095 p (if)s 17 r (\(iptr1)s 18 r (==)s 17 r (iptr2\))s 70 2136 p (return)s 17 r (iptr1;)s f0 SF 1270 2216 p (options.c)s 67 r (page)s 11 r (2)s EP pstopssaved restore %%Page: pstops 3 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 35 33 p (while)s 17 r (\(\(iptr1)s 18 r (=)s 17 r (inc)s 2 r 10 1 ru 16 r (buf)s 2 r 10 1 ru 15 r (ptr\(iptr1\)\))s 18 r (!=)s 17 r (iptr2\))s 70 74 p ({)s 105 114 p (if)s 17 r (\(\(\(\(\(char\)*\(iptr1)s 17 r (-)s 18 r (1\))s 17 r (<)s 18 r ('a'\))s 17 r (||)s 18 r (\(\(char\)*\(iptr1)s 17 r (-)s 18 r (1\))s 17 r (>)s 17 r ('z'\)\))s 192 155 p (&&)s 17 r (\(\(\(char\)*\(iptr1)s 18 r (-)s 17 r (1\))s 18 r (<)s 17 r ('0'\))s 17 r (||)s 18 r (\(\(char\)*\(iptr1)s 17 r (-)s 18 r (1\))s 17 r (>)s 18 r ('9'\)\)\))s 192 195 p (&&)s 17 r (\(\(\(\(char\)*iptr1)s 18 r (>=)s 17 r ('a'\))s 18 r (&&)s 17 r (\(\(char\)*iptr1)s 17 r (<=)s 18 r ('z'\)\))s 244 236 p (||)s 18 r (\(\(\(char\)*iptr1)s 17 r (>=)s 17 r ('0'\))s 18 r (&&)s 17 r (\(\(char\)*iptr1)s 18 r (<='9'\)\)\)\))s 139 276 p (break;)s 70 317 p (})s 35 357 p (return)s 17 r (iptr1;)s 0 397 p (})s 0 519 p (/*)s 17 r 621 1 ru f0 SF 632 r (parse)s 11 r (options)s 11 r 621 1 ru f3 SF 638 r (*/)s 0 559 p (/*)s 34 r (Parse)s 2 r 10 1 ru 11 r (options\(\))s f0 SF 26 r (changes)s 8 r (several)s 8 r (environmen)s -1 r (t)s 8 r (v)s -1 r (ariables)s 8 r (of)s f2 SF 9 r (src2tex)s f0 SF 9 r (and)s f2 SF 9 r (src2latex)s f0 SF 9 r (dynamically)s -1 r (.)s 13 r (Since)s 0 599 p (using)s 12 r (src2tex)s 13 r (escap)s 1 r (e)s 12 r (sequence)s 12 r (is)s 13 r (pretty)s 11 r (tricky)s -2 r (,)s 11 r (we)s 12 r (hav)s -1 r (e)s 11 r (decided)s 13 r (to)s 12 r (make)s 12 r (very)s 11 r (strict)s 12 r (syntax)s 12 r (chec)s -1 r (king)s 11 r (b)s 1 r (efore)s 0 639 p (parsing)s 12 r (options.)s 16 r (F)s -2 r (unction)s f3 SF 28 r (parse)s 2 r 10 1 ru 11 r (options\(\))s f0 SF 29 r (returns)s 23 r (1)s 11 r (,)s 12 r (if)s 12 r (src2tex)s 11 r (escap)s 1 r (e)s 12 r (sequence)s 11 r (is)s 12 r (found,)s 11 r (and)s 12 r (returns)s 0 679 p (0)s 11 r (otherwise.)s f3 SF 1351 r (*/)s 0 760 p (int)s 17 r (parse)s 3 r 10 1 ru 15 r (options\(ptr\))s 0 800 p (flag)s 2 r 10 1 ru 15 r (char)s 18 r (*ptr;)s 0 841 p ({)s 35 881 p (int)s 17 r (brace)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 35 922 p (int)s 17 r (error)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 35 962 p (int)s 17 r (i,)s 18 r (*iptr1,)s 17 r (*iptr2,)s 18 r (*iptr3;)s 35 1043 p (iptr1)s 17 r (=)s 18 r (ptr->buffer;)s 35 1084 p (while)s 17 r (\(\(\(char\)*iptr1)s 18 r (!=)s 17 r ('\\\\'\))s 18 r (&&)s 17 r (\(\(char\)*iptr1)s 17 r (!=)s 18 r ('\\n'\))s 17 r (&&)s 18 r (\(*iptr1)s 17 r (!=)s 18 r (EOF\)\))s 70 1124 p ({)s 105 1165 p (if)s 17 r (\(\(\(\(char\)*iptr1)s 17 r (>=)s 18 r ('A'\))s 17 r (&&)s 18 r (\(\(char\)*iptr1)s 17 r (<=)s 18 r ('Z'\)\))s 174 1205 p (||)s 18 r (\(\(\(char\)*iptr1)s 17 r (>=)s 18 r ('a'\))s 17 r (&&)s 18 r (\(\(char\)*iptr1)s 17 r (<=)s 17 r ('z'\)\)\))s 139 1246 p (++error)s 3 r 10 1 ru 15 r (flag;)s 105 1286 p (iptr1)s 17 r (=)s 17 r (inc)s 3 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(iptr1\);)s 70 1326 p (})s 35 1367 p (/*)s f0 SF 16 r (checking)s 15 r (syntax)s f3 SF 1204 r (*/)s 35 1407 p (if)s 17 r (\(str)s 2 r 10 1 ru 16 r (cmp\(iptr1,)s 17 r ("\\\\src2tex{"\))s 18 r (!=)s 17 r (0\))s 70 1448 p (return)s 17 r (0;)s 35 1488 p (if)s 17 r (\(error)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 70 1529 p ({)s 105 1569 p (fprintf\(stderr,)s 244 1610 p ("\\nError:)s 18 r (syntax)s 17 r (error)s 17 r (of)s 18 r (src2tex)s 17 r (escape)s 18 r (sequence\\n"\);)s 105 1650 p (fprintf\(stderr,)s 244 1691 p (")s 122 r (\\\\src2tex{...})s 18 r (is)s 17 r (not)s 17 r (written)s 18 r (properly\\n"\);)s 105 1731 p (fprintf\(stderr,)s 244 1772 p (")s 122 r (junks)s 18 r (are)s 17 r (found)s 17 r (before)s 18 r (\\\\src2tex)s 17 r (sequence\\n"\);)s 105 1812 p (exit\(EXIT)s 2 r 10 1 ru 15 r (FAILURE\);)s 70 1853 p (})s 35 1893 p (if)s 17 r (\(ptr->flag)s 18 r (==)s 17 r (1\))s 70 1934 p ({)s 105 1974 p (iptr2)s 17 r (=)s 17 r (dec)s 3 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(iptr1\);)s 105 2015 p (if)s 17 r (\(*iptr2)s 17 r (!=)s 18 r ('{'\))s 139 2055 p ({)s 174 2095 p (fprintf\(stderr,)s 314 2136 p ("\\nError:)s 17 r (syntax)s 18 r (error)s 17 r (of)s 18 r (src2tex)s 17 r (escape)s 17 r (sequence\\n"\);)s f0 SF 1270 2216 p (options.c)s 67 r (page)s 11 r (3)s EP pstopssaved restore %%Page: pstops 4 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 174 33 p (fprintf\(stderr,)s 314 74 p (")s 122 r (\\\\src2tex{...})s 17 r (is)s 18 r (not)s 17 r (written)s 18 r (properly\\n"\);)s 174 114 p (fprintf\(stderr,)s 314 155 p (")s 122 r (missing)s 17 r (a)s 18 r (left)s 17 r (brace)s 18 r ({)s 17 r (\\n"\);)s 174 195 p (exit\(EXIT)s 2 r 10 1 ru 16 r (FAILURE\);)s 139 235 p (})s 70 276 p (})s 35 316 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0,)s 18 r (iptr2)s 17 r (=)s 17 r (iptr1;)s 18 r (i)s 17 r (<)s 18 r (256;)s 17 r (++i,)s 18 r (iptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(iptr2\)\))s 70 357 p ({)s 105 397 p (if)s 17 r (\(\(char\)*iptr2)s 17 r (==)s 18 r ('{'\))s 139 438 p (++brace)s 3 r 10 1 ru 15 r (counter;)s 105 478 p (if)s 17 r (\(\(char\)*iptr2)s 17 r (==)s 18 r ('}'\))s 139 518 p (--brace)s 3 r 10 1 ru 15 r (counter;)s 105 559 p (if)s 17 r (\(\(\(char\)*iptr2)s 17 r (==)s 18 r ('}'\))s 17 r (&&)s 18 r (\(brace)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 139 599 p (break;)s 105 640 p (if)s 17 r (\(\(\(char\)*iptr2)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*iptr2)s 17 r (==)s 18 r (EOF\)\))s 139 680 p (break;)s 70 721 p (})s 35 761 p (if)s 17 r (\(\(\(char\)*iptr2)s 18 r (!=)s 17 r ('}'\))s 18 r (||)s 17 r (\(brace)s 2 r 10 1 ru 16 r (counter)s 17 r (!=)s 17 r (0\)\))s 70 802 p ({)s 105 842 p (fprintf\(stderr,)s 244 882 p ("\\nError:)s 18 r (syntax)s 17 r (error)s 17 r (of)s 18 r (src2tex)s 17 r (escape)s 18 r (sequence\\n"\);)s 105 923 p (fprintf\(stderr,)s 244 963 p (")s 122 r (\\\\src2tex{...})s 18 r (is)s 17 r (not)s 17 r (written)s 18 r (properly\\n"\);)s 105 1004 p (fprintf\(stderr,)s 244 1044 p (")s 122 r (missing)s 18 r (right)s 17 r (brace)s 17 r (})s 18 r (\\n"\);)s 105 1085 p (exit\(EXIT)s 2 r 10 1 ru 15 r (FAILURE\);)s 70 1125 p (})s 35 1165 p (iptr3)s 17 r (=)s 18 r (iptr2;)s 35 1206 p (while)s 17 r (\(\(\(char\)*iptr3)s 18 r (!=)s 17 r ('\\n'\))s 18 r (&&)s 17 r (\(*iptr3)s 17 r (!=)s 18 r (EOF\)\))s 70 1246 p ({)s 105 1287 p (if)s 17 r (\(\(\(\(char\)*iptr3)s 17 r (>=)s 18 r ('A'\))s 17 r (&&)s 18 r (\(\(char\)*iptr3)s 17 r (<=)s 18 r ('Z'\)\))s 174 1327 p (||)s 18 r (\(\(\(char\)*iptr3)s 17 r (>=)s 18 r ('a'\))s 17 r (&&)s 18 r (\(\(char\)*iptr3)s 17 r (<=)s 17 r ('z'\)\)\))s 139 1368 p ({)s 174 1408 p (fprintf\(stderr,)s 314 1449 p ("\\nError:)s 17 r (syntax)s 18 r (error)s 17 r (of)s 18 r (src2tex)s 17 r (escape)s 17 r (sequence\\n"\);)s 174 1489 p (fprintf\(stderr,)s 314 1529 p (")s 122 r (\\\\src2tex{...})s 17 r (is)s 18 r (not)s 17 r (written)s 18 r (properly\\n"\);)s 174 1570 p (fprintf\(stderr,)s 314 1610 p (")s 122 r (junks)s 17 r (are)s 18 r (found)s 17 r (after)s 18 r (\\\\src2tex)s 17 r (sequence\\n"\);)s 174 1651 p (exit\(EXIT)s 2 r 10 1 ru 16 r (FAILURE\);)s 139 1691 p (})s 105 1732 p (iptr3)s 17 r (=)s 17 r (inc)s 3 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(iptr3\);)s 70 1772 p (})s 0 1812 p (#ifdef)s 17 r (DEBUGGING)s 35 1853 p (printf\("parse)s 2 r 10 1 ru 15 r (options\(\):\\n"\);)s 0 1893 p (#endif)s 35 1934 p (/*)s f0 SF 16 r (start)s 17 r (parsing)s f3 SF 1248 r (*/)s 35 1974 p (for)s 17 r (\(i)s 18 r (=)s 17 r (1;)s 18 r (i)s 17 r (==)s 17 r (8;)s 18 r (++i\))s 70 2015 p (iptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(iptr1\);)s 35 2055 p (iptr1)s 17 r (=)s 18 r (next)s 2 r 10 1 ru 15 r (word\(iptr1,)s 18 r (iptr2\);)s 35 2096 p (while\(iptr1)s 17 r (!=)s 18 r (iptr2\))s 70 2136 p ({)s f0 SF 1270 2216 p (options.c)s 67 r (page)s 11 r (4)s EP pstopssaved restore %%Page: pstops 5 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 105 33 p (/*)s f0 SF 16 r (parsing)s 17 r (htab)s 15 r (option)s f3 SF 1073 r (*/)s 105 74 p (if)s 17 r (\(str)s 2 r 10 1 ru 16 r (cmp\(iptr1,)s 17 r ("htab"\))s 17 r (==)s 18 r (0\))s 139 114 p ({)s 174 155 p (iptr1)s 18 r (=)s 17 r (next)s 2 r 10 1 ru 16 r (word\(iptr1,)s 17 r (iptr2\);)s 174 195 p (if)s 18 r (\(\(\(char\)*iptr1)s 17 r (>=)s 18 r ('0'\))s 17 r (&&)s 18 r (\(\(char\)*iptr1)s 17 r (<=)s 17 r ('9'\)\))s 209 235 p (Htab)s 2 r 10 1 ru 16 r (Size)s 17 r (=)s 18 r (asc2int\(iptr1\);)s 139 276 p (})s 105 316 p (/*)s f0 SF 16 r (parsing)s 17 r (vtab)s 16 r (option)s f3 SF 1073 r (*/)s 105 357 p (if)s 17 r (\(str)s 2 r 10 1 ru 16 r (cmp\(iptr1,)s 17 r ("vtab"\))s 17 r (==)s 18 r (0\))s 139 397 p ({)s 174 438 p (iptr1)s 18 r (=)s 17 r (next)s 2 r 10 1 ru 16 r (word\(iptr1,)s 17 r (iptr2\);)s 174 478 p (if)s 18 r (\(\(\(char\)*iptr1)s 17 r (>=)s 18 r ('0'\))s 17 r (&&)s 18 r (\(\(char\)*iptr1)s 17 r (<=)s 17 r ('9'\)\))s 209 518 p (Vtab)s 2 r 10 1 ru 16 r (Size)s 17 r (=)s 18 r (asc2int\(iptr1\);)s 139 559 p (})s 105 599 p (/*)s f0 SF 16 r (T)s -2 r (eXt)s 16 r (font)s f3 SF 1221 r (*/)s 105 640 p (if)s 17 r (\(str)s 2 r 10 1 ru 16 r (cmp\(iptr1,)s 17 r ("textfont"\))s 17 r (==)s 18 r (0\))s 139 680 p ({)s 174 721 p (iptr1)s 18 r (=)s 17 r (next)s 2 r 10 1 ru 16 r (word\(iptr1,)s 17 r (iptr2\);)s 174 761 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(iptr1,)s 18 r ("bf"\))s 17 r (==)s 18 r (0\))s 209 802 p (TextModeFont)s 18 r (=)s 17 r (Bold;)s 174 842 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(iptr1,)s 18 r ("it"\))s 17 r (==)s 18 r (0\))s 209 882 p (TextModeFont)s 18 r (=)s 17 r (Italic;)s 174 923 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(iptr1,)s 18 r ("rm"\))s 17 r (==)s 18 r (0\))s 209 963 p (TextModeFont)s 18 r (=)s 17 r (Roman;)s 174 1004 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(iptr1,)s 18 r ("sc"\))s 17 r (==)s 18 r (0\))s 209 1044 p (TextModeFont)s 18 r (=)s 17 r (SmallCaps;)s 174 1085 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(iptr1,)s 18 r ("sl"\))s 17 r (==)s 18 r (0\))s 209 1125 p (TextModeFont)s 18 r (=)s 17 r (Slant;)s 174 1165 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(iptr1,)s 18 r ("tt"\))s 17 r (==)s 18 r (0\))s 209 1206 p (TextModeFont)s 18 r (=)s 17 r (Typewriter;)s 139 1246 p (})s 105 1287 p (/*)s f0 SF 16 r (T)s -2 r (eX)s 16 r (font)s f3 SF 1233 r (*/)s 105 1327 p (if)s 17 r (\(str)s 2 r 10 1 ru 16 r (cmp\(iptr1,)s 17 r ("texfont"\))s 17 r (==)s 18 r (0\))s 139 1368 p ({)s 174 1408 p (iptr1)s 18 r (=)s 17 r (next)s 2 r 10 1 ru 16 r (word\(iptr1,)s 17 r (iptr2\);)s 174 1449 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(iptr1,)s 18 r ("bf"\))s 17 r (==)s 18 r (0\))s 209 1489 p (TeXModeFont)s 18 r (=)s 17 r (Bold;)s 174 1529 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(iptr1,)s 18 r ("it"\))s 17 r (==)s 18 r (0\))s 209 1570 p (TeXModeFont)s 18 r (=)s 17 r (Italic;)s 174 1610 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(iptr1,)s 18 r ("rm"\))s 17 r (==)s 18 r (0\))s 209 1651 p (TeXModeFont)s 18 r (=)s 17 r (Roman;)s 174 1691 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(iptr1,)s 18 r ("sc"\))s 17 r (==)s 18 r (0\))s 209 1732 p (TeXModeFont)s 18 r (=)s 17 r (SmallCaps;)s 174 1772 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(iptr1,)s 18 r ("sl"\))s 17 r (==)s 18 r (0\))s 209 1812 p (TeXModeFont)s 18 r (=)s 17 r (Slant;)s 174 1853 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(iptr1,)s 18 r ("tt"\))s 17 r (==)s 18 r (0\))s 209 1893 p (TeXModeFont)s 18 r (=)s 17 r (Typewriter;)s 139 1934 p (})s 105 1974 p (iptr1)s 17 r (=)s 17 r (next)s 3 r 10 1 ru 15 r (word\(iptr1,)s 17 r (iptr2\);)s 70 2015 p (})s 0 2055 p (#ifdef)s 17 r (DEBUGGING)s 35 2096 p (printf\("Htab)s 2 r 10 1 ru 15 r (Size=%d\\n",Htab)s 2 r 10 1 ru 16 r (Size\);)s 35 2136 p (printf\("Vtab)s 2 r 10 1 ru 15 r (Size=%d\\n",Vtab)s 2 r 10 1 ru 16 r (Size\);)s f0 SF 1270 2216 p (options.c)s 67 r (page)s 11 r (5)s EP pstopssaved restore %%Page: pstops 6 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 35 33 p (printf\("TextModeFont=%s\\n",TextModeFont\);)s 35 73 p (printf\("TeXModeFont=%s\\n",TeXModeFont\);)s 0 113 p (#endif)s 35 153 p (return)s 17 r (1;)s 0 193 p (})s f0 SF 1270 2216 p (options.c)s 67 r (page)s 11 r (6)s EP pstopssaved restore %%Trailer %%Pages: 6 END %%EOF src2tex-2.12h.orig/pas_bold.c100644 1750 1750 6533 5733237540 16030 0ustar kawamurakawamura/* {\hrulefill} * {\ % beginning of TeX mode \input fonts.tex % define fonts \input title.tex % title and authors % end of TeX mode} * {\hrulefill} */ /* {\hrulefill\ pas\_bold.c\ \hrulefill} */ /*{\ In PASCAL, several key words are usually printed in bold face. Our {\bf src2tex} and {\bf src2latex} print those key words in bold typewriter fonts if the input file is written in PASCAL. \hfill}*/ #include #include "src2tex.h" extern int *dec_buf_ptr(); extern int *inc_buf_ptr(); /* {\hrulefill\ table of key words of PASCAL\ \hrulefill} */ /* {\rm If input source file is written in PASCAL, then the following words are printed in bold face.\hfill}*/ char *PAS_Table[] = {"absolute", "and", "array", "begin", "case", "const", "define", "div", "downto", "do", "else", "end", "external", "file", "forward", "for", "function", "goto", "if", "inline", "in", "label", "let", "mod", "nil", "not", "of", "or", "out", "packed", "procedure", "program", "record", "repeat", "return", "set", "shl", "shr", "string", "then", "to", "type", "until", "var", "while", "with", "xor", ""}; /* {\hrulefill\ compare two words\ \hrulefill} */ /* {\rm This function compares two strings \smallskip \qquad{\tt buf\_ptr}={\sl string1},\ {\tt tbl\_ptr}={\sl string2} \smallskip \noindent and returns \smallskip $\qquad\displaystyle{\tt flag}\cases{ =0 &if {\sl string1=string2}\cr \not=0 &otherwise\ .\cr}$ \smallskip \noindent However, compare\_word() is slightly different from strcmp(). \hfill}*/ int compare_word(buf_ptr, tbl_ptr) int *buf_ptr; char *tbl_ptr; { char c; int *ptr, flag = 0; /* {\ if the previous character is either an alphabet or a number, then returns -1 \hfill} */ ptr = dec_buf_ptr(buf_ptr); c = *ptr; if ((c >= '0') && (c <= '9')) return (-1); if ((c >= 'A') && (c <= 'Z')) return (-1); if ((c >= 'a') && (c <= 'z')) return (-1); if (c == '_') return (-1); /* flag $\not=0$ if two strings are different {\hfill} */ /* flag = 0 otherwise {\hfill} */ ptr = buf_ptr; while (*tbl_ptr != '\0') { c = *ptr; /* upper case -> lower case {\hfill} */ if ((c >= 'A') && (c <= 'Z')) c += 0x20; flag = c - *tbl_ptr; if (flag != 0) break; ptr = inc_buf_ptr(ptr); ++tbl_ptr; } /* {\ if the next character is either an alphabet or a number, then returns -1 \hfill} */ c = *ptr; if ((c >= '0') && (c <= '9')) return (-1); if ((c >= 'A') && (c <= 'Z')) return (-1); if ((c >= 'a') && (c <= 'z')) return (-1); if (c == '_') return (-1); return flag; } /* {\hrulefill\ get bold face flag\ \hrulefill} */ /* {\rm This function compares a string \smallskip \qquad{\tt buf\_ptr}={\sl string} \smallskip \noindent with key words stored in {\tt PAS\_Table[]}. If there exists a key word which is equal to given {\sl string}, then it returns the length of {\sl string}.\hfill}*/ int get_bf_flag(buf_ptr) int *buf_ptr; { char **table, *ptr; int i = 0; for (table = PAS_Table; **table != '\0'; ++table) { if (compare_word(buf_ptr, *table) == 0) { #ifdef DEBUGGING printf("compare_word(): "); printf("a reserved word \"%s\" is found in PAS_table\n", *table); #endif /* strlen(*table) {\hfill} */ for (i= 0, ptr = *table; *ptr != '\0'; ++i, ++ptr); break; } } return i; } src2tex-2.12h.orig/pas_bold.c.ps100644 1750 1750 112733 6266067337 16520 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: pas_bold.c.dvi %%Pages: 3 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 122 /f0 NF f0 SF [ 24 23 -1 0 24.906] 65 D [<00FC000382000E01001C0080380040380040780020700020F00020F00000F00000F00000F00000F00000F000207000207800 203800603800601C00E00E01E003826000FC20> 24 23 -2 0 23.984] 67 D [ 24 23 -1 0 25.367] 68 D [ 24 23 -1 0 24.906] 72 D [ 16 23 0 0 11.992] 73 D [<3E004300C180E1C0E1C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF8> 16 23 -2 0 17.065] 74 D [ 24 23 -1 0 25.829] 75 D [ 24 23 -1 0 20.755] 76 D [ 32 23 -1 0 30.441] 77 D [ 24 23 -1 0 24.906] 78 D [<01FC000707000E03801C01C03800E03800E07800F0700070F00078F00078F00078F00078F00078F00078F000787000707800 F03800E03800E01C01C00E038007070001FC00> 24 23 -2 0 25.829] 79 D [ 24 23 -1 0 22.600] 80 D [<8F80F060C030C01080188018801800180038007003F01FE03FC07E00F000E000C010C010C0104030603030F01F10> 16 23 -2 0 18.449] 83 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<007C000183000700800E00400C00401C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00 201C00201C00201C00201C00201C0070FF81FC> 24 23 -1 0 24.906] 85 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [<78EEE6470707070707070707070707070707073F0000000000060F0F06> 8 29 2 6 10.147] 106 D [ 24 23 0 0 17.527] 107 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [<00FF80001C00001C00001C00001C00001C00079C00185C00303C00701C00601C00E01C00E01C00E01C00E01C00601C00701C 00303C001C6C00078400> 24 20 -1 6 17.526] 113 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<1F0020C060607030703000380018001C0F9C185C303C603CE01CE01CE01CE018E0186038303018600F80> 16 21 -1 0 16.604] 57 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<060006000600C630E6703FC00F000F003FC0E670C630060006000600> 16 14 -2 -11 16.604] 42 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D [<00FF000701E008003810000020F0E0218D904307884703888603888E03888E03888E03888E03888E03888603884703904304 10218C2020F02010004008008007070000F800> 24 23 -2 0 25.829] 64 D [ 24 23 0 0 19.371] 11 D [ 24 23 0 0 18.449] 12 D [ 24 23 0 0 18.449] 13 D [ 8 2 0 -6 11.069] 45 D 1.000 123 /f1 NF f1 SF [<4000C00060006000300030001800180018000C000C0006000600030003000180018000C000C0006000600030003000300018 0018000C000C00060006> 16 30 -5 7 0.000] 54 D [<0C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C00FFC0FFC00C000C000C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 121 D [<0C000C000C000C000C000C00FFC0FFC00C000C000C000C000C000C0000000C000C000C000C000C000C00FFC0FFC00C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 122 D 1.000 27 /f2 NF f2 SF [<0007000F001E0038007000E000E001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C0 01C001C001C001C001C001C001C00380038007000E001C003800F000F00038001C000E0007000380038001C001C001C001C0 01C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C000E000E000700038 001E000F0007> 16 78 -4 77 24.906] 26 D 1.000 121 /f3 NF f3 SF [<1F8780786F80F02E00F01E00F01E00781E003C1E001F1E0001FE00001E00301E00781E00783C007038001FE000> 24 15 -1 0 18.564] 97 D [<07E01C38380C780C7000F000F000F000F000F0007018783C383C1C1C07F0> 16 15 -1 0 16.973] 99 D [<07F01C18380C78067000F000F000FFFEF00EF00E700E700C381C1C3807E0> 16 15 -1 0 17.503] 101 D [ 8 23 -1 0 10.608] 108 D [ 16 15 -1 0 15.728] 114 D [ 16 15 -1 0 15.063] 115 D [<0F801C403C603C603C603C603C003C003C003C003C003C003C00FFC03FC01C001C000C000C000C000C00> 16 21 -1 0 14.851] 116 D [ 24 15 -1 0 20.155] 120 D [ 16 21 -2 0 19.095] 50 D 1.000 126 /f4 NF f4 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 66 D [ 16 20 -1 0 17.434] 68 D [ 16 20 -1 0 17.434] 69 D [<07B80FF81878387870387038E038E038E0FCE0FCE000E000E000E03870387038387818780FF80798> 16 20 -1 0 17.434] 71 D [ 16 20 -3 0 17.434] 73 D [ 16 20 -1 0 17.434] 78 D [ 16 20 -1 0 17.434] 80 D [ 16 20 -2 0 17.434] 83 D [<1FF01FF00380038003800380038003800380038003800380038003800380E39CE39CE39CFFFC7FFC> 16 20 -1 0 17.434] 84 D [<03C007E00C301C38381C381C381C381C381C381C381C381C381C381C381C381C381C381CFE7FFE7F> 16 20 0 0 17.434] 85 D [ 16 20 -2 0 17.434] 90 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [ 16 20 -1 0 17.434] 107 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<078007800FC00CC00CC00CC01CE01CE01CE01CE038703870FCFCFCFC> 16 14 -1 0 17.434] 118 D [<18E03DF03DF035B035B035B037B037B03030703870387038FFFCFFFC> 16 14 -1 0 17.434] 119 D [ 16 14 -1 0 17.434] 120 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [ 16 14 -1 0 17.434] 122 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<1F003FC070E07070703000380018001C0F9C1FFC387C703CE01CE01CE018E038703838701FE00F80> 16 20 -1 0 17.434] 57 D [<3C707FF8679CE39CE788EFC0EFC07DC03CE01CE03CE03E703F7C3B7C3B803B803B801B801F000E00> 16 20 -1 0 17.434] 38 D [<60F0F0600000000070F0F0F0F0F0F0F0F0F0F060> 8 20 -6 0 17.434] 33 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<80C060303018181878F8F060> 8 12 -6 -8 17.434] 39 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<60F0F06000000000000060F0F060> 8 14 -6 0 17.434] 58 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [ 16 26 -6 3 17.434] 91 D [ 16 26 -1 3 17.434] 93 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00300070007000E000E001C001C001C0038003800700070007000E000E000E001C001C0038003800380070007000E000E000 C000> 16 26 -2 3 17.434] 92 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 117 /f5 NF f5 SF [<1F8000606000C03000C01800C00C00C00C00601C003FF8003FF0003FE0003000003000001780000CE0001870001870001C38 001C38000C30000E798003C780> 24 21 -1 7 16.604] 103 D [ 8 23 -1 0 9.224] 105 D [ 16 14 -1 0 18.449] 110 D [ 16 14 -1 0 13.006] 114 D [<9F00E180C0C0404040E001E00FC03FC03F00380030203020186007A0> 16 14 -1 0 13.099] 115 D [<3C00720072007100710071007000700070003800380038003800FF8038001C000C00040004000400> 16 20 -3 0 12.914] 116 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<7FFFF0FFFFF80000000000000000000000000000000000007FFFFC3FFFF8> 24 10 -3 -3 25.829] 61 D 1.000 123 /f6 NF f6 SF [ 24 23 -1 0 27.027] 65 D [ 24 23 -1 0 27.996] 75 D [ 24 23 -1 0 27.027] 78 D [<87C0D830E018C008800C800C800C000C001C003803F81FF03FE07F00F000E000C008C008C0084018603830580F88> 16 23 -2 0 20.294] 83 D [ 24 17 -1 0 20.368] 97 D [<01F8000E0600180100300100700080600080E00000E00000E00000E00000E000006000807000803001801803800E058001F8 80> 24 17 -1 0 19.629] 99 D [ 24 17 -1 0 20.737] 100 D [ 24 17 -1 0 20.368] 104 D [ 16 17 0 0 10.036] 105 D [ 24 17 -1 0 24.795] 109 D [ 24 17 -1 0 20.368] 110 D [<03F0000E1C00180600300300700380600180E001C0E001C0E001C0E001C0E001C06001807003803003001806000E1C0003F0 00> 24 17 -1 0 21.105] 111 D [<0FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00081C08081C08081C08081C080C1C180FFFF 80> 24 17 -1 0 19.629] 116 D [<03E0000E18001C0400180400380200380200380200380200380200380200380200380200380200380200380200380700FE0F 80> 24 17 -1 0 20.368] 117 D [ 16 17 -1 0 16.678] 122 D 1.000 121 /f7 NF f7 SF [<03F00FFC1F063C037C007800F800F800F800F800F800F800781C783E3C3E1E3E0FFC03F8> 16 18 -2 0 20.367] 99 D [<01FC000FFF001F01803E00C07C0000780000F80000F80000F80000FFFFC0FFFFC0F803C07803C07C03803C07801E0F000FFE 0003F800> 24 18 -1 0 21.004] 101 D [ 16 18 -1 0 18.873] 114 D [ 16 18 -2 0 18.076] 115 D [<03E00FF00F101F181F181F181F181F001F001F001F001F001F001F001F001F00FFF8FFF83F000F0007000700030003000300> 16 25 -1 0 17.822] 116 D [ 24 18 -1 0 24.186] 120 D [ 24 26 -2 0 22.913] 50 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f7 SF 479 152 p (src2tex)s f0 SF (*)s 45 r (version)s 10 r (2.12)s 33 r (\(Sep)s 11 r (9,)s 11 r (1996\))s f6 SF 466 231 p (Kazuo)s 13 r (Amano)s f1 SF (y)s f6 SF 12 r (and)s 13 r (Shinichi)s 13 r (Nomoto)s f1 SF (z)s f4 SF 0 350 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 470 p (/*)s 17 r 644 1 ru f0 SF 654 r (pas)s 2 r 10 1 ru 10 r (b)s 1 r (old.c)s 11 r 644 1 ru f4 SF 660 r (*/)s 0 510 p (/*)s f0 SF 11 r (In)s 11 r (P)s -2 r (ASCAL,)s 10 r (several)s 10 r (key)s 9 r (words)s 10 r (are)s 11 r (usually)s 11 r (printed)s 10 r (in)s 11 r (b)s 1 r (old)s 10 r (face.)s 15 r (Our)s f3 SF 11 r (src2tex)s f0 SF 11 r (and)s f3 SF 11 r (src2latex)s f0 SF 10 r (print)s 10 r (those)s 0 549 p (key)s 10 r (words)s 10 r (in)s 11 r (b)s 1 r (old)s 11 r (typewriter)s 11 r (fonts)s 11 r (if)s 11 r (the)s 11 r (input)s 11 r (\014le)s 11 r (is)s 11 r (written)s 11 r (in)s 11 r (P)s -2 r (ASCAL.)s f4 SF 453 r (*/)s 0 669 p (#include)s 17 r ()s 0 709 p (#include)s 17 r ("src2tex.h")s 0 788 p (extern)s 17 r (int)s 18 r (*dec)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(\);)s 0 828 p (extern)s 17 r (int)s 18 r (*inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(\);)s 0 908 p (/*)s 17 r 494 1 ru f0 SF 505 r (table)s 11 r (of)s 11 r (key)s 10 r (words)s 10 r (of)s 11 r (P)s -2 r (ASCAL)s 11 r 494 1 ru f4 SF 510 r (*/)s 0 948 p (/*)s f0 SF 17 r (If)s 11 r (input)s 11 r (source)s 11 r (\014le)s 11 r (is)s 11 r (written)s 11 r (in)s 11 r (P)s -2 r (ASCAL,)s 10 r (then)s 11 r (the)s 12 r (following)s 10 r (words)s 10 r (are)s 11 r (printed)s 10 r (in)s 11 r (b)s 1 r (old)s 11 r (face.)s f4 SF 137 r (*/)s 0 1028 p (char)s 17 r (*PAS)s 3 r 10 1 ru 15 r (Table[])s 17 r (=)s 0 1067 p ({"absolute",)s 17 r ("and",)s 18 r ("array",)s 17 1107 p ("begin",)s 17 1147 p ("case",)s 18 r ("const",)s 17 1187 p ("define",)s 18 r ("div",)s 17 r ("downto",)s 18 r ("do",)s 17 1227 p ("else",)s 18 r ("end",)s 17 r ("external",)s 17 1267 p ("file",)s 18 r ("forward",)s 17 r ("for",)s 18 r ("function",)s 17 1306 p ("goto",)s 17 1346 p ("if",)s 18 r ("inline",)s 17 r ("in",)s 17 1386 p ("label",)s 18 r ("let",)s 17 1426 p ("mod",)s 17 1466 p ("nil",)s 18 r ("not",)s 17 1506 p ("of",)s 18 r ("or",)s 17 r ("out",)s 17 1546 p ("packed",)s 18 r ("procedure",)s 17 r ("program",)s 17 1585 p ("record",)s 18 r ("repeat",)s 17 r ("return",)s 17 1625 p ("set",)s 18 r ("shl",)s 17 r ("shr",)s 18 r ("string",)s 17 1665 p ("then",)s 18 r ("to",)s 17 r ("type",)s 17 1705 p ("until",)s 17 1745 p ("var",)s 17 1785 p ("while",)s 18 r ("with",)s 17 1825 p ("xor",)s 0 1860 p 480 1 ru f0 SF 33 1897 p (*)s 17 r (Permission)s 8 r (to)s 9 r (use,)s 10 r (copy)s -3 r (,)s 9 r (and)s 9 r (mo)s 1 r (dify)s 9 r (this)s 10 r (softw)s -1 r (are)s 8 r (and)s 9 r (its)s 10 r (do)s 1 r (cumentation)s 8 r (is)s 9 r (granted)s 9 r (under)s 9 r (no)s 9 r (conditions.)s 0 1937 p (How)s -1 r (ev)s -1 r (er,)s 11 r (the)s 12 r (authors)s 11 r (would)s 11 r (b)s 1 r (e)s 12 r (very)s 11 r (happy)s 10 r (if)s 12 r (users)s 12 r (could)s 11 r (inform)s 12 r (any)s 11 r (mo)s 1 r (di\014cations)s 12 r (to)s 11 r (k)s -1 r (amano@tansei.cc.u-)s 0 1977 p (tokyo.ac.jp.)s 14 r (Since)s 11 r (src2tex)s 11 r (is)s 11 r (a)s 11 r (free)s 11 r (softw)s -1 r (are,)s 10 r (there)s 11 r (is)s 12 r (no)s 11 r (warran)s -1 r (t)s -1 r (y)s 10 r (of)s 11 r (any)s 10 r (kind)s 11 r (for)s 11 r (the)s 11 r (program.)s f1 SF 33 2016 p (y)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -3 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -1 r (AN)s 10 r (\(k)s -1 r (amano@)s 0 2056 p (p)s 1 r (o.iijnet.or.jp\))s f1 SF 33 2096 p (z)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -2 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -2 r (AN)s 11 r (\(m93093@)s 0 2136 p (crescent.josai.ac.jp\))s 1251 2216 p (pas)s 2 r 10 1 ru 11 r (b)s 1 r (old.c)s 66 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 17 33 p (""};)s 0 153 p (/*)s 17 r 578 1 ru f0 SF 588 r (compare)s 11 r (tw)s -1 r (o)s 10 r (words)s 11 r 578 1 ru f4 SF 594 r (*/)s 0 193 p (/*)s f0 SF 17 r (This)s 11 r (function)s 11 r (compares)s 11 r (tw)s -1 r (o)s 10 r (strings)s f4 SF 133 242 p (buf)s 2 r 10 1 ru 10 r (ptr)s f0 SF (=)s f5 SF (string1)s f0 SF (,)s f4 SF 11 r (tbl)s 3 r 10 1 ru 10 r (ptr)s f0 SF (=)s f5 SF (string2)s f0 SF 0 292 p (and)s 11 r (returns)s f4 SF 133 353 p (flag)s f2 SF 208 306 p (\032)s f0 SF 239 333 p (=)s 9 r (0)s 33 r (if)s f5 SF 11 r (string1=string2)s f1 SF 239 373 p (6)s f0 SF (=)s 9 r (0)s 33 r (otherwise)s 11 r (.)s 0 422 p (How)s -1 r (ev)s -1 r (er,)s 10 r (compare)s 2 r 10 1 ru 10 r (word\(\))s 10 r (is)s 11 r (slightly)s 11 r (di\013erent)s 10 r (from)s 11 r (strcmp\(\).)s f4 SF 646 r (*/)s 0 502 p (int)s 17 r (compare)s 3 r 10 1 ru 15 r (word\(buf)s 2 r 10 1 ru 15 r (ptr,)s 18 r (tbl)s 2 r 10 1 ru 15 r (ptr\))s 0 542 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 582 p (char)s 17 r (*tbl)s 3 r 10 1 ru 15 r (ptr;)s 0 622 p ({)s 70 662 p (char)s 17 r (c;)s 70 701 p (int)s 17 r (*ptr,)s 18 r (flag)s 17 r (=)s 17 r (0;)s 70 781 p (/*)s f0 SF 16 r (if)s 11 r (the)s 11 r (previous)s 12 r (character)s 10 r (is)s 11 r (either)s 11 r (an)s 11 r (alphab)s 1 r (et)s 11 r (or)s 11 r (a)s 11 r (num)s -1 r (ber,)s 11 r (then)s 11 r (returns)s 11 r (-1)s f4 SF 312 r (*/)s 70 821 p (ptr)s 17 r (=)s 18 r (dec)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(buf)s 2 r 10 1 ru 15 r (ptr\);)s 70 861 p (c)s 17 r (=)s 18 r (*ptr;)s 70 901 p (if)s 17 r (\(\(c)s 18 r (>=)s 17 r ('0'\))s 17 r (&&)s 18 r (\(c)s 17 r (<=)s 18 r ('9'\)\))s 139 940 p (return)s 18 r (\(-1\);)s 70 980 p (if)s 17 r (\(\(c)s 18 r (>=)s 17 r ('A'\))s 17 r (&&)s 18 r (\(c)s 17 r (<=)s 18 r ('Z'\)\))s 139 1020 p (return)s 18 r (\(-1\);)s 70 1060 p (if)s 17 r (\(\(c)s 18 r (>=)s 17 r ('a'\))s 17 r (&&)s 18 r (\(c)s 17 r (<=)s 18 r ('z'\)\))s 139 1100 p (return)s 18 r (\(-1\);)s 70 1140 p (if)s 17 r (\(c)s 18 r (==)s 17 r (')s 2 r 10 1 ru 16 r ('\))s 105 1180 p (return)s 17 r (\(-1\);)s 70 1219 p (/*)s f0 SF 16 r (\015ag)s f1 SF 17 r (6)s f0 SF (=)s 9 r (0)s 17 r (if)s 16 r (two)s 15 r (strings)s 17 r (are)s 16 r (di\013erent)s f4 SF 869 r (*/)s 70 1259 p (/*)s f0 SF 16 r (\015ag)s 17 r (=)s 17 r (0)s 16 r (otherwise)s f4 SF 1123 r (*/)s 70 1299 p (ptr)s 17 r (=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr;)s 70 1339 p (while)s 17 r (\(*tbl)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 18 r ('\\0'\))s 105 1379 p ({)s 174 1419 p (c)s 18 r (=)s 17 r (*ptr;)s 174 1459 p (/*)s f0 SF 17 r (upp)s 1 r (er)s 16 r (case)s f4 SF 17 r (->)s f0 SF 17 r (low)s -1 r (er)s 15 r (case)s f4 SF 920 r (*/)s 174 1498 p (if)s 18 r (\(\(c)s 17 r (>=)s 18 r ('A'\))s 17 r (&&)s 18 r (\(c)s 17 r (<=)s 17 r ('Z'\)\))s 244 1538 p (c)s 18 r (+=)s 17 r (0x20;)s 174 1578 p (flag)s 18 r (=)s 17 r (c)s 18 r (-)s 17 r (*tbl)s 2 r 10 1 ru 16 r (ptr;)s 174 1618 p (if)s 18 r (\(flag)s 17 r (!=)s 18 r (0\))s 244 1658 p (break;)s 174 1698 p (ptr)s 18 r (=)s 17 r (inc)s 2 r 10 1 ru 16 r (buf)s 2 r 10 1 ru 15 r (ptr\(ptr\);)s 174 1737 p (++tbl)s 2 r 10 1 ru 16 r (ptr;)s 105 1777 p (})s 70 1817 p (/*)s f0 SF 16 r (if)s 11 r (the)s 11 r (next)s 12 r (character)s 10 r (is)s 11 r (either)s 11 r (an)s 11 r (alphab)s 1 r (et)s 11 r (or)s 11 r (a)s 11 r (num)s -1 r (ber,)s 11 r (then)s 11 r (returns)s 11 r (-1)s f4 SF 369 r (*/)s 70 1857 p (c)s 17 r (=)s 18 r (*ptr;)s 70 1897 p (if)s 17 r (\(\(c)s 18 r (>=)s 17 r ('0'\))s 17 r (&&)s 18 r (\(c)s 17 r (<=)s 18 r ('9'\)\))s 139 1937 p (return)s 18 r (\(-1\);)s 70 1977 p (if)s 17 r (\(\(c)s 18 r (>=)s 17 r ('A'\))s 17 r (&&)s 18 r (\(c)s 17 r (<=)s 18 r ('Z'\)\))s 139 2016 p (return)s 18 r (\(-1\);)s 70 2056 p (if)s 17 r (\(\(c)s 18 r (>=)s 17 r ('a'\))s 17 r (&&)s 18 r (\(c)s 17 r (<=)s 18 r ('z'\)\))s 139 2096 p (return)s 18 r (\(-1\);)s 70 2136 p (if)s 17 r (\(c)s 18 r (==)s 17 r (')s 2 r 10 1 ru 16 r ('\))s f0 SF 1251 2216 p (pas)s 2 r 10 1 ru 11 r (b)s 1 r (old.c)s 66 r (page)s 11 r (2)s EP pstopssaved restore %%Page: pstops 3 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f4 SF 105 33 p (return)s 17 r (\(-1\);)s 70 73 p (return)s 17 r (flag;)s 0 113 p (})s 0 232 p (/*)s 17 r 593 1 ru f0 SF 604 r (get)s 11 r (b)s 1 r (old)s 11 r (face)s 11 r (\015ag)s 11 r 593 1 ru f4 SF 609 r (*/)s 0 272 p (/*)s f0 SF 17 r (This)s 11 r (function)s 11 r (compares)s 11 r (a)s 11 r (string)s f4 SF 133 322 p (buf)s 2 r 10 1 ru 10 r (ptr)s f0 SF (=)s f5 SF (string)s f0 SF 0 372 p (with)s 14 r (key)s 12 r (words)s 13 r (stored)s 14 r (in)s f4 SF 13 r (PAS)s 3 r 10 1 ru 10 r (Table[])s f0 SF (.)s 23 r (If)s 13 r (there)s 14 r (exists)s 14 r (a)s 13 r (key)s 13 r (word)s 13 r (which)s 12 r (is)s 14 r (equal)s 14 r (to)s 13 r (given)s f5 SF 13 r (string)s f0 SF (,)s 15 r (then)s 13 r (it)s 0 412 p (returns)s 11 r (the)s 11 r (length)s 11 r (of)s f5 SF 11 r (string)s f0 SF (.)s f4 SF 1122 r (*/)s 0 491 p (int)s 17 r (get)s 3 r 10 1 ru 15 r (bf)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 531 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 571 p ({)s 70 611 p (char)s 17 r (**table,)s 18 r (*ptr;)s 70 651 p (int)s 17 r (i)s 18 r (=)s 17 r (0;)s 70 731 p (for)s 17 r (\(table)s 18 r (=)s 17 r (PAS)s 2 r 10 1 ru 16 r (Table;)s 17 r (**table)s 17 r (!=)s 18 r ('\\0';)s 17 r (++table\))s 105 770 p ({)s 139 810 p (if)s 18 r (\(compare)s 2 r 10 1 ru 15 r (word\(buf)s 2 r 10 1 ru 16 r (ptr,)s 17 r (*table\))s 18 r (==)s 17 r (0\))s 174 850 p ({)s 0 890 p (#ifdef)s 17 r (DEBUGGING)s 209 930 p (printf\("compare)s 2 r 10 1 ru 16 r (word\(\):)s 17 r ("\);)s 209 970 p (printf\("a)s 18 r (reserved)s 17 r (word)s 18 r (\\"%s\\")s 17 r (is)s 17 r (found)s 18 r (in)s 17 r (PAS)s 2 r 10 1 ru 16 r (table\\n",)s 17 r (*table\);)s 0 1010 p (#endif)s 209 1049 p (/*)s f0 SF 17 r (strlen\()s f4 SF (*)s f0 SF (table\))s f4 SF 1068 r (*/)s 209 1089 p (for)s 18 r (\(i=)s 17 r (0,)s 18 r (ptr)s 17 r (=)s 17 r (*table;)s 18 r (*ptr)s 17 r (!=)s 18 r ('\\0';)s 17 r (++i,)s 18 r (++ptr\);)s 209 1129 p (break;)s 174 1169 p (})s 105 1209 p (})s 70 1249 p (return)s 17 r (i;)s 0 1288 p (})s f0 SF 1251 2216 p (pas)s 2 r 10 1 ru 11 r (b)s 1 r (old.c)s 66 r (page)s 11 r (3)s EP pstopssaved restore %%Trailer %%Pages: 3 END %%EOF src2tex-2.12h.orig/popgen.red100644 1750 1750 4532 5733240455 16061 0ustar kawamurakawamura% {\bf popgen.red} % {\null % We shall solve the equation % $$ % \eqalign{ % {\partial u\over\partial t} % &=a(x){\partial^2 u\over\partial x^2} % +b(x){\partial u\over\partial x} % +c(x) u\cr % &={x(1-x)\over 2}{\partial^2 u\over\partial x^2} % +b(x){\partial u\over\partial x} % +c(x) u\cr % } % $$ % by using numerical-symbolic hybrid method established by K. Amano. % This equation plays an important role in population genetics. % } % coefficients procedure sqrt_a(x); sqrt(x*(1-x)/2); procedure b(x); 1/2-x; procedure c(x); 0; % domain % {\null % $$ % {\tt domain\_p(t,x)}=\cases{ % 1 &if $(t,x)$ belongs to the domain\cr % \cr % 0 &otherwise\cr % } % $$ % } procedure domain_p(t,x); begin; on rounded; if t < 0 or x < 0 or x > 1 then << off rounded; return 0 >> else << off rounded; return 1 >> end; % numerical-symbolic hybrid method % {\ Key idea depends on the following formula: % $$ % \eqalign{ % u(t,x) % &={1\over6}\,u\bigl(t,x+\sqrt{a(x)}\,h\bigr) % +{1\over6}\,u\bigl(t,x-\sqrt{a(x)}\,h\bigr)\cr % &+{1\over3}\,u\bigl(t,x+b(x)h^2\bigr) % +{1\over3}\,u(t-h^2,x) % +{h^2\over3}\,c(x)u(t,x) % +O(h^4)\ .\cr % } % $$ % } procedure hybrid_method(t, x, n); begin; list_in := {{1, t, x}}; list_tmp := {}; while n > 0 do << while length(list_in) > 0 do << tmp := first(list_in); q := first(tmp); s := first(rest(tmp)); y := first(rest(rest(tmp))); if domain_p(s, y) neq 0 then << list_tmp := cons({q/6, s, y+sqrt_a(y)*h}, list_tmp); list_tmp := cons({q/6, s, y-sqrt_a(y)*h}, list_tmp); list_tmp := cons({q/3, s, y+b(y)*h**2}, list_tmp); list_tmp := cons({q/3, s-h**2, y}, list_tmp); list_tmp := cons({h**2*c(y)/3, s, y}, list_tmp) >> else list_tmp := cons({q, s, y}, list_tmp); list_in := rest(list_in) >>; list_in := list_tmp; list_tmp := {}; n := n-1 >>; return list_in end; % main module h := 0.1; hybrid_method(4, 0.5, 2); end; % Here we give a numerical example. % $$ % \cases{ % \displaystyle{\partial u\over\partial t}={1\over4N} % {\partial^2\over\partial x^2}\big(x(1-x)u\big) % \qquad (0 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 122 /f0 NF f0 SF [ 24 23 -1 0 24.906] 65 D [ 24 23 -1 0 24.906] 72 D [ 24 23 -1 0 25.829] 75 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<0040040000C0060000E00E0000E00E0001E00F0001D01D0001D01D0001D01D0003901C800388388003883880070838400704 7040070470400E0470200E02E0200E02E0200E02E0201C03E0101C01C0101C01C0103C03C038FF0FF8FE> 32 23 -1 0 34.131] 87 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [<00FF80001C00001C00001C00001C00001C00079C00185C00303C00701C00601C00E01C00E01C00E01C00E01C00601C00701C 00303C001C6C00078400> 24 20 -1 6 17.526] 113 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<07FC00E000E000E000E000E0FFFCC0E040E020E030E010E008E004E004E002E001E001E000E000600060> 16 21 -1 0 16.604] 52 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<003000003000003000003000003000003000003000003000003000003000FFFFF8FFFFF80030000030000030000030000030 00003000003000003000003000003000> 24 22 -2 3 25.829] 43 D [<60F0F060> 8 4 -2 0 9.224] 46 D [<60F0F06000000000000060F0F060> 8 14 -2 0 9.224] 58 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D [ 32 23 0 0 27.673] 14 D [ 8 2 0 -6 11.069] 45 D 1.000 53 /f1 NF f1 SF [ 16 15 -1 0 13.237] 50 D [<1FC00300030003000300FFC0C3004300230013001B000B00070003000300> 16 15 -1 0 13.237] 52 D 1.000 121 /f2 NF f2 SF [ 32 23 -1 0 26.682] 78 D [<03F0000E1C001807003003807001C07000E0600070600070E0003870003870001C70001C70001C30001C38001C18001C1C00 1C0C001C0600180300180180300060E0001F80> 24 23 -1 0 25.330] 79 D [<1C7062C841C440C4C0C4C0C06060606060603060303018700C700390> 16 14 -1 0 17.553] 97 D [<1C00620041004180C0C0C0C06060606060606060306030603C40338018001800180018000C000C000C000C003E00> 16 23 -1 0 14.252] 98 D [<3E004180C040802080008000C000C000C000600060E030E018400780> 16 14 -2 0 14.371] 99 D [ 16 23 -2 0 19.133] 104 D [<1C003200310031003100300018001800180018000C000C000C00FF80060006000600060003000300> 16 20 -1 0 11.992] 116 D [<071C08F218711831183118300C180C180C188618460C460C260C1C04> 16 14 -1 0 19.010] 117 D [<78E0C510E708C30403040300018001800180418020C620C711A30F1E> 16 14 -1 0 18.979] 120 D [<3C004200C100810080808080C0C0C040C040604060C030C01980078007000C0018001800180008000C10061001E0> 16 23 -2 0 14.759] 14 D [<3E006100C080804080608030C030C018C0186018201C301C082C07CC000C00040004380C1C0C10080818043003C0> 16 23 -2 0 17.630] 64 D [<60F0F060> 8 4 -2 0 9.224] 58 D [<40402020101070F0F060> 8 10 -2 6 9.224] 59 D [<0000600001E0000780001E0000780000E0000380000F00003C0000F00000F000003C00000F000003800000E000007800001E 000007800001E0000060> 24 20 -3 2 25.829] 60 D 1.000 25 /f3 NF f3 SF [ 24 2 -3 -7 25.829] 0 D [ 24 27 -3 6 25.829] 20 D [<8007C0800FE0803FF0C07838E0F0187FC0083F80081F0008> 24 8 -2 -4 25.829] 24 D 1.000 113 /f4 NF f4 SF [<02040C08181830307070706060E0E0E0E0E0E0E0E0E0E0E0E0E0606070707030301818080C0402> 8 39 -5 38 15.220] 0 D [<80406020303018181C1C1C0C0C0E0E0E0E0E0E0E0E0E0E0E0E0E0C0C1C1C1C1818303020604080> 8 39 -2 38 15.220] 1 D [<0003000F001E0038007000E000E001C001C00380038003800380038003800380038003800380038003800380038003800380 0380038003800380038003800380038003800380038003800380038003800300070007000E000E001C0038007000E000E000 700038001C000E000E0007000700030003800380038003800380038003800380038003800380038003800380038003800380 0380038003800380038003800380038003800380038003800380038001C001C000E000E000700038001E000F0003> 16 98 -5 97 26.751] 40 D [ 16 30 -13 31 29.518] 56 D [<00C003C007800F001E001C003C003800780078007000F000F000F000F000F000F000F000F000F000F000F000F000F000F000 F000F000F000F000F000> 16 30 -13 29 29.518] 58 D [<01E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E003C003C003C007800780 0F000E001C0038007000E000E000700038001C000E000F000780078003C003C003C001E001E001E001E001E001E001E001E0 01E001E001E001E001E001E001E001E001E001E001E001E0> 16 62 -6 61 29.518] 60 D [ 8 12 -13 11 29.518] 62 D [<0060000000E0000000F0000000F0000001D8000001D80000038C0000038C00000706000007060000070300000E0300000E01 80001C0180001C00C0001C00C00038006000B8006000700030003000300000003000000018000000180000000C0000000C00 000006000000060000000300000003000000018000000180000000C0000000C0000000600000006000000030000000300000 0018000000180000000C00000004> 32 41 -4 39 33.208] 112 D 1.000 115 /f5 NF f5 SF [<07CFC01C3FC0380F00700F00700F00F00F00F00F00F00F00F00F00F00F00700F00700F00380F001C3F0007EF00000F00000F 00000F00000F00000F00000F00003F00003F00> 24 23 -1 0 21.216] 100 D [<07F01C18380C78067000F000F000FFFEF00EF00E700E700C381C1C3807E0> 16 15 -1 0 17.503] 101 D [<0FF0381C700EE007E007E007700F3FFE3FFC3FF0300020002FC0186030307038703870387038303718770FCE> 16 22 -1 7 19.095] 103 D [ 24 15 -1 0 21.216] 110 D [<07E01C38381C700E700EF00FF00FF00FF00FF00F700E700E381C1C3807E0> 16 15 -1 0 19.095] 111 D [ 24 21 -1 6 21.216] 112 D [ 16 15 -1 0 15.728] 114 D [<70F8F8F870> 8 5 -3 0 10.608] 46 D 1.000 126 /f6 NF f6 SF [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [<00FE00FE003800380038003800380FB81FF8387870786038E038E038E038E0386038707838781FF807B8> 16 21 -1 7 17.434] 113 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<18E03DF03DF035B035B035B037B037B03030703870387038FFFCFFFC> 16 14 -1 0 17.434] 119 D [ 16 14 -1 0 17.434] 120 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0FC03FE07070E038E01C401C001C001C0038007007E007E00070003000382038703870703FE00FC0> 16 20 -1 0 17.434] 51 D [<07FC07FC00E000E000E000E0FFFCFFFCE0E070E030E038E018E01CE00CE006E006E002E003E001E0> 16 20 -1 0 17.434] 52 D [<1F003F8071C0E0E0E070E07040700070006060E07FC07F007000700070007000700070007FE07FE0> 16 20 -2 0 17.434] 53 D [<07C01FE038707038701C601CE01CE01CE01CF038F870EFE0E7C070007000303838381E3807F003E0> 16 20 -1 0 17.434] 54 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<60F0F06000000000000060F0F060> 8 14 -6 0 17.434] 58 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f6 SF 0 33 p (%)s f5 SF 17 r (p)s 1 r (opgen.red)s f6 SF 0 73 p (%)s f0 SF 17 r (W)s -2 r (e)s 10 r (shall)s 11 r (solve)s 10 r (the)s 11 r (equation)s f2 SF 511 112 p (@)s 2 r (u)s 511 126 p 38 1 ru 515 157 p (@)s 1 r (t)s f0 SF 563 134 p (=)s f2 SF 9 r (a)s f0 SF (\()s f2 SF (x)s f0 SF (\))s f2 SF 664 112 p (@)s f1 SF 684 99 p (2)s f2 SF 698 112 p (u)s 664 126 p 53 1 ru 664 157 p (@)s 2 r (x)s f1 SF 703 147 p (2)s f0 SF 729 134 p (+)s f2 SF 7 r (b)s f0 SF (\()s f2 SF (x)s f0 SF (\))s f2 SF 825 112 p (@)s 2 r (u)s 825 126 p 38 1 ru 825 157 p (@)s 2 r (x)s f0 SF 875 134 p (+)s f2 SF 7 r (c)s f0 SF (\()s f2 SF (x)s f0 SF (\))s f2 SF (u)s f0 SF 563 220 p (=)s f2 SF 602 197 p (x)s f0 SF (\(1)s f3 SF 7 r (\000)s f2 SF 8 r (x)s f0 SF (\))s 602 212 p 121 1 ru 654 242 p (2)s f2 SF 731 197 p (@)s f1 SF 750 185 p (2)s f2 SF 765 197 p (u)s 731 212 p 53 1 ru 731 242 p (@)s 2 r (x)s f1 SF 769 233 p (2)s f0 SF 795 220 p (+)s f2 SF 8 r (b)s f0 SF (\()s f2 SF (x)s f0 SF (\))s f2 SF 892 197 p (@)s 2 r (u)s 892 212 p 38 1 ru 892 242 p (@)s 2 r (x)s f0 SF 942 220 p (+)s f2 SF 7 r (c)s f0 SF (\()s f2 SF (x)s f0 SF (\))s f2 SF (u)s f0 SF 0 293 p (by)s 12 r (using)s 13 r (numerical-symbolic)s 13 r (hybrid)s 12 r (metho)s 1 r (d)s 13 r (established)s 13 r (by)s 13 r (K.)s 13 r (Amano.)s 21 r (This)s 13 r (equation)s 13 r (plays)s 13 r (an)s 13 r (imp)s 1 r (ortant)s 0 333 p (role)s 11 r (in)s 11 r (p)s 1 r (opulation)s 11 r (genetics.)s f6 SF 0 414 p (%)s f0 SF 17 r (co)s 1 r (e\016cients)s f6 SF 0 454 p (p)s -15 r (p)s -1 r (r)s -16 r (r)s -2 r (o)s -16 r (o)s -1 r (c)s -16 r (c)s -2 r (e)s -15 r (e)s -2 r (d)s -16 r (d)s -2 r (u)s -16 r (u)s -1 r (r)s -16 r (r)s -1 r (e)s -16 r (e)s 15 r (sqrt)s 2 r 10 1 ru 15 r (a\(x\);)s 52 494 p (sqrt\(x*\(1-x\)/2\);)s 0 534 p (p)s -15 r (p)s -1 r (r)s -16 r (r)s -2 r (o)s -16 r (o)s -1 r (c)s -16 r (c)s -2 r (e)s -15 r (e)s -2 r (d)s -16 r (d)s -2 r (u)s -16 r (u)s -1 r (r)s -16 r (r)s -1 r (e)s -16 r (e)s 15 r (b\(x\);)s 52 575 p (1/2-x;)s 0 615 p (p)s -15 r (p)s -1 r (r)s -16 r (r)s -2 r (o)s -16 r (o)s -1 r (c)s -16 r (c)s -2 r (e)s -15 r (e)s -2 r (d)s -16 r (d)s -2 r (u)s -16 r (u)s -1 r (r)s -16 r (r)s -1 r (e)s -16 r (e)s 15 r (c\(x\);)s 52 655 p (0;)s 0 736 p (%)s f0 SF 17 r (domain)s f6 SF 0 776 p (%)s 391 844 p (domain)s 2 r 10 1 ru 11 r (p)s f0 SF (\()s f6 SF (t)s f2 SF (;)s f6 SF 5 r (x)s f0 SF (\))s 10 r (=)s f4 SF 646 787 p (\()s f0 SF 678 808 p (1)s 33 r (if)s 11 r (\()s f2 SF (t;)s 6 r (x)s f0 SF (\))s 11 r (b)s 1 r (elongs)s 11 r (to)s 11 r (the)s 11 r (domain)s 678 888 p (0)s 33 r (otherwise)s f6 SF 0 939 p (p)s -15 r (p)s -1 r (r)s -16 r (r)s -2 r (o)s -16 r (o)s -1 r (c)s -16 r (c)s -2 r (e)s -15 r (e)s -2 r (d)s -16 r (d)s -2 r (u)s -16 r (u)s -1 r (r)s -16 r (r)s -1 r (e)s -16 r (e)s 15 r (domain)s 2 r 10 1 ru 15 r (p\(t,x\);)s 0 979 p (b)s -15 r (b)s -1 r (e)s -16 r (e)s -2 r (g)s -16 r (g)s -1 r (i)s -16 r (i)s -2 r (n)s -16 r (n)s -1 r (;)s 52 1020 p (on)s 18 r (rounded;)s 52 1060 p (i)s -15 r (i)s -1 r (f)s -16 r (f)s 15 r (t)s 17 r (<)s 18 r (0)s 17 r (o)s -15 r (o)s -1 r (r)s -16 r (r)s 15 r (x)s 17 r (<)s 18 r (0)s 17 r (o)s -15 r (o)s -1 r (r)s -16 r (r)s 15 r (x)s 17 r (>)s 17 r (1)s 18 r (t)s -15 r (t)s -2 r (h)s -15 r (h)s -2 r (e)s -15 r (e)s -2 r (n)s -16 r (n)s 52 1100 p (<<)s 105 1140 p (off)s 17 r (rounded;)s 105 1181 p (r)s -15 r (r)s -2 r (e)s -15 r (e)s -2 r (t)s -16 r (t)s -2 r (u)s -16 r (u)s -1 r (r)s -16 r (r)s -2 r (n)s -16 r (n)s 15 r (0)s 52 1221 p (>>)s 52 1261 p (e)s -14 r (e)s -2 r (l)s -16 r (l)s -2 r (s)s -15 r (s)s -2 r (e)s -16 r (e)s 52 1301 p (<<)s 105 1342 p (off)s 17 r (rounded;)s 105 1382 p (r)s -15 r (r)s -2 r (e)s -15 r (e)s -2 r (t)s -16 r (t)s -2 r (u)s -16 r (u)s -1 r (r)s -16 r (r)s -2 r (n)s -16 r (n)s 15 r (1)s 52 1422 p (>>)s 0 1462 p (e)s -15 r (e)s -1 r (n)s -16 r (n)s -2 r (d)s -16 r (d)s -1 r (;)s 0 1543 p (%)s f0 SF 17 r (numerical)s f6 SF (-)s f0 SF (sym)s -1 r (bolic)s 16 r (hybrid)s 16 r (metho)s 1 r (d)s f6 SF 0 1583 p (%)s f0 SF 17 r (Key)s 11 r (idea)s 11 r (dep)s 1 r (ends)s 11 r (on)s 11 r (the)s 11 r (following)s 10 r (formula:)s f2 SF 275 1678 p (u)s f0 SF (\()s f2 SF (t;)s 5 r (x)s f0 SF (\))s 9 r (=)s 413 1655 p (1)s 413 1670 p 17 1 ru 413 1701 p (6)s f2 SF 440 1678 p (u)s f4 SF 459 1651 p (\000)s f2 SF 474 1678 p (t;)s 5 r (x)s f0 SF 8 r (+)s f4 SF 560 1648 p (p)s 62 1 ru f2 SF 593 1678 p (a)s f0 SF (\()s f2 SF (x)s f0 SF (\))s f2 SF 6 r (h)s f4 SF 680 1651 p (\001)s f0 SF 703 1678 p (+)s 740 1655 p (1)s 740 1670 p 17 1 ru 740 1701 p (6)s f2 SF 766 1678 p (u)s f4 SF 785 1651 p (\000)s f2 SF 800 1678 p (t;)s 6 r (x)s f3 SF 7 r (\000)s f4 SF 887 1648 p (p)s 62 1 ru f2 SF 920 1678 p (a)s f0 SF (\()s f2 SF (x)s f0 SF (\))s f2 SF 5 r (h)s f4 SF 1007 1651 p (\001)s f0 SF 372 1763 p (+)s 410 1741 p (1)s 410 1756 p 17 1 ru 410 1786 p (3)s f2 SF 436 1763 p (u)s f4 SF 455 1737 p (\000)s f2 SF 470 1763 p (t;)s 6 r (x)s f0 SF 7 r (+)s f2 SF 7 r (b)s f0 SF (\()s f2 SF (x)s f0 SF (\))s f2 SF (h)s f1 SF 635 1750 p (2)s f4 SF 649 1737 p (\001)s f0 SF 672 1763 p (+)s 709 1741 p (1)s 709 1756 p 17 1 ru 709 1786 p (3)s f2 SF 735 1763 p (u)s f0 SF (\()s f2 SF (t)s f3 SF 8 r (\000)s f2 SF 7 r (h)s f1 SF 839 1750 p (2)s f2 SF 854 1763 p (;)s 5 r (x)s f0 SF (\))s 8 r (+)s f2 SF 945 1741 p (h)s f1 SF 964 1729 p (2)s 945 1756 p 34 1 ru f0 SF 954 1786 p (3)s f2 SF 989 1763 p (c)s f0 SF (\()s f2 SF (x)s f0 SF (\))s f2 SF (u)s f0 SF (\()s f2 SF (t;)s 5 r (x)s f0 SF (\))s 8 r (+)s f2 SF 7 r (O)s f0 SF 1 r (\()s f2 SF (h)s f1 SF 1237 1750 p (4)s f0 SF 1252 1763 p (\))s f2 SF 11 r (:)s f6 SF 0 1854 p (p)s -15 r (p)s -1 r (r)s -16 r (r)s -2 r (o)s -16 r (o)s -1 r (c)s -16 r (c)s -2 r (e)s -15 r (e)s -2 r (d)s -16 r (d)s -2 r (u)s -16 r (u)s -1 r (r)s -16 r (r)s -1 r (e)s -16 r (e)s 15 r (hybrid)s 2 r 10 1 ru 15 r (method\(t,)s 17 r (x,)s 18 r (n\);)s 0 1894 p (b)s -15 r (b)s -1 r (e)s -16 r (e)s -2 r (g)s -16 r (g)s -1 r (i)s -16 r (i)s -2 r (n)s -16 r (n)s -1 r (;)s 52 1935 p (list)s 2 r 10 1 ru 16 r (in)s 17 r (:=)s 18 r ({{1,)s 17 r (t,)s 18 r (x}};)s 52 1975 p (list)s 2 r 10 1 ru 16 r (tmp)s 17 r (:=)s 18 r ({};)s 52 2015 p (w)s -15 r (w)s -1 r (h)s -16 r (h)s -2 r (i)s -15 r (i)s -2 r (l)s -16 r (l)s -1 r (e)s -16 r (e)s 15 r (n)s 17 r (>)s 17 r (0)s 18 r (d)s -15 r (d)s -2 r (o)s -15 r (o)s 52 2055 p (<<)s 105 2096 p (w)s -15 r (w)s -2 r (h)s -16 r (h)s -1 r (i)s -16 r (i)s -2 r (l)s -16 r (l)s -1 r (e)s -16 r (e)s 15 r (length\(list)s 2 r 10 1 ru 15 r (in\))s 18 r (>)s 17 r (0)s 18 r (d)s -15 r (d)s -2 r (o)s -16 r (o)s 105 2136 p (<<)s f0 SF 1240 2216 p (p)s 1 r (opgen.red)s 66 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f6 SF 157 33 p (tmp)s 17 r (:=)s 18 r (first\(list)s 2 r 10 1 ru 15 r (in\);)s 157 73 p (q)s 17 r (:=)s 18 r (first\(tmp\);)s 157 113 p (s)s 17 r (:=)s 18 r (first\(rest\(tmp\)\);)s 157 153 p (y)s 17 r (:=)s 18 r (first\(rest\(rest\(tmp\)\)\);)s 157 193 p (i)s -15 r (i)s -2 r (f)s -15 r (f)s 14 r (domain)s 3 r 10 1 ru 15 r (p\(s,)s 17 r (y\))s 18 r (neq)s 17 r (0)s 18 r (t)s -15 r (t)s -2 r (h)s -16 r (h)s -1 r (e)s -16 r (e)s -2 r (n)s -16 r (n)s 157 232 p (<<)s 209 272 p (list)s 2 r 10 1 ru 16 r (tmp)s 17 r (:=)s 18 r (cons\({q/6,)s 17 r (s,)s 17 r (y+sqrt)s 3 r 10 1 ru 15 r (a\(y\)*h},)s 17 r (list)s 2 r 10 1 ru 16 r (tmp\);)s 209 312 p (list)s 2 r 10 1 ru 16 r (tmp)s 17 r (:=)s 18 r (cons\({q/6,)s 17 r (s,)s 17 r (y-sqrt)s 3 r 10 1 ru 15 r (a\(y\)*h},)s 17 r (list)s 2 r 10 1 ru 16 r (tmp\);)s 209 352 p (list)s 2 r 10 1 ru 16 r (tmp)s 17 r (:=)s 18 r (cons\({q/3,)s 17 r (s,)s 17 r (y+b\(y\)*h**2},)s 18 r (list)s 2 r 10 1 ru 15 r (tmp\);)s 209 392 p (list)s 2 r 10 1 ru 16 r (tmp)s 17 r (:=)s 18 r (cons\({q/3,)s 17 r (s-h**2,)s 17 r (y},)s 18 r (list)s 2 r 10 1 ru 15 r (tmp\);)s 209 432 p (list)s 2 r 10 1 ru 16 r (tmp)s 17 r (:=)s 18 r (cons\({h**2*c\(y\)/3,)s 17 r (s,)s 17 r (y},)s 18 r (list)s 2 r 10 1 ru 15 r (tmp\))s 157 472 p (>>)s 157 511 p (e)s -15 r (e)s -2 r (l)s -15 r (l)s -2 r (s)s -16 r (s)s -1 r (e)s -16 r (e)s 209 551 p (list)s 2 r 10 1 ru 16 r (tmp)s 17 r (:=)s 18 r (cons\({q,)s 17 r (s,)s 17 r (y},)s 18 r (list)s 2 r 10 1 ru 15 r (tmp\);)s 157 591 p (list)s 2 r 10 1 ru 15 r (in)s 18 r (:=)s 17 r (rest\(list)s 2 r 10 1 ru 16 r (in\))s 105 631 p (>>;)s 105 671 p (list)s 2 r 10 1 ru 15 r (in)s 18 r (:=)s 17 r (list)s 2 r 10 1 ru 15 r (tmp;)s 105 711 p (list)s 2 r 10 1 ru 15 r (tmp)s 18 r (:=)s 17 r ({};)s 105 751 p (n)s 17 r (:=)s 17 r (n-1)s 52 790 p (>>;)s 52 830 p (r)s -15 r (r)s -1 r (e)s -16 r (e)s -2 r (t)s -15 r (t)s -2 r (u)s -16 r (u)s -1 r (r)s -16 r (r)s -2 r (n)s -16 r (n)s 15 r (list)s 2 r 10 1 ru 16 r (in)s 0 870 p (e)s -15 r (e)s -1 r (n)s -16 r (n)s -2 r (d)s -16 r (d)s -1 r (;)s 0 950 p (%)s f0 SF 17 r (main)s 16 r (mo)s 1 r (dule)s f6 SF 0 990 p (h)s 17 r (:=)s 18 r (0.1;)s 0 1029 p (hybrid)s 2 r 10 1 ru 15 r (method\(4,)s 18 r (0.5,)s 17 r (2\);)s 0 1109 p (e)s -15 r (e)s -1 r (n)s -16 r (n)s -2 r (d)s -16 r (d)s -1 r (;)s 0 1189 p (%)s f0 SF 17 r (Here)s 16 r (we)s 16 r (give)s 16 r (a)s 16 r (numerical)s 16 r (example.)s f6 SF 0 1229 p (%)s f4 SF 361 1235 p (8)s 361 1265 p (>)s 361 1275 p (<)s 361 1334 p (>)s 361 1344 p (:)s f2 SF 400 1263 p (@)s 2 r (u)s 400 1278 p 38 1 ru 404 1308 p (@)s 2 r (t)s f0 SF 452 1285 p (=)s 506 1263 p (1)s 491 1278 p 47 1 ru 491 1308 p (4)s f2 SF (N)s 555 1263 p (@)s f1 SF 575 1251 p (2)s 546 1278 p 53 1 ru f2 SF 546 1308 p (@)s 2 r (x)s f1 SF 584 1298 p (2)s f4 SF 603 1258 p (\000)s f2 SF 618 1285 p (x)s f0 SF (\(1)s f3 SF 8 r (\000)s f2 SF 7 r (x)s f0 SF (\))s f2 SF (u)s f4 SF 758 1258 p (\001)s f0 SF 840 1285 p (\(0)s f2 SF 9 r (<)s 10 r (t)s f3 SF 9 r (\024)s f0 SF 9 r (4)s f2 SF (N)s 2 r (;)s f0 SF 16 r (0)s f2 SF 10 r (<)s 9 r (x)s 9 r (<)s f0 SF 9 r (1\))s f2 SF 396 1365 p (u)s f0 SF (\(0)s f2 SF (;)s 6 r (x)s f0 SF (\))s f3 SF 9 r (\030)s f2 SF 9 r (\016)s f0 SF 2 r (\()s f2 SF (x)s f3 SF 7 r (\000)s f0 SF 7 r (0)s f2 SF (:)s f0 SF (5\))s f6 SF 0 1441 p (%)s 17 r 1.000 @beginspecial @epsf 0.700000 @hscale 0.700000 @vscale 0.000000 0.000000 559.000000 326.000000 @bbox @setspecial %%BeginDocument: solution.eps %! %%Title: /tmp/xfig-export003985 %%Creator: fig2dev %%CreationDate: Thu Sep 29 08:09:05 1994 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 559 326 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -9 9 translate 0.0 326.0 translate 0.900 -0.900 scale 0.000 setlinewidth % Polyline n 317 89 m 562 230 l 317 372 l 72 230 l gs 0.30 setgray fill gr 1.000 setlinewidth % Polyline n 317 89 m 586 245 l gs col-1 s gr n 574.166 233.513 m 586.000 245.000 l 570.152 240.434 l gs 2 setlinejoin col-1 s gr % Polyline n 317 89 m 317 44 l gs col-1 s gr n 313.000 60.000 m 317.000 44.000 l 321.000 60.000 l gs 2 setlinejoin col-1 s gr % Polyline n 317 89 m 48 245 l gs col-1 s gr n 63.848 240.434 m 48.000 245.000 l 59.834 233.513 l gs 2 setlinejoin col-1 s gr 0.000 setlinewidth % Polyline n 286 107 m 286 105 l 271 108 l 271 116 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 286 105 m 271 108 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 271 116 m 271 108 l 256 105 l 256 124 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 271 108 m 256 105 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 256 124 m 256 105 l 240 92 l 240 133 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 256 105 m 240 92 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 240 133 m 240 92 l 225 68 l 225 142 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 240 92 m 225 68 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 225 142 m 225 68 l 210 38 l 210 151 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 225 68 m 210 38 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 210 151 m 210 38 l 195 31 l 195 160 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 210 38 m 195 31 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 195 160 m 195 31 l 179 55 l 179 169 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 195 31 m 179 55 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 179 169 m 179 55 l 164 103 l 164 177 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 179 55 m 164 103 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 164 177 m 164 103 l 149 145 l 149 186 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 164 103 m 149 145 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 149 186 m 149 145 l 133 176 l 133 195 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 149 145 m 133 176 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 133 195 m 133 176 l 118 196 l 118 204 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 133 176 m 118 196 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 118 204 m 118 196 l 103 211 l 103 213 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 118 196 m 103 211 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 103 213 m 103 211 l 87 221 l 87 222 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 103 211 m 87 221 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 87 222 m 87 221 l 72 230 l 72 230 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 87 221 m 72 230 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 72 230 m 72 230 l 72 230 l 72 230 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 72 230 m 72 230 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 358 113 m 358 112 l 343 119 l 343 121 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 358 112 m 343 119 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 343 121 m 343 119 l 327 123 l 327 130 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 343 119 m 327 123 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 327 130 m 327 123 l 312 122 l 312 139 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 327 123 m 312 122 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 312 139 m 312 122 l 297 115 l 297 148 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 312 122 m 297 115 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 297 148 m 297 115 l 281 104 l 281 157 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 297 115 m 281 104 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 281 157 m 281 104 l 266 92 l 266 166 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 281 104 m 266 92 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 266 166 m 266 92 l 251 82 l 251 174 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 266 92 m 251 82 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 251 174 m 251 82 l 235 84 l 235 183 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 251 82 m 235 84 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 235 183 m 235 84 l 220 100 l 220 192 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 235 84 m 220 100 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 220 192 m 220 100 l 205 127 l 205 201 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 220 100 m 205 127 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 205 201 m 205 127 l 189 157 l 189 210 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 205 127 m 189 157 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 189 210 m 189 157 l 174 186 l 174 219 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 189 157 m 174 186 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 174 219 m 174 186 l 159 210 l 159 227 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 174 186 m 159 210 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 159 227 m 159 210 l 143 229 l 143 236 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 159 210 m 143 229 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 143 236 m 143 229 l 128 243 l 128 245 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 143 229 m 128 243 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 128 245 m 128 243 l 113 254 l 113 254 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 128 243 m 113 254 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 113 254 m 113 254 l 113 254 l 113 254 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 113 254 m 113 254 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 399 136 m 399 124 l 383 126 l 383 145 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 399 124 m 383 126 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 383 145 m 383 126 l 368 126 l 368 154 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 383 126 m 368 126 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 368 154 m 368 126 l 353 125 l 353 163 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 368 126 m 353 125 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 353 163 m 353 125 l 337 125 l 337 171 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 353 125 m 337 125 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 337 171 m 337 125 l 322 126 l 322 180 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 337 125 m 322 126 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 322 180 m 322 126 l 307 129 l 307 189 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 322 126 m 307 129 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 307 189 m 307 129 l 291 134 l 291 198 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 307 129 m 291 134 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 291 198 m 291 134 l 276 141 l 276 207 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 291 134 m 276 141 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 276 207 m 276 141 l 261 152 l 261 216 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 276 141 m 261 152 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 261 216 m 261 152 l 246 164 l 246 225 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 261 152 m 246 164 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 246 225 m 246 164 l 230 179 l 230 233 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 246 164 m 230 179 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 230 233 m 230 179 l 215 196 l 215 242 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 230 179 m 215 196 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 215 242 m 215 196 l 200 214 l 200 251 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 215 196 m 200 214 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 200 251 m 200 214 l 184 232 l 184 260 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 200 214 m 184 232 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 184 260 m 184 232 l 169 249 l 169 269 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 184 232 m 169 249 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 169 269 m 169 249 l 154 266 l 154 278 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 169 249 m 154 266 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 154 278 m 154 266 l 154 278 l 154 278 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 154 266 m 154 278 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 439 160 m 439 131 l 424 137 l 424 169 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 439 131 m 424 137 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 424 169 m 424 137 l 409 143 l 409 177 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 424 137 m 409 143 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 409 177 m 409 143 l 394 149 l 394 186 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 409 143 m 394 149 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 394 186 m 394 149 l 378 156 l 378 195 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 394 149 m 378 156 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 378 195 m 378 156 l 363 163 l 363 204 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 378 156 m 363 163 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 363 204 m 363 163 l 348 171 l 348 213 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 363 163 m 348 171 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 348 213 m 348 171 l 332 179 l 332 222 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 348 171 m 332 179 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 332 222 m 332 179 l 317 187 l 317 230 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 332 179 m 317 187 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 317 230 m 317 187 l 302 196 l 302 239 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 317 187 m 302 196 l gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 317 89 m 302 97 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 302 98 m 302 97 l 286 105 l 286 107 l gs 0.50 setgray fill gr % Polyline n 286 248 m 286 206 l 271 216 l 271 257 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 286 206 m 271 216 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 271 257 m 271 216 l 256 227 l 256 266 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 271 216 m 256 227 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 256 266 m 256 227 l 240 238 l 240 275 l gs 0.70 setgray fill gr % Polyline n 302 239 m 302 196 l 286 206 l 286 248 l gs 0.70 setgray fill gr % Polyline n 240 275 m 240 238 l 225 249 l 225 283 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 240 238 m 225 249 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 225 283 m 225 249 l 210 261 l 210 292 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 225 249 m 210 261 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 210 292 m 210 261 l 195 273 l 195 301 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 210 261 m 195 273 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 195 301 m 195 273 l 195 301 l 195 301 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 195 273 m 195 301 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 480 183 m 480 160 l 465 168 l 465 192 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 480 160 m 465 168 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 465 192 m 465 168 l 450 177 l 450 201 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 465 168 m 450 177 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 450 201 m 450 177 l 434 186 l 434 210 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 450 177 m 434 186 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 434 210 m 434 186 l 419 194 l 419 219 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 434 186 m 419 194 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 419 219 m 419 194 l 404 203 l 404 227 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 419 194 m 404 203 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 404 227 m 404 203 l 388 212 l 388 236 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 404 203 m 388 212 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 388 236 m 388 212 l 373 221 l 373 245 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 388 212 m 373 221 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 373 245 m 373 221 l 358 230 l 358 254 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 373 221 m 358 230 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 358 254 m 358 230 l 343 238 l 343 263 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 358 230 m 343 238 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 343 263 m 343 238 l 327 247 l 327 272 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 343 238 m 327 247 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 327 272 m 327 247 l 312 256 l 312 281 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 327 247 m 312 256 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 312 281 m 312 256 l 297 265 l 297 289 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 312 256 m 297 265 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 297 289 m 297 265 l 281 274 l 281 298 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 297 265 m 281 274 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 281 298 m 281 274 l 266 283 l 266 307 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 281 274 m 266 283 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 266 307 m 266 283 l 251 292 l 251 316 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 266 283 m 251 292 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 251 316 m 251 292 l 235 301 l 235 325 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 251 292 m 235 301 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 235 325 m 235 301 l 235 325 l 235 325 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 235 301 m 235 325 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 521 207 m 521 192 l 506 201 l 506 216 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 521 192 m 506 201 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 506 216 m 506 201 l 491 210 l 491 225 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 506 201 m 491 210 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 491 225 m 491 210 l 475 219 l 475 233 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 491 210 m 475 219 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 475 233 m 475 219 l 460 227 l 460 242 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 475 219 m 460 227 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 460 242 m 460 227 l 445 236 l 445 251 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 460 227 m 445 236 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 445 251 m 445 236 l 429 245 l 429 260 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 445 236 m 429 245 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 429 260 m 429 245 l 414 254 l 414 269 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 429 245 m 414 254 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 414 269 m 414 254 l 399 263 l 399 278 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 414 254 m 399 263 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 399 278 m 399 263 l 383 272 l 383 286 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 399 263 m 383 272 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 383 286 m 383 272 l 368 281 l 368 295 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 383 272 m 368 281 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 368 295 m 368 281 l 353 289 l 353 304 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 368 281 m 353 289 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 353 304 m 353 289 l 337 298 l 337 313 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 353 289 m 337 298 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 337 313 m 337 298 l 322 307 l 322 322 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 337 298 m 322 307 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 322 322 m 322 307 l 307 316 l 307 331 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 322 307 m 307 316 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 307 331 m 307 316 l 291 325 l 291 339 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 307 316 m 291 325 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 291 339 m 291 325 l 276 334 l 276 348 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 291 325 m 276 334 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 276 348 m 276 334 l 276 348 l 276 348 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 276 334 m 276 348 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 562 230 m 562 222 l 547 230 l 547 239 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 562 222 m 547 230 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 547 239 m 547 230 l 531 239 l 531 248 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 547 230 m 531 239 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 531 248 m 531 239 l 516 248 l 516 257 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 531 239 m 516 248 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 516 257 m 516 248 l 501 257 l 501 266 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 516 248 m 501 257 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 501 266 m 501 257 l 485 266 l 485 275 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 501 257 m 485 266 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 485 275 m 485 266 l 470 275 l 470 283 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 485 266 m 470 275 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 470 283 m 470 275 l 455 283 l 455 292 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 470 275 m 455 283 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 455 292 m 455 283 l 439 292 l 439 301 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 455 283 m 439 292 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 439 301 m 439 292 l 424 301 l 424 310 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 439 292 m 424 301 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 424 310 m 424 301 l 409 310 l 409 319 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 424 301 m 409 310 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 409 319 m 409 310 l 394 319 l 394 328 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 409 310 m 394 319 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 394 328 m 394 319 l 378 328 l 378 336 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 394 319 m 378 328 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 378 336 m 378 328 l 363 336 l 363 345 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 378 328 m 363 336 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 363 345 m 363 336 l 348 345 l 348 354 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 363 336 m 348 345 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 348 354 m 348 345 l 332 354 l 332 363 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 348 345 m 332 354 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 332 363 m 332 354 l 317 363 l 317 372 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 332 354 m 317 363 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 317 372 m 317 363 l 317 372 l 317 372 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 317 363 m 317 372 l gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 317 372 m 562 230 l gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 302 97 m 286 105 l gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 302 196 m 286 206 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 317 89 m 317 89 l 302 97 l 302 98 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 256 227 m 240 238 l gs 0.70 setgray fill gr gs col-1 s gr /Helvetica findfont 12.00 scalefont setfont 325 46 m gs 1 -1 scale (1) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 211 28 m gs 1 -1 scale (t=0.1) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 487 157 m gs 1 -1 scale (t=2) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 532 190 m gs 1 -1 scale (t=3) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 265 79 m gs 1 -1 scale (t=0.2) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 397 118 m gs 1 -1 scale (t=0.5) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 445 127 m gs 1 -1 scale (t=1) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 574 220 m gs 1 -1 scale (t=4) col-1 show gr /Times-BoldItalic findfont 30.00 scalefont setfont 310 25 m gs 1 -1 scale (u) col-1 show gr /Times-BoldItalic findfont 30.00 scalefont setfont 10 262 m gs 1 -1 scale ( x) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 70 220 m gs 1 -1 scale (1) col-1 show gr /Times-BoldItalic findfont 30.00 scalefont setfont 598 262 m gs 1 -1 scale (Nt) col-1 show gr $F2psEnd %%EndDocument @endspecial f0 SF 1240 2216 p (p)s 1 r (opgen.red)s 66 r (page)s 11 r (2)s EP pstopssaved restore %%Trailer %%Pages: 2 END %%EOF src2tex-2.12h.orig/prob1.eps100644 1750 1750 66047 5553626721 15666 0ustar kawamurakawamura%! %%Title: /tmp/xfig-export000453 %%Creator: fig2dev %%CreationDate: Sun Oct 17 11:26:56 1993 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 436 467 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -59 62 translate 0.0 467.0 translate 0.900 -0.900 scale 0.500 setlinewidth % Polyline n 227 204 m 220 210 l 236 213 l 242 206 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 242 206 m 236 213 l 251 216 l 258 209 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 258 209 m 251 216 l 267 219 l 274 212 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 274 212 m 267 219 l 283 222 l 290 215 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 290 215 m 283 222 l 299 222 l 306 218 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 306 218 m 299 222 l 315 222 l 322 221 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 322 221 m 315 222 l 331 223 l 338 224 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 338 224 m 331 223 l 347 226 l 353 227 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 353 227 m 347 226 l 363 229 l 369 230 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 369 230 m 363 229 l 379 234 l 385 233 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 385 233 m 379 234 l 395 239 l 401 235 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 401 235 m 395 239 l 410 245 l 417 238 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 417 238 m 410 245 l 426 248 l 433 241 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 433 241 m 426 248 l 442 251 l 449 244 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 449 244 m 442 251 l 458 254 l 465 247 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 465 247 m 458 254 l 474 257 l 481 250 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 220 210 m 213 217 l 229 220 l 236 213 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 236 213 m 229 220 l 245 223 l 251 216 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 251 216 m 245 223 l 261 224 l 267 219 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 267 219 m 261 224 l 277 223 l 283 222 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 283 222 m 277 223 l 293 222 l 299 222 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 299 222 m 293 222 l 308 221 l 315 222 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 315 222 m 308 221 l 324 223 l 331 223 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 331 223 m 324 223 l 340 225 l 347 226 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 347 226 m 340 225 l 356 228 l 363 229 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 363 229 m 356 228 l 372 233 l 379 234 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 379 234 m 372 233 l 388 239 l 395 239 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 395 239 m 388 239 l 404 246 l 410 245 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 410 245 m 404 246 l 419 253 l 426 248 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 426 248 m 419 253 l 435 258 l 442 251 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 442 251 m 435 258 l 451 260 l 458 254 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 458 254 m 451 260 l 467 263 l 474 257 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 213 217 m 206 224 l 222 227 l 229 220 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 229 220 m 222 227 l 238 228 l 245 223 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 245 223 m 238 228 l 254 226 l 261 224 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 261 224 m 254 226 l 270 223 l 277 223 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 277 223 m 270 223 l 286 222 l 293 222 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 293 222 m 286 222 l 302 221 l 308 221 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 308 221 m 302 221 l 317 223 l 324 223 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 324 223 m 317 223 l 333 225 l 340 225 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 340 225 m 333 225 l 349 229 l 356 228 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 356 228 m 349 229 l 365 233 l 372 233 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 372 233 m 365 233 l 381 239 l 388 239 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 388 239 m 381 239 l 397 246 l 404 246 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 404 246 m 397 246 l 413 254 l 419 253 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 419 253 m 413 254 l 429 263 l 435 258 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 435 258 m 429 263 l 445 267 l 451 260 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 451 260 m 445 267 l 461 270 l 467 263 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 206 224 m 200 231 l 216 234 l 222 227 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 222 227 m 216 234 l 232 231 l 238 228 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 238 228 m 232 231 l 248 227 l 254 226 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 254 226 m 248 227 l 263 224 l 270 223 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 270 223 m 263 224 l 279 223 l 286 222 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 286 222 m 279 223 l 295 224 l 302 221 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 302 221 m 295 224 l 311 224 l 317 223 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 317 223 m 311 224 l 327 227 l 333 225 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 333 225 m 327 227 l 343 230 l 349 229 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 349 229 m 343 230 l 359 235 l 365 233 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 365 233 m 359 235 l 374 240 l 381 239 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 381 239 m 374 240 l 390 247 l 397 246 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 397 246 m 390 247 l 406 256 l 413 254 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 413 254 m 406 256 l 422 265 l 429 263 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 429 263 m 422 265 l 438 274 l 445 267 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 445 267 m 438 274 l 454 277 l 461 270 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 200 231 m 193 238 l 209 238 l 216 234 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 216 234 m 209 238 l 225 233 l 232 231 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 232 231 m 225 233 l 241 230 l 248 227 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 248 227 m 241 230 l 257 227 l 263 224 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 263 224 m 257 227 l 272 226 l 279 223 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 279 223 m 272 226 l 288 225 l 295 224 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 295 224 m 288 225 l 304 227 l 311 224 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 311 224 m 304 227 l 320 229 l 327 227 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 327 227 m 320 229 l 336 233 l 343 230 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 343 230 m 336 233 l 352 237 l 359 235 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 359 235 m 352 237 l 368 243 l 374 240 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 374 240 m 368 243 l 384 250 l 390 247 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 390 247 m 384 250 l 399 258 l 406 256 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 406 256 m 399 258 l 415 268 l 422 265 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 422 265 m 415 268 l 431 278 l 438 274 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 438 274 m 431 278 l 447 284 l 454 277 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 193 238 m 186 245 l 202 242 l 209 238 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 209 238 m 202 242 l 218 237 l 225 233 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 225 233 m 218 237 l 234 233 l 241 230 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 241 230 m 234 233 l 250 231 l 257 227 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 257 227 m 250 231 l 266 229 l 272 226 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 272 226 m 266 229 l 282 230 l 288 225 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 288 225 m 282 230 l 298 230 l 304 227 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 304 227 m 298 230 l 314 234 l 320 229 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 320 229 m 314 234 l 329 236 l 336 233 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 336 233 m 329 236 l 345 242 l 352 237 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 352 237 m 345 242 l 361 247 l 368 243 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 368 243 m 361 247 l 377 254 l 384 250 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 384 250 m 377 254 l 393 262 l 399 258 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 399 258 m 393 262 l 409 272 l 415 268 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 415 268 m 409 272 l 425 282 l 431 278 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 431 278 m 425 282 l 440 291 l 447 284 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 186 245 m 180 251 l 196 247 l 202 242 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 202 242 m 196 247 l 212 242 l 218 237 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 218 237 m 212 242 l 227 239 l 234 233 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 234 233 m 227 239 l 243 236 l 250 231 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 250 231 m 243 236 l 259 236 l 266 229 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 266 229 m 259 236 l 275 234 l 282 230 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 282 230 m 275 234 l 291 237 l 298 230 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 298 230 m 291 237 l 307 238 l 314 234 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 314 234 m 307 238 l 323 242 l 329 236 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 329 236 m 323 242 l 338 246 l 345 242 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 345 242 m 338 246 l 354 253 l 361 247 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 361 247 m 354 253 l 370 259 l 377 254 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 377 254 m 370 259 l 386 268 l 393 262 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 393 262 m 386 268 l 402 277 l 409 272 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 409 272 m 402 277 l 418 287 l 425 282 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 425 282 m 418 287 l 434 298 l 440 291 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 180 251 m 173 258 l 189 254 l 196 247 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 196 247 m 189 254 l 205 248 l 212 242 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 212 242 m 205 248 l 221 245 l 227 239 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 227 239 m 221 245 l 236 243 l 243 236 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 243 236 m 236 243 l 252 240 l 259 236 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 259 236 m 252 240 l 268 242 l 275 234 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 275 234 m 268 242 l 284 242 l 291 237 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 291 237 m 284 242 l 300 245 l 307 238 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 307 238 m 300 245 l 316 247 l 323 242 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 323 242 m 316 247 l 332 254 l 338 246 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 338 246 m 332 254 l 348 258 l 354 253 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 354 253 m 348 258 l 364 266 l 370 259 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 370 259 m 364 266 l 380 274 l 386 268 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 386 268 m 380 274 l 395 283 l 402 277 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 402 277 m 395 283 l 411 294 l 418 287 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 418 287 m 411 294 l 427 305 l 434 298 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 173 258 m 166 265 l 182 261 l 189 254 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 189 254 m 182 261 l 198 256 l 205 248 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 205 248 m 198 256 l 214 253 l 221 245 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 221 245 m 214 253 l 230 249 l 236 243 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 236 243 m 230 249 l 246 249 l 252 240 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 252 240 m 246 249 l 262 248 l 268 242 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 268 242 m 262 248 l 278 251 l 284 242 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 284 242 m 278 251 l 293 251 l 300 245 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 300 245 m 293 251 l 309 256 l 316 247 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 316 247 m 309 256 l 325 259 l 332 254 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 332 254 m 325 259 l 341 266 l 348 258 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 348 258 m 341 266 l 357 272 l 364 266 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 364 266 m 357 272 l 373 281 l 380 274 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 380 274 m 373 281 l 389 291 l 395 283 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 395 283 m 389 291 l 404 301 l 411 294 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 411 294 m 404 301 l 420 311 l 427 305 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 166 265 m 160 272 l 176 269 l 182 261 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 182 261 m 176 269 l 191 265 l 198 256 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 198 256 m 191 265 l 207 260 l 214 253 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 214 253 m 207 260 l 223 259 l 230 249 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 230 249 m 223 259 l 239 257 l 246 249 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 246 249 m 239 257 l 255 258 l 262 248 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 262 248 m 255 258 l 271 257 l 278 251 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 278 251 m 271 257 l 287 261 l 293 251 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 293 251 m 287 261 l 302 263 l 309 256 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 309 256 m 302 263 l 318 269 l 325 259 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 325 259 m 318 269 l 334 274 l 341 266 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 341 266 m 334 274 l 350 282 l 357 272 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 357 272 m 350 282 l 366 289 l 373 281 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 373 281 m 366 289 l 382 299 l 389 291 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 389 291 m 382 299 l 398 310 l 404 301 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 404 301 m 398 310 l 414 318 l 420 311 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 160 272 m 153 279 l 169 279 l 176 269 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 176 269 m 169 279 l 185 275 l 191 265 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 191 265 m 185 275 l 201 271 l 207 260 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 207 260 m 201 271 l 216 268 l 223 259 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 223 259 m 216 268 l 232 267 l 239 257 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 239 257 m 232 267 l 248 266 l 255 258 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 255 258 m 248 266 l 264 269 l 271 257 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 271 257 m 264 269 l 280 270 l 287 261 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 287 261 m 280 270 l 296 274 l 302 263 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 302 263 m 296 274 l 312 278 l 318 269 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 318 269 m 312 278 l 328 284 l 334 274 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 334 274 m 328 284 l 344 291 l 350 282 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 350 282 m 344 291 l 359 299 l 366 289 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 366 289 m 359 299 l 375 309 l 382 299 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 382 299 m 375 309 l 391 319 l 398 310 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 398 310 m 391 319 l 407 325 l 414 318 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 153 279 m 146 286 l 162 289 l 169 279 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 169 279 m 162 289 l 178 285 l 185 275 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 185 275 m 178 285 l 194 282 l 201 271 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 201 271 m 194 282 l 210 279 l 216 268 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 216 268 m 210 279 l 226 278 l 232 267 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 232 267 m 226 278 l 242 278 l 248 266 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 248 266 m 242 278 l 257 278 l 264 269 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 264 269 m 257 278 l 273 282 l 280 270 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 280 270 m 273 282 l 289 284 l 296 274 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 296 274 m 289 284 l 305 290 l 312 278 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 312 278 m 305 290 l 321 295 l 328 284 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 328 284 m 321 295 l 337 302 l 344 291 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 344 291 m 337 302 l 353 311 l 359 299 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 359 299 m 353 311 l 368 320 l 375 309 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 375 309 m 368 320 l 384 329 l 391 319 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 391 319 m 384 329 l 400 332 l 407 325 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 146 286 m 140 293 l 155 296 l 162 289 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 162 289 m 155 296 l 171 297 l 178 285 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 178 285 m 171 297 l 187 294 l 194 282 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 194 282 m 187 294 l 203 292 l 210 279 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 210 279 m 203 292 l 219 290 l 226 278 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 226 278 m 219 290 l 235 290 l 242 278 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 242 278 m 235 290 l 251 291 l 257 278 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 257 278 m 251 291 l 267 293 l 273 282 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 273 282 m 267 293 l 283 297 l 289 284 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 289 284 m 283 297 l 298 301 l 305 290 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 305 290 m 298 301 l 314 307 l 321 295 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 321 295 m 314 307 l 330 315 l 337 302 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 337 302 m 330 315 l 346 323 l 353 311 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 353 311 m 346 323 l 362 332 l 368 320 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 368 320 m 362 332 l 378 336 l 384 329 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 384 329 m 378 336 l 394 339 l 400 332 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 140 293 m 133 299 l 149 302 l 155 296 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 155 296 m 149 302 l 165 305 l 171 297 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 171 297 m 165 305 l 181 307 l 187 294 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 187 294 m 181 307 l 197 305 l 203 292 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 203 292 m 197 305 l 212 304 l 219 290 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 219 290 m 212 304 l 228 304 l 235 290 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 235 290 m 228 304 l 244 305 l 251 291 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 251 291 m 244 305 l 260 307 l 267 293 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 267 293 m 260 307 l 276 311 l 283 297 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 283 297 m 276 311 l 292 315 l 298 301 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 298 301 m 292 315 l 308 321 l 314 307 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 314 307 m 308 321 l 323 328 l 330 315 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 330 315 m 323 328 l 339 335 l 346 323 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 346 323 m 339 335 l 355 340 l 362 332 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 362 332 m 355 340 l 371 343 l 378 336 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 378 336 m 371 343 l 387 346 l 394 339 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 133 299 m 126 306 l 142 309 l 149 302 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 149 302 m 142 309 l 158 312 l 165 305 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 165 305 m 158 312 l 174 315 l 181 307 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 181 307 m 174 315 l 190 318 l 197 305 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 197 305 m 190 318 l 206 318 l 212 304 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 212 304 m 206 318 l 221 318 l 228 304 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 228 304 m 221 318 l 237 319 l 244 305 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 244 305 m 237 319 l 253 322 l 260 307 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 260 307 m 253 322 l 269 325 l 276 311 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 276 311 m 269 325 l 285 329 l 292 315 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 292 315 m 285 329 l 301 335 l 308 321 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 308 321 m 301 335 l 317 341 l 323 328 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 323 328 m 317 341 l 333 344 l 339 335 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 339 335 m 333 344 l 349 347 l 355 340 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 355 340 m 349 347 l 364 350 l 371 343 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 371 343 m 364 350 l 380 352 l 387 346 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 126 306 m 119 313 l 135 316 l 142 309 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 142 309 m 135 316 l 151 319 l 158 312 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 158 312 m 151 319 l 167 322 l 174 315 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 174 315 m 167 322 l 183 325 l 190 318 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 190 318 m 183 325 l 199 327 l 206 318 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 206 318 m 199 327 l 215 330 l 221 318 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 221 318 m 215 330 l 231 333 l 237 319 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 237 319 m 231 333 l 247 336 l 253 322 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 253 322 m 247 336 l 263 339 l 269 325 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 269 325 m 263 339 l 278 342 l 285 329 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 285 329 m 278 342 l 294 345 l 301 335 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 301 335 m 294 345 l 310 348 l 317 341 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 317 341 m 310 348 l 326 350 l 333 344 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 333 344 m 326 350 l 342 353 l 349 347 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 349 347 m 342 353 l 358 356 l 364 350 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 364 350 m 358 356 l 374 359 l 380 352 l clp gs 0.40 setgray fill gr gs col-1 s gr 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 227 347 m 227 98 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 119 456 m 119 207 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 374 502 m 374 254 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 481 393 m 481 144 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 227 98 m 119 207 l 374 254 l 481 144 l clp gs col-1 s gr [] 0 setdash 0 setlinecap % Polyline n 227 347 m 119 456 l 374 502 l 481 393 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 219 536 m 212 536 212 580 7 arcto 4 {pop} repeat 212 587 370 587 7 arcto 4 {pop} repeat 377 587 377 543 7 arcto 4 {pop} repeat 377 536 219 536 7 arcto 4 {pop} repeat clp gs col-1 s gr /Helvetica findfont 20.00 scalefont setfont 65 480 m gs 1 -1 scale (\(1,0,0\)) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 200 86 m gs 1 -1 scale (\(0,0,1\)) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 251 569 m gs 1 -1 scale (prob1.eps) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 493 405 m gs 1 -1 scale (\(0,1,0\) ) col-1 show gr $F2psEnd src2tex-2.12h.orig/prob2.eps100644 1750 1750 64447 5553626722 15672 0ustar kawamurakawamura%! %%Title: /tmp/xfig-export000453 %%Creator: fig2dev %%CreationDate: Sun Oct 17 11:27:39 1993 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 431 464 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -64 62 translate 0.0 464.0 translate 0.900 -0.900 scale 0.500 setlinewidth % Polyline n 227 204 m 220 210 l 236 203 l 242 206 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 242 206 m 236 203 l 251 206 l 258 209 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 258 209 m 251 206 l 267 209 l 274 212 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 274 212 m 267 209 l 283 212 l 290 215 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 290 215 m 283 212 l 299 215 l 306 218 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 306 218 m 299 215 l 315 218 l 322 221 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 322 221 m 315 218 l 331 221 l 338 224 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 338 224 m 331 221 l 347 223 l 353 227 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 353 227 m 347 223 l 363 226 l 369 230 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 369 230 m 363 226 l 379 229 l 385 233 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 385 233 m 379 229 l 395 232 l 401 235 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 401 235 m 395 232 l 410 235 l 417 238 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 417 238 m 410 235 l 426 238 l 433 241 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 433 241 m 426 238 l 442 241 l 449 244 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 449 244 m 442 241 l 458 244 l 465 247 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 465 247 m 458 244 l 474 257 l 481 250 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 220 210 m 213 217 l 229 210 l 236 203 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 236 203 m 229 210 l 245 203 l 251 206 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 251 206 m 245 203 l 261 206 l 267 209 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 267 209 m 261 206 l 277 209 l 283 212 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 283 212 m 277 209 l 293 212 l 299 215 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 299 215 m 293 212 l 308 214 l 315 218 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 315 218 m 308 214 l 324 217 l 331 221 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 331 221 m 324 217 l 340 220 l 347 223 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 347 223 m 340 220 l 356 223 l 363 226 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 363 226 m 356 223 l 372 226 l 379 229 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 379 229 m 372 226 l 388 229 l 395 232 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 395 232 m 388 229 l 404 232 l 410 235 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 410 235 m 404 232 l 419 235 l 426 238 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 426 238 m 419 235 l 435 237 l 442 241 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 442 241 m 435 237 l 451 251 l 458 244 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 458 244 m 451 251 l 467 263 l 474 257 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 213 217 m 206 224 l 222 217 l 229 210 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 229 210 m 222 217 l 238 210 l 245 203 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 245 203 m 238 210 l 254 207 l 261 206 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 261 206 m 254 207 l 270 209 l 277 209 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 277 209 m 270 209 l 286 211 l 293 212 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 293 212 m 286 211 l 302 213 l 308 214 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 308 214 m 302 213 l 317 216 l 324 217 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 324 217 m 317 216 l 333 218 l 340 220 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 340 220 m 333 218 l 349 221 l 356 223 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 356 223 m 349 221 l 365 225 l 372 226 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 372 226 m 365 225 l 381 228 l 388 229 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 388 229 m 381 228 l 397 231 l 404 232 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 404 232 m 397 231 l 413 236 l 419 235 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 419 235 m 413 236 l 429 244 l 435 237 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 435 237 m 429 244 l 445 257 l 451 251 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 451 251 m 445 257 l 461 270 l 467 263 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 206 224 m 200 231 l 216 224 l 222 217 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 222 217 m 216 224 l 232 217 l 238 210 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 238 210 m 232 217 l 248 212 l 254 207 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 254 207 m 248 212 l 263 211 l 270 209 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 270 209 m 263 211 l 279 212 l 286 211 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 286 211 m 279 212 l 295 214 l 302 213 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 302 213 m 295 214 l 311 216 l 317 216 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 317 216 m 311 216 l 327 219 l 333 218 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 333 218 m 327 219 l 343 222 l 349 221 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 349 221 m 343 222 l 359 226 l 365 225 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 365 225 m 359 226 l 374 229 l 381 228 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 381 228 m 374 229 l 390 234 l 397 231 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 397 231 m 390 234 l 406 241 l 413 236 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 413 236 m 406 241 l 422 251 l 429 244 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 429 244 m 422 251 l 438 264 l 445 257 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 445 257 m 438 264 l 454 277 l 461 270 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 200 231 m 193 238 l 209 230 l 216 224 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 216 224 m 209 230 l 225 223 l 232 217 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 232 217 m 225 223 l 241 218 l 248 212 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 248 212 m 241 218 l 257 216 l 263 211 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 263 211 m 257 216 l 272 215 l 279 212 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 279 212 m 272 215 l 288 217 l 295 214 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 295 214 m 288 217 l 304 218 l 311 216 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 311 216 m 304 218 l 320 221 l 327 219 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 327 219 m 320 221 l 336 224 l 343 222 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 343 222 m 336 224 l 352 228 l 359 226 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 359 226 m 352 228 l 368 233 l 374 229 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 374 229 m 368 233 l 384 239 l 390 234 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 390 234 m 384 239 l 399 247 l 406 241 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 406 241 m 399 247 l 415 258 l 422 251 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 422 251 m 415 258 l 431 271 l 438 264 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 438 264 m 431 271 l 447 284 l 454 277 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 193 238 m 186 245 l 202 237 l 209 230 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 209 230 m 202 237 l 218 230 l 225 223 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 225 223 m 218 230 l 234 225 l 241 218 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 241 218 m 234 225 l 250 222 l 257 216 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 257 216 m 250 222 l 266 221 l 272 215 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 272 215 m 266 221 l 282 222 l 288 217 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 288 217 m 282 222 l 298 222 l 304 218 l clp gs col-1 s gr % Polyline n 304 218 m 298 222 l 314 226 l 320 221 l clp gs col-1 s gr % Polyline n 320 221 m 314 226 l 329 228 l 336 224 l clp gs col-1 s gr % Polyline n 336 224 m 329 228 l 345 233 l 352 228 l clp gs col-1 s gr % Polyline n 352 228 m 345 233 l 361 238 l 368 233 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 368 233 m 361 238 l 377 245 l 384 239 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 384 239 m 377 245 l 393 254 l 399 247 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 399 247 m 393 254 l 409 265 l 415 258 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 415 258 m 409 265 l 425 278 l 431 271 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 431 271 m 425 278 l 440 291 l 447 284 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 186 245 m 180 251 l 196 244 l 202 237 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 202 237 m 196 244 l 212 237 l 218 230 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 218 230 m 212 237 l 227 232 l 234 225 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 234 225 m 227 232 l 243 228 l 250 222 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 250 222 m 243 228 l 259 226 l 266 221 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 266 221 m 259 226 l 275 226 l 282 222 l clp gs col-1 s gr % Polyline n 282 222 m 275 226 l 291 226 l 298 222 l clp gs col-1 s gr % Polyline n 298 222 m 291 226 l 307 230 l 314 226 l clp gs col-1 s gr % Polyline n 314 226 m 307 230 l 323 232 l 329 228 l clp gs col-1 s gr % Polyline n 329 228 m 323 232 l 338 238 l 345 233 l clp gs col-1 s gr % Polyline n 345 233 m 338 238 l 354 243 l 361 238 l clp gs col-1 s gr % Polyline n 361 238 m 354 243 l 370 251 l 377 245 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 377 245 m 370 251 l 386 260 l 393 254 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 393 254 m 386 260 l 402 272 l 409 265 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 409 265 m 402 272 l 418 285 l 425 278 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 425 278 m 418 285 l 434 298 l 440 291 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 180 251 m 173 258 l 189 251 l 196 244 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 196 244 m 189 251 l 205 244 l 212 237 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 212 237 m 205 244 l 221 239 l 227 232 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 227 232 m 221 239 l 236 235 l 243 228 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 243 228 m 236 235 l 252 233 l 259 226 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 259 226 m 252 233 l 268 234 l 275 226 l clp gs col-1 s gr % Polyline n 275 226 m 268 234 l 284 234 l 291 226 l clp gs col-1 s gr % Polyline n 291 226 m 284 234 l 300 237 l 307 230 l clp gs col-1 s gr % Polyline n 307 230 m 300 237 l 316 239 l 323 232 l clp gs col-1 s gr % Polyline n 323 232 m 316 239 l 332 245 l 338 238 l clp gs col-1 s gr % Polyline n 338 238 m 332 245 l 348 250 l 354 243 l clp gs col-1 s gr % Polyline n 354 243 m 348 250 l 364 258 l 370 251 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 370 251 m 364 258 l 380 267 l 386 260 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 386 260 m 380 267 l 395 278 l 402 272 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 402 272 m 395 278 l 411 291 l 418 285 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 418 285 m 411 291 l 427 305 l 434 298 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 173 258 m 166 265 l 182 258 l 189 251 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 189 251 m 182 258 l 198 251 l 205 244 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 205 244 m 198 251 l 214 245 l 221 239 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 221 239 m 214 245 l 230 242 l 236 235 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 236 235 m 230 242 l 246 239 l 252 233 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 252 233 m 246 239 l 262 240 l 268 234 l clp gs col-1 s gr % Polyline n 268 234 m 262 240 l 278 240 l 284 234 l clp gs col-1 s gr % Polyline n 284 234 m 278 240 l 293 243 l 300 237 l clp gs col-1 s gr % Polyline n 300 237 m 293 243 l 309 246 l 316 239 l clp gs col-1 s gr % Polyline n 316 239 m 309 246 l 325 251 l 332 245 l clp gs col-1 s gr % Polyline n 332 245 m 325 251 l 341 257 l 348 250 l clp gs col-1 s gr % Polyline n 348 250 m 341 257 l 357 265 l 364 258 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 364 258 m 357 265 l 373 274 l 380 267 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 380 267 m 373 274 l 389 285 l 395 278 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 395 278 m 389 285 l 404 298 l 411 291 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 411 291 m 404 298 l 420 311 l 427 305 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 166 265 m 160 272 l 176 265 l 182 258 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 182 258 m 176 265 l 191 257 l 198 251 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 198 251 m 191 257 l 207 252 l 214 245 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 214 245 m 207 252 l 223 250 l 230 242 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 230 242 m 223 250 l 239 248 l 246 239 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 246 239 m 239 248 l 255 249 l 262 240 l clp gs col-1 s gr % Polyline n 262 240 m 255 249 l 271 250 l 278 240 l clp gs col-1 s gr % Polyline n 278 240 m 271 250 l 287 253 l 293 243 l clp gs col-1 s gr % Polyline n 293 243 m 287 253 l 302 255 l 309 246 l clp gs col-1 s gr % Polyline n 309 246 m 302 255 l 318 260 l 325 251 l clp gs col-1 s gr % Polyline n 325 251 m 318 260 l 334 265 l 341 257 l clp gs col-1 s gr % Polyline n 341 257 m 334 265 l 350 272 l 357 265 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 357 265 m 350 272 l 366 281 l 373 274 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 373 274 m 366 281 l 382 292 l 389 285 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 389 285 m 382 292 l 398 305 l 404 298 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 404 298 m 398 305 l 414 318 l 420 311 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 160 272 m 153 279 l 169 272 l 176 265 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 176 265 m 169 272 l 185 264 l 191 257 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 191 257 m 185 264 l 201 260 l 207 252 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 207 252 m 201 260 l 216 257 l 223 250 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 223 250 m 216 257 l 232 256 l 239 248 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 239 248 m 232 256 l 248 257 l 255 249 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 255 249 m 248 257 l 264 259 l 271 250 l clp gs col-1 s gr % Polyline n 271 250 m 264 259 l 280 262 l 287 253 l clp gs col-1 s gr % Polyline n 287 253 m 280 262 l 296 265 l 302 255 l clp gs col-1 s gr % Polyline n 302 255 m 296 265 l 312 269 l 318 260 l clp gs col-1 s gr % Polyline n 318 260 m 312 269 l 328 274 l 334 265 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 334 265 m 328 274 l 344 280 l 350 272 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 350 272 m 344 280 l 359 288 l 366 281 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 366 281 m 359 288 l 375 299 l 382 292 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 382 292 m 375 299 l 391 312 l 398 305 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 398 305 m 391 312 l 407 325 l 414 318 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 153 279 m 146 286 l 162 278 l 169 272 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 169 272 m 162 278 l 178 271 l 185 264 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 185 264 m 178 271 l 194 267 l 201 260 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 201 260 m 194 267 l 210 266 l 216 257 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 216 257 m 210 266 l 226 267 l 232 256 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 232 256 m 226 267 l 242 269 l 248 257 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 248 257 m 242 269 l 257 271 l 264 259 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 264 259 m 257 271 l 273 274 l 280 262 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 280 262 m 273 274 l 289 277 l 296 265 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 296 265 m 289 277 l 305 281 l 312 269 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 312 269 m 305 281 l 321 284 l 328 274 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 328 274 m 321 284 l 337 289 l 344 280 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 344 280 m 337 289 l 353 296 l 359 288 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 359 288 m 353 296 l 368 306 l 375 299 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 375 299 m 368 306 l 384 319 l 391 312 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 391 312 m 384 319 l 400 332 l 407 325 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 146 286 m 140 293 l 155 285 l 162 278 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 162 278 m 155 285 l 171 278 l 178 271 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 178 271 m 171 278 l 187 275 l 194 267 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 194 267 m 187 275 l 203 277 l 210 266 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 210 266 m 203 277 l 219 279 l 226 267 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 226 267 m 219 279 l 235 281 l 242 269 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 242 269 m 235 281 l 251 284 l 257 271 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 257 271 m 251 284 l 267 287 l 273 274 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 273 274 m 267 287 l 283 290 l 289 277 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 289 277 m 283 290 l 298 293 l 305 281 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 305 281 m 298 293 l 314 296 l 321 284 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 321 284 m 314 296 l 330 300 l 337 289 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 337 289 m 330 300 l 346 304 l 353 296 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 353 296 m 346 304 l 362 313 l 368 306 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 368 306 m 362 313 l 378 326 l 384 319 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 384 319 m 378 326 l 394 339 l 400 332 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 140 293 m 133 299 l 149 292 l 155 285 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 155 285 m 149 292 l 165 285 l 171 278 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 171 278 m 165 285 l 181 288 l 187 275 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 187 275 m 181 288 l 197 291 l 203 277 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 203 277 m 197 291 l 212 294 l 219 279 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 219 279 m 212 294 l 228 296 l 235 281 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 235 281 m 228 296 l 244 299 l 251 284 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 251 284 m 244 299 l 260 302 l 267 287 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 267 287 m 260 302 l 276 305 l 283 290 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 283 290 m 276 305 l 292 308 l 298 293 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 298 293 m 292 308 l 308 311 l 314 296 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 314 296 m 308 311 l 323 314 l 330 300 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 330 300 m 323 314 l 339 317 l 346 304 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 346 304 m 339 317 l 355 320 l 362 313 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 362 313 m 355 320 l 371 332 l 378 326 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 378 326 m 371 332 l 387 346 l 394 339 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 133 299 m 126 306 l 142 299 l 149 292 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 149 292 m 142 299 l 158 302 l 165 285 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 165 285 m 158 302 l 174 305 l 181 288 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 181 288 m 174 305 l 190 308 l 197 291 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 197 291 m 190 308 l 206 311 l 212 294 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 212 294 m 206 311 l 221 314 l 228 296 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 228 296 m 221 314 l 237 316 l 244 299 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 244 299 m 237 316 l 253 319 l 260 302 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 260 302 m 253 319 l 269 322 l 276 305 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 276 305 m 269 322 l 285 325 l 292 308 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 292 308 m 285 325 l 301 328 l 308 311 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 308 311 m 301 328 l 317 331 l 323 314 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 323 314 m 317 331 l 333 334 l 339 317 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 339 317 m 333 334 l 349 336 l 355 320 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 355 320 m 349 336 l 364 339 l 371 332 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 371 332 m 364 339 l 380 352 l 387 346 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 126 306 m 119 313 l 135 316 l 142 299 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 142 299 m 135 316 l 151 319 l 158 302 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 158 302 m 151 319 l 167 322 l 174 305 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 174 305 m 167 322 l 183 325 l 190 308 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 190 308 m 183 325 l 199 327 l 206 311 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 206 311 m 199 327 l 215 330 l 221 314 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 221 314 m 215 330 l 231 333 l 237 316 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 237 316 m 231 333 l 247 336 l 253 319 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 253 319 m 247 336 l 263 339 l 269 322 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 269 322 m 263 339 l 278 342 l 285 325 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 285 325 m 278 342 l 294 345 l 301 328 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 301 328 m 294 345 l 310 348 l 317 331 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 317 331 m 310 348 l 326 350 l 333 334 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 333 334 m 326 350 l 342 353 l 349 336 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 349 336 m 342 353 l 358 356 l 364 339 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 364 339 m 358 356 l 374 359 l 380 352 l clp gs 0.40 setgray fill gr gs col-1 s gr 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 227 347 m 227 98 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 119 456 m 119 207 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 374 502 m 374 254 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 481 393 m 481 144 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 227 98 m 119 207 l 374 254 l 481 144 l clp gs col-1 s gr [] 0 setdash 0 setlinecap % Polyline n 227 347 m 119 456 l 374 502 l 481 393 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 231 539 m 224 539 224 577 7 arcto 4 {pop} repeat 224 584 373 584 7 arcto 4 {pop} repeat 380 584 380 546 7 arcto 4 {pop} repeat 380 539 231 539 7 arcto 4 {pop} repeat clp gs col-1 s gr /Helvetica findfont 20.00 scalefont setfont 200 86 m gs 1 -1 scale (\(0,0,1\)) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 71 480 m gs 1 -1 scale (\(1,0,0\)) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 260 566 m gs 1 -1 scale (prob2.eps) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 493 405 m gs 1 -1 scale (\(0,1,0\) ) col-1 show gr $F2psEnd src2tex-2.12h.orig/references.tex100644 1750 1750 3623 6131401530 16722 0ustar kawamurakawamura\centerline{\bf References} \bigskip {\frenchspacing \item{[1]} K. Amano, S. Hataki and S. Maeda, A text converter src2tex : Basic, C, C++, Fortran, Lisp, Pascal {\tt ->} \TeX \quad ({\sl to appear\/}). \item{[2]} R. Baecker and A. Marcus, Human Factors and Typography for More Readable Programs, {\sl Addison-Wesley, Reading, MA}, 1990. \item{[3]} J. December, Presenting Java, {\sl Sams.Net Publishing}, 1995. \item{[4]} J. W. Eaton, Octave: A High-Level Interactive Language for Numerical Computations, Edition 1.1 for Octave version 1.1.1, 1995. \item{[5]} B. Fuchssteiner and others, MuPAD Multi Processing Algera Data Tool User's Manual Draft Version, {\sl Bennon Fuchssteiner, Automath, University of Paderborn, Paderborn, Germany}, 1992-95. \item{[6]} A. C. Hearn, REDUCE User's Manual, version 3.5, {\sl RAND Publication}, CP78(Rev. 7/94), 1994. \item{[7]} B. W. Kernighan and D. M. Ritchie, The C Programming Language, {\sl Prentice Hall}, 1978. \item{[8]} D. E. Knuth, Literate Programming, {\sl The Computer Journal}, {\bf 27} (1984), 97-111. \item{[9]} D. E. Knuth, The {\TeX}book, {\sl Addison-Wesley}, 1984. \item{[10]} P. Mohseni, Maple in Action, An Introductory Handbook, {\sl Iowa State University}, 1995. \item{[11]} M. Noro and T. Shimoyama, Asir User's Manual, Edition 2.0 for Asir-940420, {\sl Fujitsu Laboratories Ltd.}, 1994. \item{[12]} J. K. Ousterhout, Tcl and Tk Toolkit, Addison Wesley Publishing Company, Inc., 1993. \item{[13]} K. Sigmon, MATLAB Primer, Second Edition, {\sl University of Florida}, 1992. \item{[14]} G. L. Steele Jr., Common Lisp The Language, 2nd edition, {\sl Digital Equipment Corporation}, 1990. \item{[15]} D. B. Thompson, The Literate Programming Frequently Asked Questions List, {\sl comp.programming. literate newsgroup}, 1995. \item{[16]} S. Wolfram, Mathematica, A System Doing Mathematics by Computer, Second Edition, {\sl Wolfram Research}, Inc., \rm 1992. } src2tex-2.12h.orig/simpson.c100644 1750 1750 5117 6020452660 15722 0ustar kawamurakawamura/* {\hrulefill} * {\bf Simpson}の公式 {\ % beginning of TeX mode \noindent 定積分 $\displaystyle\int_a^b f(x)\,dx$ を計算する一つの方法として、 次の近似式が良く使われる。 $$\int_a^b f(x)\,dx\sim{h\over3}\,(y_0+4y_1+2y_2+4y_3+2y_4+4y_5+ \cdots +2y_{n-2}+4y_{n-1}+y_n)\ ,$$ \noindent ここで、自然数 $n$ は偶数とし、 $\displaystyle x_i=a+{i\over n}\,(b-a),\ y_i=f(x_i)\quad (i=0, 1, 2, \cdots, n)$ とする。 この公式の証明は、比較的やさしい。 じっさい、Taylor の定理から導かれる等式 $$\int_{\xi-{1\over h}}^{\xi+{1\over h}}f(x)\,dx \sim\int_{\xi-{1\over h}}^{\xi+{1\over h}}p(x)\,dx ={h\over3}\,\bigl(f(\xi-{1\over h})+4f(\xi)+f(\xi+{1\over h})\bigr)+O(h^5)$$ \noindent を $\,\displaystyle{n\over2}\,$ 個足し合わせることにより、 この公式は証明される。 \special{epsfile=simpson.eps hscale=.7 vscale=.7 hoffset=25} \vskip 13cm \noindent ここで、$p(x)$ は次のような条件を満足する2次の多項式を表す: $$ p\Bigl(\xi-{1\over h}\Bigr)=f\Bigl(\xi-{1\over h}\Bigr), \ p(\xi)=f(\xi), \ p\Bigl(\xi+{1\over h}\Bigr)=f\Bigl(\xi+{1\over h}\Bigr)\ . $$ \noindent {\tt A, B, F(X), N} の定義をいろいろと変えて、各人で数値実験を行ってみよう。 % end of TeX mode } * {\hrulefill} */ /* {\hrulefill\ simpson.c\ \hrulefill} */ #include #define A 0. /* 積分をする区間 $[a, b]$ {\hfill} */ #define B 1. #define F(X) ((X)*(X)) /* 被積分関数 $f(x)$ {\hfill} */ #define N 20 /* {\ 区間 $[a, b]$ の分割数 $n$ \hfill} */ double simpson_rule() /* {\ Simpson の公式を用いて $\displaystyle\int_a^b f(x)\,dx$ を計算する関数 \hfill} */ { long i; /* long 整数を使う {\hfill} */ double h, s, y[N + 1]; /* {\ メッシュ $h$, 積分値 $s$, 分点 $\displaystyle{i\over n}$ での関数値 $y_i$ \hfill} */ h = 1. / (double) N; /* {\ $\displaystyle h={1\over n}$ \hfill} */ for (i = 0; i <= N; ++i) /* {\ $\displaystyle y_i =f\bigl({i\over n}\bigr) \quad (i=0, 1, 2, \cdots, n)$ \hfill} */ y[i] = F((double) i / (double) N); /* 以下は {\hfill} */ /* $\displaystyle s={h\over3}(y_0+4y_1+2y_2+4y_3+ \cdots +4y_{n-1}+y_n)$ {\hfill} */ /* の計算 {\hfill} */ s = y[0]; for (i = 1; i < N; ++i) { if (i % 2 == 1) /* {\ ただし {\tt i \% 2}= $i\ $ を 2 で割った余り \hfill} */ s += 4. * y[i]; else s += 2. * y[i]; } s += y[N]; s *= (h / 3.); return s; /* $s$ の値を返す {\hfill} */ } main() { double s; s = simpson_rule(); /* {\ 上で定義した関数 simpson\_rule() を使う \hfill} */ printf("%.16f\n", s); /* {\ $s$ を小数点以下16桁表示する \hfill} */ } src2tex-2.12h.orig/simpson.c.ps100644 1750 1750 157564 6266067343 16435 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: simpson.c.dvi %%Pages: 2 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 122 /f0 NF f0 SF [<8F80F060C030C01080188018801800180038007003F01FE03FC07E00F000E000C010C010C0104030603030F01F10> 16 23 -2 0 18.449] 83 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 8 23 0 0 9.224] 105 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<07FC00E000E000E000E000E0FFFCC0E040E020E030E010E008E004E004E002E001E001E000E000600060> 16 21 -1 0 16.604] 52 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<003000003000003000003000003000003000003000003000003000003000FFFFF8FFFFF80030000030000030000030000030 00003000003000003000003000003000> 24 22 -2 3 25.829] 43 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [<60F0F06000000000000060F0F060> 8 14 -2 0 9.224] 58 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D [ 8 33 -3 8 9.224] 91 D [ 8 33 0 8 9.224] 93 D 1.000 54 /f1 NF f1 SF [<1E0021006180C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C04080408021001E00> 16 15 -1 0 13.237] 48 D [ 8 15 -2 0 13.237] 49 D [ 16 15 -1 0 13.237] 50 D [<3E0041808080C0C000C000C0008001801E00030001800180618021001E00> 16 15 -1 0 13.237] 51 D [<1FC00300030003000300FFC0C3004300230013001B000B00070003000300> 16 15 -1 0 13.237] 52 D [<3E0041008080C0C000C000C0008021803E002000200020003C003F002080> 16 15 -1 0 13.237] 53 D [<00C00000C00000C00000C00000C00000C00000C000FFFF80FFFF8000C00000C00000C00000C00000C00000C00000C000> 24 16 -1 2 20.386] 43 D 1.000 50 /f2 NF f2 SF [<7E1818181818181818F818> 8 11 -1 0 11.300] 49 D 1.000 122 /f3 NF f3 SF [<03F0000E1C001807003003807001C07000E0600070600070E0003870003870001C70001C70001C30001C38001C18001C1C00 1C0C001C0600180300180180300060E0001F80> 24 23 -1 0 25.330] 79 D [<1C7062C841C440C4C0C4C0C06060606060603060303018700C700390> 16 14 -1 0 17.553] 97 D [<1C00620041004180C0C0C0C06060606060606060306030603C40338018001800180018000C000C000C000C003E00> 16 23 -1 0 14.252] 98 D [<1C7062C841C440C4C0C4C0C06060606060603060303018700C7003B00018001800180018000C000C000C000C003E> 16 23 -1 0 17.284] 100 D [<7000C800E4006600060006000300030003000300030001800180018001800180018000C000C007FC00C000C0006000600060 006C002E0036001C> 16 29 -1 6 16.258] 102 D [ 16 23 -2 0 19.133] 104 D [<3824626232301818188C4C4C4C38000000000000060703> 8 23 -1 0 11.441] 105 D [<3038302618621861183118300C180C180C188C18460C470844983870> 16 14 -1 0 19.933] 110 D [ 16 20 0 6 16.708] 112 D [<3E00C300C180E0C060C000C007C01F801E00380018E018E00C400780> 16 14 -2 0 15.566] 115 D [<78E0C510E708C30403040300018001800180418020C620C711A30F1E> 16 14 -1 0 18.979] 120 D [<3C006300718070C000C00060076008E018701830183018300C180C180C188618460C460C260C1C04> 16 20 -1 6 16.281] 121 D [<03800C40006000E007C01F007C006000C000C000C000C00060006000300018000FC00FC0180018001800180018000C0007F0 01F0010001000080> 16 29 -1 6 14.529] 24 D [<60F0F060> 8 4 -2 0 9.224] 58 D [<40402020101070F0F060> 8 10 -2 6 9.224] 59 D 1.000 111 /f4 NF f4 SF [<39804740C320C320C300C3006180618031800E80> 16 10 -1 0 14.404] 97 D [<384CC6C3C3C36161736E303030301878> 8 16 -1 0 11.678] 98 D [<60D0C8686060B0B0B060000000001808> 8 16 -1 0 9.395] 105 D [<61C06320331031903180318098C098C09CC07380> 16 10 -1 0 16.416] 110 D [<0E00010001800F007E00F000C000C000C000C00060003E003E0020006000300030001B80078002000200> 16 21 0 5 12.084] 24 D 1.000 105 /f5 NF f5 SF [ 8 12 -2 0 13.741] 104 D 1.000 25 /f6 NF f6 SF [ 24 2 -3 -7 25.829] 0 D [<60F0F060> 8 4 -2 -6 9.224] 1 D [<8007C0800FE0803FF0C07838E0F0187FC0083F80081F0008> 24 8 -2 -4 25.829] 24 D 1.000 1 /f7 NF f7 SF [ 16 2 -2 -5 20.755] 0 D 1.000 91 /f8 NF f8 SF [<02040C08181830307070706060E0E0E0E0E0E0E0E0E0E0E0E0E0606070707030301818080C0402> 8 39 -5 38 15.220] 0 D [<0030006000C001C001800300070006000E000C001C001C00380038003800300070007000700070006000E000E000E000E000 E000E000E000E000E000E000E000E000E000E000E000E0006000700070007000700030003800380038001C001C000C000E00 060007000300018001C000C000600030> 16 58 -6 57 19.833] 16 D [<80406020303018181C1C1C0C0C0E0E0E0E0E0E0E0E0E0E0E0E0E0C0C1C1C1C1818303020604080> 8 39 -2 38 15.220] 1 D [ 16 58 -1 57 19.833] 17 D [<3800000046000000C2000000E3000000438000000180000001C0000001C0000000C0000000E0000000E0000000E000000060 00000070000000700000007000000070000000380000003800000038000000380000003C0000003C0000001C0000001C0000 001E0000001E0000001E0000001E0000000E0000000F0000000F0000000F0000000F00000007000000078000000780000007 800000078000000380000003C0000003C0000003C0000003C0000001C0000001E0000001E0000001E0000001E0000000E000 0000E0000000F0000000F0000000700000007000000070000000700000003800000038000000380000003800000018000000 1C0000001C0000001C0000000C0000000C0000000E000000060000000620000006700000033000000120000001C0> 32 74 -2 74 18.449] 90 D 1.000 116 /f9 NF f9 SF [<87F0DFF8F81CE00EC00FC00FC00F000F001F01FF0FFE3FFC7FF87FF0FF00F800F006F006F00E700E783E3FF60FC2> 16 23 -2 0 21.216] 83 D [ 8 24 -1 0 10.608] 105 D [ 32 15 -1 0 31.824] 109 D [ 24 15 -1 0 21.216] 110 D [<07E01C38381C700E700EF00FF00FF00FF00FF00F700E700E381C1C3807E0> 16 15 -1 0 19.095] 111 D [ 24 21 -1 6 21.216] 112 D [ 16 15 -1 0 15.063] 115 D 1.000 126 /f10 NF f10 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 66 D [ 16 20 -1 0 17.434] 70 D [ 16 20 -1 0 17.434] 78 D [ 16 20 -1 0 17.434] 88 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0FC03FE07070E038E01C401C001C001C0038007007E007E00070003000382038703870703FE00FC0> 16 20 -1 0 17.434] 51 D [<07FC07FC00E000E000E000E0FFFCFFFCE0E070E030E038E018E01CE00CE006E006E002E003E001E0> 16 20 -1 0 17.434] 52 D [<07C01FE038707038701C601CE01CE01CE01CF038F870EFE0E7C070007000303838381E3807F003E0> 16 20 -1 0 17.434] 54 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [ 16 26 -6 3 17.434] 91 D [ 16 26 -1 3 17.434] 93 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00300070007000E000E001C001C001C0038003800700070007000E000E000E001C001C0038003800380070007000E000E000 C000> 16 26 -2 3 17.434] 92 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 256 /f11 NF f11 SF [<00F00070003E0070600780F0F801C0E0FE0071C01F803F800FC01E000CF01C000C3C0C000C070E000C018E000C0046000C00 06000C0006000C0007000C0007000C0007000C0387000C0786000C0706000C0F06000C1E06000C3807000C6007000E000780 0C000780> 32 26 -1 3 30.399] 32 D [ 32 4 -1 -9 30.399] 33 D [<0006000000060000000600000006000000060000000600000006000000060000000600000006000000060000000603800006 078000060F0000061E0000067C000007F000000600000006000000060000000600000006000000060000FFFFFFF8000001F0 000000E0> 32 26 -1 3 30.399] 34 D [<0700000F00001F00001F00003B800731807F31801F60C00660600E60600C60301C601838600FF06001807000006000006000 00C00000> 24 18 -4 -1 30.399] 35 D [<3C000F00038001C000E000700038003800380018001C001C401CE018F838FC70CFE0E000600030001C000FE003E00FC01E00 1800> 16 26 -8 3 30.399] 36 D [ 24 25 -4 2 30.399] 37 D [ 32 23 -3 1 30.399] 38 D [ 32 24 -2 2 30.399] 39 D [<00300070007000E001C0038007000E001C0038007000E000C000E000700038001C000E00078003C001E000E000E001C0> 16 24 -8 2 30.399] 40 D [<07FF003FFF80780000E00000C00000C00000800000800000C00000C000006000003000001800001C00000F000003C0001FFC 003FFE00600C00C00000> 24 20 -7 0 30.399] 41 D [<01FF0007FF001F00003C00003800003000003000003001801807800FFF8001FF00000600000E00001C000018007FB800E7F0 00C07E00006F800067C000E1C000C00001E00007C000010000> 24 25 -5 2 30.399] 42 D [<07F8000FFE001C07801801C01800701800381800081800001800001800001800001800001800001800001800001800001800 001C00001C00001C00001C00003C0000F80000> 24 23 -6 2 30.399] 43 D [<03E0000FFC001F9E003C03803800C03800701800181800081800001800001800001800001800001800001800001800001800 001800001800001800001C19003C3980F83B80306300000600> 24 25 -6 2 30.399] 44 D [<0200000003E0000000780000001C0000000E0000000600000007000000030000001F0000003F800000738000006380000063 800000338000003F800000018000000180007E0180007FF18000C3FFFFE00003FFE000018000000180000001800000038000 0003C000000F8000> 32 27 -1 4 30.399] 45 D [<00030000003FFE0000E03C0000C0000001C0000001838000018F80000181C0006180C000F980C000DF80C00003C0C00001FC C000018FC00001C0FFE001C0CFE001C0C0000380C0000000E0000000E0000000E0000003C000> 32 22 -2 1 30.399] 46 D [<0003FEC00FFEE01C00E038007030007030003030003830001818001C0C000C06000EC3800E79FC061FFC0703E00300007F80 00FFE00081FC0000DC0000E00000F00000F00003E000010000> 24 25 -4 2 30.399] 47 D [<0001FCC00FFEC01FFEE03800603000702000303000383000381800181C001C0E000C87000EF3FC063FFC0707F80300007F00 00FFC00083F81801FC3800E03B00E07700E00F03E01E038000> 24 25 -4 2 30.399] 48 D [<03E000007E000007800001C00000E0000060000070000030780030FC0020CF006003C1C0007F80> 24 13 -5 1 30.399] 49 D [<00FC0000001FC0000000F00000003C0000000E00000007000000078000000380000003800000018078000180FE000180DF00 038083C0030000F00E00003E7C00000FF000> 32 17 -2 -1 30.399] 50 D [<0001FC000007FC00001F0000003C000000380000007000000060000000600000006000000060000000600000003000000030 000000180000781C00007F8E0000E3FF8000C03FF0000003FF8000003F80> 32 20 -2 1 30.399] 51 D [<00000C000001FC000007FC00000F0000001C0000003800000030000000300000003000000030000000300000003001800018 0380001803A07C0C0770FF8E0CF0C3F701E0007FC100000FF0000001FF0000001F00> 32 21 -1 1 30.399] 52 D [<3FFE7FFEE000C00080008000C000C000600038001E0007C007FE063E060C0618060006000600060007003E001C00> 16 23 -8 1 30.399] 53 D [<00380000FE0C018F3C01077C0183F0E0FFC0603F007003003807003806003C06001C06001E06000F060C0F833C06E1F8063F F0031F803F0000FFE00081FC0001FC0000C00000E00000E00003C000> 24 26 -4 3 30.399] 54 D [<3000007000007007FE701FFE707CF870700070E00078C000D8C00058C0006CC0006CC000646000666000723000731800318C 0030EF00303FF83007F0300000600000> 24 22 -4 1 30.399] 55 D [<003C00000F800001E03800787E003C7E000EE7000EC38007C18007C1C003C0C003C0E00760600760700730300E18380E1C38 1C07307803F3E0007F80> 24 20 -3 1 30.399] 56 D [<300000703F06707F9EF041FCF060F0F07FC0F000C0D000C0D000C0D800C0C800C0E800C06C00C06400C06600C07301C031FF FE3000FE3000C03800C03801C01801C03003C0200700> 24 24 -4 2 30.399] 57 D [<00100000001C0000000600000007000000038000780180007C01C040CE00C1C06300E7C063807F803983FC000FFFF00000F0 7000006030000060380000303800003070000030E0000018000000180000001C000003CE000007FE0000067C000000180000> 32 25 -2 3 30.399] 58 D [<0006000000070000000E0000000E0000001C0000001C000000180000003800000030000000700000006000007CE00000FFDF FE00CFC00F8003E0038003F801C0071E01C0070781C00607FF80070E7E0001FE0000000C0000000C00000018000000180000 00180000> 32 26 -2 3 30.399] 59 D [<7F8000F7C7E0C1C3C0C1CF80F1FE007FF00000C00000C00000C00000C00000C00000C00000C00000C00000C00000C00000FF 8000FFC000C1C001C00001C00001E0000FC000020000> 24 24 -6 1 30.399] 60 D [<06000001F800003E00000F806003C07001E0F000E0F80070FC0070EE0070E700706380E060F1C0603F806000006000006000 006000006000003F80000F80000380000700000E0000180000> 24 25 -6 2 30.399] 61 D [<60003C000F00038001C000C000E00070707070307030F038F038F038F0385038783068306C306C30667073E073C030007000 60004000> 16 27 -9 3 30.399] 62 D [<03F8000FFE001C6F0018E38019C3C00F81C00001C0C000C0E000C07001C03C01803E07801FFE000E700007000003800001C0 0001C00000E0001070003E38003FDC0021FC00001800> 24 24 -6 2 30.399] 63 D [<020000000300000003001E0007007F00E70073C07F0060E03B0060601F0060300F0070100F007000070030000380300003C0 300013E030007DB030007FD8300003CC380001C638000183B0000181F000018000000180000001C0000007C0000007800000> 32 25 -1 3 30.399] 64 D [<07F000007E00000F800003C00000E0000070C00070E00038F000387800383C00301E00700F80E00FF3C0073F0003800001C0 0000E00000E0000070003C38003F1C0037FE0018FE00081000> 24 25 -5 2 30.399] 65 D [<010000038000038F004383E0E780F875803C79801E39800E1D80071D80070F800307800303800303C00701E00779B80EFFCF FC07E1E001E00001E00001800001800001C00001C000078000020000> 24 26 -3 3 30.399] 66 D [<01FFE003FFE007000006300006380006380003380001B80000F800607800703C003C3F001E3BE00F30F80FF07C06003C0300 780380007F8000FFF80080FE0000EE0000600000F00001E000> 24 25 -4 2 30.399] 67 D [<03FC003807CF007C0CE380E0C061C1C0E070E380F83073007B3036005FF3340076F33C3001FBFFF0219B1830301B18303FFF 1830339B1C303383FFF833831C303FF81C003FF81C0033BFFFC0338203B8338101FC3FF181E033B0C1C03380E30033806600 33803C003FF83C0020303800> 32 28 0 4 30.399] 68 D [<063000000630003006300030063FFFF00630003006330030063306300633FE3006330630063306300633063006330630C633 06306633FF306633B63036303030363030301E3030301F3FFFF01F3033B00C3033300E3030300E3030300630383007303038 07BFFFF807A00000> 32 27 0 4 30.399] 69 D [<100001C03F8003C03FFF838041BFFF8000C00F0000C01C0000603800006060000070C0000038000000380000801C0000601C 0040301E01F0380F03C01C0E07000C000E0006001C00070018000380180001C0300001E0200000F0200000E06000004FF000 00007000> 32 26 -1 3 30.399] 70 D [<06000E0006007F00060007000600030006000300060003000600030006000300060003000600030046000300660003003600 03003E0003001F0003000F000300077FFFF80780007803C0003001E0000001E00000E0C00000380000001E0000000F1FFFF8 03C000F801E0007000E00000> 32 28 0 4 30.399] 71 D [<0380003800F00078003C00F0000F81E00003E7800007C4C07007FFC0FC0600C0FF8600C007F600C0061FFFC00607FFC00606 00C0060600C0060600C00607FFC0060600C0060600C0060600C0060600E00607FFF0060620C07FF830000078300000303800 007FFFFC0000007800000030> 32 28 0 4 30.399] 72 D [<030000000380030003FFFF0003FFFF000380030003800300038003000380030003800300038003000380038003FFFF800300 070000000000C000000060000000380000101DFFFEFC0F001FF8070007C003800F0001C01E0000E0380000F070000078E000 0038C000001D8000001F0000000E0000> 32 29 0 5 30.399] 73 D [ 32 29 -1 5 30.399] 74 D [<0F0000000DE000F00C780FF80C0E3FC00C07F8000C01C0000C63C0000C72C0000C3EC0000C1CE0000C3660C0CC3460C04C3F FFC06C3060C02C3060C03C3060C03C3060C01E3060C01E3FFFE01C3060C00C0060000C0060000E00600007FFFFF807006070 0780700003007000> 32 27 0 4 30.399] 75 D [<04040000060780180600E0380680303807E01C7807F80E70067E07E0061F8380061DE380061C7980061C0180061C01C0061C 01C0861C00C0461C00C0661C00C0361C00C0361C00C01E1C38C01E1C38C00C1C38C00E1C38C00E1C30C0061C60C0071CC0E0 079E80E0039800F003000000> 32 28 0 4 30.399] 76 D [<0E000020230000F079C001F0786003E07030078070380700701C0E00700C1C00700E1800F006380070073000380320001983 600018C3E0000CC3C0000C61C0000671C4000231C3000339E3800119C1C0019C01F01C8FFFF01CCE00E03C4600C078270000 602700000007800000030000> 32 28 -1 4 30.399] 77 D [<000C0000001E0000007F000080070000E00700E0600700E0300701E0180701C01C0703C00E0703800707070003070C0003C7 180001C72000000700000007000000070000FFFFFFF8000000F000000060000000000000000000000000000000000FFFFF00 00001F0000000E00> 32 27 -1 4 30.399] 78 D [ 24 28 -5 4 30.399] 79 D [<0000001800000078200001F8780003F87F8007981FF80E0800FF8E0800C05C0000C0180000C0380000C0300000C0700000C0 700000C070007FFF6000000FE000000EE0000000E0000000E0000000E0000000E000FFFFFFF80000C3F80000C3700000C700 0000EE000000F80000008000> 32 28 0 4 30.399] 80 D [ 32 28 0 4 30.399] 81 D [<38C0000038FFFFF038FFFFF038C000E038CE000038CE030038CFFF0038CE030038CE030038CE030038CFFF0038CE030038CE 0300B8CE0300B8CE0300F8CFFF0078CE030078EE0300788E0380380FFF80300CC3803800C0001800C0001DFFFFF00C00E0F0 0F0060600F00700000006000> 32 28 -1 4 30.399] 82 D [ 32 28 -1 4 30.399] 83 D [<0000380000003E00C000FF00C0C08700FFC00300C0C00380C0C00380C0C00180C0C00180C0C00180C0C071C0C0C071C0C0E0 F1C0FFF0E1C0C0D9C1C0C0DB81C0C0CC01C0C0CC01C0C0C601C0C0C601C0C0E701E0FFE3FFC018C381801C0380000C01C000 0E01E0000F01E0000C01C000> 32 28 -2 4 30.399] 84 D [<60300000F038707078387070383870E0183071E00830E1C00861C700000000000600000006000E0007FFFE0007FFFE000600 0E0006000E0006000E0006000E0006000E0007FFFF00060606000006000000060000000600000007FF800006070000060200 0007000000070000> 32 27 -1 4 30.399] 85 D [<0040000006380038060E0078060780F00601E1E0060387E00603FFE006030060C60300606603FFE066030060360300603E73 FFE01EF300601EE300601FC3FFF80E0300700E0000000E1FFFFC7FE0187C07E0181006C7FFF006001CF006001860061FFFF8 C6001C783E0018300FE01C0001C01C00> 32 29 0 5 30.399] 86 D [<3000000078307030383870701C3870700C1870E0EC1860E03810C3801C80822006700078031C01F8038E01E001C7038080C3 870041E1C60063F0CE0033B0EC001F306800187878000C7FFFFC0EFC307807CC3030070C31C0030F31C003FF33C0038E3F00 0380380001C03C0001C03C00> 32 28 0 4 30.399] 87 D [ 32 27 -1 4 30.399] 88 D [ 32 28 -1 4 30.399] 89 D [<600000007C007FF8FF007FF81FE0703003F87018030F70180301F00803007000030070000300700003007000030070000300 70000300700007007C0007FFFF00070773E0070071F0070070E0070070400700700007007000070070000780780007807800 07000000> 32 26 0 3 30.399] 90 D [<040000000630000006DE0078066781FC0631C3C00610F70006183E00061C1C00060C3C00066C3E0006EE670086E66300C786 C3806686C18036C681C01E67FFE00F761EE0066618C00706180003861800038618C001C6186000E61878FFE7FFF806C61870 060018000600180007001C0007001C0000001800> 32 30 0 5 30.399] 91 D [<1E0000001FC000781FFC00FC007FC3E00063FF80E0601E003C601C000F60380003E0300001F0780000F0EE000078C780003C 8380000F80007FFFFFF8000300780003007000030000000300000FFFFFE0000303C000030180000300003FFFFFF8000300F0 000300700003800000038000> 32 28 0 4 30.399] 92 D [ 32 28 -1 4 30.399] 93 D [<7E0000200FC007F001F83FF8003EFF80E01FF0003807C0000E0FE000071CF00003F87C0001F03F0000FFFF00787C0E001F3E 0000039EF00001E1F000C0F7F0187070303C383830781E3830F80F3831F0079833C003983E00001830007FFFFFF8000380F8 00038070000380000003C000> 32 28 0 4 30.399] 94 D [<001FFFF0707FFFF0F0FFFFF8798000001F3800600F0F01F807C383E006E1E78006707F0006303C0006383C0006187C00061C 6E00061CE600070CC700FF0CC380060D8380000D81C0000D01E0000FFFE0000C01C0000C0000070C0000070C00000F0C0000 1E0FFFF8180C00F800000070> 32 28 0 4 30.399] 95 D [<0000F0006001F8001807FC000E001C0007000E0003800E0001C0060000E00700006007000070030000380300003803000018 0300001C0380001C0380000FFFC0000E0380000E0000000E0000000E000000060000FFFFFFF8000600F0000600E000060000 000600000007000000070000> 32 28 -1 4 30.399] 96 D [<7000000078C0006070FC00F071FFF0E0711FFFC0700C03C0F0060780F0070E0070033800300380003801C0001801E0001801 E0000FFFFFF03C00E0F03400E0607600E000F600E0008200E0000300E0000100E00001FFFFF00080E0E00E80E0400E40E000 1E00E0003800F0000000C000> 32 28 -1 4 30.399] 97 D [<20000000703FFFF878FE7FF838C0000C1D800C0007000C0007C00C0007600C0007300C0007180C0007180C00071C0C00070C 0C00070C0C00078C0C00FF0C0C00060C0C00000C0C00000FFFF8000C0078000C0020020C0000070C00000F0C00000E0C0000 1C0FFF9010087FE0000003C0> 32 28 0 4 30.399] 98 D [ 32 26 -2 3 30.399] 99 D [<0C7000C00C7001F00C7007F00C7000300C7000300C7600300C77E1F00C77FDF00C707FF00C7073B00C7077300C707E300C7E 7038CC79FFF86C6070306C1070003C1FFFC03C1FFFC01C1870C01E1870C00C1870C00C1FFFC00E1870C0071870C0071870C0 039FFFE003DFFFF0039000C0> 32 28 0 4 30.399] 100 D [<6000180060601800606018007FE0180060601800606018006060180060601800607018007FF0180060601800000018000000 18007FF8180000F0180000601800000018007FFFFFF0006018F000001860FFFC1800003C1800001818000000180000001800 7FF8180000701C0000201C00> 32 28 -1 4 30.399] 101 D [<0706078007061F80070601C0070601C0070601C0070601C0070601C0478601C067C601C0676601C0373601C01F3601C01F7E 01C01FFF01C00FEF01C00F0E01C00F0701C00707FFFC0723C078FFF3003007F8000007CC0000070C00000706000007077FF8 070780F00703806007030000> 32 28 0 4 30.399] 102 D [<0600180006001800060018000600180006001800060018000600180006001800060018000600180007FFF81C07FFFFF8C6C0 183846C0180066601800367018003E3018001F3818001F3FFFF80E1C18F00E1C1860060E1800070E1800070F980003079800 03C4180003C01C0001801000> 32 28 0 4 30.399] 103 D [<01C001C003C003C007C00F801E003800E000> 16 9 -1 3 30.399] 104 D [<1C007F00C380C180808080808180C18077003C00> 16 10 -2 3 30.399] 105 D [<21FFFFF870001878FC0018303E0018000F80180007C0180007FFFFF807381870070418200700180007061800070618600707 FFE07FFE186007F618600366186007061860070618600707FFE0070618600706186007061860070618607FFE1860007FFFF8 00278070> 32 26 0 3 30.399] 106 D [<700000707F8003F8FFF80FC001BFFF00018078000180F0000181E0000181BC0001830F00018207E0018607C00184068001FF FE000180060001800600018006000180060001FFFE000180060001800600018006000180070001FFFF800182070000030000 000380000003C00000038000> 32 28 0 4 30.399] 107 D [<000C0000001F0000007F800000038000000380000003800000038000C00380006003800030038018380380381C0380380C03 807806038070070380F0030381E00383838003C3870001E38C0001E3B8000003800000038000000380000003800000038000 000380000003C000> 32 27 0 4 30.399] 108 D [<3000000030000000303000003FFFFFF83035C7F83031C6303031C6003031C6003031C6003031C6003FF9C6003031C6000001 C6000001C6003FF9C7FC0071C6780021C6380001E6003FF9E600007806000020060000000600FFFE0600003C0600001FFFFC 000000F87FF8007800F0002000600000> 32 29 0 5 30.399] 109 D [ 32 25 0 2 30.399] 110 D [<00060000C0060000300600E01C0603F00E060FC003861E0001E6380000766000003EC000001F8000000F00007FFFFFE0E006 01C0380600C00F0707E003C71FF0C0F03F007038F000181FC0000C0F0000060F8000071FC00003B0E00001E0780000FFFC00 00F038000078000000300000> 32 28 -1 4 30.399] 111 D [ 32 26 -1 3 30.399] 112 D [ 32 28 0 4 30.399] 113 D [<7FFFFFF801C3007801C3003001C3000001C3FF8001C3078001C30300000300003FFFFFE0000001E001CE01F061C3C07839C4 F1F01DCE3BC00FDE1F8007F80E0077E60F007FFF0F0071C79B8071C6D9C071C771C07FFF7FF861C6307801C03030FFFFB800 01C7980001C31E0001C01C00> 32 28 0 4 30.399] 114 D [<18000000386000C0386001E0386003E0386000603064006030660660F867FE603866666018666660186666601C6666600C67 67600C6766600C606060067FFFF83E6060F07A006040F300600003007000017FFFE001031CC001831C0000031C0007FFFFF0 0E031CE01C031C4038039E0000039C00> 32 29 -1 5 30.399] 115 D [<0000060003800F8000C03F80006001800030018000180180C0180180C00C0180C0CC0180C0CE0180FFCE0180C0C7FF80C0C6 0180C0C60180C0C60180C0C60180C0C60180FFC60180C0C7FF80C0C60180C0C60180C0C60180C0C60180C0E60180FFE601C0 E0C7FFC000060180> 32 27 -2 4 30.399] 116 D [<001E0000C07E00C0700601C0380603C01C0603800E06070007860E0003C638000306600000060000000600007FFFFFE00006 03C080060000C00600007006002039FFF9F01FFFFBF80F003F8007801E0003C03C0001E0700000E0E0000070C00000398000 003F0000001F0000000E0000> 32 28 -1 4 30.399] 117 D [<80000000C00303C060030FE0300300E01803006018030060180300600C0300600C0300600C0300600E0300600FFFFFE00E03 00600E0300600E0300600E0300600E0300600E0300600FFFFFE00E0300600E0300600E0300600E0300600E0300600E030060 0FFFFFF00FFFFFF0000000E0> 32 28 0 4 30.399] 118 D [<018000000180180001FFF8000180180001801800018018000180180081801800718018001D801CC007FFFBF003C00FC000E0 3F00407078006039E000301F8000180F00000C0F00000E1B80000731C0000330E00001E0700001C0700000FFFC0000E03800 0078000000780000> 32 27 -1 4 30.399] 119 D [<00600000033C0030030700FC0303C1F00300E3C003007F0003003E0007001C00FFFC1C0003183C0063003600633066007FF0 6700633C4300633E4380633743D87FF343F8633182386331C0706338E0E07FF8E3800300C60003000000FFFFFFF803781C38 03301C0003001C0003801E0003801E00> 32 29 0 5 30.399] 120 D [<0C0180000C0180F00FFF81F00C0180300C0180300C0186300C0186300C0186300FFFC6300001863000000630FFFFF6300060 F63000602630006006303FFFC6300061C630006006301F6006301FFFC630706306307070C63030707E303FFFFF3010707638 007000380078000000780000> 32 28 0 4 30.399] 121 D [ 32 28 -2 4 30.399] 122 D [ 32 28 -2 4 30.399] 123 D [<03C000780FC001F000C007F000DF0F3038C3FC107FC078087FF03E0000FF7F8000C1E78000C0E100FFFFFFF800C0C6787CE0 C7300FFCCE0000FCFC00000080007FFFFFF8000300780003003007FFFFC007FFFFC0000303803FFFFFF83FFFF0F000186070 003870000030380000E03800> 32 28 0 4 30.399] 124 D [<0000100000001E0000007E0000000600000C0600001C0600003C0600007006001FFFFFF81FFFFFF800000630000007000000 06003FFFFFF800030038000300200003000003FFFFC0000301C0C0038000606F83003066070018E307000CC1CC000FFFFFF8 070760700700700003C0380001803800> 32 29 0 5 30.399] 125 D [<00000C0000001F00000E3F00000E0300001C030000380300FFFFFFFC00000378200003B8700FFFE0787FFFF81DE007F80718 0000061800C0061FFFC0061800C0061800C0061FFFC0071800C0FF1FFFC0061800C0001800C0001FFFE00018E0C00700E000 0F7FFFF81E039C7818038E3000070F0000040400> 32 30 0 5 30.399] 126 D [<8000FFF8FFF860383018180C0C0C0E000700038001E000F000780038783C783C783C703C707838F80FF00380> 16 22 -8 -1 30.399] 127 D [<0C00001E00003F800037E00000F000007800001C00000E000007001C01803C00E0780070E000300000080000040180000380 000380000700000C0000> 24 20 -5 0 30.399] 128 D [<78000C000700038001C000E0007000380018201C310C718E6387C307060E> 16 15 -7 2 30.399] 129 D [<800000E000003000001C00000E000007800001C00001E00000E180007380003F80003F00003E00007C0001EE00030E000007 000007000003800003800003C00003C0000F80> 24 23 -5 2 30.399] 130 D [<700000FFC0108FFFF0001840001800000C00000C00000C001FCE001BFE00000C00> 24 11 -5 -1 30.399] 131 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f10 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f9 SF 0 114 p (Simpson)s f11 SF 13 r (8FP)s 0 211 p (SV])s f8 SF 102 166 p (Z)s f4 SF 135 174 p (b)s 121 241 p (a)s f3 SF 154 211 p (f)s f0 SF 4 r (\()s f3 SF (x)s f0 SF (\))s f3 SF 5 r (dx)s f11 SF 12 r (CeJ-?!28`a5+3hM8bLP'k\(KB@?i)s f8 SF 200 263 p (Z)s f4 SF 233 271 p (b)s 218 339 p (a)s f3 SF 252 308 p (f)s f0 SF 4 r (\()s f3 SF (x)s f0 SF (\))s f3 SF 5 r (dx)s f6 SF 9 r (\030)s f3 SF 407 286 p (h)s 407 301 p 19 1 ru f0 SF 408 331 p (3)s 435 308 p (\()s f3 SF (y)s f1 SF 465 313 p (0)s f0 SF 487 308 p (+)s 7 r (4)s f3 SF (y)s f1 SF 553 313 p (1)s f0 SF 575 308 p (+)s 8 r (2)s f3 SF (y)s f1 SF 641 313 p (2)s f0 SF 664 308 p (+)s 7 r (4)s f3 SF (y)s f1 SF 730 313 p (3)s f0 SF 752 308 p (+)s 7 r (2)s f3 SF (y)s f1 SF 818 313 p (4)s f0 SF 840 308 p (+)s 8 r (4)s f3 SF (y)s f1 SF 906 313 p (5)s f0 SF 929 308 p (+)s f6 SF 7 r (\001)s 6 r (\001)s 5 r (\001)s f0 SF 8 r (+)s 7 r (2)s f3 SF (y)s f4 SF 1074 313 p (n)s f7 SF (\000)s f1 SF (2)s f0 SF 1134 308 p (+)s 7 r (4)s f3 SF (y)s f4 SF 1200 313 p (n)s f7 SF (\000)s f1 SF (1)s f0 SF 1259 308 p (+)s f3 SF 8 r (y)s f4 SF 1309 313 p (n)s f0 SF 1327 308 p (\))s f3 SF 11 r (;)s f11 SF 0 411 p (\)\)4hOWq)s f3 SF 10 r (n)s f11 SF 10 r (9dq5+h)s f3 SF 7 r (x)s f4 SF 462 416 p (i)s f0 SF 482 411 p (=)s f3 SF 9 r (a)s f0 SF 5 r (+)s f3 SF 579 388 p (i)s 574 403 p 20 1 ru 574 434 p (n)s f0 SF 604 411 p (\()s f3 SF (b)s f6 SF 5 r (\000)s f3 SF 5 r (a)s f0 SF (\))s f3 SF (;)s 15 r (y)s f4 SF 738 416 p (i)s f0 SF 759 411 p (=)s f3 SF 9 r (f)s f0 SF 3 r (\()s f3 SF (x)s f4 SF 845 416 p (i)s f0 SF 856 411 p (\))s 34 r (\()s f3 SF (i)s f0 SF 9 r (=)s 9 r (0)s f3 SF (;)s f0 SF 6 r (1)s f3 SF (;)s f0 SF 5 r (2)s f3 SF (;)s f6 SF 6 r (\001)s 5 r (\001)s 6 r (\001)s f3 SF 5 r (;)s 6 r (n)s f0 SF (\))s f11 SF 7 r (5-?i\)8FP8mt9h)s 0 463 p (ZxT;*+#i,1*#h)s f0 SF 8 r (T)s -2 r (a)s -1 r (ylor)s f11 SF 10 r (8Sj&=~&@?}P)s f8 SF 231 518 p (Z)s f4 SF 265 527 p (\030)s f1 SF (+)s f2 SF 303 518 p (1)s 302 521 p 14 1 ru f5 SF 302 535 p (h)s f4 SF 250 594 p (\030)s f7 SF 1 r (\000)s f2 SF 289 585 p (1)s 287 589 p 14 1 ru f5 SF 287 602 p (h)s f3 SF 327 564 p (f)s f0 SF 3 r (\()s f3 SF (x)s f0 SF (\))s f3 SF 6 r (dx)s f6 SF 9 r (\030)s f8 SF 477 518 p (Z)s f4 SF 511 527 p (\030)s f1 SF (+)s f2 SF 549 518 p (1)s 548 521 p 14 1 ru f5 SF 548 535 p (h)s f4 SF 496 594 p (\030)s f7 SF 1 r (\000)s f2 SF 535 585 p (1)s 534 589 p 14 1 ru f5 SF 534 602 p (h)s f3 SF 573 564 p (p)s f0 SF (\()s f3 SF (x)s f0 SF (\))s f3 SF 5 r (dx)s f0 SF 10 r (=)s f3 SF 724 541 p (h)s 724 556 p 19 1 ru f0 SF 726 586 p (3)s f8 SF 753 537 p (\000)s f3 SF 768 564 p (f)s f0 SF 4 r (\()s f3 SF (\030)s f6 SF 9 r (\000)s f0 SF 863 541 p (1)s 862 556 p 19 1 ru f3 SF 862 586 p (h)s f0 SF 885 564 p (\))s 7 r (+)s 8 r (4)s f3 SF (f)s f0 SF 3 r (\()s f3 SF (\030)s f0 SF 2 r (\))s 7 r (+)s f3 SF 7 r (f)s f0 SF 4 r (\()s f3 SF (\030)s f0 SF 9 r (+)s 1152 541 p (1)s 1151 556 p 19 1 ru f3 SF 1151 586 p (h)s f0 SF 1174 564 p (\))s f8 SF 1187 537 p (\001)s f0 SF 1209 564 p (+)s f3 SF 8 r (O)s f0 SF 1 r (\()s f3 SF (h)s f1 SF 1301 550 p (5)s f0 SF 1316 564 p (\))s f11 SF 0 666 p (C)s f3 SF 51 644 p (n)s 51 659 p 20 1 ru f0 SF 53 689 p (2)s f11 SF 92 666 p (EX+IB.?\)57<>h\)8FP9mt*@?i)s 0 689 p 1.000 @beginspecial @epsf 0.700000 @hscale 0.700000 @vscale 25.000000 @hoffset 0.000000 0.000000 488.000000 505.000000 @bbox @setspecial %%BeginDocument: simpson.eps %! %%Title: /tmp/xfig-export002371 %%Creator: fig2dev %%CreationDate: Sun Apr 24 09:43:28 1994 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 488 505 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def /DrawSplineSection { /y3 exch def /x3 exch def /y2 exch def /x2 exch def /y1 exch def /x1 exch def /xa x1 x2 x1 sub 0.666667 mul add def /ya y1 y2 y1 sub 0.666667 mul add def /xb x3 x2 x3 sub 0.666667 mul add def /yb y3 y2 y3 sub 0.666667 mul add def x1 y1 lineto xa ya xb yb x3 y3 curveto } def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -29 10 translate 0.0 505.0 translate 0.900 -0.900 scale 2.000 setlinewidth % Polyline n 32 524 m 569 524 l gs col-1 s gr n 553.000 520.000 m 569.000 524.000 l 553.000 528.000 l gs 2 setlinejoin col-1 s gr % Polyline n 104 236 m 104 524 l 479 524 l 479 89 l gs 0.85 setgray fill gr gs col-1 s gr % Open spline n 107.000 239.000 m 122.000 221.000 l 122.000 221.000 137.000 203.000 155.000 186.500 DrawSplineSection 155.000 186.500 173.000 170.000 210.500 146.000 DrawSplineSection 210.500 146.000 248.000 122.000 299.000 108.500 DrawSplineSection 299.000 108.500 350.000 95.000 416.000 93.500 DrawSplineSection 482.000 92.000 l gs 0.85 setgray fill gr gs col-1 s gr % Interpolated spline n 68 386 m 82.279 333.985 88.279 311.485 92 296 curveto 94.288 286.479 98.562 263.496 101 254 curveto 102.778 247.075 107.806 230.794 110 224 curveto 115.781 206.097 130.546 163.668 137 146 curveto 140.267 137.056 147.946 115.675 152 107 curveto 154.996 100.588 162.664 85.749 167 80 curveto 171.765 73.683 183.477 60.026 191 56 curveto 197.782 52.371 213.623 49.825 221 50 curveto 226.965 50.142 239.666 52.980 245 56 curveto 249.574 58.590 256.900 67.219 260 71 curveto 263.161 74.856 269.346 84.844 272 89 curveto 279.763 101.157 296.739 131.111 305 143 curveto 311.972 153.034 326.553 177.483 338 185 curveto 350.631 193.295 379.422 201.852 395 200 curveto 406.707 198.608 426.071 186.569 434 179 curveto 443.394 170.033 455.527 144.703 461 134 curveto 465.765 124.680 475.193 101.701 479 92 curveto 482.716 82.531 491.133 59.790 494 50 curveto 495.930 43.410 498.180 33.660 503 11 curveto gs col-1 s gr % Polyline n 287 110 m 287 524 l gs col-1 s gr % Open spline n 107.000 239.000 m 89.000 260.000 l 89.000 260.000 71.000 281.000 54.500 309.500 DrawSplineSection 38.000 338.000 l gs col-1 s gr % Open spline n 479.000 92.000 m 500.000 93.500 l 500.000 93.500 521.000 95.000 540.500 99.500 DrawSplineSection 560.000 104.000 l gs col-1 s gr /Symbol findfont 20.00 scalefont setfont 476 551 m gs 1 -1 scale (x) col-1 show gr /Symbol findfont 20.00 scalefont setfont 86 548 m gs 1 -1 scale (x) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 521 131 m gs 1 -1 scale (y=f\(x\)) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 512 32 m gs 1 -1 scale (y=p\(x\)) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 98 548 m gs 1 -1 scale (-1/h) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 488 548 m gs 1 -1 scale (+1/h) col-1 show gr /Symbol findfont 20.00 scalefont setfont 287 548 m gs 1 -1 scale (x) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 476 572 m gs 1 -1 scale ( ) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 494 572 m gs 1 -1 scale ( ) col-1 show gr $F2psEnd %%EndDocument @endspecial 0 1947 p (\)\)4h)s f3 SF 8 r (p)s f0 SF (\()s f3 SF (x)s f0 SF (\))s f11 SF 11 r (9M8<$6ogCsX-?\177M8YHPC\\-)s f0 SF (:)s f3 SF 334 2043 p (p)s f8 SF 351 2006 p (\020)s f3 SF 371 2043 p (\030)s f6 SF 9 r (\000)s f0 SF 433 2021 p (1)s 431 2035 p 19 1 ru f3 SF 431 2066 p (h)s f8 SF 454 2006 p (\021)s f0 SF 483 2043 p (=)s f3 SF 10 r (f)s f8 SF 538 2006 p (\020)s f3 SF 558 2043 p (\030)s f6 SF 9 r (\000)s f0 SF 620 2021 p (1)s 619 2035 p 19 1 ru f3 SF 619 2066 p (h)s f8 SF 642 2006 p (\021)s f3 SF 662 2043 p (;)s 16 r (p)s f0 SF (\()s f3 SF (\030)s f0 SF 2 r (\))s 9 r (=)s f3 SF 9 r (f)s f0 SF 4 r (\()s f3 SF (\030)s f0 SF 1 r (\))s f3 SF (;)s 17 r (p)s f8 SF 895 2006 p (\020)s f3 SF 914 2043 p (\030)s f0 SF 9 r (+)s 976 2021 p (1)s 975 2035 p 19 1 ru f3 SF 975 2066 p (h)s f8 SF 998 2006 p (\021)s f0 SF 1027 2043 p (=)s f3 SF 10 r (f)s f8 SF 1082 2006 p (\020)s f3 SF 1102 2043 p (\030)s f0 SF 9 r (+)s 1164 2021 p (1)s 1163 2035 p 19 1 ru f3 SF 1163 2066 p (h)s f8 SF 1186 2006 p (\021)s f3 SF 1217 2043 p (:)s f10 SF 0 2136 p (A,)s 17 r (B,)s 18 r (F\(X\),)s 17 r (N)s f11 SF 11 r (8S|C#A#A5^%3hwp4qRQDCG13:<$i)s f0 SF 1259 2216 p (simpson.c)s 66 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f10 SF 0 73 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 193 p (/*)s 17 r 647 1 ru f0 SF 658 r (simpson.c)s 11 r 647 1 ru f10 SF 664 r (*/)s 0 312 p (#include)s 17 r ()s 0 352 p (#define)s 17 r (A)s 18 r (0.)s 488 r (/*)s f11 SF 17 r (V]C-?cz)s f0 SF 16 r ([)s f3 SF (a;)s 6 r (b)s f0 SF (])s f10 SF 482 r (*/)s 0 392 p (#define)s 17 r (B)s 18 r (1.)s 0 432 p (#define)s 17 r (F\(X\))s 18 r (\(\(X\)*\(X\)\))s 314 r (/*)s f11 SF 16 r ([V]{q)s f3 SF 17 r (f)s f0 SF 3 r (\()s f3 SF (x)s f0 SF (\))s f10 SF 543 r (*/)s 0 472 p (#define)s 17 r (N)s 18 r (20)s 488 r (/*)s f11 SF 17 r (cz)s f0 SF 11 r ([)s f3 SF (a;)s 5 r (b)s f0 SF (])s f11 SF 11 r (8]yq)s f3 SF 11 r (n)s f10 SF 476 r (*/)s 0 568 p (double)s 17 r (simpson)s 3 r 10 1 ru 15 r (rule\(\))s 331 r (/*)s f0 SF 17 r (Simpson)s f11 SF 11 r (8FPCv#3)s f8 SF 1102 523 p (Z)s f4 SF 1135 531 p (b)s 1121 598 p (a)s f3 SF 1154 568 p (f)s f0 SF 4 r (\()s f3 SF (x)s f0 SF (\))s f3 SF 5 r (dx)s f11 SF 12 r (CeJ-?{q)s f10 SF 40 r (*/)s 0 624 p ({)s 70 664 p (long)s 17 r (i;)s 506 r (/*)s f0 SF 16 r (long)s f11 SF 17 r (rqCK$)s f10 SF 547 r (*/)s 70 719 p (double)s 17 r (h,)s 18 r (s,)s 17 r (y[N)s 17 r (+)s 18 r (1];)s 244 r (/*)s f11 SF 17 r (\202\201\200\203)s f3 SF 11 r (h)s f0 SF (,)s f11 SF 11 r (V]R)s f3 SF 11 r (s)s f0 SF (,)s f11 SF 11 r (]U)s f3 SF 1139 697 p (i)s 1135 712 p 20 1 ru 1135 742 p (n)s f11 SF 1170 719 p (48{qR)s f3 SF 11 r (y)s f4 SF 1349 724 p (i)s f10 SF 1525 719 p (*/)s 70 806 p (h)s 17 r (=)s 18 r (1.)s 17 r (/)s 17 r (\(double\))s 18 r (N;)s 279 r (/*)s f3 SF 16 r (h)s f0 SF 10 r (=)s 818 784 p (1)s 816 799 p 20 1 ru f3 SF 816 829 p (n)s f10 SF 1525 806 p (*/)s 70 877 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 17 r (i)s 18 r (<=)s 17 r (N;)s 18 r (++i\))s 209 r (/*)s f3 SF 17 r (y)s f4 SF 765 882 p (i)s f0 SF 785 877 p (=)s f3 SF 10 r (f)s f8 SF 840 850 p (\000)s f3 SF 864 854 p (i)s 859 869 p 20 1 ru 859 900 p (n)s f8 SF 883 850 p (\001)s f0 SF 932 877 p (\()s f3 SF (i)s f0 SF 9 r (=)s 9 r (0)s f3 SF (;)s f0 SF 6 r (1)s f3 SF (;)s f0 SF 5 r (2)s f3 SF (;)s f6 SF 6 r (\001)s 5 r (\001)s 6 r (\001)s f3 SF 5 r (;)s 6 r (n)s f0 SF (\))s f10 SF 339 r (*/)s 139 926 p (y[i])s 18 r (=)s 17 r (F\(\(double\))s 18 r (i)s 17 r (/)s 18 r (\(double\))s 17 r (N\);)s 697 966 p (/*)s f11 SF 17 r ( "9)s f10 SF 685 r (*/)s 697 1020 p (/*)s f3 SF 17 r (s)s f0 SF 9 r (=)s f3 SF 813 997 p (h)s 813 1012 p 19 1 ru f0 SF 814 1042 p (3)s 836 1020 p (\()s f3 SF (y)s f1 SF 865 1025 p (0)s f0 SF 887 1020 p (+)s 8 r (4)s f3 SF (y)s f1 SF 953 1025 p (1)s f0 SF 976 1020 p (+)s 7 r (2)s f3 SF (y)s f1 SF 1042 1025 p (2)s f0 SF 1064 1020 p (+)s 7 r (4)s f3 SF (y)s f1 SF 1130 1025 p (3)s f0 SF 1152 1020 p (+)s f6 SF 8 r (\001)s 5 r (\001)s 6 r (\001)s f0 SF 7 r (+)s 8 r (4)s f3 SF (y)s f4 SF 1298 1025 p (n)s f7 SF (\000)s f1 SF (1)s f0 SF 1357 1020 p (+)s f3 SF 8 r (y)s f4 SF 1407 1025 p (n)s f0 SF 1425 1020 p (\))s f10 SF 87 r (*/)s 697 1071 p (/*)s f11 SF 17 r (8eJ)s f10 SF 685 r (*/)s 70 1111 p (s)s 17 r (=)s 18 r (y[0];)s 70 1151 p (for)s 17 r (\(i)s 18 r (=)s 17 r (1;)s 17 r (i)s 18 r (<)s 17 r (N;)s 18 r (++i\))s 70 1191 p ({)s 139 1231 p (if)s 18 r (\(i)s 17 r (%)s 18 r (2)s 17 r (==)s 18 r (1\))s 296 r (/*)s f11 SF 17 r (/0+)s f10 SF 11 r (i)s 17 r (%)s 18 r (2)s f0 SF (=)s f3 SF 11 r (i)s f11 SF 22 r (C)s f0 SF 11 r (2)s f11 SF 11 r (4y1/u>)s f10 SF 265 r (*/)s 209 1271 p (s)s 18 r (+=)s 17 r (4.)s 18 r (*)s 17 r (y[i];)s 139 1310 p (else)s 209 1350 p (s)s 18 r (+=)s 17 r (2.)s 18 r (*)s 17 r (y[i];)s 70 1390 p (})s 70 1430 p (s)s 17 r (+=)s 18 r (y[N];)s 70 1470 p (s)s 17 r (*=)s 18 r (\(h)s 17 r (/)s 17 r (3.\);)s 70 1510 p (return)s 17 r (s;)s 471 r (/*)s f3 SF 16 r (s)s f11 SF 17 r (8RC_-)s f10 SF 592 r (*/)s 0 1549 p (})s 0 1629 p (main\(\))s 0 1669 p ({)s 70 1709 p (double)s 17 r (s;)s 70 1789 p (s)s 17 r (=)s 18 r (simpson)s 2 r 10 1 ru 15 r (rule\(\);)s 296 r (/*)s f11 SF 17 r (n4S|+/{q)s f0 SF 8 r (simpson)s 2 r 10 1 ru 10 r (rule\(\))s f11 SF 11 r (CK$)s f10 SF 213 r (*/)s 70 1828 p (printf\("%.16f\\n",)s 17 r (s\);)s 262 r (/*)s f3 SF 16 r (s)s f11 SF 11 r (ClqU ")s f0 SF 8 r (16)s f11 SF 8 r (f\\N-?)s f10 SF 366 r (*/)s 0 1868 p (})s f0 SF 1259 2216 p (simpson.c)s 66 r (page)s 11 r (2)s EP pstopssaved restore %%Trailer %%Pages: 2 END %%EOF src2tex-2.12h.orig/simpson.eps100644 1750 1750 10020 5556340312 16277 0ustar kawamurakawamura%! %%Title: /tmp/xfig-export002371 %%Creator: fig2dev %%CreationDate: Sun Apr 24 09:43:28 1994 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 488 505 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def /DrawSplineSection { /y3 exch def /x3 exch def /y2 exch def /x2 exch def /y1 exch def /x1 exch def /xa x1 x2 x1 sub 0.666667 mul add def /ya y1 y2 y1 sub 0.666667 mul add def /xb x3 x2 x3 sub 0.666667 mul add def /yb y3 y2 y3 sub 0.666667 mul add def x1 y1 lineto xa ya xb yb x3 y3 curveto } def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -29 10 translate 0.0 505.0 translate 0.900 -0.900 scale 2.000 setlinewidth % Polyline n 32 524 m 569 524 l gs col-1 s gr n 553.000 520.000 m 569.000 524.000 l 553.000 528.000 l gs 2 setlinejoin col-1 s gr % Polyline n 104 236 m 104 524 l 479 524 l 479 89 l gs 0.85 setgray fill gr gs col-1 s gr % Open spline n 107.000 239.000 m 122.000 221.000 l 122.000 221.000 137.000 203.000 155.000 186.500 DrawSplineSection 155.000 186.500 173.000 170.000 210.500 146.000 DrawSplineSection 210.500 146.000 248.000 122.000 299.000 108.500 DrawSplineSection 299.000 108.500 350.000 95.000 416.000 93.500 DrawSplineSection 482.000 92.000 l gs 0.85 setgray fill gr gs col-1 s gr % Interpolated spline n 68 386 m 82.279 333.985 88.279 311.485 92 296 curveto 94.288 286.479 98.562 263.496 101 254 curveto 102.778 247.075 107.806 230.794 110 224 curveto 115.781 206.097 130.546 163.668 137 146 curveto 140.267 137.056 147.946 115.675 152 107 curveto 154.996 100.588 162.664 85.749 167 80 curveto 171.765 73.683 183.477 60.026 191 56 curveto 197.782 52.371 213.623 49.825 221 50 curveto 226.965 50.142 239.666 52.980 245 56 curveto 249.574 58.590 256.900 67.219 260 71 curveto 263.161 74.856 269.346 84.844 272 89 curveto 279.763 101.157 296.739 131.111 305 143 curveto 311.972 153.034 326.553 177.483 338 185 curveto 350.631 193.295 379.422 201.852 395 200 curveto 406.707 198.608 426.071 186.569 434 179 curveto 443.394 170.033 455.527 144.703 461 134 curveto 465.765 124.680 475.193 101.701 479 92 curveto 482.716 82.531 491.133 59.790 494 50 curveto 495.930 43.410 498.180 33.660 503 11 curveto gs col-1 s gr % Polyline n 287 110 m 287 524 l gs col-1 s gr % Open spline n 107.000 239.000 m 89.000 260.000 l 89.000 260.000 71.000 281.000 54.500 309.500 DrawSplineSection 38.000 338.000 l gs col-1 s gr % Open spline n 479.000 92.000 m 500.000 93.500 l 500.000 93.500 521.000 95.000 540.500 99.500 DrawSplineSection 560.000 104.000 l gs col-1 s gr /Symbol findfont 20.00 scalefont setfont 476 551 m gs 1 -1 scale (x) col-1 show gr /Symbol findfont 20.00 scalefont setfont 86 548 m gs 1 -1 scale (x) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 521 131 m gs 1 -1 scale (y=f\(x\)) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 512 32 m gs 1 -1 scale (y=p\(x\)) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 98 548 m gs 1 -1 scale (-1/h) col-1 show gr /NewCenturySchlbk-BoldItalic findfont 20.00 scalefont setfont 488 548 m gs 1 -1 scale (+1/h) col-1 show gr /Symbol findfont 20.00 scalefont setfont 287 548 m gs 1 -1 scale (x) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 476 572 m gs 1 -1 scale ( ) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 494 572 m gs 1 -1 scale ( ) col-1 show gr $F2psEnd src2tex-2.12h.orig/solution.eps100644 1750 1750 60462 5703236257 16510 0ustar kawamurakawamura%! %%Title: /tmp/xfig-export003985 %%Creator: fig2dev %%CreationDate: Thu Sep 29 08:09:05 1994 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 559 326 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -9 9 translate 0.0 326.0 translate 0.900 -0.900 scale 0.000 setlinewidth % Polyline n 317 89 m 562 230 l 317 372 l 72 230 l gs 0.30 setgray fill gr 1.000 setlinewidth % Polyline n 317 89 m 586 245 l gs col-1 s gr n 574.166 233.513 m 586.000 245.000 l 570.152 240.434 l gs 2 setlinejoin col-1 s gr % Polyline n 317 89 m 317 44 l gs col-1 s gr n 313.000 60.000 m 317.000 44.000 l 321.000 60.000 l gs 2 setlinejoin col-1 s gr % Polyline n 317 89 m 48 245 l gs col-1 s gr n 63.848 240.434 m 48.000 245.000 l 59.834 233.513 l gs 2 setlinejoin col-1 s gr 0.000 setlinewidth % Polyline n 286 107 m 286 105 l 271 108 l 271 116 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 286 105 m 271 108 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 271 116 m 271 108 l 256 105 l 256 124 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 271 108 m 256 105 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 256 124 m 256 105 l 240 92 l 240 133 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 256 105 m 240 92 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 240 133 m 240 92 l 225 68 l 225 142 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 240 92 m 225 68 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 225 142 m 225 68 l 210 38 l 210 151 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 225 68 m 210 38 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 210 151 m 210 38 l 195 31 l 195 160 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 210 38 m 195 31 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 195 160 m 195 31 l 179 55 l 179 169 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 195 31 m 179 55 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 179 169 m 179 55 l 164 103 l 164 177 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 179 55 m 164 103 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 164 177 m 164 103 l 149 145 l 149 186 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 164 103 m 149 145 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 149 186 m 149 145 l 133 176 l 133 195 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 149 145 m 133 176 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 133 195 m 133 176 l 118 196 l 118 204 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 133 176 m 118 196 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 118 204 m 118 196 l 103 211 l 103 213 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 118 196 m 103 211 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 103 213 m 103 211 l 87 221 l 87 222 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 103 211 m 87 221 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 87 222 m 87 221 l 72 230 l 72 230 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 87 221 m 72 230 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 72 230 m 72 230 l 72 230 l 72 230 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 72 230 m 72 230 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 358 113 m 358 112 l 343 119 l 343 121 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 358 112 m 343 119 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 343 121 m 343 119 l 327 123 l 327 130 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 343 119 m 327 123 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 327 130 m 327 123 l 312 122 l 312 139 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 327 123 m 312 122 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 312 139 m 312 122 l 297 115 l 297 148 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 312 122 m 297 115 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 297 148 m 297 115 l 281 104 l 281 157 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 297 115 m 281 104 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 281 157 m 281 104 l 266 92 l 266 166 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 281 104 m 266 92 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 266 166 m 266 92 l 251 82 l 251 174 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 266 92 m 251 82 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 251 174 m 251 82 l 235 84 l 235 183 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 251 82 m 235 84 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 235 183 m 235 84 l 220 100 l 220 192 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 235 84 m 220 100 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 220 192 m 220 100 l 205 127 l 205 201 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 220 100 m 205 127 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 205 201 m 205 127 l 189 157 l 189 210 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 205 127 m 189 157 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 189 210 m 189 157 l 174 186 l 174 219 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 189 157 m 174 186 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 174 219 m 174 186 l 159 210 l 159 227 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 174 186 m 159 210 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 159 227 m 159 210 l 143 229 l 143 236 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 159 210 m 143 229 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 143 236 m 143 229 l 128 243 l 128 245 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 143 229 m 128 243 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 128 245 m 128 243 l 113 254 l 113 254 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 128 243 m 113 254 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 113 254 m 113 254 l 113 254 l 113 254 l gs 0.55 setgray fill gr 0.500 setlinewidth % Polyline n 113 254 m 113 254 l gs 0.55 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 399 136 m 399 124 l 383 126 l 383 145 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 399 124 m 383 126 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 383 145 m 383 126 l 368 126 l 368 154 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 383 126 m 368 126 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 368 154 m 368 126 l 353 125 l 353 163 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 368 126 m 353 125 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 353 163 m 353 125 l 337 125 l 337 171 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 353 125 m 337 125 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 337 171 m 337 125 l 322 126 l 322 180 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 337 125 m 322 126 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 322 180 m 322 126 l 307 129 l 307 189 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 322 126 m 307 129 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 307 189 m 307 129 l 291 134 l 291 198 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 307 129 m 291 134 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 291 198 m 291 134 l 276 141 l 276 207 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 291 134 m 276 141 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 276 207 m 276 141 l 261 152 l 261 216 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 276 141 m 261 152 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 261 216 m 261 152 l 246 164 l 246 225 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 261 152 m 246 164 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 246 225 m 246 164 l 230 179 l 230 233 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 246 164 m 230 179 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 230 233 m 230 179 l 215 196 l 215 242 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 230 179 m 215 196 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 215 242 m 215 196 l 200 214 l 200 251 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 215 196 m 200 214 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 200 251 m 200 214 l 184 232 l 184 260 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 200 214 m 184 232 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 184 260 m 184 232 l 169 249 l 169 269 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 184 232 m 169 249 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 169 269 m 169 249 l 154 266 l 154 278 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 169 249 m 154 266 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 154 278 m 154 266 l 154 278 l 154 278 l gs 0.65 setgray fill gr 0.500 setlinewidth % Polyline n 154 266 m 154 278 l gs 0.65 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 439 160 m 439 131 l 424 137 l 424 169 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 439 131 m 424 137 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 424 169 m 424 137 l 409 143 l 409 177 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 424 137 m 409 143 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 409 177 m 409 143 l 394 149 l 394 186 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 409 143 m 394 149 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 394 186 m 394 149 l 378 156 l 378 195 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 394 149 m 378 156 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 378 195 m 378 156 l 363 163 l 363 204 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 378 156 m 363 163 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 363 204 m 363 163 l 348 171 l 348 213 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 363 163 m 348 171 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 348 213 m 348 171 l 332 179 l 332 222 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 348 171 m 332 179 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 332 222 m 332 179 l 317 187 l 317 230 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 332 179 m 317 187 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 317 230 m 317 187 l 302 196 l 302 239 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 317 187 m 302 196 l gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 317 89 m 302 97 l gs 0.50 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 302 98 m 302 97 l 286 105 l 286 107 l gs 0.50 setgray fill gr % Polyline n 286 248 m 286 206 l 271 216 l 271 257 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 286 206 m 271 216 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 271 257 m 271 216 l 256 227 l 256 266 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 271 216 m 256 227 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 256 266 m 256 227 l 240 238 l 240 275 l gs 0.70 setgray fill gr % Polyline n 302 239 m 302 196 l 286 206 l 286 248 l gs 0.70 setgray fill gr % Polyline n 240 275 m 240 238 l 225 249 l 225 283 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 240 238 m 225 249 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 225 283 m 225 249 l 210 261 l 210 292 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 225 249 m 210 261 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 210 292 m 210 261 l 195 273 l 195 301 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 210 261 m 195 273 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 195 301 m 195 273 l 195 301 l 195 301 l gs 0.70 setgray fill gr 0.500 setlinewidth % Polyline n 195 273 m 195 301 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 480 183 m 480 160 l 465 168 l 465 192 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 480 160 m 465 168 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 465 192 m 465 168 l 450 177 l 450 201 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 465 168 m 450 177 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 450 201 m 450 177 l 434 186 l 434 210 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 450 177 m 434 186 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 434 210 m 434 186 l 419 194 l 419 219 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 434 186 m 419 194 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 419 219 m 419 194 l 404 203 l 404 227 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 419 194 m 404 203 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 404 227 m 404 203 l 388 212 l 388 236 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 404 203 m 388 212 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 388 236 m 388 212 l 373 221 l 373 245 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 388 212 m 373 221 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 373 245 m 373 221 l 358 230 l 358 254 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 373 221 m 358 230 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 358 254 m 358 230 l 343 238 l 343 263 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 358 230 m 343 238 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 343 263 m 343 238 l 327 247 l 327 272 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 343 238 m 327 247 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 327 272 m 327 247 l 312 256 l 312 281 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 327 247 m 312 256 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 312 281 m 312 256 l 297 265 l 297 289 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 312 256 m 297 265 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 297 289 m 297 265 l 281 274 l 281 298 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 297 265 m 281 274 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 281 298 m 281 274 l 266 283 l 266 307 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 281 274 m 266 283 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 266 307 m 266 283 l 251 292 l 251 316 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 266 283 m 251 292 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 251 316 m 251 292 l 235 301 l 235 325 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 251 292 m 235 301 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 235 325 m 235 301 l 235 325 l 235 325 l gs 0.80 setgray fill gr 0.500 setlinewidth % Polyline n 235 301 m 235 325 l gs 0.80 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 521 207 m 521 192 l 506 201 l 506 216 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 521 192 m 506 201 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 506 216 m 506 201 l 491 210 l 491 225 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 506 201 m 491 210 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 491 225 m 491 210 l 475 219 l 475 233 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 491 210 m 475 219 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 475 233 m 475 219 l 460 227 l 460 242 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 475 219 m 460 227 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 460 242 m 460 227 l 445 236 l 445 251 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 460 227 m 445 236 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 445 251 m 445 236 l 429 245 l 429 260 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 445 236 m 429 245 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 429 260 m 429 245 l 414 254 l 414 269 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 429 245 m 414 254 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 414 269 m 414 254 l 399 263 l 399 278 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 414 254 m 399 263 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 399 278 m 399 263 l 383 272 l 383 286 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 399 263 m 383 272 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 383 286 m 383 272 l 368 281 l 368 295 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 383 272 m 368 281 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 368 295 m 368 281 l 353 289 l 353 304 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 368 281 m 353 289 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 353 304 m 353 289 l 337 298 l 337 313 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 353 289 m 337 298 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 337 313 m 337 298 l 322 307 l 322 322 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 337 298 m 322 307 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 322 322 m 322 307 l 307 316 l 307 331 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 322 307 m 307 316 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 307 331 m 307 316 l 291 325 l 291 339 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 307 316 m 291 325 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 291 339 m 291 325 l 276 334 l 276 348 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 291 325 m 276 334 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 276 348 m 276 334 l 276 348 l 276 348 l gs 0.85 setgray fill gr 0.500 setlinewidth % Polyline n 276 334 m 276 348 l gs 0.85 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 562 230 m 562 222 l 547 230 l 547 239 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 562 222 m 547 230 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 547 239 m 547 230 l 531 239 l 531 248 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 547 230 m 531 239 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 531 248 m 531 239 l 516 248 l 516 257 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 531 239 m 516 248 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 516 257 m 516 248 l 501 257 l 501 266 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 516 248 m 501 257 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 501 266 m 501 257 l 485 266 l 485 275 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 501 257 m 485 266 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 485 275 m 485 266 l 470 275 l 470 283 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 485 266 m 470 275 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 470 283 m 470 275 l 455 283 l 455 292 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 470 275 m 455 283 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 455 292 m 455 283 l 439 292 l 439 301 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 455 283 m 439 292 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 439 301 m 439 292 l 424 301 l 424 310 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 439 292 m 424 301 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 424 310 m 424 301 l 409 310 l 409 319 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 424 301 m 409 310 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 409 319 m 409 310 l 394 319 l 394 328 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 409 310 m 394 319 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 394 328 m 394 319 l 378 328 l 378 336 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 394 319 m 378 328 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 378 336 m 378 328 l 363 336 l 363 345 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 378 328 m 363 336 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 363 345 m 363 336 l 348 345 l 348 354 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 363 336 m 348 345 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 348 354 m 348 345 l 332 354 l 332 363 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 348 345 m 332 354 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 332 363 m 332 354 l 317 363 l 317 372 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 332 354 m 317 363 l gs 0.95 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 317 372 m 317 363 l 317 372 l 317 372 l gs 0.95 setgray fill gr 0.500 setlinewidth % Polyline n 317 363 m 317 372 l gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 317 372 m 562 230 l gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 302 97 m 286 105 l gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 302 196 m 286 206 l gs 0.70 setgray fill gr gs col-1 s gr 0.000 setlinewidth % Polyline n 317 89 m 317 89 l 302 97 l 302 98 l gs 0.50 setgray fill gr 0.500 setlinewidth % Polyline n 256 227 m 240 238 l gs 0.70 setgray fill gr gs col-1 s gr /Helvetica findfont 12.00 scalefont setfont 325 46 m gs 1 -1 scale (1) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 211 28 m gs 1 -1 scale (t=0.1) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 487 157 m gs 1 -1 scale (t=2) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 532 190 m gs 1 -1 scale (t=3) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 265 79 m gs 1 -1 scale (t=0.2) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 397 118 m gs 1 -1 scale (t=0.5) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 445 127 m gs 1 -1 scale (t=1) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 574 220 m gs 1 -1 scale (t=4) col-1 show gr /Times-BoldItalic findfont 30.00 scalefont setfont 310 25 m gs 1 -1 scale (u) col-1 show gr /Times-BoldItalic findfont 30.00 scalefont setfont 10 262 m gs 1 -1 scale ( x) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 70 220 m gs 1 -1 scale (1) col-1 show gr /Times-BoldItalic findfont 30.00 scalefont setfont 598 262 m gs 1 -1 scale (Nt) col-1 show gr $F2psEnd src2tex-2.12h.orig/sqrt_mat.red100644 1750 1750 5157 5733240423 16422 0ustar kawamurakawamura% {\bf sqrt\_mat.red} % {\ For a given $2\times2$ matrix $\,A\ge0\,$, we shall prove that % $$ % \sqrt{A}={1\over\sqrt{2\sqrt{ac-b^2}+a+c}} % \pmatrix{ % \sqrt{ac-b^2}+a & b \cr % b & \sqrt{ac-b^2}+c \cr} % $$} % on div; % {\ For a given matrix % $ % A=\pmatrix{ a & b \cr b & c \cr} % $ % ,\ we shall find a matrix % $ % X=\pmatrix{ x & y \cr y & z \cr} % $ % satisfying $A=X^2$.} % mat_a:=mat((a,b),(b,c)); mat_x:=mat((x,y),(y,z)); % {\ The equation % $\,A=X^2\,$ is translated into algebraic equations % $$ % x^2+y^2=a,\ y(x+z)=b,\ y^2+z^2=c \leqno(1) % $$} % mat_xx:=mat_x*mat_x; % {\ (1) is equivalent to % $$ % x=\sqrt{a-y^2}, % \ y\bigl(\sqrt{a-y^2}+\sqrt{c-y^2}\,\bigr)=b, % \ z=\sqrt{c-y^2} \leqno(2) % $$ % We put % $$ % f(y)=\sqrt{a-y^2}, % \ g(y)=y\bigl(\sqrt{a-y^2}+\sqrt{c-y^2}\,\bigr)-b, % \ h(y)=\sqrt{c-y^2} \leqno(3) % $$} % func_f:=rhs(first(solve(mat_xx(1,1)=a,x))); func_h:=rhs(first(solve(mat_xx(2,2)=c,z))); func_g:=sub({x=func_f,z=func_h},mat_xx(1,2))-b; % {\ We define a function $\,g_1(w)\,$ by % $$ % g_1(w)=g(y)\;{\sqrt{a-y^2}-\sqrt{c-y^2}\over y}\;\Bigg|_{y=1/w} % =-b\sqrt{aw^2-1}+b\sqrt{cw^2-1}+a-c \leqno(4) % $$} % func_g1:=sub(y=1/w,func_g*(sqrt(a-y^2)-sqrt(c-y^2))/y); % {\ We put % $$ % g_2(v) % =g_1(w)\Big|_{w=\sqrt{(v^2+1)/a}} % =b\sqrt{-a+cv^2+c\over a}-bv+a-c \leqno(5) % $$} % func_g2:=sub(w=sqrt((v^2+1)/a),func_g1); % {\ Since % $$ % \eqalign{ % g_2(v)&=0\cr % g_2(v)+bv-a+c&=bv-a+c\cr % (g_2(v)+bv-a+c)^2&=(bv-a+c)^2\cr % {b^2\over a\ }\;(-a+cv^2+c)&=(bv-a+c)^2\cr % } % $$ % we put % $$ % g_3(v)={b^2\over a\ }\;(-a+cv^2+c)-(bv-a+c)^2 \leqno(6) % $$ % We can solve the equation $\,g_3(v)=0\,$ and get two solutions % $$ % v_1={a+\sqrt{ac-b^2}\over b}\ ,\quad v_2={a-\sqrt{ac-b^2}\over b} % $$ % Here we note that since % $$ % g_2(v_2)=\sqrt{-2c\sqrt{ac-b^2}+ac-b^2+c^2}+\sqrt{ac-b^2}-c % $$ % $\,g_2(v_2)\,$ is not always equal to 0. So, we can reject $\,v_2\,$.} % func_g3:=(func_g2+b*v-a+c)^2-(b*v-a+c)^2; solutions:=solve(func_g3,v); v1:=rhs(first(solutions)); v2:=rhs(second(solutions)); sub(v=v1,func_g2); sub(v=v2,func_g2); % {\ Since % $$ % y=\sqrt{a\over v^2+1} % $$ % we have % $$ % y_1={b\over \sqrt{2\sqrt{ac-b^2}+a+c}} % $$} % y1:=sqrt(a/(v1^2+1)); % {\ Hence, we obtain % $$ % x_1=f(y_1)\ ,\quad z_1=h(y_1) % $$ % this gives % $$ % X_1 % =\pmatrix{x_1 & y_1 \cr % y_1 & z_1 \cr} % ={1\over d_1}\pmatrix{ \sqrt{ac-b^2}+a & b \cr % b & \sqrt{ac-b^2}+c \cr} % $$ % where $\,d_1=\sqrt{2\sqrt{ac-b^2}+a+c}\,$. % Direct computation shows $\,X_1^2=A\,$.} % x1:=sub(y=y1,func_f); z1:=sub(y=y1,func_h); mat_x1:=mat((x1,y1),(y1,z1)); d1:=sqrt(2*sqrt(a*c - b**2) + a + c); d1*mat_x1; mat_x1*mat_x1; end; src2tex-2.12h.orig/sqrt_mat.red.ps100644 1750 1750 117066 6266067455 17124 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: sqrt_mat.red.dvi %%Pages: 1 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 122 /f0 NF f0 SF [ 24 23 -1 0 25.367] 68 D [ 24 23 -1 0 21.678] 70 D [ 24 23 -1 0 24.906] 72 D [<8F80F060C030C01080188018801800180038007003F01FE03FC07E00F000E000C010C010C0104030603030F01F10> 16 23 -2 0 18.449] 83 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<0040040000C0060000E00E0000E00E0001E00F0001D01D0001D01D0001D01D0003901C800388388003883880070838400704 7040070470400E0470200E02E0200E02E0200E02E0201C03E0101C01C0101C01C0103C03C038FF0FF8FE> 32 23 -1 0 34.131] 87 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [<78EEE6470707070707070707070707070707073F0000000000060F0F06> 8 29 2 6 10.147] 106 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [<00FF80001C00001C00001C00001C00001C00079C00185C00303C00701C00601C00E01C00E01C00E01C00E01C00601C00701C 00303C001C6C00078400> 24 20 -1 6 17.526] 113 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<07FC00E000E000E000E000E0FFFCC0E040E020E030E010E008E004E004E002E001E001E000E000600060> 16 21 -1 0 16.604] 52 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<003000003000003000003000003000003000003000003000003000003000FFFFF8FFFFF80030000030000030000030000030 00003000003000003000003000003000> 24 22 -2 3 25.829] 43 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D [ 24 23 0 0 18.449] 12 D 1.000 62 /f1 NF f1 SF [ 8 15 -2 0 13.237] 49 D [ 16 15 -1 0 13.237] 50 D [<3E0041808080C0C000C000C0008001801E00030001800180618021001E00> 16 15 -1 0 13.237] 51 D [<04081030206040C0C0C0C0C0C0C0C040602030100804> 8 22 -2 5 10.378] 40 D [<804020301018080C0C0C0C0C0C0C0C08181030204080> 8 22 -1 5 10.378] 41 D [<00C00000C00000C00000C00000C00000C00000C000FFFF80FFFF8000C00000C00000C00000C00000C00000C00000C000> 24 16 -1 2 20.386] 43 D [ 24 8 -1 -2 20.386] 61 D 1.000 51 /f2 NF f2 SF [ 8 11 -1 0 11.300] 50 D 1.000 123 /f3 NF f3 SF [ 24 23 -1 0 24.906] 65 D [ 32 23 -1 0 27.512] 88 D [<1C7062C841C440C4C0C4C0C06060606060603060303018700C700390> 16 14 -1 0 17.553] 97 D [<1C00620041004180C0C0C0C06060606060606060306030603C40338018001800180018000C000C000C000C003E00> 16 23 -1 0 14.252] 98 D [<3E004180C040802080008000C000C000C000600060E030E018400780> 16 14 -2 0 14.371] 99 D [<1C7062C841C440C4C0C4C0C06060606060603060303018700C7003B00018001800180018000C000C000C000C003E> 16 23 -1 0 17.284] 100 D [<7000C800E4006600060006000300030003000300030001800180018001800180018000C000C007FC00C000C0006000600060 006C002E0036001C> 16 29 -1 6 16.258] 102 D [<7E00C180E0C060C000600060076018E010701030303030301818181818180C180C0C061C031C00E4> 16 20 0 6 15.839] 103 D [ 16 23 -2 0 19.133] 104 D [<07800C4018201820181018100C080C080C088608460C460C260C1C08> 16 14 -1 0 16.097] 118 D [<078F000C58801830401830401830201830200C18100C18100C1810861810460C18460C18260C181C0410> 24 14 -1 0 23.774] 119 D [<78E0C510E708C30403040300018001800180418020C620C711A30F1E> 16 14 -1 0 18.979] 120 D [<3C006300718070C000C00060076008E018701830183018300C180C180C188618460C460C260C1C04> 16 20 -1 6 16.281] 121 D [<838047C03C60201010100C000200010000800040102018700F880708> 16 14 -1 0 15.443] 122 D [<40402020101070F0F060> 8 10 -2 6 9.224] 59 D 1.000 122 /f4 NF f4 SF [<39804740C320C320C300C3006180618031800E80> 16 10 -1 0 14.404] 97 D [<1C00320032003100310031009880998059803180> 16 10 -1 0 13.283] 118 D [<1CF03388318831843184318498C298C658C63046> 16 10 -1 0 19.211] 119 D [<70008C00C600460003001F003300318031803180318098C098C058C03040> 16 15 -1 5 13.468] 121 D [ 16 23 -1 6 13.606] 61 D 1.000 113 /f5 NF f5 SF [ 24 2 -3 -7 25.829] 0 D [ 24 27 -3 6 25.829] 21 D [<4002C006600C301818300C6006C00380038006C00C6018303018600CC0064002> 16 16 -5 0 25.829] 2 D [<006000000060000000F0000000F000000198000001980000030C0000030C000006060000060600000C0300000C0300000C01 8000180180001800C000F000C00030006000000060000000300000003000000018000000180000000C0000000C0000000600 0000060000000300000003000000018000000180000000C0000000C00000006000000020> 32 34 -2 32 27.673] 112 D 1.000 115 /f6 NF f6 SF [<02040C08181830307070706060E0E0E0E0E0E0E0E0E0E0E0E0E0606070707030301818080C0402> 8 39 -5 38 15.220] 0 D [<0006000C001800300070006000C001C0018003800300070006000E000E000C001C001C001800380038003800300070007000 7000700070007000E000E000E000E000E000E000E000E000E000E000E000E000E000E000E000E000E000E000E000E0007000 70007000700070007000300038003800380018001C001C000C000E000E000600070003000380018001C000C0006000700030 0018000C0006> 16 78 -7 77 24.445] 18 D [<80406020303018181C1C1C0C0C0E0E0E0E0E0E0E0E0E0E0E0E0E0C0C1C1C1C1818303020604080> 8 39 -2 38 15.220] 1 D [ 16 78 -1 77 24.445] 19 D [ 8 22 -4 21 11.069] 12 D [<0060000000E0000000F0000000F0000001D8000001D80000038C0000038C00000706000007060000070300000E0300000E01 80001C0180001C00C0001C00C00038006000B8006000700030003000300000003000000018000000180000000C0000000C00 000006000000060000000300000003000000018000000180000000C0000000C0000000600000006000000030000000300000 0018000000180000000C00000004> 32 41 -4 39 33.208] 112 D [<003000000030000000700000007800000078000000F8000000EC000000EC000000EC000001C6000001C6000001C600000383 000003830000038300000381800007018000070180000700C0000E00C0000E00C0000E0060000E0060001C0060009C003000 5C0030007800300038001800180018000800180000000C0000000C0000000C00000006000000060000000600000003000000 030000000300000001800000018000000180000000C0000000C0000000C00000006000000060000000600000003000000030 000000300000001800000018000000180000000C0000000C0000000C000000060000000600000002> 32 60 -3 58 33.208] 113 D [<0030000000300000007000000078000000780000007800000078000000EC000000EC000000EC000000EC000000E6000001C6 000001C6000001C6000001C3000003830000038300000383000003818000038180000701800007018000070180000700C000 0700C0000E00C0000E00C0000E0060000E0060000E0060001C0060001C0030009C0030005C00300038003000380018001800 1800080018000800180000000C0000000C0000000C0000000C00000006000000060000000600000006000000030000000300 000003000000030000000180000001800000018000000180000000C0000000C0000000C0000000C0000000C0000000600000 0060000000600000006000000030000000300000003000000030000000180000001800000018000000180000000C0000000C 0000000C0000000C000000060000000600000002> 32 80 -3 78 33.208] 114 D 1.000 117 /f7 NF f7 SF [<1F8780786F80F02E00F01E00F01E00781E003C1E001F1E0001FE00001E00301E00781E00783C007038001FE000> 24 15 -1 0 18.564] 97 D [<07CFC01C3FC0380F00700F00700F00F00F00F00F00F00F00F00F00F00F00700F00700F00380F001C3F0007EF00000F00000F 00000F00000F00000F00000F00003F00003F00> 24 23 -1 0 21.216] 100 D [<07F01C18380C78067000F000F000FFFEF00EF00E700E700C381C1C3807E0> 16 15 -1 0 17.503] 101 D [ 32 15 -1 0 31.824] 109 D [<003FC0003FC0000F00000F00000F00000F0007CF001C3F00381F00780F00700F00F00F00F00F00F00F00F00F00F00F00700F 00780F00381F001C370007E300> 24 21 -1 6 20.155] 113 D [ 16 15 -1 0 15.728] 114 D [ 16 15 -1 0 15.063] 115 D [<0F801C403C603C603C603C603C003C003C003C003C003C003C00FFC03FC01C001C000C000C000C000C00> 16 21 -1 0 14.851] 116 D [<70F8F8F870> 8 5 -3 0 10.608] 46 D 1.000 126 /f8 NF f8 SF [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [<00FE00FE003800380038003800380FB81FF8387870786038E038E038E038E0386038707838781FF807B8> 16 21 -1 7 17.434] 113 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<078007800FC00CC00CC00CC01CE01CE01CE01CE038703870FCFCFCFC> 16 14 -1 0 17.434] 118 D [<18E03DF03DF035B035B035B037B037B03030703870387038FFFCFFFC> 16 14 -1 0 17.434] 119 D [ 16 14 -1 0 17.434] 120 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [ 16 14 -1 0 17.434] 122 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0FC03FE07070E038E01C401C001C001C0038007007E007E00070003000382038703870703FE00FC0> 16 20 -1 0 17.434] 51 D [<07FC07FC00E000E000E000E0FFFCFFFCE0E070E030E038E018E01CE00CE006E006E002E003E001E0> 16 20 -1 0 17.434] 52 D [<1F003F8071C0E0E0E070E07040700070006060E07FC07F007000700070007000700070007FE07FE0> 16 20 -2 0 17.434] 53 D [<07C01FE038707038701C601CE01CE01CE01CF038F870EFE0E7C070007000303838381E3807F003E0> 16 20 -1 0 17.434] 54 D [<04000E000E000E000E000E0006000700070007000380038001C001C000E00060E070E038FFFCFFFCE000> 16 21 -1 0 17.434] 55 D [<0FC03FF078787038E01CE01CE01CE01C7038387007800FC03870703870387038703838701FE00FC0> 16 20 -1 0 17.434] 56 D [<1F003FC070E07070703000380018001C0F9C1FFC387C703CE01CE01CE018E038703838701FE00F80> 16 20 -1 0 17.434] 57 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [ 16 26 -2 3 17.434] 47 D [<60F0F06000000000000060F0F060> 8 14 -6 0 17.434] 58 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [<4080F3C0FFC03F000C00> 16 5 -3 -15 17.434] 94 D [ 16 3 -2 -9 17.434] 45 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 421.000000 translate 0.500000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat /showpage{}def/copypage{}def/erasepage{}def BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f8 SF -2 60 p (1:)s 34 r (%)s f7 SF 16 r (sqrt)s 2 r 11 1 ru 12 r (mat.red)s f8 SF -2 90 p (2:)s -2 116 p (3:)s 34 r (%)s f0 SF 16 r (F)s -2 r (or)s 10 r (a)s 12 r (given)s 10 r (2)s f5 SF 7 r (\002)s f0 SF 7 r (2)s 11 r (matrix)s f3 SF 17 r (A)s f5 SF 9 r (\025)s f0 SF 10 r (0)s 5 r (,)s 11 r (we)s 10 r (shall)s 11 r (prove)s 10 r (that)s f5 SF 379 184 p (p)s 25 1 ru f3 SF 407 214 p (A)s f0 SF 9 r (=)s 618 191 p (1)s 480 206 p 292 1 ru f6 SF 480 213 p (p)s 259 1 ru f0 SF 513 246 p (2)s f5 SF 530 218 p (p)s 102 1 ru f3 SF 558 246 p (ac)s f5 SF 7 r (\000)s f3 SF 8 r (b)s f1 SF 645 236 p (2)s f0 SF 667 246 p (+)s f3 SF 7 r (a)s f0 SF 8 r (+)s f3 SF 7 r (c)s f6 SF 782 167 p (\022)s f5 SF 812 166 p (p)s 102 1 ru f3 SF 840 194 p (ac)s f5 SF 7 r (\000)s f3 SF 7 r (b)s f1 SF 926 184 p (2)s f0 SF 949 194 p (+)s f3 SF 7 r (a)s 118 r (b)s 899 234 p (b)s f5 SF 1033 206 p (p)s 102 1 ru f3 SF 1060 234 p (ac)s f5 SF 8 r (\000)s f3 SF 7 r (b)s f1 SF 1147 224 p (2)s f0 SF 1169 234 p (+)s f3 SF 8 r (c)s f6 SF 1223 167 p (\023)s f8 SF -20 318 p (10:)s 34 r (%)s -20 344 p (11:)s -20 368 p (12:)s 34 r (on)s 18 r (d)s -15 r (d)s -2 r (i)s -16 r (i)s -1 r (v)s -16 r (v)s -2 r (;)s -20 396 p (13:)s -20 447 p (14:)s 34 r (%)s f0 SF 17 r (F)s -2 r (or)s 10 r (a)s 11 r (given)s 10 r (matrix)s f3 SF 11 r (A)s f0 SF 10 r (=)s f6 SF 452 400 p (\022)s f3 SF 482 427 p (a)s 33 r (b)s 483 467 p (b)s 35 r (c)s f6 SF 552 400 p (\023)s f0 SF 588 447 p (,)s 11 r (we)s 10 r (shall)s 11 r (\014nd)s 11 r (a)s 11 r (matrix)s f3 SF 11 r (X)s f0 SF 12 r (=)s f6 SF 1011 400 p (\022)s f3 SF 1041 427 p (x)s 33 r (y)s 1042 467 p (y)s 35 r (z)s f6 SF 1116 400 p (\023)s f0 SF 1152 447 p (satisfying)s f3 SF 11 r (A)s f0 SF 9 r (=)s f3 SF 9 r (X)s f1 SF 1399 435 p (2)s f0 SF 1414 447 p (.)s f8 SF -20 505 p (23:)s 34 r (%)s -20 532 p (24:)s -20 558 p (25:)s 34 r (mat)s 2 r 10 1 ru 16 r (a:=mat\(\(a,b\),\(b,c\)\);)s -20 589 p (26:)s 34 r (mat)s 2 r 10 1 ru 16 r (x:=mat\(\(x,y\),\(y,z\)\);)s -20 620 p (27:)s -20 650 p (28:)s 34 r (%)s f0 SF 17 r (The)s 11 r (equation)s f3 SF 16 r (A)s f0 SF 10 r (=)s f3 SF 9 r (X)s f1 SF 409 638 p (2)s f0 SF 441 650 p (is)s 11 r (translated)s 11 r (into)s 10 r (algebraic)s 11 r (equations)s 66 729 p (\(1\))s f3 SF 424 r (x)s f1 SF 551 715 p (2)s f0 SF 573 729 p (+)s f3 SF 8 r (y)s f1 SF 624 715 p (2)s f0 SF 648 729 p (=)s f3 SF 9 r (a;)s 17 r (y)s f0 SF 1 r (\()s f3 SF (x)s f0 SF 8 r (+)s f3 SF 7 r (z)s f0 SF 1 r (\))s 10 r (=)s f3 SF 9 r (b;)s 17 r (y)s f1 SF 948 715 p (2)s f0 SF 971 729 p (+)s f3 SF 7 r (z)s f1 SF 1021 715 p (2)s f0 SF 1045 729 p (=)s f3 SF 9 r (c)s f8 SF -20 803 p (33:)s 34 r (%)s -20 830 p (34:)s -20 853 p (35:)s 34 r (mat)s 2 r 10 1 ru 16 r (xx:=mat)s 2 r 10 1 ru 15 r (x*mat)s 2 r 10 1 ru 16 r (x;)s f0 SF 1218 2216 p (sqrt)s 2 r 10 1 ru 10 r (mat.red)s 67 r (page)s 11 r (1)s EP pstopssaved restore /pstopssaved save def pstopsmatrix setmatrix 297.500000 421.000000 translate 0.500000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat /showpage{}def/copypage{}def/erasepage{}def BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f8 SF -20 33 p (36:)s -20 61 p (37:)s 34 r (%)s f0 SF 17 r (\(1\))s 11 r (is)s 11 r (equiv)s -1 r (alen)s -1 r (t)s 10 r (to)s 66 146 p (\(2\))s f3 SF 296 r (x)s f0 SF 9 r (=)s f6 SF 468 116 p (p)s 91 1 ru f3 SF 501 146 p (a)s f5 SF 7 r (\000)s f3 SF 8 r (y)s f1 SF 577 137 p (2)s f3 SF 592 146 p (;)s 16 r (y)s f6 SF 635 119 p (\000)s 650 116 p (p)s 91 1 ru f3 SF 683 146 p (a)s f5 SF 8 r (\000)s f3 SF 7 r (y)s f1 SF 759 137 p (2)s f0 SF 781 146 p (+)s f6 SF 814 116 p (p)s 87 1 ru f3 SF 848 146 p (c)s f5 SF 7 r (\000)s f3 SF 7 r (y)s f1 SF 920 137 p (2)s f6 SF 940 119 p (\001)s f0 SF 965 146 p (=)s f3 SF 9 r (b;)s 17 r (z)s f0 SF 10 r (=)s f6 SF 1101 116 p (p)s 87 1 ru f3 SF 1134 146 p (c)s f5 SF 8 r (\000)s f3 SF 7 r (y)s f1 SF 1207 137 p (2)s f0 SF 66 224 p (W)s -1 r (e)s 10 r (put)s 66 307 p (\(3\))s f3 SF 201 r (f)s f0 SF 3 r (\()s f3 SF (y)s f0 SF 2 r (\))s 9 r (=)s f6 SF 417 276 p (p)s 91 1 ru f3 SF 450 307 p (a)s f5 SF 7 r (\000)s f3 SF 8 r (y)s f1 SF 526 297 p (2)s f3 SF 540 307 p (;)s 17 r (g)s f0 SF 1 r (\()s f3 SF (y)s f0 SF 1 r (\))s 10 r (=)s f3 SF 9 r (y)s f6 SF 688 280 p (\000)s 704 276 p (p)s 91 1 ru f3 SF 737 307 p (a)s f5 SF 7 r (\000)s f3 SF 8 r (y)s f1 SF 812 297 p (2)s f0 SF 835 307 p (+)s f6 SF 868 276 p (p)s 87 1 ru f3 SF 901 307 p (c)s f5 SF 7 r (\000)s f3 SF 8 r (y)s f1 SF 974 297 p (2)s f6 SF 994 280 p (\001)s f5 SF 1017 307 p (\000)s f3 SF 7 r (b;)s 17 r (h)s f0 SF (\()s f3 SF (y)s f0 SF 1 r (\))s 9 r (=)s f6 SF 1197 276 p (p)s 87 1 ru f3 SF 1230 307 p (c)s f5 SF 7 r (\000)s f3 SF 8 r (y)s f1 SF 1302 297 p (2)s f8 SF -20 385 p (49:)s 34 r (%)s -20 411 p (50:)s -20 437 p (51:)s 34 r (func)s 2 r 10 1 ru 16 r (f:=rhs\(first\(solve\(mat)s 2 r 10 1 ru 15 r (xx\(1,1\)=a,x\)\)\);)s -20 468 p (52:)s 34 r (func)s 2 r 10 1 ru 16 r (h:=rhs\(first\(solve\(mat)s 2 r 10 1 ru 15 r (xx\(2,2\)=c,z\)\)\);)s -20 499 p (53:)s 34 r (func)s 2 r 10 1 ru 16 r (g:=sub\({x=func)s 2 r 10 1 ru 15 r (f,z=func)s 2 r 10 1 ru 16 r (h},mat)s 2 r 10 1 ru 15 r (xx\(1,2\)\)-b;)s -20 530 p (54:)s -20 559 p (55:)s 34 r (%)s f0 SF 17 r (W)s -2 r (e)s 10 r (de\014ne)s 11 r (a)s 11 r (function)s f3 SF 17 r (g)s f1 SF 433 564 p (1)s f0 SF 448 559 p (\()s f3 SF (w)s f0 SF (\))s 17 r (by)s 66 668 p (\(4\))s f3 SF 137 r (g)s f1 SF 261 673 p (1)s f0 SF 276 668 p (\()s f3 SF (w)s f0 SF 1 r (\))s 9 r (=)s f3 SF 10 r (g)s f0 SF 1 r (\()s f3 SF (y)s f0 SF 1 r (\))s f6 SF 445 617 p (p)s 91 1 ru f3 SF 478 646 p (a)s f5 SF 7 r (\000)s f3 SF 8 r (y)s f1 SF 553 636 p (2)s f5 SF 576 646 p (\000)s f6 SF 609 617 p (p)s 87 1 ru f3 SF 642 646 p (c)s f5 SF 7 r (\000)s f3 SF 8 r (y)s f1 SF 715 636 p (2)s 445 661 p 285 1 ru f3 SF 578 691 p (y)s f6 SF 743 610 p (\014)s 743 630 p (\014)s 743 650 p (\014)s 743 670 p (\014)s 743 690 p (\014)s f4 SF 754 711 p (y)s f1 SF 1 r (=1)s f4 SF (=w)s f0 SF 846 668 p (=)s f5 SF 9 r (\000)s f3 SF (b)s f6 SF 921 636 p (p)s 114 1 ru f3 SF 954 668 p (aw)s f1 SF 997 659 p (2)s f5 SF 1019 668 p (\000)s f0 SF 7 r (1)s 8 r (+)s f3 SF 7 r (b)s f6 SF 1123 636 p (p)s 111 1 ru f3 SF 1157 668 p (cw)s f1 SF 1196 659 p (2)s f5 SF 1218 668 p (\000)s f0 SF 7 r (1)s 8 r (+)s f3 SF 7 r (a)s f5 SF 7 r (\000)s f3 SF 8 r (c)s f8 SF -20 784 p (60:)s 34 r (%)s -20 810 p (61:)s -20 836 p (62:)s 34 r (func)s 2 r 10 1 ru 16 r (g1:=sub\(y=1/w,func)s 2 r 10 1 ru 15 r (g*\(sqrt\(a-y^2\)-sqrt\(c-y^2\)\)/y\);)s -20 867 p (63:)s -20 894 p (64:)s 34 r (%)s f0 SF 17 r (W)s -2 r (e)s 10 r (put)s 66 1000 p (\(5\))s f3 SF 275 r (g)s f1 SF 399 1005 p (2)s f0 SF 414 1000 p (\()s f3 SF (v)s f0 SF 1 r (\))s 9 r (=)s f3 SF 10 r (g)s f1 SF 517 1005 p (1)s f0 SF 532 1000 p (\()s f3 SF (w)s f0 SF 1 r (\))s f6 SF 583 962 p (\014)s 583 981 p (\014)s 583 1001 p (\014)s f4 SF 594 1023 p (w)s f1 SF (=)s f5 SF 634 1000 p (p)s 109 1 ru f1 SF 662 1023 p (\()s f4 SF (v)s f2 SF 686 1016 p (2)s f1 SF 699 1023 p (+1\))s f4 SF (=a)s f0 SF 782 1000 p (=)s f3 SF 9 r (b)s f6 SF 831 946 p (r)s 193 1 ru f5 SF 868 977 p (\000)s f3 SF (a)s f0 SF 8 r (+)s f3 SF 7 r (cv)s f1 SF 984 968 p (2)s f0 SF 1006 977 p (+)s f3 SF 8 r (c)s 868 992 p 185 1 ru 952 1022 p (a)s f5 SF 1065 1000 p (\000)s f3 SF 8 r (bv)s f0 SF 8 r (+)s f3 SF 8 r (a)s f5 SF 7 r (\000)s f3 SF 7 r (c)s f8 SF -20 1098 p (70:)s 34 r (%)s f0 SF 1218 2216 p (sqrt)s 2 r 10 1 ru 10 r (mat.red)s 67 r (page)s 11 r (2)s EP pstopssaved restore /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 0.500000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat /showpage{}def/copypage{}def/erasepage{}def BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f8 SF -20 33 p (71:)s -20 60 p (72:)s 34 r (func)s 2 r 10 1 ru 16 r (g2:=sub\(w=sqrt\(\(v^2+1\)/a\),func)s 2 r 10 1 ru 15 r (g1\);)s -20 91 p (73:)s -20 117 p (74:)s 34 r (%)s f0 SF 17 r (Since)s f3 SF 774 151 p (g)s f1 SF 790 156 p (2)s f0 SF 805 151 p (\()s f3 SF (v)s f0 SF 1 r (\))s 10 r (=)s 9 r (0)s f3 SF 589 204 p (g)s f1 SF 605 209 p (2)s f0 SF 620 204 p (\()s f3 SF (v)s f0 SF 1 r (\))s 7 r (+)s f3 SF 8 r (bv)s f5 SF 8 r (\000)s f3 SF 8 r (a)s f0 SF 7 r (+)s f3 SF 8 r (c)s f0 SF 9 r (=)s f3 SF 9 r (bv)s f5 SF 9 r (\000)s f3 SF 7 r (a)s f0 SF 7 r (+)s f3 SF 8 r (c)s f0 SF 548 258 p (\()s f3 SF (g)s f1 SF 577 263 p (2)s f0 SF 592 258 p (\()s f3 SF (v)s f0 SF 1 r (\))s 8 r (+)s f3 SF 7 r (bv)s f5 SF 9 r (\000)s f3 SF 7 r (a)s f0 SF 7 r (+)s f3 SF 8 r (c)s f0 SF (\))s f1 SF 833 244 p (2)s f0 SF 857 258 p (=)s 10 r (\()s f3 SF (bv)s f5 SF 8 r (\000)s f3 SF 8 r (a)s f0 SF 7 r (+)s f3 SF 7 r (c)s f0 SF (\))s f1 SF 1063 244 p (2)s f3 SF 595 310 p (b)s f1 SF 609 298 p (2)s 595 325 p 29 1 ru f3 SF 595 355 p (a)s f0 SF 637 332 p (\()s f5 SF (\000)s f3 SF (a)s f0 SF 7 r (+)s f3 SF 8 r (cv)s f1 SF 766 319 p (2)s f0 SF 788 332 p (+)s f3 SF 7 r (c)s f0 SF (\))s 9 r (=)s 10 r (\()s f3 SF (bv)s f5 SF 8 r (\000)s f3 SF 8 r (a)s f0 SF 7 r (+)s f3 SF 7 r (c)s f0 SF (\))s f1 SF 1063 319 p (2)s f0 SF 66 402 p (we)s 11 r (put)s 66 501 p (\(6\))s f3 SF 404 r (g)s f1 SF 528 506 p (3)s f0 SF 543 501 p (\()s f3 SF (v)s f0 SF 1 r (\))s 9 r (=)s f3 SF 634 479 p (b)s f1 SF 649 467 p (2)s 634 494 p 29 1 ru f3 SF 635 524 p (a)s f0 SF 677 501 p (\()s f5 SF (\000)s f3 SF (a)s f0 SF 7 r (+)s f3 SF 8 r (cv)s f1 SF 805 488 p (2)s f0 SF 828 501 p (+)s f3 SF 7 r (c)s f0 SF (\))s f5 SF 7 r (\000)s f0 SF 8 r (\()s f3 SF (bv)s f5 SF 8 r (\000)s f3 SF 8 r (a)s f0 SF 7 r (+)s f3 SF 7 r (c)s f0 SF (\))s f1 SF 1099 488 p (2)s f0 SF 66 592 p (W)s -1 r (e)s 10 r (can)s 11 r (solve)s 10 r (the)s 11 r (equation)s f3 SF 17 r (g)s f1 SF 480 597 p (3)s f0 SF 495 592 p (\()s f3 SF (v)s f0 SF 1 r (\))s 9 r (=)s 10 r (0)s 16 r (and)s 11 r (get)s 11 r (tw)s -1 r (o)s 11 r (solutions)s f3 SF 513 696 p (v)s f1 SF 529 701 p (1)s f0 SF 553 696 p (=)s f3 SF 592 674 p (a)s f0 SF 8 r (+)s f5 SF 650 646 p (p)s 102 1 ru f3 SF 678 674 p (ac)s f5 SF 7 r (\000)s f3 SF 8 r (b)s f1 SF 765 664 p (2)s 592 689 p 187 1 ru f3 SF 679 719 p (b)s 795 696 p (;)s 38 r (v)s f1 SF 859 701 p (2)s f0 SF 883 696 p (=)s f3 SF 922 674 p (a)s f5 SF 7 r (\000)s 980 646 p (p)s 102 1 ru f3 SF 1008 674 p (ac)s f5 SF 7 r (\000)s f3 SF 8 r (b)s f1 SF 1095 664 p (2)s 922 689 p 187 1 ru f3 SF 1009 719 p (b)s f0 SF 66 785 p (Here)s 11 r (we)s 11 r (note)s 11 r (that)s 11 r (since)s f3 SF 414 878 p (g)s f1 SF 429 883 p (2)s f0 SF 444 878 p (\()s f3 SF (v)s f1 SF 473 883 p (2)s f0 SF 488 878 p (\))s 9 r (=)s f6 SF 545 831 p (q)s 404 1 ru f5 SF 579 878 p (\000)s f0 SF (2)s f3 SF (c)s f6 SF 635 845 p (p)s 102 1 ru f3 SF 669 878 p (ac)s f5 SF 7 r (\000)s f3 SF 7 r (b)s f1 SF 755 868 p (2)s f0 SF 778 878 p (+)s f3 SF 7 r (ac)s f5 SF 7 r (\000)s f3 SF 8 r (b)s f1 SF 898 868 p (2)s f0 SF 920 878 p (+)s f3 SF 7 r (c)s f1 SF 967 868 p (2)s f0 SF 990 878 p (+)s f6 SF 1023 845 p (p)s 102 1 ru f3 SF 1056 878 p (ac)s f5 SF 8 r (\000)s f3 SF 7 r (b)s f1 SF 1143 868 p (2)s f5 SF 1165 878 p (\000)s f3 SF 8 r (c)s 72 958 p (g)s f1 SF 88 963 p (2)s f0 SF 103 958 p (\()s f3 SF (v)s f1 SF 132 963 p (2)s f0 SF 147 958 p (\))s 16 r (is)s 11 r (not)s 11 r (alwa)s -1 r (ys)s 11 r (equal)s 11 r (to)s 11 r (0.)s 14 r (So,)s 12 r (we)s 10 r (can)s 11 r (reject)s f3 SF 16 r (v)s f1 SF 822 963 p (2)s f0 SF 842 958 p (.)s f8 SF -20 992 p (96:)s 34 r (%)s -20 1019 p (97:)s -20 1045 p (98:)s 34 r (func)s 2 r 10 1 ru 16 r (g3:=\(func)s 2 r 10 1 ru 15 r (g2+b*v-a+c\)^2-\(b*v-a+c\)^2;)s -20 1079 p (99:)s 34 r (solutions:=solve\(func)s 2 r 10 1 ru 16 r (g3,v\);)s -37 1113 p (100:)s 34 r (v1:=rhs\(first\(solutions\)\);)s -37 1144 p (101:)s 34 r (v2:=rhs\(second\(solutions\)\);)s -37 1175 p (102:)s 34 r (sub\(v=v1,func)s 2 r 10 1 ru 15 r (g2\);)s -37 1209 p (103:)s 34 r (sub\(v=v2,func)s 2 r 10 1 ru 15 r (g2\);)s -37 1240 p (104:)s -37 1266 p (105:)s 34 r (%)s f0 SF 16 r (Since)s f3 SF 717 1322 p (y)s f0 SF 10 r (=)s f6 SF 779 1275 p (r)s 97 1 ru f3 SF 852 1299 p (a)s 816 1314 p 89 1 ru 816 1345 p (v)s f1 SF 833 1335 p (2)s f0 SF 856 1345 p (+)s 7 r (1)s 66 1403 p (we)s 11 r (hav)s -1 r (e)s f3 SF 625 1451 p (y)s f1 SF 642 1456 p (1)s f0 SF 666 1451 p (=)s f3 SF 844 1429 p (b)s 705 1444 p 292 1 ru f6 SF 705 1450 p (p)s 259 1 ru f0 SF 738 1484 p (2)s f5 SF 755 1456 p (p)s 102 1 ru f3 SF 782 1484 p (ac)s f5 SF 8 r (\000)s f3 SF 7 r (b)s f1 SF 869 1474 p (2)s f0 SF 891 1484 p (+)s f3 SF 8 r (a)s f0 SF 7 r (+)s f3 SF 7 r (c)s f0 SF 1218 2216 p (sqrt)s 2 r 10 1 ru 10 r (mat.red)s 67 r (page)s 11 r (3)s EP pstopssaved restore /pstopssaved save def pstopsmatrix setmatrix 297.500000 0.000000 translate 0.500000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f8 SF -37 33 p (113:)s 34 r (%)s -37 60 p (114:)s -37 86 p (115:)s 34 r (y1:=sqrt\(a/\(v1^2+1\)\);)s -37 117 p (116:)s -37 143 p (117:)s 34 r (%)s f0 SF 16 r (Hence,)s 11 r (we)s 10 r (obtain)s f3 SF 631 178 p (x)s f1 SF 650 183 p (1)s f0 SF 674 178 p (=)s f3 SF 9 r (f)s f0 SF 4 r (\()s f3 SF (y)s f1 SF 758 183 p (1)s f0 SF 773 178 p (\))s f3 SF 11 r (;)s 39 r (z)s f1 SF 860 183 p (1)s f0 SF 884 178 p (=)s f3 SF 10 r (h)s f0 SF (\()s f3 SF (y)s f1 SF 968 183 p (1)s f0 SF 983 178 p (\))s 66 236 p (this)s 11 r (gives)s f3 SF 413 294 p (X)s f1 SF 441 299 p (1)s f0 SF 465 294 p (=)s f6 SF 500 247 p (\022)s f3 SF 530 274 p (x)s f1 SF 549 279 p (1)s f3 SF 597 274 p (y)s f1 SF 613 279 p (1)s f3 SF 531 314 p (y)s f1 SF 548 319 p (1)s f3 SF 597 314 p (z)s f1 SF 613 319 p (1)s f6 SF 634 247 p (\023)s f0 SF 667 294 p (=)s 714 271 p (1)s 706 286 p 32 1 ru f3 SF 706 317 p (d)s f1 SF 724 322 p (1)s f6 SF 748 247 p (\022)s f5 SF 778 246 p (p)s 102 1 ru f3 SF 806 274 p (ac)s f5 SF 7 r (\000)s f3 SF 8 r (b)s f1 SF 893 264 p (2)s f0 SF 915 274 p (+)s f3 SF 7 r (a)s 118 r (b)s 865 314 p (b)s f5 SF 999 286 p (p)s 102 1 ru f3 SF 1026 314 p (ac)s f5 SF 8 r (\000)s f3 SF 7 r (b)s f1 SF 1113 304 p (2)s f0 SF 1136 314 p (+)s f3 SF 7 r (c)s f6 SF 1189 247 p (\023)s f0 SF 66 388 p (where)s f3 SF 17 r (d)s f1 SF 185 393 p (1)s f0 SF 209 388 p (=)s f6 SF 244 355 p (p)s 259 1 ru f0 SF 278 388 p (2)s f5 SF 294 360 p (p)s 102 1 ru f3 SF 322 388 p (ac)s f5 SF 7 r (\000)s f3 SF 8 r (b)s f1 SF 409 378 p (2)s f0 SF 431 388 p (+)s f3 SF 7 r (a)s f0 SF 8 r (+)s f3 SF 7 r (c)s f0 SF 6 r (.)s 14 r (Direct)s 11 r (computation)s 12 r (shows)s f3 SF 15 r (X)s f1 SF 992 376 p (2)s 989 396 p (1)s f0 SF 1016 388 p (=)s f3 SF 9 r (A)s f0 SF 6 r (.)s f8 SF -37 422 p (131:)s 34 r (%)s -37 449 p (132:)s -37 475 p (133:)s 34 r (x1:=sub\(y=y1,func)s 2 r 10 1 ru 15 r (f\);)s -37 509 p (134:)s 34 r (z1:=sub\(y=y1,func)s 2 r 10 1 ru 15 r (h\);)s -37 543 p (135:)s 34 r (mat)s 2 r 10 1 ru 15 r (x1:=mat\(\(x1,y1\),\(y1,z1\)\);)s -37 576 p (136:)s 34 r (d1:=sqrt\(2*sqrt\(a*c)s 17 r (-)s 18 r (b**2\))s 17 r (+)s 17 r (a)s 18 r (+)s 17 r (c\);)s -37 607 p (137:)s 34 r (d1*mat)s 2 r 10 1 ru 15 r (x1;)s -37 636 p (138:)s 34 r (mat)s 2 r 10 1 ru 15 r (x1*mat)s 2 r 10 1 ru 16 r (x1;)s -37 664 p (139:)s -37 688 p (140:)s 34 r (e)s -15 r (e)s -2 r (n)s -16 r (n)s -1 r (d)s -16 r (d)s -2 r (;)s f0 SF 1218 2216 p (sqrt)s 2 r 10 1 ru 10 r (mat.red)s 67 r (page)s 11 r (4)s EP pstopssaved restore %%Trailer %%Pages: 4 END %%EOF src2tex-2.12h.orig/src2latex.s2t100644 1750 1750 131 6063157057 16407 0ustar kawamurakawamura\pagestyle{myheadings} \markboth{\rm src2latex version 2.12}{\rm src2latex version 2.12} src2tex-2.12h.orig/src2ltex.s2t100644 1750 1750 131 6063157057 16246 0ustar kawamurakawamura\pagestyle{myheadings} \markboth{\rm src2latex version 2.12}{\rm src2latex version 2.12} src2tex-2.12h.orig/src2tex.c100644 1750 1750 42042 6234537654 15660 0ustar kawamurakawamura/* {\hrulefill} * {\ % beginning of TeX mode \input fonts.tex % define fonts \input title.tex % title and authors \bigskip \centerline{\bf Abstract} \medskip {\midinsert\narrower\narrower One of the authors has a strong desire for combining documentation and manual with source program by using {\TeX}'s beautiful text and PostScript figures without any big literate programming tools, such as WEB system ($\,$[8]$\,$) or something like that ($\,$[15]$\,$). Unfortunately, most of literate programming tools require too much laborious effort to learn their usages, and also, as far as the authors know, no such tools allow to patch PS and EPS figures upon text. It is quite convenient if source program itself is its document, manual and releasenote simultaneously, in which you can explain usages, programming techniques, algorithms, theoretical backgrounds, {\it etc\ } in terms of high quality {\TeX}t, mathematical formulae and beautiful figures. Here the authors would like to release softwares {\bf src2tex} and {\bf src2latex}. Those softwares would give an easy-to-use unified environment of source program, documentation and manual. They believe that {\bf src2tex} and {\bf src2latex} work effectively for a relatively small set of source programs, such as education and experiment programs. In fact, their src2tex-project itself consists of several education programs, and {\bf src2tex} has worked very well in their project. For practical usages of {\bf src2tex} and {\bf src2latex} it would be better to compare \ {\sl newton.c, simpson.c, hanoi.c,} {\it etc\/} \ with \ {\sl newton.c.ps, simpson.c.ps, hanoi.c.ps,} {\it etc\/} \ respectively. \endinsert} \bigskip \centerline{\bf 1. Introduction} \bigskip Our softwares {\bf src2tex} and {\bf src2latex} are a sort of text converters from various types of source program files to plain\TeX\ and L\kern-.35em\raise.33ex\hbox{\eightcmr A}\kern-.2em\hbox{\TeX}\ format files, {\it e.g.}, \centerline{{\quad\tt src1.c} $\Rightarrow$ {\tt src1.c.tex}, \ {\tt src2.f} $\Rightarrow$ {\tt src2.f.tex}.} \noindent However, {\ \bf src2tex\ } and {\ \bf src2latex\ } are not simple pretty-printers. Our {\bf src2tex} and {\bf src2latex} are designed to fulfill the following desires: \medskip \itemitem{(1)}{\bf src2tex} and {\bf src2latex} can identify differences of various computer languages, such as BASIC, C, C++, OBJECTIVE{\tt-}C, COBOL, FORTRAN, HTML, JAVA, LISP, MAKE, PASCAL, PERL, SCHEME, SHELL, TCL/TK; ASIR, MACSYMA, MAPLE, MATHEMATICA, MATLAB, MAXIMA, MuPAD, OCTAVE, REDUCE.\footnote{**} {ASIR, JAVA, MACSYMA, MAPLE, MATHEMATICA, MATLAB, REDUCE are registered trademarks of Fujitsu Laboratories, Ltd., Sun Microsystems, Inc., Macsyma Inc., Waterloo Maple Software, Wolfram Research, Inc., The MathWorks, Inc., The Rand Corporation respectively.} \itemitem{(2)}{\bf src2tex} and {\bf src2latex} allow to use {\TeX}'s powerful typesetting mechanism within comment area of source program. \itemitem{(3)}{\bf src2tex} and {\bf src2latex} enable to patch PS and EPS files upon source file without any difficulties. \itemitem{(4)}{\bf src2tex} and {\bf src2latex} accept EUC Kanji code characters. \medskip \noindent {\it Remark\/}. Kanji : a Japanese system of writing based on the Chinese one and composed principally of characters borrowed or adapted from Chinese, a single character belonging to the kanji system of writing (quoted from ''Webster's Third New International Dictionary of the English Language Unabridged'', {\sl G. \& C. Herrian Company}, 1971) \medskip Using {\bf src2tex} or {\bf src2latex}, you can embed mathematical formulae into comment area of source program. For instance, you can insert formulae $$ \sum_{\nu=1}^n\nu={n(n+1)\over2} $$ $$ \Gamma(x+1)=x!\sim\sqrt{2\pi x}\,x^xe^{-x} $$ $$\sqrt{\pi}\,(2n-1)!!{(1-p)^n\over p^{n+{1\over2}}} =\int_0^\infty e^{-pt}\,{H_{2n}\bigl(\sqrt{t}\,\bigr)\over\sqrt{t}}\,dx$$ \medskip \noindent into comment area of C, like this. You can even include EPS files, by virtue of {\sl dvi2ps} or something like that, as follows: \vskip 1\baselineskip \special{epsfile=prob1.eps hscale=0.5 vscale=0.5} \special{epsfile=prob2.eps hoffset=225 hscale=0.5 vscale=0.5} \vskip 9cm \bigskip \centerline{\bf 2. Compilation and Installation} \bigskip In order to compile and install {\bf src2tex} and {\bf src2latex}, you have only to issue the following commands: \medskip \qquad{\tt \% make} \qquad{\tt \% make install} \medskip \noindent After that, you would find executable files {\bf src2tex} and {\bf src2latex} in your current directory. You could copy them to a suitable place, {\sl e.g.}, \medskip \qquad{\tt \% cp src2tex $\tilde{\ }$/bin/} \qquad{\tt \% cp src2latex $\tilde{\ }$/bin/} \medskip\noindent If you could not make executables, it would be better to read PostScript files {\sl\ fileio.c.ps, getdata.c.ps, langflag.c. ps, modflag.c.ps, pas\_bold.c.ps, src2tex.c.ps, text2tex.c.ps} and {\sl tools.c.ps}. \medskip \noindent {\it Remark 1\/}. The authors are very glad if you can type \medskip \qquad{\tt \% make report} \medskip \noindent and send your local {\ \sl /etc/motd\ } file to kamano@po.iijnet.or.jp. They think this would give invaluable information for further development of {\bf src2tex}. \medskip \noindent {\it Remark 2\/}. If you are a DOS user, you have only to type \qquad{\tt \% make dos} \noindent You will get {\bf src2tex.exe} and {\bf src2ltex.exe} in the present working directory. \medskip Furthermore, shell scripts {\bf src2tex2dvi} and {\bf src2tex2ps} might be useful. {\bf Src2tex2dvi} and {\bf src2tex2ps} are text converters from source program file to DVI and PostScript files. Those shell scripts are nothing more than combinations of free softwares {\sl src2tex}, {\sl jtex}, {\sl dvi2ps}, {\sl nkf} and {\sl psnup}. Maybe, it is necessary to modify {\bf src2tex2dvi} and {\bf src2tex2ps} so that they work properly at your site ({\it cf}., also, {\sl src2latex2dvi} and {\sl src2latex2ps}). For DOS users, we would like to provide two batch files {\sl src2dvi.bat} and {\sl tex2tex.bat} ({\it cf}., {\sl DOS\_USER}). \bigskip \centerline{\bf 3. Manual} \bigskip The usage of {\bf src2tex} and {\bf src2latex} is quite simple. It suffices to input \medskip \qquad{\tt \% src2tex {\sl source-file-name}} \qquad{\tt \% src2latex {\sl source-file-name}} \medskip \noindent on the command line. No options are available and no options will be added, since we believe that it is no good to implement various options and circumvent programming difficulties. Their usage is so simple that we do not feel any necessities to write online manuals. If no input-file-name is given, {\bf src2tex} and {\bf src2latex} read data from {\it standard input\/} and write them out to {\it standard output\/}. When {\sl source-file-name} is given, {\bf src2tex} and {\bf src2latex} try to identify language which is used in the given file. First, they see {\sl file-name-suffix} and determine language type as follows : \vskip 0.5\baselineskip \settabs\+ \hskip5.5cm & \hskip 1cm & \hskip 2cm \cr \+ \qquad\qquad{\tt .tex, .txt} & $\Rightarrow$ & {\tt TEXT} \cr \+ \qquad\qquad{\tt .bas, .vb} & $\Rightarrow$ & {\tt BASIC} \cr \+ \qquad\qquad{\tt .c, .cpp, .vc} & $\Rightarrow$ & {\tt C, C++, OBJECTIVE-C} \cr \+ \qquad\qquad{\tt .cbl, .cob} & $\Rightarrow$ & {\tt COBOL} \cr \+ \qquad\qquad{\tt .f, .for} & $\Rightarrow$ & {\tt FORTRAN} \cr \+ \qquad\qquad{\tt .html} & $\Rightarrow$ & {\tt HTML} \cr \+ \qquad\qquad{\tt .java} & $\Rightarrow$ & {\tt JAVA} \cr \+ \qquad\qquad{\tt .el, .lsp, .sc, .scm} & $\Rightarrow$ & {\tt LISP, SCHEME} \cr \+ \qquad\qquad{\tt \ makefile} & $\Rightarrow$ & {\tt MAKE} \cr \+ \qquad\qquad{\tt .p, .pas, .tp} & $\Rightarrow$ & {\tt PASCAL} \cr \+ \qquad\qquad{\tt .pl, .prl} & $\Rightarrow$ & {\tt PERL} \cr \+ \qquad\qquad{\tt .sh, .csh, .ksh} & $\Rightarrow$ & {\tt SHELL} \cr \+ \qquad\qquad{\tt .tcl, .tk} & $\Rightarrow$ & {\tt TCL/TK} \cr \+ \qquad\qquad{\tt .asi, .asir, .asr} & $\Rightarrow$ & {\tt ASIR} \cr \+ \qquad\qquad{\tt .mac, .max} & $\Rightarrow$ & {\tt MACSYMA, MAXIMA} \cr \+ {\qquad\qquad\tt .map, .mpl} & $\Rightarrow$ & {\tt MAPLE} \cr \+ \qquad\qquad{\tt .mat, .mma} & $\Rightarrow$ & {\tt MATHEMATICA} \cr \+ \qquad\qquad{\tt .ml, .mtlb, .oct} & $\Rightarrow$ & {\tt MATLAB, OCTAVE}\cr \+ \qquad\qquad{\tt .mu} & $\Rightarrow$ &{\tt MuPAD} \cr \+ \qquad\qquad{\tt .red, .rdc} & $\Rightarrow$ &{\tt REDUCE} \cr \vskip 0.5\baselineskip \noindent Next, they search key words and attempt to determine language. After that, if there exists a file {\sl src2tex.s2t} [resp. {\sl src2latex.s2t} ], then {\bf src2tex} [resp. {\bf src2latex} ] simply includes it at the beginning of output procedure. In case of \ DOS, {\sl src2ltex.s2t} is read instead of {\sl src2latex.s2t}. Our {\bf src2tex} and {\bf src2latex} have three modes: text mode, quasi-{\TeX} mode and {\TeX} mode. First, you are in default text mode. As you can imagine, text mode is nothing more than typewriter mode. In text mode, "what you see is what you get". Second, you find that you are in quasi-{\TeX} mode when you enter into comment area. For instance, if input file is C source file, then % ___________ ________________ % | |----->| | % | text mode | | quasi-TeX mode | % |___________|<-----|________________| % \special{epsfile=figure1.eps hoffset=25 hscale=.7 vscale=.7} \vskip 4cm \noindent In quasi-{\TeX} mode of {\bf src2tex}, you can input any characters as in text mode except the following four key words \ \ $\{\backslash$\ \ ,\ \ $\}$\ \ ,\ \ {\$}\ \ and\ \ {\$\$}\ \ . However, it is to be noted that font and spacing sizes are different from those of text mode. Third, when you are in quasi-{\TeX} mode of {\bf src2tex}, you are allowed to enter into {\TeX} mode and escape from it by using one of the following pairs: \ $\{\backslash$ \ and \ $\}$\ ,\ \ {\$} \ and \ {\$}\ , \ \ {\$\$} \ and \ {\$\$}\ . To be more explicit, % ________________ __________ % | |----->| | % | quasi-TeX mode | | TeX mode | % |________________|<-----|__________| % \ \vskip -1\baselineskip \special{epsfile=figure2.eps hoffset=25 hscale=.7 vscale=.7} \vskip 4cm \noindent Literally, {\TeX} mode is genuine plain {\TeX} mode. You can use plain {\TeX} there without any restrictions. {\bf Src2tex} is designed to use the above key words as follows: \medskip \qquad\${\sl mathematical formulae}\$ \medskip \qquad\$\${\sl display style mathematical formulae}\$\$ \medskip \qquad$\{\backslash\ ${\sl TeXt and mathematical formulae}$\}$ \medskip \noindent {\it Remark 1\/}. In the above expressions \$ , \$\$ and $\backslash$ are all passed to {\TeX} transparently. However, braces $\{$ and $\}$ are both replaced with blank spaces. For example, a phrase \qquad{\tt $\{\backslash$bf bold face$\}$} \noindent is translated into \qquad{\tt\ $\backslash$bf bold face} \noindent and passed to {\TeX}. If you really want to get {\tt $\{\backslash$bf bold face$\}$}, then you have to use \qquad{\tt$\{\{\backslash$bf bold face$\}\}$} \noindent instead. Actually, \medskip \qquad$\{\{\backslash\ ${\sl TeXt and mathematical formulae}$\}\}$ \medskip \noindent is the other door to {\TeX} mode. This method provides a safe encapslated transition from {\TeX} mode to quasi-{\TeX} mode. \medskip \noindent {\it Remark 2\/}. {\bf Src2tex} and {\bf src2latex} have several fail-safe mechanisms. If you do not write mathematical formula properly, {\bf src2tex} thinks that you have no knowledge of {\TeX}, {\it i.e.\/}, you are not allowed to use {\TeX}. For instance, if you really want to enter into {\TeX} mode, it is better not to write \qquad\$T\_abc\$\ . \noindent As a substitute, you should use either \qquad\$T\_$\{$abc$\}$\$\qquad or\qquad\$T\_a\ bc\$ \noindent ({\it cf.\/}\ [9]). In case of BASIC or PERL, {\ \$\ } sign which means string variable is not always recognized as a {\TeX} mode transition key word. For example, you cannot enter into {\TeX} mode with \qquad{\tt A\$, str1\$, ...} \noindent in BASIC comment area. You are not able to use {\TeX} mode of PERL with \qquad{\tt \$A, \$str1, ...} \noindent either. It would be better to use \$\$ or $\{\backslash$ in BASIC and PERL. \medskip \noindent {\it Remark 3\/}. As you can easily imagine, in quasi-{\TeX} mode of {\bf src2latex}, you have to use \ $\backslash$(\ ,\ $\backslash$)\ ,\ $\backslash$[ \ and\ $\backslash$]\ instead of \ \$\ ,\ \$\ ,\ \$\$\ and\ \$\$\ respectively. In case of {\bf src2latex}, if you want to use a certain non-default documentstyle, say {\tt\ twocolumn, 12pt, jarticle\ } style, then you have only to insert a comment area with a phrase \qquad{\tt $\{$$\backslash$documentstyle[twocolumn,12pt]$\{$jarticle$\}$}$\}$ \medskip \noindent at the beginning of source file. The general form of this phrase is given by \medskip \qquad{\tt $\{$$\backslash$documentstyle[{\sl latex option}]$\{${\sl latex style}$\}$}$\}$ \medskip \noindent If you have already installed {\sl dvi2ps} or something like that, you can include EPS files when you are in {\TeX} mode. In case of {\sl dvi2ps}, a line \medskip \qquad$\{\backslash$special$\{$epsfile={\sl eps file name ...}$\}\}$ \medskip \noindent would suffice to patch an EPS figure upon comment area. For practical usages, it is better to read source files of {\bf src2tex} ({\it e.g.},\ fileio.c, getdata.c, langflag.c, modflag.c, src2tex.c, text2tex.c, tools.c), since they are written in src2tex style. For instance, if you input three commands \medskip \qquad{\tt\% src2tex src2tex.c} \qquad{\tt\% tex src2tex.c.tex } \qquad{\tt\% dvi2ps src2tex.c.dvi > src2tex.c.ps} \medskip \noindent in the source files directory of {\bf src2tex}, you will get a PostScript file \medskip \qquad{\tt src2tex.c.ps} \medskip \noindent which would show most of useful technicalities of {\bf src2tex}. We would like to suggest you to compare {\sl src2tex.c} with {\sl src2tex.c.ps} carefully by using one of PostScript pre-viewers. You could learn practical usages quite easily. \bigskip \centerline{\bf 4. Dirty Tricks} \bigskip There is a dirty trick which enables to change certain global variables of {\bf src2tex} and {\bf src2latex} dynamically. For instance, if you want to put \medskip {\sl\qquad tabulation\ size = 4\ characters} {\sl\qquad Text\ mode\ font = roman\ type} {\sl\qquad (quasi-)\TeX\ mode\ font = slanted\ type} \medskip \noindent you have only to insert a line of comment area with src2tex escape sequence of the form \medskip {\tt\qquad$\{\backslash$src2tex$\{$htab=4\ textfont=rm\ texfont=sl$\}\}$} \medskip \noindent Generally, src2tex escape sequence is define by \medskip {\tt\qquad$\{\backslash$src2tex$\{$htab={\sl integer} textfont={\sl font type1} texfont={\sl font type2}$\}\}$} \medskip \noindent where {\sl\ font type1\ } and {\sl\ font type2\ } are equal to one of the following words respectively: \medskip {\tt\qquad bf, it, rm, sc, sl, tt\ .} \medskip \noindent The meanings of the above key words would be self-evident ({\it cf.\/}\ [9]). For practical examples, it would be better to read SCHEME source program {\sl\ farmer+hen.scm\ } and PS file {\sl\ farmer+hen.scm.ps\ } which is actually generated by issuing the following commands: \medskip {\tt\qquad \% src2latex farmer+hen.scm} {\tt\qquad \% latex farmer+hen.scm.tex} {\tt\qquad \% dvi2ps farmer+hen.scm.dvi > farmer+hen.scm.ps} \medskip Another dirty trick is \medskip {\tt\qquad -<$\,n\,$>} \medskip \noindent option of {\bf src2tex} and {\bf src2latex}. When you are in debugging mode, you usually need line numbers and you sometimes want to restrict page length. If you type \medskip \qquad{\tt \% src2tex -<$n$> {\sl source-file-name}} \qquad{\tt \% src2latex -<$n$> {\sl source-file-name}} \medskip \noindent your source file is translated into debugging format. For example, \medskip \qquad{\tt \% src2tex -35 sqrt\_mat.red} \qquad{\tt \% tex sqrt\_mat.red.tex} \qquad{\tt \% dvi2ps sqrt\_mat.red.dvi > sqrt\_mat.red.ps{\~\ }} \qquad{\tt \% psnup -4 sqrt\_mat.red.ps{\~\ } > sqrt\_mat.red.ps} \medskip \noindent gives the {\sl sqrt\_mat.red.ps} file. \bigskip \bigskip \input thanks.tex % acknowledgement \bigskip \bigskip \bigskip \input references.tex % references \bigskip % end of TeX mode} * {\hrulefill} */ /* {\hrulefill\ src2tex.c\ \hrulefill} */ #include #include "src2tex.h" extern void get_fnames(); extern void init_lang_flag(); extern void open_files(); extern void close_files(); extern void text2tex(); /* {\hrulefill\ main function of src2tex\ \hrulefill} */ main(argc, argv) int argc; char **argv; { char *cptr[2]; /* {\ character pointers of file names \hfill} */ FILE *fptr[2]; /* {\ stream pointers of input/output files \hfill} */ get_fnames(argc, argv, cptr); /* {\ get file names from the command line \hfill} */ init_lang_flag(cptr); /* {\ initialize language flags \hfill} */ open_files(cptr, fptr); /* {\ open input and output files \hfill} */ text2tex(cptr,fptr); /* {\rm Text$\to$\TeX\ translation \hfill} */ close_files(cptr, fptr); /* {\ close input and output files \hfill} */ exit(EXIT_SUCCESS); } src2tex-2.12h.orig/src2tex.c.ps100644 1750 1750 460063 6266067352 16326 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: src2tex.c.dvi %%Pages: 8 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 127 /f0 NF f0 SF [ 24 23 -1 0 24.906] 65 D [ 24 23 -1 0 23.522] 66 D [<00FC000382000E01001C0080380040380040780020700020F00020F00000F00000F00000F00000F00000F000207000207800 203800603800601C00E00E01E003826000FC20> 24 23 -2 0 23.984] 67 D [ 24 23 -1 0 25.367] 68 D [ 24 23 -1 0 22.600] 69 D [ 24 23 -1 0 21.678] 70 D [<00FC200383600E00E01C00E03800E03800E07800E07000E0F000E0F00FF8F00000F00000F00000F00000F000207000207800 203800603800601C00E00E01E003826000FC20> 24 23 -2 0 26.059] 71 D [ 24 23 -1 0 24.906] 72 D [ 16 23 0 0 11.992] 73 D [<3E004300C180E1C0E1C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF8> 16 23 -2 0 17.065] 74 D [ 24 23 -1 0 25.829] 75 D [ 24 23 -1 0 20.755] 76 D [ 32 23 -1 0 30.441] 77 D [ 24 23 -1 0 24.906] 78 D [<01FC000707000E03801C01C03800E03800E07800F0700070F00078F00078F00078F00078F00078F00078F000787000707800 F03800E03800E01C01C00E038007070001FC00> 24 23 -2 0 25.829] 79 D [ 24 23 -1 0 22.600] 80 D [<0000E00001F00003F00003F800071800060801FE080787000E87801C89C03870E03800E07800F0700070F00078F00078F000 78F00078F00078F00078F000787000707800F03800E03800E01C01C00E038007070001FC00> 24 29 -2 6 25.829] 81 D [ 24 23 -1 0 24.445] 82 D [<8F80F060C030C01080188018801800180038007003F01FE03FC07E00F000E000C010C010C0104030603030F01F10> 16 23 -2 0 18.449] 83 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<007C000183000700800E00400C00401C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00 201C00201C00201C00201C00201C0070FF81FC> 24 23 -1 0 24.906] 85 D [<00300000300000300000780000780000FC0000E40000E40001C20001C20001C2000381000381000381000700800700800F00 400E00400E00401C00201C00203C0070FF81FC> 24 23 -1 0 24.906] 86 D [<0040040000C0060000E00E0000E00E0001E00F0001D01D0001D01D0001D01D0003901C800388388003883880070838400704 7040070470400E0470200E02E0200E02E0200E02E0201C03E0101C01C0101C01C0103C03C038FF0FF8FE> 32 23 -1 0 34.131] 87 D [ 24 23 -1 0 24.906] 88 D [<00FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00003E00003A0000710000F10000E08001E08001C0 400380400780200700200F00101E0038FFC07F> 24 23 0 0 24.906] 89 D [ 16 23 -2 0 20.294] 90 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [<78EEE6470707070707070707070707070707073F0000000000060F0F06> 8 29 2 6 10.147] 106 D [ 24 23 0 0 17.527] 107 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [<00FF80001C00001C00001C00001C00001C00079C00185C00303C00701C00601C00E01C00E01C00E01C00E01C00601C00701C 00303C001C6C00078400> 24 20 -1 6 17.526] 113 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [ 16 14 -1 0 14.759] 122 D [ 24 23 -1 0 20.755] 0 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<07FC00E000E000E000E000E0FFFCC0E040E020E030E010E008E004E004E002E001E001E000E000600060> 16 21 -1 0 16.604] 52 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<04000E000E000E000E000E0006000600060002000300010001000080004080408020C0107FF87FF87FFC4000> 16 22 -2 0 16.604] 55 D [<0FC038306018C008C00CC00CC01C603C607831F00FE00F801FC03C307810601860186018203018600FC0> 16 21 -1 0 16.604] 56 D [<1F0020C060607030703000380018001C0F9C185C303C603CE01CE01CE01CE018E0186038303018600F80> 16 21 -1 0 16.604] 57 D [<020002001F0022C0426042208230E230E2304230027002E003E01FC03F807E00E200E200C270C270C2304210622032400F80 02000200> 16 27 -2 2 16.604] 36 D [<60F0F06000000000606060606060606060F0F0F0F0F060> 8 23 -2 0 9.224] 33 D [<40402020101070F0F060> 8 10 -2 -13 9.224] 39 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<060006000600C630E6703FC00F000F003FC0E670C630060006000600> 16 14 -2 -11 16.604] 42 D [<003000003000003000003000003000003000003000003000003000003000FFFFF8FFFFF80030000030000030000030000030 00003000003000003000003000003000> 24 22 -2 3 25.829] 43 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [ 16 33 -2 8 16.604] 47 D [<60F0F06000000000000060F0F060> 8 14 -2 0 9.224] 58 D [<40402020101070F0F06000000000000060F0F060> 8 20 -2 6 9.224] 59 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D [<00FF000701E008003810000020F0E0218D904307884703888603888E03888E03888E03888E03888E03888603884703904304 10218C2020F02010004008008007070000F800> 24 23 -2 0 25.829] 64 D [ 8 33 -3 8 9.224] 91 D [ 8 33 0 8 9.224] 93 D [<87007F803840> 16 3 -3 -19 16.604] 126 D [ 24 23 0 0 19.371] 11 D [ 24 23 0 0 18.449] 12 D [ 24 23 0 0 18.449] 13 D [ 32 23 0 0 27.673] 14 D [<40804080204020401020102070E0F1E0F1E060C0> 16 10 -1 -13 16.604] 34 D [ 8 2 0 -6 11.069] 45 D 1.000 66 /f1 NF f1 SF [ 24 18 -1 0 21.143] 65 D 1.000 62 /f2 NF f2 SF [<1E0021006180C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C04080408021001E00> 16 15 -1 0 13.237] 48 D [ 8 15 -2 0 13.237] 49 D [ 16 15 -1 0 13.237] 50 D [<00C00000C00000C00000C00000C00000C00000C000FFFF80FFFF8000C00000C00000C00000C00000C00000C00000C000> 24 16 -1 2 20.386] 43 D [ 24 8 -1 -2 20.386] 61 D 1.000 51 /f3 NF f3 SF [<7E1818181818181818F818> 8 11 -1 0 11.300] 49 D [ 8 11 -1 0 11.300] 50 D 1.000 121 /f4 NF f4 SF [ 32 23 -1 0 27.604] 72 D [<1C7062C841C440C4C0C4C0C06060606060603060303018700C7003B00018001800180018000C000C000C000C003E> 16 23 -1 0 17.284] 100 D [<3E006180C040C020C000C000C000C000FF8060406020302018400780> 16 14 -2 0 15.463] 101 D [<3038302618621861183118300C180C180C188C18460C470844983870> 16 14 -1 0 19.933] 110 D [ 16 20 0 6 16.708] 112 D [<1C003200310031003100300018001800180018000C000C000C00FF80060006000600060003000300> 16 20 -1 0 11.992] 116 D [<78E0C510E708C30403040300018001800180418020C620C711A30F1E> 16 14 -1 0 18.979] 120 D [ 16 14 -2 0 16.404] 23 D [<1020187018600C600C6004600660026002608220412021203FFF0FFF> 16 14 -1 0 18.929] 25 D 1.000 121 /f5 NF f5 SF [<61C06320331031903180318098C098C09CC07380> 16 10 -1 0 16.416] 110 D [ 16 15 1 5 13.689] 112 D [<183432323030181818FE0C0C0C04> 8 14 0 0 10.032] 116 D [<7380CE4046200620060006002300233013300EE0> 16 10 0 0 15.059] 120 D [ 16 10 -1 0 13.314] 23 D 1.000 123 /f6 NF f6 SF [ 24 2 -3 -7 25.829] 0 D [<00000400000002000000010000000100000000C0FFFFFFF0FFFFFFF0000000C000000100000001000000020000000400> 32 12 -2 -2 33.208] 33 D [<00100030003000600060006000C000C000C00180018001800300030003000600060006000C000C000C001800180018003000 30003000600060006000C000C000C000> 16 33 -2 8 16.604] 110 D [<00F001800300060006000600060006000600060006000600060006000C001800F00018000C00060006000600060006000600 060006000600060006000300018000F0> 16 33 -2 8 16.604] 102 D [ 16 33 -2 8 16.604] 103 D [<8007C0800FE0803FF0C07838E0F0187FC0083F80081F0008> 24 8 -2 -4 25.829] 24 D [<000080000000C0000000C00000006000000030007FFFF000FFFFF80000000E0000000700000001C0000000F0000003C00000 0700FFFFFC007FFFF80000003000000060000000C0000000C00000008000> 32 20 -2 2 33.208] 41 D [<006000000060000000F0000000F000000198000001980000030C0000030C000006060000060600000C0300000C0300000C01 8000180180001800C000F000C00030006000000060000000300000003000000018000000180000000C0000000C0000000600 0000060000000300000003000000018000000180000000C0000000C00000006000000020> 32 34 -2 32 27.673] 112 D [<0C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C00FFC0FFC00C000C000C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 121 D [<0C000C000C000C000C000C00FFC0FFC00C000C000C000C000C000C0000000C000C000C000C000C000C00FFC0FFC00C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 122 D 1.000 50 /f7 NF f7 SF [ 16 2 -2 -5 20.755] 0 D [<1E01E02187B040CE0880780480380480700480780441CC083786101E01E0> 24 10 -1 0 26.474] 49 D 1.000 91 /f8 NF f8 SF [<02040C08181830307070706060E0E0E0E0E0E0E0E0E0E0E0E0E0606070707030301818080C0402> 8 39 -5 38 15.220] 0 D [<80406020303018181C1C1C0C0C0E0E0E0E0E0E0E0E0E0E0E0E0E0C0C1C1C1C1818303020604080> 8 39 -2 38 15.220] 1 D [ 48 46 -2 46 47.967] 88 D [<3800000046000000C2000000E3000000438000000180000001C0000001C0000000C0000000E0000000E0000000E000000060 00000070000000700000007000000070000000380000003800000038000000380000003C0000003C0000001C0000001C0000 001E0000001E0000001E0000001E0000000E0000000F0000000F0000000F0000000F00000007000000078000000780000007 800000078000000380000003C0000003C0000003C0000003C0000001C0000001E0000001E0000001E0000001E0000000E000 0000E0000000F0000000F0000000700000007000000070000000700000003800000038000000380000003800000018000000 1C0000001C0000001C0000000C0000000C0000000E000000060000000620000006700000033000000120000001C0> 32 74 -2 74 18.449] 90 D 1.000 122 /f9 NF f9 SF [ 32 23 -1 0 28.872] 65 D [<007F8003FFE007C0701F00183E000C3C00067C0006780006F80000F80000F80000F80000F80000F80000F800007800067C00 063C000E3E000E1F001E07C07E03FFEE007F82> 24 23 -2 0 27.581] 67 D [ 32 23 -1 0 29.287] 68 D [ 16 23 0 0 14.482] 73 D [ 40 23 -1 0 36.252] 77 D [ 32 23 -1 0 28.642] 82 D [<87F0DFF8F81CE00EC00FC00FC00F000F001F01FF0FFE3FFC7FF87FF0FF00F800F006F006F00E700E783E3FF60FC2> 16 23 -2 0 21.216] 83 D [<07FFF007FFF0003E00003E00003E00003E00003E00003E00003E00003E00003E00003E00003E00003E00003E00C03E03C03E 03C03E03E03E07603E06783E0E7FFFFE7FFFFE> 24 23 -1 0 26.566] 84 D [<1F8780786F80F02E00F01E00F01E00781E003C1E001F1E0001FE00001E00301E00781E00783C007038001FE000> 24 15 -1 0 18.564] 97 D [<31F8003B0E003C07003C03803C03803C03C03C03C03C03C03C03C03C03C03C03803C03803C07003F0E003DF8003C00003C00 003C00003C00003C00003C0000FC0000FC0000> 24 23 -1 0 21.216] 98 D [<07E01C38380C780C7000F000F000F000F000F0007018783C383C1C1C07F0> 16 15 -1 0 16.973] 99 D [<07CFC01C3FC0380F00700F00700F00F00F00F00F00F00F00F00F00F00F00700F00700F00380F001C3F0007EF00000F00000F 00000F00000F00000F00000F00003F00003F00> 24 23 -1 0 21.216] 100 D [<07F01C18380C78067000F000F000FFFEF00EF00E700E700C381C1C3807E0> 16 15 -1 0 17.503] 101 D [<7FC07FC01E001E001E001E001E001E001E001E001E001E001E00FFC0FFC01E001E001E001E181E3C0E3C071801F0> 16 23 0 0 11.669] 102 D [<0FF0381C700EE007E007E007700F3FFE3FFC3FF0300020002FC0186030307038703870387038303718770FCE> 16 22 -1 7 19.095] 103 D [ 8 24 -1 0 10.608] 105 D [ 24 23 -1 0 20.155] 107 D [ 8 23 -1 0 10.608] 108 D [ 32 15 -1 0 31.824] 109 D [ 24 15 -1 0 21.216] 110 D [<07E01C38381C700E700EF00FF00FF00FF00FF00F700E700E381C1C3807E0> 16 15 -1 0 19.095] 111 D [ 24 21 -1 6 21.216] 112 D [ 16 15 -1 0 15.728] 114 D [ 16 15 -1 0 15.063] 115 D [<0F801C403C603C603C603C603C003C003C003C003C003C003C00FFC03FC01C001C000C000C000C000C00> 16 21 -1 0 14.851] 116 D [<0FCFC01C2FC03C1F003C0F003C0F003C0F003C0F003C0F003C0F003C0F003C0F003C0F003C0F00FC3F00FC3F00> 24 15 -1 0 21.216] 117 D [<01C00001C00003E00003E00003E00007B00007B0000F38000F18000F18001E0C001E0C003C0600FF1F80FF1F80> 24 15 -1 0 20.155] 118 D [<0380E0000380E00003C1E00007C1F00007C1F00007E3F0000F6398000F7798000F3798001E370C001E3F0C003E1E0E003C1E 0600FE7F9F80FE7F9F80> 32 15 -1 0 27.581] 119 D [ 24 15 -1 0 20.155] 120 D [<7C0000E60000F30000F3800061800001800001C00001C00003E00003E00003E00007B00007B0000F38000F18000F18001E0C 001E0C003C0600FF1F80FF1F80> 24 21 -1 6 20.155] 121 D [ 16 21 -3 0 19.095] 49 D [ 16 21 -2 0 19.095] 50 D [<1FC03FE070F0F878F87CF87C707C007C0078007800F00FC001E000F010F87878787878F830F03FE00FC0> 16 21 -2 0 19.095] 51 D [<07FF07FF0078007800780078FFFFFFFFC0786078307818780C7806780278037801F800F8007800380018> 16 21 -1 0 19.095] 52 D [<06000F000F000F000F000F00070007000700030003800180018000C0C060C030E0187FF87FFC7FFE7FFE6000> 16 22 -2 0 19.095] 55 D [<70F8F8F870> 8 5 -3 0 10.608] 46 D 1.000 127 /f10 NF f10 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 66 D [<07C00FE01C303838701C701C601CE000E000E000E000E000E000601C701C701C383C1C7C0FFC07CC> 16 20 -1 0 17.434] 67 D [ 16 20 -1 0 17.434] 68 D [ 16 20 -1 0 17.434] 69 D [ 16 20 -1 0 17.434] 70 D [ 16 20 -1 0 17.434] 72 D [ 16 20 -3 0 17.434] 73 D [<3E007F00E180E1C041C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF01FF0> 16 20 -2 0 17.434] 74 D [ 16 20 -1 0 17.434] 75 D [ 16 20 -1 0 17.434] 76 D [ 16 20 -1 0 17.434] 77 D [ 16 20 -1 0 17.434] 78 D [<3FC07FE070E0E070E070E070E070E070E070E070E070E070E070E070E070E070E07070E07FE03FC0> 16 20 -2 0 17.434] 79 D [ 16 20 -1 0 17.434] 80 D [ 16 20 -1 0 17.434] 82 D [ 16 20 -2 0 17.434] 83 D [<1FF01FF00380038003800380038003800380038003800380038003800380E39CE39CE39CFFFC7FFC> 16 20 -1 0 17.434] 84 D [<03C007E00C301C38381C381C381C381C381C381C381C381C381C381C381C381C381C381CFE7FFE7F> 16 20 0 0 17.434] 85 D [<0780078007800CC00CC00CC00CC00CC01CE01CE01CE01CE01CE038703870387038707878FCFCFCFC> 16 20 -1 0 17.434] 86 D [ 16 20 -1 0 17.434] 88 D [<0FE00FE0038003800380038003800380038007C007C00EC00EE00CE01CE01C7038703870FCFCFCFC> 16 20 -1 0 17.434] 89 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [<7E00FF00E38041C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C03FC03FC00000000000000180 03C003C00180> 16 28 -2 7 17.434] 106 D [ 16 20 -1 0 17.434] 107 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [<00FE00FE003800380038003800380FB81FF8387870786038E038E038E038E0386038707838781FF807B8> 16 21 -1 7 17.434] 113 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<078007800FC00CC00CC00CC01CE01CE01CE01CE038703870FCFCFCFC> 16 14 -1 0 17.434] 118 D [<18E03DF03DF035B035B035B037B037B03030703870387038FFFCFFFC> 16 14 -1 0 17.434] 119 D [ 16 14 -1 0 17.434] 120 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0FC03FE07070E038E01C401C001C001C0038007007E007E00070003000382038703870703FE00FC0> 16 20 -1 0 17.434] 51 D [<07FC07FC00E000E000E000E0FFFCFFFCE0E070E030E038E018E01CE00CE006E006E002E003E001E0> 16 20 -1 0 17.434] 52 D [<1F003F8071C0E0E0E070E07040700070006060E07FC07F007000700070007000700070007FE07FE0> 16 20 -2 0 17.434] 53 D [<0200060006001F003FC076E0E620E630E6304630067006E00FC03F807F007600C620C670C670467076E03FC00F8006000600 0200> 16 26 -2 3 17.434] 36 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [ 16 26 -6 3 17.434] 91 D [ 16 26 -1 3 17.434] 93 D [<4600EF003DC01880> 16 4 -3 -16 17.434] 126 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 123 /f11 NF f11 SF [ 24 23 -1 0 24.906] 65 D [ 24 23 -1 0 23.522] 66 D [<03F0000E0C00180200380100700080700080F00040F00040F00040F00000F00000F00000F00000F000007800207800303800 301C00300C003006007003007001C198003E08> 24 23 -4 0 23.984] 67 D [ 24 23 -1 0 25.367] 68 D [ 24 23 -1 0 22.600] 69 D [ 24 23 -1 0 21.678] 70 D [<03F0800E0D801803803801C07001C07001C0F001C0F001C0F001E0F01FF8F00000F00000F00000F000007800207800303800 301C00300C003006007003007001C198003E08> 24 23 -4 0 26.059] 71 D [ 32 23 -1 0 24.906] 72 D [ 16 23 0 0 11.992] 73 D [<3C00C700C380E380E1C001C001C001C001C000E000E000E000E000E000E0007000700070007000700070007807FE> 16 23 -3 0 17.065] 74 D [ 24 23 -1 0 20.755] 76 D [ 32 23 -1 0 30.441] 77 D [ 32 23 -1 0 24.906] 78 D [<03F0000E1C00380E003807807003C0F001C0F001E0F000F0F000F0F000F0F00078F00078F00078F000787800787800783800 783C00701C00700E00E00700C001C380007E00> 24 23 -4 0 25.829] 79 D [ 24 23 -1 0 22.600] 80 D [ 24 23 -1 0 24.445] 82 D [<8FC0D060E01040184008400C400C000C000C001C01FC07F80FF01F801C00180018021802180208060406020B01F1> 16 23 -2 0 18.449] 83 D [<7FFC0003C00003800001C00001C00001C00001C00001C00001C00000E00000E00000E00000E00000E00000E0000070008070 08807008C070084070086070187078383FFFF8> 24 23 -4 0 23.984] 84 D [<03E0000C18001804003002003001007000807000807000807000803800403800403800403800403800403800401C00201C00 201C00201C00201C00201C00301E0038FFC1FE> 24 23 -4 0 24.906] 85 D [<020020000300300003003000078038000780780007807400074074000740720007207200072071000E1071000E1070800E08 E0800E08E0C00E04E0400E04E0400E02E0201C02E0201C01E0101C01C0101C01C0081C01E01CFF87F87F> 32 23 -4 0 34.131] 87 D [ 24 23 -1 0 24.906] 88 D [<3E78E174E0E4E0F2E072E07070701E7003F000381038383038701FC0> 16 14 -2 0 16.604] 97 D [ 16 23 -3 0 18.449] 98 D [<0F80304070206010E000E000E000E00060007000301018380C3803F0> 16 14 -2 0 14.759] 99 D [<1F7E30F060706038E038E038E038E0386038701C301C181C0C3C03DC001C000E000E000E000E000E000E000F003F> 16 23 -2 0 18.449] 100 D [<0F0030C060206010E000E000E000E0007FF07038303018300C6007C0> 16 14 -2 0 14.759] 101 D [ 16 23 -1 0 10.147] 102 D [<1F8000606000C03000C01800C00C00C00C00601C003FF8003FF0003FE0003000003000001780000CE0001870001870001C38 001C38000C30000E798003C780> 24 21 -1 7 16.604] 103 D [ 16 23 -1 0 18.449] 104 D [ 8 23 -1 0 9.224] 105 D [<7C00E600E70063000380038003800380038001C001C001C001C001C001C000E000E000E000E007E000000000000000000000 0060007000700030> 16 29 3 6 10.147] 106 D [ 24 23 -1 0 17.527] 107 D [ 16 23 -1 0 9.224] 108 D [ 32 14 -1 0 27.673] 109 D [ 16 14 -1 0 18.449] 110 D [<1F8030E06070E038E018E01CE01CE01C601C701C301C18180C3003E0> 16 14 -2 0 16.604] 111 D [ 24 20 0 6 18.449] 112 D [<03FE007000700038003800380F3830F87038601CE01CE01CE01CE01C701C700E380E181E0E3603C2> 16 20 -2 6 17.526] 113 D [ 16 14 -1 0 13.006] 114 D [<9F00E180C0C0404040E001E00FC03FC03F00380030203020186007A0> 16 14 -1 0 13.099] 115 D [<3C00720072007100710071007000700070003800380038003800FF8038001C000C00040004000400> 16 20 -3 0 12.914] 116 D [<3EFC71E060E070F0707070707070707070703838383838383838F8F8> 16 14 -3 0 18.449] 117 D [<040006000E000F000E800E801E401C401C201C201C1038183C1CFF3F> 16 14 -3 0 17.527] 118 D [<0C08000C1C000E1C000E1E001F1E001D19001CB9001CB8801C78803C7840383040387020387070FCFCFC> 24 14 -3 0 23.984] 119 D [ 24 14 -1 0 17.527] 120 D [<780000E40000E2000061000001000000800000800000C00001C00001E00001D00001D00003C8000388000384000384000382 000703000783801FE7E0> 24 20 0 6 17.527] 121 D [ 16 14 -1 0 14.759] 122 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FF801C001C000E000E000E0FFFC40E060E030701070087004700270017000B800F80078003800180008> 16 21 -2 0 16.604] 52 D [<1F03E070CE10E03C08E03804E07C00E0720060E20031E10011C08009C04007C04003802003803803C0FE03A0000390000388 0003880003840001840001840000C400003800> 24 23 -2 0 25.829] 38 D [<04000800100030002000600060006000C000C000C000C000C000C000C000E000E000E0006000600070007000300030001800 18000C000C00060003000100008000400020> 16 34 -3 9 12.914] 40 D [<800040002000300018000C000C0006000700030003000180018001C001C000C000C000C000E000E000E000E000E000E000E0 00C000C000C0008001800180030002000400> 16 34 -1 9 12.914] 41 D [<00800000C00000C00000C00000C00000C000006000006000006000006000FFFFF0FFFFF00030000030000030000030000030 00003000001800001800001800001800> 24 22 -4 3 25.829] 43 D [<80404020101070F0F070> 8 10 -2 6 9.224] 44 D [<60F07070> 8 4 -2 0 9.224] 46 D [<800000C000006000006000003000003000001800001800000C00000C00000C00000600000600000300000300000180000180 0000C00000C000006000006000003000003000001800001800000C00000C00000600000600000300000300000180000080> 24 33 -1 8 16.604] 47 D [<7FFFF0FFFFF80000000000000000000000000000000000007FFFFC3FFFF8> 24 10 -3 -3 25.829] 61 D [ 16 23 -1 0 18.449] 12 D [ 24 23 -1 0 18.449] 13 D [ 32 23 -1 0 27.673] 14 D [ 8 2 -1 -6 11.069] 45 D 1.000 118 /f12 NF f12 SF [<38E065A04390C190C190C18060C060C060C030C0306018E008E00720> 16 14 -4 0 16.973] 97 D [<3C00630040804040C000C000600060006000300031C019C00CC00780> 16 14 -4 0 15.276] 99 D [<38E065A04390C190C190C18060C060C060C030C0306018E008E0076000300030003000300018001800180018007C> 16 23 -4 0 16.973] 100 D [<38004600C10080808000C000C000C000FE0041006080308018800F00> 16 14 -5 0 15.276] 101 D [<7000C800EC006C0004000600060006000600030003000300030003000180018001800180018007F800C000C000C000C00060 0078007C002C0018> 16 29 1 6 10.184] 102 D [<7C00C600E3006300018001800D80138011C030C030C030C018601860186008600C30043002700190> 16 20 -2 6 15.276] 103 D [<306864646430303018984C4C4838000000000000060706> 8 23 -3 0 10.184] 105 D [ 16 23 -3 0 15.276] 107 D [<6060386060243030623030623030323030301818181818181818189818184C0C084E0A0849191830F0F0> 24 14 -3 0 27.157] 109 D [<60386024306230623032303018181818181898184C084E08491830F0> 16 14 -3 0 18.670] 110 D [<1C00620041004180C0C0C0C06060606060603060306018600C400380> 16 14 -4 0 16.973] 111 D [ 16 20 -1 6 16.973] 112 D [<60006000300030003000300018001800180098004C604C704A3031E0> 16 14 -3 0 14.003] 114 D [<7C008200C300E1806180018007801F001E00380019C019C008400780> 16 14 -3 0 13.578] 115 D [<38646462626030303030181818FF0C0C0C0C0606> 8 20 -3 0 11.032] 116 D [<0E3811E830E43064306430601830183018308C304C184C182C183808> 16 14 -3 0 17.822] 117 D [ 24 23 -2 0 24.223] 82 D [ 16 21 -4 0 16.973] 49 D [<83C0C7E07C304018200810000C000200018000C00020183024182218110C110C110C090C0408021001E0> 16 21 -3 0 16.973] 50 D [<3E00438080C0C040E0606060003000300020006003C000E000300E180A08090C090C050C040C030800F0> 16 21 -3 0 16.973] 51 D [<60F07830> 8 4 -3 0 10.184] 46 D 1.000 123 /f13 NF f13 SF [ 24 23 -1 0 27.027] 65 D [ 24 23 -1 0 27.996] 75 D [ 24 23 -1 0 27.027] 78 D [<87C0D830E018C008800C800C800C000C001C003803F81FF03FE07F00F000E000C008C008C0084018603830580F88> 16 23 -2 0 20.294] 83 D [ 24 17 -1 0 20.368] 97 D [<01F8000E0600180100300100700080600080E00000E00000E00000E00000E000006000807000803001801803800E058001F8 80> 24 17 -1 0 19.629] 99 D [ 24 17 -1 0 20.737] 100 D [ 24 17 -1 0 20.368] 104 D [ 16 17 0 0 10.036] 105 D [ 24 17 -1 0 24.795] 109 D [ 24 17 -1 0 20.368] 110 D [<03F0000E1C00180600300300700380600180E001C0E001C0E001C0E001C0E001C06001807003803003001806000E1C0003F0 00> 24 17 -1 0 21.105] 111 D [<0FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00081C08081C08081C08081C080C1C180FFFF 80> 24 17 -1 0 19.629] 116 D [<03E0000E18001C0400180400380200380200380200380200380200380200380200380200380200380200380200380700FE0F 80> 24 17 -1 0 20.368] 117 D [ 16 17 -1 0 16.678] 122 D 1.000 121 /f14 NF f14 SF [<03F00FFC1F063C037C007800F800F800F800F800F800F800781C783E3C3E1E3E0FFC03F8> 16 18 -2 0 20.367] 99 D [<01FC000FFF001F01803E00C07C0000780000F80000F80000F80000FFFFC0FFFFC0F803C07803C07C03803C07801E0F000FFE 0003F800> 24 18 -1 0 21.004] 101 D [ 16 18 -1 0 18.873] 114 D [ 16 18 -2 0 18.076] 115 D [<03E00FF00F101F181F181F181F181F001F001F001F001F001F001F001F001F00FFF8FFF83F000F0007000700030003000300> 16 25 -1 0 17.822] 116 D [ 24 18 -1 0 24.186] 120 D [ 24 26 -2 0 22.913] 50 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f10 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f14 SF 479 154 p (src2tex)s f0 SF (*)s 45 r (version)s 10 r (2.12)s 33 r (\(Sep)s 11 r (9,)s 11 r (1996\))s f13 SF 466 235 p (Kazuo)s 13 r (Amano)s f6 SF (y)s f13 SF 12 r (and)s 13 r (Shinichi)s 13 r (Nomoto)s f6 SF (z)s f9 SF 707 396 p (Abstract)s f0 SF 199 483 p (One)s 16 r (of)s 15 r (the)s 15 r (authors)s 16 r (has)s 15 r (a)s 15 r (strong)s 16 r (desire)s 15 r (for)s 16 r (combining)s 14 r (do)s 1 r (cumentation)s 14 r (and)s 16 r (manual)s 133 523 p (with)s 14 r (source)s 14 r (program)s 15 r (by)s 13 r (using)s 14 r (T)s 611 530 p (E)s 629 523 p (X's)s 15 r (b)s 1 r (eautiful)s 14 r (text)s 14 r (and)s 14 r (PostScript)s 14 r (\014gures)s 14 r (without)s 14 r (any)s 133 563 p (big)s 11 r (literate)s 11 r (programming)s 11 r (to)s 1 r (ols,)s 11 r (such)s 10 r (as)s 11 r (WEB)s 11 r (system)s 11 r (\()s 6 r ([8])s 5 r (\))s 11 r (or)s 11 r (something)s 11 r (like)s 10 r (that)s 11 r (\()s 6 r ([15])s 6 r (\).)s 133 603 p (Unfortunately)s -2 r (,)s 14 r (most)s 14 r (of)s 14 r (literate)s 14 r (programming)s 15 r (to)s 1 r (ols)s 14 r (require)s 14 r (to)s 1 r (o)s 14 r (muc)s -1 r (h)s 13 r (lab)s 1 r (orious)s 14 r (e\013ort)s 15 r (to)s 133 643 p (learn)s 12 r (their)s 11 r (usages,)s 12 r (and)s 12 r (also,)s 12 r (as)s 12 r (far)s 12 r (as)s 11 r (the)s 12 r (authors)s 12 r (know,)s 11 r (no)s 12 r (such)s 11 r (to)s 1 r (ols)s 11 r (allow)s 11 r (to)s 12 r (patch)s 11 r (PS)s 133 683 p (and)s 10 r (EPS)s 10 r (\014gures)s 11 r (up)s 1 r (on)s 10 r (text.)s 15 r (It)s 10 r (is)s 10 r (quite)s 11 r (conv)s -1 r (enien)s -1 r (t)s 9 r (if)s 10 r (source)s 11 r (program)s 10 r (itself)s 10 r (is)s 11 r (its)s 10 r (do)s 1 r (cument,)s 133 723 p (manual)s 13 r (and)s 14 r (releasenote)s 14 r (simultaneously)s -3 r (,)s 14 r (in)s 14 r (which)s 13 r (you)s 13 r (can)s 14 r (explain)s 14 r (usages,)s 15 r (programming)s 133 762 p (techniques,)s 9 r (algorithms,)s 10 r (theoretical)s 9 r (backgrounds,)s f12 SF 9 r (etc)s f0 SF 20 r (in)s 9 r (terms)s 10 r (of)s 9 r (high)s 10 r (quality)s 8 r (T)s 1265 770 p (E)s 1284 762 p (Xt,)s 9 r (math-)s 133 802 p (ematical)s 11 r (formulae)s 11 r (and)s 12 r (b)s 1 r (eautiful)s 11 r (\014gures.)s 17 r (Here)s 11 r (the)s 12 r (authors)s 12 r (would)s 10 r (like)s 11 r (to)s 12 r (release)s 11 r (softwares)s f9 SF 133 842 p (src2tex)s f0 SF 12 r (and)s f9 SF 12 r (src2latex)s f0 SF (.)s 19 r (Those)s 12 r (softw)s -1 r (ares)s 11 r (would)s 12 r (give)s 11 r (an)s 12 r (easy-to-use)s 13 r (uni\014ed)s 12 r (environmen)s -1 r (t)s 133 882 p (of)s 9 r (source)s 9 r (program,)s 9 r (do)s 1 r (cumentation)s 9 r (and)s 9 r (manual.)s 13 r (They)s 9 r (b)s 1 r (elieve)s 8 r (that)s f9 SF 9 r (src2tex)s f0 SF 9 r (and)s f9 SF 9 r (src2latex)s f0 SF 133 922 p (work)s 8 r (e\013ectively)s 8 r (for)s 9 r (a)s 8 r (relatively)s 8 r (small)s 9 r (set)s 9 r (of)s 9 r (source)s 9 r (programs,)s 9 r (such)s 8 r (as)s 9 r (education)s 9 r (and)s 9 r (exp)s 1 r (eri-)s 133 962 p (ment)s 8 r (programs.)s 15 r (In)s 9 r (fact,)s 10 r (their)s 9 r (src2tex-pro)s 2 r (ject)s 9 r (itself)s 10 r (consists)s 9 r (of)s 10 r (several)s 8 r (education)s 9 r (programs,)s 133 1002 p (and)s f9 SF 12 r (src2tex)s f0 SF 12 r (has)s 13 r (work)s -1 r (ed)s 11 r (very)s 12 r (well)s 11 r (in)s 12 r (their)s 13 r (pro)s 2 r (ject.)s 18 r (F)s -2 r (or)s 12 r (practical)s 12 r (usages)s 12 r (of)s f9 SF 12 r (src2tex)s f0 SF 13 r (and)s f9 SF 133 1041 p (src2latex)s f0 SF 12 r (it)s 13 r (would)s 11 r (b)s 1 r (e)s 13 r (b)s 1 r (etter)s 12 r (to)s 12 r (compare)s f11 SF 25 r (newton.c,)s 13 r (simpson.c,)s 13 r (hanoi.c,)s f12 SF 13 r (etc)s f0 SF 26 r (with)s f11 SF 25 r (new-)s 133 1081 p (ton.c.ps,)s 11 r (simpson.c.ps,)s 11 r (hanoi.c.ps,)s f12 SF 11 r (etc)s f0 SF 24 r (resp)s 1 r (ectively)s -3 r (.)s f9 SF 651 1202 p (1.)s 17 r (Introduction)s f0 SF 66 1283 p (Our)s 10 r (softw)s -1 r (ares)s f9 SF 8 r (src2tex)s f0 SF 9 r (and)s f9 SF 10 r (src2latex)s f0 SF 9 r (are)s 9 r (a)s 9 r (sort)s 9 r (of)s 10 r (text)s 9 r (conv)s -1 r (erters)s 8 r (from)s 10 r (v)s -1 r (arious)s 8 r (types)s 9 r (of)s 9 r (source)s 10 r (program)s 0 1323 p (\014les)s 11 r (to)s 11 r (plainT)s 198 1330 p (E)s 216 1323 p (X)s 11 r (and)s 11 r (L)s f1 SF 326 1318 p (A)s f0 SF 340 1323 p (T)s 359 1330 p (E)s 377 1323 p (X)s 11 r (format)s 11 r (\014les,)s f12 SF 11 r (e.g.)s f0 SF (,)s f10 SF 442 1362 p (src1.c)s f6 SF 11 r (\))s f10 SF 11 r (src1.c.tex)s f0 SF (,)s f10 SF 22 r (src2.f)s f6 SF 11 r (\))s f10 SF 11 r (src2.f.tex)s f0 SF (.)s 0 1402 p (How)s -1 r (ev)s -1 r (er,)s f9 SF 17 r (src2tex)s f0 SF 18 r (and)s f9 SF 17 r (src2latex)s f0 SF 19 r (are)s 8 r (not)s 9 r (simple)s 8 r (pretty-printers.)s 13 r (Our)s f9 SF 8 r (src2tex)s f0 SF 9 r (and)s f9 SF 8 r (src2latex)s f0 SF 9 r (are)s 8 r (designed)s 0 1442 p (to)s 11 r (ful\014ll)s 11 r (the)s 11 r (following)s 10 r (desires:)s 74 1503 p (\(1\))s f9 SF 16 r (src2tex)s f0 SF 15 r (and)s f9 SF 14 r (src2latex)s f0 SF 15 r (can)s 14 r (identify)s 14 r (di\013erences)s 14 r (of)s 15 r (v)s -1 r (arious)s 13 r (computer)s 15 r (languages,)s 15 r (such)s 13 r (as)s 15 r (BASIC,)s 133 1542 p (C,)s 12 r (C++,)s 12 r (OBJECTIVE)s f10 SF (-)s f0 SF (C,)s 12 r (COBOL,)s 12 r (FOR)s -3 r (TRAN,)s 11 r (HTML,)s 12 r (JA)s -3 r (V)s -4 r (A,)s 11 r (LISP)s -2 r (,)s 11 r (MAKE,)s 12 r (P)s -1 r (ASCAL,)s 10 r (PERL,)s 133 1582 p (SCHEME,)s 11 r (SHELL,)s 12 r (TCL/TK;)s 11 r (ASIR,)s 11 r (MACSYMA,)s 11 r (MAPLE,)s 11 r (MA)s -2 r (THEMA)s -2 r (TICA,)s 10 r (MA)s -2 r (TLAB,)s 11 r (MAX-)s 133 1622 p (IMA,)s 11 r (MuP)s -2 r (AD,)s 10 r (OCT)s -2 r (A)s -3 r (VE,)s 10 r (REDUCE.**)s 74 1662 p (\(2\))s f9 SF 16 r (src2tex)s f0 SF 12 r (and)s f9 SF 12 r (src2latex)s f0 SF 12 r (allow)s 10 r (to)s 12 r (use)s 12 r (T)s 694 1669 p (E)s 712 1662 p (X's)s 12 r (p)s 1 r (ow)s -1 r (erful)s 11 r (typesetting)s 11 r (mechanism)s 11 r (within)s 12 r (comment)s 11 r (area)s 133 1702 p (of)s 11 r (source)s 11 r (program.)s 0 1740 p 480 1 ru 33 1777 p (*)s 17 r (Permission)s 8 r (to)s 9 r (use,)s 10 r (copy)s -3 r (,)s 9 r (and)s 9 r (mo)s 1 r (dify)s 9 r (this)s 10 r (softw)s -1 r (are)s 8 r (and)s 9 r (its)s 10 r (do)s 1 r (cumentation)s 8 r (is)s 9 r (granted)s 9 r (under)s 9 r (no)s 9 r (conditions.)s 0 1817 p (How)s -1 r (ev)s -1 r (er,)s 11 r (the)s 12 r (authors)s 11 r (would)s 11 r (b)s 1 r (e)s 12 r (very)s 11 r (happy)s 10 r (if)s 12 r (users)s 12 r (could)s 11 r (inform)s 12 r (any)s 11 r (mo)s 1 r (di\014cations)s 12 r (to)s 11 r (k)s -1 r (amano@tansei.cc.u-)s 0 1857 p (tokyo.ac.jp.)s 14 r (Since)s 11 r (src2tex)s 11 r (is)s 11 r (a)s 11 r (free)s 11 r (softw)s -1 r (are,)s 10 r (there)s 11 r (is)s 12 r (no)s 11 r (warran)s -1 r (t)s -1 r (y)s 10 r (of)s 11 r (any)s 10 r (kind)s 11 r (for)s 11 r (the)s 11 r (program.)s f6 SF 33 1897 p (y)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -3 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -1 r (AN)s 10 r (\(k)s -1 r (amano@)s 0 1937 p (p)s 1 r (o.iijnet.or.jp\))s f6 SF 33 1977 p (z)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -2 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -2 r (AN)s 11 r (\(m93093@)s 0 2016 p (crescent.josai.ac.jp\))s 17 2056 p (**)s 16 r (ASIR,)s 9 r (JA)s -3 r (V)s -4 r (A,)s 8 r (MACSYMA,)s 7 r (MAPLE,)s 9 r (MA)s -2 r (THEMA)s -3 r (TICA,)s 8 r (MA)s -2 r (TLAB,)s 7 r (REDUCE)s 9 r (are)s 8 r (registered)s 8 r (trademarks)s 0 2096 p (of)s 13 r (F)s -1 r (ujitsu)s 12 r (Lab)s 1 r (oratories,)s 14 r (Ltd.,)s 14 r (Sun)s 14 r (Microsystems,)s 14 r (Inc.,)s 14 r (Macsyma)s 13 r (Inc.,)s 14 r (W)s -2 r (aterloo)s 14 r (Maple)s 13 r (Softw)s -1 r (are,)s 13 r (W)s -1 r (olfram)s 0 2136 p (Research,)s 10 r (Inc.,)s 11 r (The)s 11 r (MathW)s -1 r (orks,)s 10 r (Inc.,)s 11 r (The)s 11 r (Rand)s 11 r (Corp)s 1 r (oration)s 11 r (resp)s 1 r (ectively)s -3 r (.)s 1273 2216 p (src2tex.c)s 66 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s 74 33 p (\(3\))s f9 SF 16 r (src2tex)s f0 SF 11 r (and)s f9 SF 11 r (src2latex)s f0 SF 11 r (enable)s 11 r (to)s 11 r (patch)s 10 r (PS)s 10 r (and)s 11 r (EPS)s 11 r (\014les)s 11 r (up)s 1 r (on)s 11 r (source)s 11 r (\014le)s 10 r (without)s 11 r (any)s 10 r (di\016culties.)s 74 73 p (\(4\))s f9 SF 16 r (src2tex)s f0 SF 11 r (and)s f9 SF 12 r (src2latex)s f0 SF 11 r (accept)s 11 r (EUC)s 11 r (Kanji)s 11 r (co)s 1 r (de)s 11 r (characters.)s f12 SF 0 133 p (R)s -1 r (emark)s f0 SF 3 r (.)s 28 r (Kanji)s 16 r (:)s 23 r (a)s 16 r (Japanese)s 16 r (system)s 15 r (of)s 16 r (writing)s 15 r (based)s 16 r (on)s 16 r (the)s 15 r (Chinese)s 16 r (one)s 15 r (and)s 16 r (comp)s 1 r (osed)s 15 r (principally)s 16 r (of)s 0 173 p (characters)s 12 r (b)s 1 r (orrow)s -1 r (ed)s 12 r (or)s 14 r (adapted)s 13 r (from)s 13 r (Chinese,)s 14 r (a)s 13 r (single)s 13 r (character)s 12 r (b)s 1 r (elonging)s 13 r (to)s 13 r (the)s 13 r (k)s -1 r (anji)s 13 r (system)s 13 r (of)s 13 r (writing)s 0 213 p (\(quoted)s 12 r (from)s 13 r ("W)s -2 r (ebster's)s 11 r (Third)s 12 r (New)s 13 r (International)s 11 r (Dictionary)s 12 r (of)s 12 r (the)s 13 r (English)s 12 r (Language)s 12 r (Unabridged",)s f11 SF 13 r (G.)s 12 r (&)s 0 253 p (C.)s 11 r (Herrian)s 11 r (Company)s f0 SF (,)s 10 r (1971\))s 66 313 p (Using)s f9 SF 12 r (src2tex)s f0 SF 11 r (or)s f9 SF 12 r (src2latex)s f0 SF (,)s 11 r (you)s 11 r (can)s 11 r (embed)s 12 r (mathematical)s 11 r (formulae)s 11 r (into)s 10 r (comment)s 11 r (area)s 11 r (of)s 12 r (source)s 11 r (pro-)s 0 353 p (gram.)s 15 r (F)s -2 r (or)s 10 r (instance,)s 11 r (you)s 10 r (can)s 11 r (insert)s 11 r (formulae)s f5 SF 672 410 p (n)s f8 SF 656 420 p (X)s f5 SF 656 490 p (\027)s f2 SF 2 r (=1)s f4 SF 710 451 p (\027)s f0 SF 12 r (=)s f4 SF 777 429 p (n)s f0 SF (\()s f4 SF (n)s f0 SF 7 r (+)s 8 r (1\))s 777 443 p 123 1 ru 830 474 p (2)s 571 560 p (\000\()s f4 SF (x)s f0 SF 8 r (+)s 7 r (1\))s 9 r (=)s f4 SF 10 r (x)s f0 SF (!)s f6 SF 9 r (\030)s 811 531 p (p)s 56 1 ru f0 SF 839 560 p (2)s f4 SF (\031)s 1 r (x)s 5 r (x)s f5 SF 919 547 p (x)s f4 SF 936 560 p (e)s f7 SF 951 547 p (\000)s f5 SF (x)s f6 SF 440 656 p (p)s 20 1 ru f4 SF 468 682 p (\031)s f0 SF 7 r (\(2)s f4 SF (n)s f6 SF 7 r (\000)s f0 SF 7 r (1\)!!)s 635 659 p (\(1)s f6 SF 8 r (\000)s f4 SF 7 r (p)s f0 SF (\))s f5 SF 735 647 p (n)s 635 674 p 118 1 ru f4 SF 657 709 p (p)s f5 SF 674 698 p (n)s f2 SF (+)s f3 SF 715 689 p (1)s 715 692 p 11 1 ru 715 706 p (2)s f0 SF 766 682 p (=)s f8 SF 802 636 p (Z)s f7 SF 835 645 p (1)s f2 SF 820 712 p (0)s f4 SF 868 682 p (e)s f7 SF 884 668 p (\000)s f5 SF (pt)s f4 SF 940 657 p (H)s f2 SF 967 662 p (2)s f5 SF (n)s f8 SF 998 630 p (\000)s f6 SF 1014 630 p (p)s 12 1 ru f4 SF 1041 657 p (t)s f8 SF 1059 630 p (\001)s 940 674 p 135 1 ru f6 SF 987 681 p (p)s 12 1 ru f4 SF 1015 708 p (t)s 1084 682 p (dx)s f0 SF 0 786 p (into)s 9 r (comment)s 8 r (area)s 10 r (of)s 9 r (C,)s 10 r (like)s 9 r (this.)s 14 r (Y)s -2 r (ou)s 9 r (can)s 9 r (even)s 9 r (include)s 10 r (EPS)s 9 r (\014les,)s 10 r (by)s 9 r (virtue)s 9 r (of)s f11 SF 10 r (dvi2ps)s f0 SF 9 r (or)s 10 r (something)s 10 r (like)s 8 r (that,)s 0 826 p (as)s 11 r (follows:)s 0 865 p 1.000 @beginspecial @epsf 0.500000 @hscale 0.500000 @vscale 0.000000 0.000000 436.000000 467.000000 @bbox @setspecial %%BeginDocument: prob1.eps %! %%Title: /tmp/xfig-export000453 %%Creator: fig2dev %%CreationDate: Sun Oct 17 11:26:56 1993 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 436 467 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -59 62 translate 0.0 467.0 translate 0.900 -0.900 scale 0.500 setlinewidth % Polyline n 227 204 m 220 210 l 236 213 l 242 206 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 242 206 m 236 213 l 251 216 l 258 209 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 258 209 m 251 216 l 267 219 l 274 212 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 274 212 m 267 219 l 283 222 l 290 215 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 290 215 m 283 222 l 299 222 l 306 218 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 306 218 m 299 222 l 315 222 l 322 221 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 322 221 m 315 222 l 331 223 l 338 224 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 338 224 m 331 223 l 347 226 l 353 227 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 353 227 m 347 226 l 363 229 l 369 230 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 369 230 m 363 229 l 379 234 l 385 233 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 385 233 m 379 234 l 395 239 l 401 235 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 401 235 m 395 239 l 410 245 l 417 238 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 417 238 m 410 245 l 426 248 l 433 241 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 433 241 m 426 248 l 442 251 l 449 244 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 449 244 m 442 251 l 458 254 l 465 247 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 465 247 m 458 254 l 474 257 l 481 250 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 220 210 m 213 217 l 229 220 l 236 213 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 236 213 m 229 220 l 245 223 l 251 216 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 251 216 m 245 223 l 261 224 l 267 219 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 267 219 m 261 224 l 277 223 l 283 222 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 283 222 m 277 223 l 293 222 l 299 222 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 299 222 m 293 222 l 308 221 l 315 222 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 315 222 m 308 221 l 324 223 l 331 223 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 331 223 m 324 223 l 340 225 l 347 226 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 347 226 m 340 225 l 356 228 l 363 229 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 363 229 m 356 228 l 372 233 l 379 234 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 379 234 m 372 233 l 388 239 l 395 239 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 395 239 m 388 239 l 404 246 l 410 245 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 410 245 m 404 246 l 419 253 l 426 248 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 426 248 m 419 253 l 435 258 l 442 251 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 442 251 m 435 258 l 451 260 l 458 254 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 458 254 m 451 260 l 467 263 l 474 257 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 213 217 m 206 224 l 222 227 l 229 220 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 229 220 m 222 227 l 238 228 l 245 223 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 245 223 m 238 228 l 254 226 l 261 224 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 261 224 m 254 226 l 270 223 l 277 223 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 277 223 m 270 223 l 286 222 l 293 222 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 293 222 m 286 222 l 302 221 l 308 221 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 308 221 m 302 221 l 317 223 l 324 223 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 324 223 m 317 223 l 333 225 l 340 225 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 340 225 m 333 225 l 349 229 l 356 228 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 356 228 m 349 229 l 365 233 l 372 233 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 372 233 m 365 233 l 381 239 l 388 239 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 388 239 m 381 239 l 397 246 l 404 246 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 404 246 m 397 246 l 413 254 l 419 253 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 419 253 m 413 254 l 429 263 l 435 258 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 435 258 m 429 263 l 445 267 l 451 260 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 451 260 m 445 267 l 461 270 l 467 263 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 206 224 m 200 231 l 216 234 l 222 227 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 222 227 m 216 234 l 232 231 l 238 228 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 238 228 m 232 231 l 248 227 l 254 226 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 254 226 m 248 227 l 263 224 l 270 223 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 270 223 m 263 224 l 279 223 l 286 222 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 286 222 m 279 223 l 295 224 l 302 221 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 302 221 m 295 224 l 311 224 l 317 223 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 317 223 m 311 224 l 327 227 l 333 225 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 333 225 m 327 227 l 343 230 l 349 229 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 349 229 m 343 230 l 359 235 l 365 233 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 365 233 m 359 235 l 374 240 l 381 239 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 381 239 m 374 240 l 390 247 l 397 246 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 397 246 m 390 247 l 406 256 l 413 254 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 413 254 m 406 256 l 422 265 l 429 263 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 429 263 m 422 265 l 438 274 l 445 267 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 445 267 m 438 274 l 454 277 l 461 270 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 200 231 m 193 238 l 209 238 l 216 234 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 216 234 m 209 238 l 225 233 l 232 231 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 232 231 m 225 233 l 241 230 l 248 227 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 248 227 m 241 230 l 257 227 l 263 224 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 263 224 m 257 227 l 272 226 l 279 223 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 279 223 m 272 226 l 288 225 l 295 224 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 295 224 m 288 225 l 304 227 l 311 224 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 311 224 m 304 227 l 320 229 l 327 227 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 327 227 m 320 229 l 336 233 l 343 230 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 343 230 m 336 233 l 352 237 l 359 235 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 359 235 m 352 237 l 368 243 l 374 240 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 374 240 m 368 243 l 384 250 l 390 247 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 390 247 m 384 250 l 399 258 l 406 256 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 406 256 m 399 258 l 415 268 l 422 265 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 422 265 m 415 268 l 431 278 l 438 274 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 438 274 m 431 278 l 447 284 l 454 277 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 193 238 m 186 245 l 202 242 l 209 238 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 209 238 m 202 242 l 218 237 l 225 233 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 225 233 m 218 237 l 234 233 l 241 230 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 241 230 m 234 233 l 250 231 l 257 227 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 257 227 m 250 231 l 266 229 l 272 226 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 272 226 m 266 229 l 282 230 l 288 225 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 288 225 m 282 230 l 298 230 l 304 227 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 304 227 m 298 230 l 314 234 l 320 229 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 320 229 m 314 234 l 329 236 l 336 233 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 336 233 m 329 236 l 345 242 l 352 237 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 352 237 m 345 242 l 361 247 l 368 243 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 368 243 m 361 247 l 377 254 l 384 250 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 384 250 m 377 254 l 393 262 l 399 258 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 399 258 m 393 262 l 409 272 l 415 268 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 415 268 m 409 272 l 425 282 l 431 278 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 431 278 m 425 282 l 440 291 l 447 284 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 186 245 m 180 251 l 196 247 l 202 242 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 202 242 m 196 247 l 212 242 l 218 237 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 218 237 m 212 242 l 227 239 l 234 233 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 234 233 m 227 239 l 243 236 l 250 231 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 250 231 m 243 236 l 259 236 l 266 229 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 266 229 m 259 236 l 275 234 l 282 230 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 282 230 m 275 234 l 291 237 l 298 230 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 298 230 m 291 237 l 307 238 l 314 234 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 314 234 m 307 238 l 323 242 l 329 236 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 329 236 m 323 242 l 338 246 l 345 242 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 345 242 m 338 246 l 354 253 l 361 247 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 361 247 m 354 253 l 370 259 l 377 254 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 377 254 m 370 259 l 386 268 l 393 262 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 393 262 m 386 268 l 402 277 l 409 272 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 409 272 m 402 277 l 418 287 l 425 282 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 425 282 m 418 287 l 434 298 l 440 291 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 180 251 m 173 258 l 189 254 l 196 247 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 196 247 m 189 254 l 205 248 l 212 242 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 212 242 m 205 248 l 221 245 l 227 239 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 227 239 m 221 245 l 236 243 l 243 236 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 243 236 m 236 243 l 252 240 l 259 236 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 259 236 m 252 240 l 268 242 l 275 234 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 275 234 m 268 242 l 284 242 l 291 237 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 291 237 m 284 242 l 300 245 l 307 238 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 307 238 m 300 245 l 316 247 l 323 242 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 323 242 m 316 247 l 332 254 l 338 246 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 338 246 m 332 254 l 348 258 l 354 253 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 354 253 m 348 258 l 364 266 l 370 259 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 370 259 m 364 266 l 380 274 l 386 268 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 386 268 m 380 274 l 395 283 l 402 277 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 402 277 m 395 283 l 411 294 l 418 287 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 418 287 m 411 294 l 427 305 l 434 298 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 173 258 m 166 265 l 182 261 l 189 254 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 189 254 m 182 261 l 198 256 l 205 248 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 205 248 m 198 256 l 214 253 l 221 245 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 221 245 m 214 253 l 230 249 l 236 243 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 236 243 m 230 249 l 246 249 l 252 240 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 252 240 m 246 249 l 262 248 l 268 242 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 268 242 m 262 248 l 278 251 l 284 242 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 284 242 m 278 251 l 293 251 l 300 245 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 300 245 m 293 251 l 309 256 l 316 247 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 316 247 m 309 256 l 325 259 l 332 254 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 332 254 m 325 259 l 341 266 l 348 258 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 348 258 m 341 266 l 357 272 l 364 266 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 364 266 m 357 272 l 373 281 l 380 274 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 380 274 m 373 281 l 389 291 l 395 283 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 395 283 m 389 291 l 404 301 l 411 294 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 411 294 m 404 301 l 420 311 l 427 305 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 166 265 m 160 272 l 176 269 l 182 261 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 182 261 m 176 269 l 191 265 l 198 256 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 198 256 m 191 265 l 207 260 l 214 253 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 214 253 m 207 260 l 223 259 l 230 249 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 230 249 m 223 259 l 239 257 l 246 249 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 246 249 m 239 257 l 255 258 l 262 248 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 262 248 m 255 258 l 271 257 l 278 251 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 278 251 m 271 257 l 287 261 l 293 251 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 293 251 m 287 261 l 302 263 l 309 256 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 309 256 m 302 263 l 318 269 l 325 259 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 325 259 m 318 269 l 334 274 l 341 266 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 341 266 m 334 274 l 350 282 l 357 272 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 357 272 m 350 282 l 366 289 l 373 281 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 373 281 m 366 289 l 382 299 l 389 291 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 389 291 m 382 299 l 398 310 l 404 301 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 404 301 m 398 310 l 414 318 l 420 311 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 160 272 m 153 279 l 169 279 l 176 269 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 176 269 m 169 279 l 185 275 l 191 265 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 191 265 m 185 275 l 201 271 l 207 260 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 207 260 m 201 271 l 216 268 l 223 259 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 223 259 m 216 268 l 232 267 l 239 257 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 239 257 m 232 267 l 248 266 l 255 258 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 255 258 m 248 266 l 264 269 l 271 257 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 271 257 m 264 269 l 280 270 l 287 261 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 287 261 m 280 270 l 296 274 l 302 263 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 302 263 m 296 274 l 312 278 l 318 269 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 318 269 m 312 278 l 328 284 l 334 274 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 334 274 m 328 284 l 344 291 l 350 282 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 350 282 m 344 291 l 359 299 l 366 289 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 366 289 m 359 299 l 375 309 l 382 299 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 382 299 m 375 309 l 391 319 l 398 310 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 398 310 m 391 319 l 407 325 l 414 318 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 153 279 m 146 286 l 162 289 l 169 279 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 169 279 m 162 289 l 178 285 l 185 275 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 185 275 m 178 285 l 194 282 l 201 271 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 201 271 m 194 282 l 210 279 l 216 268 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 216 268 m 210 279 l 226 278 l 232 267 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 232 267 m 226 278 l 242 278 l 248 266 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 248 266 m 242 278 l 257 278 l 264 269 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 264 269 m 257 278 l 273 282 l 280 270 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 280 270 m 273 282 l 289 284 l 296 274 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 296 274 m 289 284 l 305 290 l 312 278 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 312 278 m 305 290 l 321 295 l 328 284 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 328 284 m 321 295 l 337 302 l 344 291 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 344 291 m 337 302 l 353 311 l 359 299 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 359 299 m 353 311 l 368 320 l 375 309 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 375 309 m 368 320 l 384 329 l 391 319 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 391 319 m 384 329 l 400 332 l 407 325 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 146 286 m 140 293 l 155 296 l 162 289 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 162 289 m 155 296 l 171 297 l 178 285 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 178 285 m 171 297 l 187 294 l 194 282 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 194 282 m 187 294 l 203 292 l 210 279 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 210 279 m 203 292 l 219 290 l 226 278 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 226 278 m 219 290 l 235 290 l 242 278 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 242 278 m 235 290 l 251 291 l 257 278 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 257 278 m 251 291 l 267 293 l 273 282 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 273 282 m 267 293 l 283 297 l 289 284 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 289 284 m 283 297 l 298 301 l 305 290 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 305 290 m 298 301 l 314 307 l 321 295 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 321 295 m 314 307 l 330 315 l 337 302 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 337 302 m 330 315 l 346 323 l 353 311 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 353 311 m 346 323 l 362 332 l 368 320 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 368 320 m 362 332 l 378 336 l 384 329 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 384 329 m 378 336 l 394 339 l 400 332 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 140 293 m 133 299 l 149 302 l 155 296 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 155 296 m 149 302 l 165 305 l 171 297 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 171 297 m 165 305 l 181 307 l 187 294 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 187 294 m 181 307 l 197 305 l 203 292 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 203 292 m 197 305 l 212 304 l 219 290 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 219 290 m 212 304 l 228 304 l 235 290 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 235 290 m 228 304 l 244 305 l 251 291 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 251 291 m 244 305 l 260 307 l 267 293 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 267 293 m 260 307 l 276 311 l 283 297 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 283 297 m 276 311 l 292 315 l 298 301 l clp gs 0.65 setgray fill gr gs col-1 s gr % Polyline n 298 301 m 292 315 l 308 321 l 314 307 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 314 307 m 308 321 l 323 328 l 330 315 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 330 315 m 323 328 l 339 335 l 346 323 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 346 323 m 339 335 l 355 340 l 362 332 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 362 332 m 355 340 l 371 343 l 378 336 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 378 336 m 371 343 l 387 346 l 394 339 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 133 299 m 126 306 l 142 309 l 149 302 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 149 302 m 142 309 l 158 312 l 165 305 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 165 305 m 158 312 l 174 315 l 181 307 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 181 307 m 174 315 l 190 318 l 197 305 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 197 305 m 190 318 l 206 318 l 212 304 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 212 304 m 206 318 l 221 318 l 228 304 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 228 304 m 221 318 l 237 319 l 244 305 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 244 305 m 237 319 l 253 322 l 260 307 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 260 307 m 253 322 l 269 325 l 276 311 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 276 311 m 269 325 l 285 329 l 292 315 l clp gs 0.55 setgray fill gr gs col-1 s gr % Polyline n 292 315 m 285 329 l 301 335 l 308 321 l clp gs 0.50 setgray fill gr gs col-1 s gr % Polyline n 308 321 m 301 335 l 317 341 l 323 328 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 323 328 m 317 341 l 333 344 l 339 335 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 339 335 m 333 344 l 349 347 l 355 340 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 355 340 m 349 347 l 364 350 l 371 343 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 371 343 m 364 350 l 380 352 l 387 346 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 126 306 m 119 313 l 135 316 l 142 309 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 142 309 m 135 316 l 151 319 l 158 312 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 158 312 m 151 319 l 167 322 l 174 315 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 174 315 m 167 322 l 183 325 l 190 318 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 190 318 m 183 325 l 199 327 l 206 318 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 206 318 m 199 327 l 215 330 l 221 318 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 221 318 m 215 330 l 231 333 l 237 319 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 237 319 m 231 333 l 247 336 l 253 322 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 253 322 m 247 336 l 263 339 l 269 325 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 269 325 m 263 339 l 278 342 l 285 329 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 285 329 m 278 342 l 294 345 l 301 335 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 301 335 m 294 345 l 310 348 l 317 341 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 317 341 m 310 348 l 326 350 l 333 344 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 333 344 m 326 350 l 342 353 l 349 347 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 349 347 m 342 353 l 358 356 l 364 350 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 364 350 m 358 356 l 374 359 l 380 352 l clp gs 0.40 setgray fill gr gs col-1 s gr 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 227 347 m 227 98 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 119 456 m 119 207 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 374 502 m 374 254 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 481 393 m 481 144 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 227 98 m 119 207 l 374 254 l 481 144 l clp gs col-1 s gr [] 0 setdash 0 setlinecap % Polyline n 227 347 m 119 456 l 374 502 l 481 393 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 219 536 m 212 536 212 580 7 arcto 4 {pop} repeat 212 587 370 587 7 arcto 4 {pop} repeat 377 587 377 543 7 arcto 4 {pop} repeat 377 536 219 536 7 arcto 4 {pop} repeat clp gs col-1 s gr /Helvetica findfont 20.00 scalefont setfont 65 480 m gs 1 -1 scale (\(1,0,0\)) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 200 86 m gs 1 -1 scale (\(0,0,1\)) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 251 569 m gs 1 -1 scale (prob1.eps) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 493 405 m gs 1 -1 scale (\(0,1,0\) ) col-1 show gr $F2psEnd %%EndDocument @endspecial 1.000 @beginspecial @epsf 225.000000 @hoffset 0.500000 @hscale 0.500000 @vscale 0.000000 0.000000 431.000000 464.000000 @bbox @setspecial %%BeginDocument: prob2.eps %! %%Title: /tmp/xfig-export000453 %%Creator: fig2dev %%CreationDate: Sun Oct 17 11:27:39 1993 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 431 464 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -64 62 translate 0.0 464.0 translate 0.900 -0.900 scale 0.500 setlinewidth % Polyline n 227 204 m 220 210 l 236 203 l 242 206 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 242 206 m 236 203 l 251 206 l 258 209 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 258 209 m 251 206 l 267 209 l 274 212 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 274 212 m 267 209 l 283 212 l 290 215 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 290 215 m 283 212 l 299 215 l 306 218 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 306 218 m 299 215 l 315 218 l 322 221 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 322 221 m 315 218 l 331 221 l 338 224 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 338 224 m 331 221 l 347 223 l 353 227 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 353 227 m 347 223 l 363 226 l 369 230 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 369 230 m 363 226 l 379 229 l 385 233 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 385 233 m 379 229 l 395 232 l 401 235 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 401 235 m 395 232 l 410 235 l 417 238 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 417 238 m 410 235 l 426 238 l 433 241 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 433 241 m 426 238 l 442 241 l 449 244 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 449 244 m 442 241 l 458 244 l 465 247 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 465 247 m 458 244 l 474 257 l 481 250 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 220 210 m 213 217 l 229 210 l 236 203 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 236 203 m 229 210 l 245 203 l 251 206 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 251 206 m 245 203 l 261 206 l 267 209 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 267 209 m 261 206 l 277 209 l 283 212 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 283 212 m 277 209 l 293 212 l 299 215 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 299 215 m 293 212 l 308 214 l 315 218 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 315 218 m 308 214 l 324 217 l 331 221 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 331 221 m 324 217 l 340 220 l 347 223 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 347 223 m 340 220 l 356 223 l 363 226 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 363 226 m 356 223 l 372 226 l 379 229 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 379 229 m 372 226 l 388 229 l 395 232 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 395 232 m 388 229 l 404 232 l 410 235 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 410 235 m 404 232 l 419 235 l 426 238 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 426 238 m 419 235 l 435 237 l 442 241 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 442 241 m 435 237 l 451 251 l 458 244 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 458 244 m 451 251 l 467 263 l 474 257 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 213 217 m 206 224 l 222 217 l 229 210 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 229 210 m 222 217 l 238 210 l 245 203 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 245 203 m 238 210 l 254 207 l 261 206 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 261 206 m 254 207 l 270 209 l 277 209 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 277 209 m 270 209 l 286 211 l 293 212 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 293 212 m 286 211 l 302 213 l 308 214 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 308 214 m 302 213 l 317 216 l 324 217 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 324 217 m 317 216 l 333 218 l 340 220 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 340 220 m 333 218 l 349 221 l 356 223 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 356 223 m 349 221 l 365 225 l 372 226 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 372 226 m 365 225 l 381 228 l 388 229 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 388 229 m 381 228 l 397 231 l 404 232 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 404 232 m 397 231 l 413 236 l 419 235 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 419 235 m 413 236 l 429 244 l 435 237 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 435 237 m 429 244 l 445 257 l 451 251 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 451 251 m 445 257 l 461 270 l 467 263 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 206 224 m 200 231 l 216 224 l 222 217 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 222 217 m 216 224 l 232 217 l 238 210 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 238 210 m 232 217 l 248 212 l 254 207 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 254 207 m 248 212 l 263 211 l 270 209 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 270 209 m 263 211 l 279 212 l 286 211 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 286 211 m 279 212 l 295 214 l 302 213 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 302 213 m 295 214 l 311 216 l 317 216 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 317 216 m 311 216 l 327 219 l 333 218 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 333 218 m 327 219 l 343 222 l 349 221 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 349 221 m 343 222 l 359 226 l 365 225 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 365 225 m 359 226 l 374 229 l 381 228 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 381 228 m 374 229 l 390 234 l 397 231 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 397 231 m 390 234 l 406 241 l 413 236 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 413 236 m 406 241 l 422 251 l 429 244 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 429 244 m 422 251 l 438 264 l 445 257 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 445 257 m 438 264 l 454 277 l 461 270 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 200 231 m 193 238 l 209 230 l 216 224 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 216 224 m 209 230 l 225 223 l 232 217 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 232 217 m 225 223 l 241 218 l 248 212 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 248 212 m 241 218 l 257 216 l 263 211 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 263 211 m 257 216 l 272 215 l 279 212 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 279 212 m 272 215 l 288 217 l 295 214 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 295 214 m 288 217 l 304 218 l 311 216 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 311 216 m 304 218 l 320 221 l 327 219 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 327 219 m 320 221 l 336 224 l 343 222 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 343 222 m 336 224 l 352 228 l 359 226 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 359 226 m 352 228 l 368 233 l 374 229 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 374 229 m 368 233 l 384 239 l 390 234 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 390 234 m 384 239 l 399 247 l 406 241 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 406 241 m 399 247 l 415 258 l 422 251 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 422 251 m 415 258 l 431 271 l 438 264 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 438 264 m 431 271 l 447 284 l 454 277 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 193 238 m 186 245 l 202 237 l 209 230 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 209 230 m 202 237 l 218 230 l 225 223 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 225 223 m 218 230 l 234 225 l 241 218 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 241 218 m 234 225 l 250 222 l 257 216 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 257 216 m 250 222 l 266 221 l 272 215 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 272 215 m 266 221 l 282 222 l 288 217 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 288 217 m 282 222 l 298 222 l 304 218 l clp gs col-1 s gr % Polyline n 304 218 m 298 222 l 314 226 l 320 221 l clp gs col-1 s gr % Polyline n 320 221 m 314 226 l 329 228 l 336 224 l clp gs col-1 s gr % Polyline n 336 224 m 329 228 l 345 233 l 352 228 l clp gs col-1 s gr % Polyline n 352 228 m 345 233 l 361 238 l 368 233 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 368 233 m 361 238 l 377 245 l 384 239 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 384 239 m 377 245 l 393 254 l 399 247 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 399 247 m 393 254 l 409 265 l 415 258 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 415 258 m 409 265 l 425 278 l 431 271 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 431 271 m 425 278 l 440 291 l 447 284 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 186 245 m 180 251 l 196 244 l 202 237 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 202 237 m 196 244 l 212 237 l 218 230 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 218 230 m 212 237 l 227 232 l 234 225 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 234 225 m 227 232 l 243 228 l 250 222 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 250 222 m 243 228 l 259 226 l 266 221 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 266 221 m 259 226 l 275 226 l 282 222 l clp gs col-1 s gr % Polyline n 282 222 m 275 226 l 291 226 l 298 222 l clp gs col-1 s gr % Polyline n 298 222 m 291 226 l 307 230 l 314 226 l clp gs col-1 s gr % Polyline n 314 226 m 307 230 l 323 232 l 329 228 l clp gs col-1 s gr % Polyline n 329 228 m 323 232 l 338 238 l 345 233 l clp gs col-1 s gr % Polyline n 345 233 m 338 238 l 354 243 l 361 238 l clp gs col-1 s gr % Polyline n 361 238 m 354 243 l 370 251 l 377 245 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 377 245 m 370 251 l 386 260 l 393 254 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 393 254 m 386 260 l 402 272 l 409 265 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 409 265 m 402 272 l 418 285 l 425 278 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 425 278 m 418 285 l 434 298 l 440 291 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 180 251 m 173 258 l 189 251 l 196 244 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 196 244 m 189 251 l 205 244 l 212 237 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 212 237 m 205 244 l 221 239 l 227 232 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 227 232 m 221 239 l 236 235 l 243 228 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 243 228 m 236 235 l 252 233 l 259 226 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 259 226 m 252 233 l 268 234 l 275 226 l clp gs col-1 s gr % Polyline n 275 226 m 268 234 l 284 234 l 291 226 l clp gs col-1 s gr % Polyline n 291 226 m 284 234 l 300 237 l 307 230 l clp gs col-1 s gr % Polyline n 307 230 m 300 237 l 316 239 l 323 232 l clp gs col-1 s gr % Polyline n 323 232 m 316 239 l 332 245 l 338 238 l clp gs col-1 s gr % Polyline n 338 238 m 332 245 l 348 250 l 354 243 l clp gs col-1 s gr % Polyline n 354 243 m 348 250 l 364 258 l 370 251 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 370 251 m 364 258 l 380 267 l 386 260 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 386 260 m 380 267 l 395 278 l 402 272 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 402 272 m 395 278 l 411 291 l 418 285 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 418 285 m 411 291 l 427 305 l 434 298 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 173 258 m 166 265 l 182 258 l 189 251 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 189 251 m 182 258 l 198 251 l 205 244 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 205 244 m 198 251 l 214 245 l 221 239 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 221 239 m 214 245 l 230 242 l 236 235 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 236 235 m 230 242 l 246 239 l 252 233 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 252 233 m 246 239 l 262 240 l 268 234 l clp gs col-1 s gr % Polyline n 268 234 m 262 240 l 278 240 l 284 234 l clp gs col-1 s gr % Polyline n 284 234 m 278 240 l 293 243 l 300 237 l clp gs col-1 s gr % Polyline n 300 237 m 293 243 l 309 246 l 316 239 l clp gs col-1 s gr % Polyline n 316 239 m 309 246 l 325 251 l 332 245 l clp gs col-1 s gr % Polyline n 332 245 m 325 251 l 341 257 l 348 250 l clp gs col-1 s gr % Polyline n 348 250 m 341 257 l 357 265 l 364 258 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 364 258 m 357 265 l 373 274 l 380 267 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 380 267 m 373 274 l 389 285 l 395 278 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 395 278 m 389 285 l 404 298 l 411 291 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 411 291 m 404 298 l 420 311 l 427 305 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 166 265 m 160 272 l 176 265 l 182 258 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 182 258 m 176 265 l 191 257 l 198 251 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 198 251 m 191 257 l 207 252 l 214 245 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 214 245 m 207 252 l 223 250 l 230 242 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 230 242 m 223 250 l 239 248 l 246 239 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 246 239 m 239 248 l 255 249 l 262 240 l clp gs col-1 s gr % Polyline n 262 240 m 255 249 l 271 250 l 278 240 l clp gs col-1 s gr % Polyline n 278 240 m 271 250 l 287 253 l 293 243 l clp gs col-1 s gr % Polyline n 293 243 m 287 253 l 302 255 l 309 246 l clp gs col-1 s gr % Polyline n 309 246 m 302 255 l 318 260 l 325 251 l clp gs col-1 s gr % Polyline n 325 251 m 318 260 l 334 265 l 341 257 l clp gs col-1 s gr % Polyline n 341 257 m 334 265 l 350 272 l 357 265 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 357 265 m 350 272 l 366 281 l 373 274 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 373 274 m 366 281 l 382 292 l 389 285 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 389 285 m 382 292 l 398 305 l 404 298 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 404 298 m 398 305 l 414 318 l 420 311 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 160 272 m 153 279 l 169 272 l 176 265 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 176 265 m 169 272 l 185 264 l 191 257 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 191 257 m 185 264 l 201 260 l 207 252 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 207 252 m 201 260 l 216 257 l 223 250 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 223 250 m 216 257 l 232 256 l 239 248 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 239 248 m 232 256 l 248 257 l 255 249 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 255 249 m 248 257 l 264 259 l 271 250 l clp gs col-1 s gr % Polyline n 271 250 m 264 259 l 280 262 l 287 253 l clp gs col-1 s gr % Polyline n 287 253 m 280 262 l 296 265 l 302 255 l clp gs col-1 s gr % Polyline n 302 255 m 296 265 l 312 269 l 318 260 l clp gs col-1 s gr % Polyline n 318 260 m 312 269 l 328 274 l 334 265 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 334 265 m 328 274 l 344 280 l 350 272 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 350 272 m 344 280 l 359 288 l 366 281 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 366 281 m 359 288 l 375 299 l 382 292 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 382 292 m 375 299 l 391 312 l 398 305 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 398 305 m 391 312 l 407 325 l 414 318 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 153 279 m 146 286 l 162 278 l 169 272 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 169 272 m 162 278 l 178 271 l 185 264 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 185 264 m 178 271 l 194 267 l 201 260 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 201 260 m 194 267 l 210 266 l 216 257 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 216 257 m 210 266 l 226 267 l 232 256 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 232 256 m 226 267 l 242 269 l 248 257 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 248 257 m 242 269 l 257 271 l 264 259 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 264 259 m 257 271 l 273 274 l 280 262 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 280 262 m 273 274 l 289 277 l 296 265 l clp gs 1.00 setgray fill gr gs col-1 s gr % Polyline n 296 265 m 289 277 l 305 281 l 312 269 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 312 269 m 305 281 l 321 284 l 328 274 l clp gs 0.95 setgray fill gr gs col-1 s gr % Polyline n 328 274 m 321 284 l 337 289 l 344 280 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 344 280 m 337 289 l 353 296 l 359 288 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 359 288 m 353 296 l 368 306 l 375 299 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 375 299 m 368 306 l 384 319 l 391 312 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 391 312 m 384 319 l 400 332 l 407 325 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 146 286 m 140 293 l 155 285 l 162 278 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 162 278 m 155 285 l 171 278 l 178 271 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 178 271 m 171 278 l 187 275 l 194 267 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 194 267 m 187 275 l 203 277 l 210 266 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 210 266 m 203 277 l 219 279 l 226 267 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 226 267 m 219 279 l 235 281 l 242 269 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 242 269 m 235 281 l 251 284 l 257 271 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 257 271 m 251 284 l 267 287 l 273 274 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 273 274 m 267 287 l 283 290 l 289 277 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 289 277 m 283 290 l 298 293 l 305 281 l clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 305 281 m 298 293 l 314 296 l 321 284 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 321 284 m 314 296 l 330 300 l 337 289 l clp gs 0.85 setgray fill gr gs col-1 s gr % Polyline n 337 289 m 330 300 l 346 304 l 353 296 l clp gs 0.80 setgray fill gr gs col-1 s gr % Polyline n 353 296 m 346 304 l 362 313 l 368 306 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 368 306 m 362 313 l 378 326 l 384 319 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 384 319 m 378 326 l 394 339 l 400 332 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 140 293 m 133 299 l 149 292 l 155 285 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 155 285 m 149 292 l 165 285 l 171 278 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 171 278 m 165 285 l 181 288 l 187 275 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 187 275 m 181 288 l 197 291 l 203 277 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 203 277 m 197 291 l 212 294 l 219 279 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 219 279 m 212 294 l 228 296 l 235 281 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 235 281 m 228 296 l 244 299 l 251 284 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 251 284 m 244 299 l 260 302 l 267 287 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 267 287 m 260 302 l 276 305 l 283 290 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 283 290 m 276 305 l 292 308 l 298 293 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 298 293 m 292 308 l 308 311 l 314 296 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 314 296 m 308 311 l 323 314 l 330 300 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 330 300 m 323 314 l 339 317 l 346 304 l clp gs 0.75 setgray fill gr gs col-1 s gr % Polyline n 346 304 m 339 317 l 355 320 l 362 313 l clp gs 0.70 setgray fill gr gs col-1 s gr % Polyline n 362 313 m 355 320 l 371 332 l 378 326 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 378 326 m 371 332 l 387 346 l 394 339 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 133 299 m 126 306 l 142 299 l 149 292 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 149 292 m 142 299 l 158 302 l 165 285 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 165 285 m 158 302 l 174 305 l 181 288 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 181 288 m 174 305 l 190 308 l 197 291 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 197 291 m 190 308 l 206 311 l 212 294 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 212 294 m 206 311 l 221 314 l 228 296 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 228 296 m 221 314 l 237 316 l 244 299 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 244 299 m 237 316 l 253 319 l 260 302 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 260 302 m 253 319 l 269 322 l 276 305 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 276 305 m 269 322 l 285 325 l 292 308 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 292 308 m 285 325 l 301 328 l 308 311 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 308 311 m 301 328 l 317 331 l 323 314 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 323 314 m 317 331 l 333 334 l 339 317 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 339 317 m 333 334 l 349 336 l 355 320 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 355 320 m 349 336 l 364 339 l 371 332 l clp gs 0.60 setgray fill gr gs col-1 s gr % Polyline n 371 332 m 364 339 l 380 352 l 387 346 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 126 306 m 119 313 l 135 316 l 142 299 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 142 299 m 135 316 l 151 319 l 158 302 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 158 302 m 151 319 l 167 322 l 174 305 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 174 305 m 167 322 l 183 325 l 190 308 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 190 308 m 183 325 l 199 327 l 206 311 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 206 311 m 199 327 l 215 330 l 221 314 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 221 314 m 215 330 l 231 333 l 237 316 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 237 316 m 231 333 l 247 336 l 253 319 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 253 319 m 247 336 l 263 339 l 269 322 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 269 322 m 263 339 l 278 342 l 285 325 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 285 325 m 278 342 l 294 345 l 301 328 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 301 328 m 294 345 l 310 348 l 317 331 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 317 331 m 310 348 l 326 350 l 333 334 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 333 334 m 326 350 l 342 353 l 349 336 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 349 336 m 342 353 l 358 356 l 364 339 l clp gs 0.45 setgray fill gr gs col-1 s gr % Polyline n 364 339 m 358 356 l 374 359 l 380 352 l clp gs 0.40 setgray fill gr gs col-1 s gr 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 227 347 m 227 98 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 119 456 m 119 207 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 374 502 m 374 254 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 481 393 m 481 144 l gs col-1 s gr [] 0 setdash 0 setlinecap 1 setlinecap [1 3.000000] 3.000000 setdash % Polyline n 227 98 m 119 207 l 374 254 l 481 144 l clp gs col-1 s gr [] 0 setdash 0 setlinecap % Polyline n 227 347 m 119 456 l 374 502 l 481 393 l clp gs 0.40 setgray fill gr gs col-1 s gr % Polyline n 231 539 m 224 539 224 577 7 arcto 4 {pop} repeat 224 584 373 584 7 arcto 4 {pop} repeat 380 584 380 546 7 arcto 4 {pop} repeat 380 539 231 539 7 arcto 4 {pop} repeat clp gs col-1 s gr /Helvetica findfont 20.00 scalefont setfont 200 86 m gs 1 -1 scale (\(0,0,1\)) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 71 480 m gs 1 -1 scale (\(1,0,0\)) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 260 566 m gs 1 -1 scale (prob2.eps) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 493 405 m gs 1 -1 scale (\(0,1,0\) ) col-1 show gr $F2psEnd %%EndDocument @endspecial f9 SF 516 1796 p (2.)s 17 r (Compilation)s 13 r (and)s 12 r (Installation)s f0 SF 66 1876 p (In)s 10 r (order)s 10 r (to)s 10 r (compile)s 10 r (and)s 10 r (install)s f9 SF 10 r (src2tex)s f0 SF 10 r (and)s f9 SF 10 r (src2latex)s f0 SF (,)s 10 r (you)s 9 r (hav)s -1 r (e)s 9 r (only)s 10 r (to)s 10 r (issue)s 10 r (the)s 10 r (following)s 9 r (commands:)s f10 SF 133 1936 p (%)s 17 r (make)s 133 1976 p (%)s 17 r (make)s 18 r (install)s f0 SF 0 2036 p (After)s 10 r (that,)s 9 r (you)s 9 r (would)s 9 r (\014nd)s 9 r (executable)s 10 r (\014les)s f9 SF 9 r (src2tex)s f0 SF 10 r (and)s f9 SF 9 r (src2latex)s f0 SF 10 r (in)s 9 r (your)s 9 r (current)s 9 r (directory)s -2 r (.)s 13 r (Y)s -2 r (ou)s 9 r (could)s 9 r (copy)s 0 2076 p (them)s 11 r (to)s 11 r (a)s 11 r (suitable)s 11 r (place,)s f11 SF 11 r (e.g.)s f0 SF (,)s f10 SF 133 2136 p (%)s 17 r (cp)s 18 r (src2tex)s f0 SF 18 r (~)s f10 SF (/bin/)s f0 SF 1273 2216 p (src2tex.c)s 66 r (page)s 11 r (2)s EP pstopssaved restore %%Page: pstops 3 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f10 SF 133 33 p (%)s 17 r (cp)s 18 r (src2latex)s f0 SF 18 r (~)s f10 SF (/bin/)s f0 SF 0 97 p (If)s 16 r (you)s 15 r (could)s 16 r (not)s 16 r (make)s 15 r (executables,)s 17 r (it)s 16 r (would)s 15 r (b)s 1 r (e)s 15 r (b)s 1 r (etter)s 16 r (to)s 16 r (read)s 16 r (PostScript)s 15 r (\014les)s f11 SF 32 r (\014leio.c.ps,)s 17 r (getdata.c.ps,)s 0 137 p (lang\015ag.c.)s 15 r (ps,)s 11 r (mo)s 1 r (d\015ag.c.ps,)s 11 r (pas)s 2 r 10 1 ru 10 r (b)s 1 r (old.c.ps,)s 11 r (src2tex.c.ps,)s 11 r (text2tex.c.ps)s f0 SF 11 r (and)s f11 SF 11 r (to)s 1 r (ols.c.ps)s f0 SF (.)s f12 SF 0 201 p (R)s -1 r (emark)s 11 r (1)s f0 SF 5 r (.)s 14 r (The)s 12 r (authors)s 11 r (are)s 11 r (very)s 10 r (glad)s 11 r (if)s 11 r (you)s 10 r (can)s 11 r (type)s f10 SF 133 265 p (%)s 17 r (make)s 18 r (report)s f0 SF 0 329 p (and)s 16 r (send)s 16 r (your)s 14 r (lo)s 1 r (cal)s f11 SF 32 r (/etc/motd)s f0 SF 31 r (\014le)s 16 r (to)s 16 r (k)s -1 r (amano@po.iijnet.or.jp.)s 29 r (They)s 16 r (think)s 15 r (this)s 16 r (would)s 15 r (give)s 15 r (inv)s -2 r (aluable)s 0 369 p (information)s 11 r (for)s 11 r (further)s 11 r (developmen)s -1 r (t)s 10 r (of)s f9 SF 12 r (src2tex)s f0 SF (.)s f12 SF 0 433 p (R)s -1 r (emark)s 11 r (2)s f0 SF 5 r (.)s 14 r (If)s 12 r (you)s 10 r (are)s 11 r (a)s 11 r (DOS)s 11 r (user,)s 11 r (you)s 10 r (hav)s -1 r (e)s 10 r (only)s 11 r (to)s 11 r (type)s f10 SF 133 474 p (%)s 17 r (make)s 18 r (dos)s f0 SF 0 515 p (Y)s -2 r (ou)s 10 r (will)s 11 r (get)s f9 SF 11 r (src2tex.exe)s f0 SF 12 r (and)s f9 SF 11 r (src2ltex.exe)s f0 SF 11 r (in)s 11 r (the)s 11 r (present)s 10 r (working)s 10 r (directory)s -2 r (.)s 66 579 p (F)s -1 r (urthermore,)s 7 r (shell)s 7 r (scripts)s f9 SF 8 r (src2tex2dvi)s f0 SF 7 r (and)s f9 SF 8 r (src2tex2ps)s f0 SF 7 r (might)s 6 r (b)s 1 r (e)s 8 r (useful.)s f9 SF 13 r (Src2tex2dvi)s f0 SF 8 r (and)s f9 SF 7 r (src2tex2ps)s f0 SF 0 619 p (are)s 14 r (text)s 13 r (conv)s -1 r (erters)s 13 r (from)s 14 r (source)s 13 r (program)s 14 r (\014le)s 13 r (to)s 14 r (DVI)s 13 r (and)s 13 r (PostScript)s 13 r (\014les.)s 22 r (Those)s 14 r (shell)s 14 r (scripts)s 13 r (are)s 14 r (nothing)s 0 659 p (more)s 14 r (than)s 13 r (combinations)s 13 r (of)s 13 r (free)s 14 r (softw)s -1 r (ares)s f11 SF 12 r (src2tex)s f0 SF (,)s f11 SF 15 r (jtex)s f0 SF (,)s f11 SF 14 r (dvi2ps)s f0 SF (,)s f11 SF 14 r (nkf)s f0 SF 13 r (and)s f11 SF 14 r (psnup)s f0 SF (.)s 21 r (Maybe,)s 14 r (it)s 14 r (is)s 13 r (necessary)s 14 r (to)s 0 699 p (mo)s 1 r (dify)s f9 SF 12 r (src2tex2dvi)s f0 SF 12 r (and)s f9 SF 13 r (src2tex2ps)s f0 SF 12 r (so)s 12 r (that)s 13 r (they)s 12 r (work)s 11 r (prop)s 1 r (erly)s 12 r (at)s 13 r (your)s 11 r (site)s 12 r (\()s f12 SF (cf)s f0 SF (.,)s 13 r (also,)s f11 SF 13 r (src2latex2dvi)s f0 SF 12 r (and)s f11 SF 0 739 p (src2latex2ps)s f0 SF (\).)s 25 r (F)s -2 r (or)s 14 r (DOS)s 14 r (users,)s 16 r (we)s 13 r (would)s 14 r (like)s 14 r (to)s 14 r (provide)s 14 r (tw)s -1 r (o)s 14 r (batch)s 13 r (\014les)s f11 SF 15 r (src2dvi.bat)s f0 SF 14 r (and)s f11 SF 15 r (tex2tex.bat)s f0 SF 14 r (\()s f12 SF (cf)s f0 SF (.,)s f11 SF 0 779 p (DOS)s 2 r 10 1 ru 10 r (USER)s f0 SF (\).)s f9 SF 694 864 p (3.)s 17 r (Manual)s f0 SF 66 951 p (The)s 11 r (usage)s 12 r (of)s f9 SF 11 r (src2tex)s f0 SF 11 r (and)s f9 SF 11 r (src2latex)s f0 SF 11 r (is)s 11 r (quite)s 11 r (simple.)s 15 r (It)s 11 r (su\016ces)s 11 r (to)s 11 r (input)s f10 SF 133 1015 p (%)s 17 r (src2tex)s f11 SF 18 r (source-\014le-name)s f10 SF 133 1056 p (%)s 17 r (src2latex)s f11 SF 18 r (source-\014le-name)s f0 SF 0 1120 p (on)s 14 r (the)s 14 r (command)s 14 r (line.)s 23 r (No)s 14 r (options)s 13 r (are)s 14 r (av)s -2 r (ailable)s 13 r (and)s 14 r (no)s 14 r (options)s 14 r (will)s 14 r (b)s 1 r (e)s 14 r (added,)s 14 r (since)s 14 r (we)s 13 r (b)s 1 r (elieve)s 13 r (that)s 14 r (it)s 13 r (is)s 0 1160 p (no)s 14 r (goo)s 1 r (d)s 14 r (to)s 14 r (implement)s 12 r (v)s -1 r (arious)s 13 r (options)s 13 r (and)s 14 r (circumv)s -1 r (en)s -1 r (t)s 13 r (programming)s 13 r (di\016culties.)s 23 r (Their)s 13 r (usage)s 14 r (is)s 13 r (so)s 14 r (simple)s 0 1199 p (that)s 14 r (we)s 14 r (do)s 14 r (not)s 14 r (feel)s 15 r (any)s 13 r (necessities)s 14 r (to)s 15 r (write)s 14 r (online)s 14 r (manuals.)s 24 r (If)s 14 r (no)s 14 r (input-\014le-name)s 15 r (is)s 14 r (given,)s f9 SF 14 r (src2tex)s f0 SF 15 r (and)s f9 SF 0 1239 p (src2latex)s f0 SF 13 r (read)s 13 r (data)s 13 r (from)s f12 SF 13 r (standar)s -1 r (d)s 13 r (input)s f0 SF 16 r (and)s 13 r (write)s 13 r (them)s 13 r (out)s 13 r (to)s f12 SF 13 r (standar)s -1 r (d)s 13 r (output)s f0 SF 3 r (.)s 21 r (When)s f11 SF 13 r (source-\014le-name)s f0 SF 0 1279 p (is)s 14 r (given,)s f9 SF 14 r (src2tex)s f0 SF 14 r (and)s f9 SF 14 r (src2latex)s f0 SF 14 r (try)s 14 r (to)s 14 r (identify)s 13 r (language)s 14 r (which)s 13 r (is)s 14 r (used)s 14 r (in)s 14 r (the)s 15 r (given)s 13 r (\014le.)s 23 r (First,)s 15 r (they)s 14 r (see)s f11 SF 0 1319 p (\014le-name-su\016x)s f0 SF 11 r (and)s 11 r (determine)s 11 r (language)s 11 r (type)s 11 r (as)s 11 r (follows)s 11 r (:)s f10 SF 133 1379 p (.tex,)s 17 r (.txt)s f6 SF 213 r (\))s f10 SF 61 r (TEXT)s 133 1419 p (.bas,)s 17 r (.vb)s f6 SF 230 r (\))s f10 SF 61 r (BASIC)s 133 1459 p (.c,)s 17 r (.cpp,)s 18 r (.vc)s f6 SF 160 r (\))s f10 SF 61 r (C,)s 18 r (C++,)s 17 r (OBJECTIVE-C)s 133 1498 p (.cbl,)s 17 r (.cob)s f6 SF 213 r (\))s f10 SF 61 r (COBOL)s 133 1538 p (.f,)s 17 r (.for)s f6 SF 248 r (\))s f10 SF 61 r (FORTRAN)s 133 1578 p (.html)s f6 SF 300 r (\))s f10 SF 61 r (HTML)s 133 1618 p (.java)s f6 SF 300 r (\))s f10 SF 61 r (JAVA)s 133 1658 p (.el,)s 17 r (.lsp,)s 18 r (.sc,)s 17 r (.scm)s f6 SF 38 r (\))s f10 SF 62 r (LISP,)s 17 r (SCHEME)s 150 1698 p (makefile)s f6 SF 230 r (\))s f10 SF 61 r (MAKE)s 133 1737 p (.p,)s 17 r (.pas,)s 18 r (.tp)s f6 SF 160 r (\))s f10 SF 61 r (PASCAL)s 133 1777 p (.pl,)s 17 r (.prl)s f6 SF 230 r (\))s f10 SF 61 r (PERL)s 133 1817 p (.sh,)s 17 r (.csh,)s 18 r (.ksh)s f6 SF 125 r (\))s f10 SF 61 r (SHELL)s 133 1857 p (.tcl,)s 17 r (.tk)s f6 SF 230 r (\))s f10 SF 61 r (TCL/TK)s 133 1897 p (.asi,)s 17 r (.asir,)s 18 r (.asr)s f6 SF 90 r (\))s f10 SF 61 r (ASIR)s 133 1937 p (.mac,)s 17 r (.max)s f6 SF 213 r (\))s f10 SF 61 r (MACSYMA,)s 17 r (MAXIMA)s 133 1977 p (.map,)s 17 r (.mpl)s f6 SF 213 r (\))s f10 SF 61 r (MAPLE)s 133 2016 p (.mat,)s 17 r (.mma)s f6 SF 213 r (\))s f10 SF 61 r (MATHEMATICA)s 133 2056 p (.ml,)s 17 r (.mtlb,)s 18 r (.oct)s f6 SF 108 r (\))s f10 SF 61 r (MATLAB,)s 17 r (OCTAVE)s 133 2096 p (.mu)s f6 SF 334 r (\))s f10 SF 62 r (MuPAD)s 133 2136 p (.red,)s 17 r (.rdc)s f6 SF 213 r (\))s f10 SF 61 r (REDUCE)s f0 SF 1273 2216 p (src2tex.c)s 66 r (page)s 11 r (3)s EP pstopssaved restore %%Page: pstops 4 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s 0 33 p (Next,)s 11 r (they)s 10 r (search)s 9 r (key)s 10 r (words)s 9 r (and)s 11 r (attempt)s 10 r (to)s 11 r (determine)s 10 r (language.)s 14 r (After)s 11 r (that,)s 10 r (if)s 11 r (there)s 10 r (exists)s 11 r (a)s 10 r (\014le)s f11 SF 10 r (src2tex.s2t)s f0 SF 0 73 p ([resp.)s f11 SF 14 r (src2latex.s2t)s f0 SF 7 r (],)s 9 r (then)s f9 SF 8 r (src2tex)s f0 SF 7 r ([resp.)s f9 SF 14 r (src2latex)s f0 SF 8 r (])s 7 r (simply)s 8 r (includes)s 8 r (it)s 8 r (at)s 7 r (the)s 8 r (b)s 1 r (eginning)s 8 r (of)s 8 r (output)s 7 r (pro)s 1 r (cedure.)s 0 113 p (In)s 11 r (case)s 11 r (of)s 22 r (DOS,)s f11 SF 11 r (src2ltex.s2t)s f0 SF 11 r (is)s 11 r (read)s 12 r (instead)s 11 r (of)s f11 SF 11 r (src2latex.s2t)s f0 SF (.)s 66 153 p (Our)s f9 SF 11 r (src2tex)s f0 SF 11 r (and)s f9 SF 11 r (src2latex)s f0 SF 10 r (have)s 9 r (three)s 11 r (mo)s 1 r (des:)s 15 r (text)s 10 r (mo)s 1 r (de,)s 11 r (quasi-T)s 1036 160 p (E)s 1054 153 p (X)s 11 r (mo)s 1 r (de)s 11 r (and)s 11 r (T)s 1262 160 p (E)s 1280 153 p (X)s 11 r (mo)s 1 r (de.)s 15 r (First,)s 11 r (you)s 0 193 p (are)s 13 r (in)s 13 r (default)s 12 r (text)s 13 r (mo)s 1 r (de.)s 20 r (As)s 13 r (you)s 12 r (can)s 13 r (imagine,)s 13 r (text)s 13 r (mo)s 1 r (de)s 13 r (is)s 12 r (nothing)s 13 r (more)s 13 r (than)s 13 r (typewriter)s 13 r (mo)s 1 r (de.)s 20 r (In)s 13 r (text)s 0 233 p (mo)s 1 r (de,)s 13 r ("what)s 12 r (you)s 12 r (see)s 12 r (is)s 13 r (what)s 12 r (you)s 12 r (get".)s 19 r (Second,)s 13 r (you)s 11 r (\014nd)s 13 r (that)s 12 r (you)s 12 r (are)s 12 r (in)s 13 r (quasi-T)s 1188 240 p (E)s 1206 233 p (X)s 13 r (mo)s 1 r (de)s 12 r (when)s 13 r (you)s 11 r (enter)s 0 273 p (into)s 10 r (comment)s 10 r (area.)s 15 r (F)s -2 r (or)s 10 r (instance,)s 11 r (if)s 11 r (input)s 12 r (\014le)s 11 r (is)s 11 r (C)s 11 r (source)s 11 r (\014le,)s 11 r (then)s 0 279 p 1.000 @beginspecial @epsf 25.000000 @hoffset 0.700000 @hscale 0.700000 @vscale 0.000000 0.000000 494.000000 130.000000 @bbox @setspecial %%BeginDocument: figure1.eps %! %%Title: /tmp/xfig-export001317 %%Creator: fig2dev %%CreationDate: Tue Dec 12 23:27:46 1995 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 494 130 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -8 15 translate 0.0 130.0 translate 0.900 -0.900 scale 2.000 setlinewidth % Polyline n 42 53 m 35 53 35 148 7 arcto 4 {pop} repeat 35 155 199 155 7 arcto 4 {pop} repeat 206 155 206 60 7 arcto 4 {pop} repeat 206 53 42 53 7 arcto 4 {pop} repeat clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 393 53 m 386 53 386 148 7 arcto 4 {pop} repeat 386 155 550 155 7 arcto 4 {pop} repeat 557 155 557 60 7 arcto 4 {pop} repeat 557 53 393 53 7 arcto 4 {pop} repeat clp gs 0.90 setgray fill gr gs col-1 s gr n 242.000 134.000 m 218.000 128.000 l 242.000 122.000 l gs 2 setlinejoin col-1 s gr % Polyline n 218 128 m 374 128 l gs col-1 s gr % Polyline n 218 80 m 374 80 l gs col-1 s gr n 350.000 74.000 m 374.000 80.000 l 350.000 86.000 l gs 2 setlinejoin col-1 s gr /Helvetica findfont 20.00 scalefont setfont 74 107 m gs 1 -1 scale (text mode) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 281 161 m gs 1 -1 scale (*/) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 8 17 m gs 1 -1 scale ( ) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 281 53 m gs 1 -1 scale (/*) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 395 110 m gs 1 -1 scale (quasi-TeX mode) col-1 show gr $F2psEnd %%EndDocument @endspecial 0 691 p (In)s 11 r (quasi-T)s 146 698 p (E)s 164 691 p (X)s 12 r (mo)s 1 r (de)s 11 r (of)s f9 SF 11 r (src2tex)s f0 SF (,)s 11 r (you)s 10 r (can)s 11 r (input)s 12 r (any)s 10 r (characters)s 10 r (as)s 11 r (in)s 11 r (text)s 12 r (mo)s 1 r (de)s 11 r (except)s 11 r (the)s 11 r (following)s 10 r (four)s 11 r (key)s 0 731 p (words)s f6 SF 37 r (fn)s f0 SF 25 r (,)s f6 SF 25 r (g)s f0 SF 26 r (,)s 25 r ($)s 25 r (and)s 25 r ($$)s 25 r (.)s 20 r (How)s -1 r (ev)s -1 r (er,)s 12 r (it)s 13 r (is)s 12 r (to)s 13 r (b)s 1 r (e)s 12 r (noted)s 13 r (that)s 13 r (font)s 11 r (and)s 13 r (spacing)s 13 r (sizes)s 12 r (are)s 13 r (di\013erent)s 12 r (from)s 0 771 p (those)s 11 r (of)s 11 r (text)s 11 r (mo)s 1 r (de.)s 15 r (Third,)s 11 r (when)s 11 r (you)s 11 r (are)s 11 r (in)s 11 r (quasi-T)s 748 778 p (E)s 767 771 p (X)s 11 r (mo)s 1 r (de)s 11 r (of)s f9 SF 11 r (src2tex)s f0 SF (,)s 11 r (you)s 10 r (are)s 11 r (allow)s -1 r (ed)s 11 r (to)s 11 r (enter)s 10 r (into)s 10 r (T)s 1517 778 p (E)s 1535 771 p (X)s 0 810 p (mo)s 1 r (de)s 11 r (and)s 11 r (escap)s 1 r (e)s 11 r (from)s 11 r (it)s 11 r (by)s 10 r (using)s 11 r (one)s 11 r (of)s 11 r (the)s 11 r (following)s 10 r (pairs:)s f6 SF 26 r (fn)s f0 SF 22 r (and)s f6 SF 22 r (g)s f0 SF 11 r (,)s 22 r ($)s 22 r (and)s 22 r ($)s 11 r (,)s 33 r ($$)s 22 r (and)s 22 r ($$)s 11 r (.)s 15 r (T)s -2 r (o)s 10 r (b)s 1 r (e)s 0 850 p (more)s 11 r (explicit,)s 0 851 p 1.000 @beginspecial @epsf 25.000000 @hoffset 0.700000 @hscale 0.700000 @vscale 0.000000 0.000000 497.000000 155.000000 @bbox @setspecial %%BeginDocument: figure2.eps %! %%Title: /tmp/xfig-export001338 %%Creator: fig2dev %%CreationDate: Tue Dec 12 23:29:05 1995 %%For: kamano@novas (Kazuo AMANO,,,) %%BoundingBox: 0 0 497 155 %%Pages: 0 %%EndComments /$F2psDict 6400 dict def $F2psDict begin $F2psDict /mtrx matrix put /l {lineto} bind def /m {moveto} bind def /s {stroke} bind def /n {newpath} bind def /gs {gsave} bind def /gr {grestore} bind def /clp {closepath} bind def /graycol {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul 4 -2 roll mul setrgbcolor} bind def /col-1 {} def /col0 {0 0 0 setrgbcolor} bind def /col1 {0 0 1 setrgbcolor} bind def /col2 {0 1 0 setrgbcolor} bind def /col3 {0 1 1 setrgbcolor} bind def /col4 {1 0 0 setrgbcolor} bind def /col5 {1 0 1 setrgbcolor} bind def /col6 {1 1 0 setrgbcolor} bind def /col7 {1 1 1 setrgbcolor} bind def end /$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def /$F2psEnd {$F2psEnteredState restore end} def %%EndProlog $F2psBegin 0 setlinecap 0 setlinejoin -5 12 translate 0.0 155.0 translate 0.900 -0.900 scale 2.000 setlinewidth % Polyline n 42 53 m 35 53 35 148 7 arcto 4 {pop} repeat 35 155 199 155 7 arcto 4 {pop} repeat 206 155 206 60 7 arcto 4 {pop} repeat 206 53 42 53 7 arcto 4 {pop} repeat clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 393 53 m 386 53 386 148 7 arcto 4 {pop} repeat 386 155 550 155 7 arcto 4 {pop} repeat 557 155 557 60 7 arcto 4 {pop} repeat 557 53 393 53 7 arcto 4 {pop} repeat clp gs 0.90 setgray fill gr gs col-1 s gr % Polyline n 218 80 m 374 80 l gs col-1 s gr n 350.000 74.000 m 374.000 80.000 l 350.000 86.000 l gs 2 setlinejoin col-1 s gr n 242.000 134.000 m 218.000 128.000 l 242.000 122.000 l gs 2 setlinejoin col-1 s gr % Polyline n 218 128 m 374 128 l gs col-1 s gr /Helvetica findfont 12.00 scalefont setfont 17 110 m gs 1 -1 scale ( ) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 428 110 m gs 1 -1 scale (TeX mode) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 242 56 m gs 1 -1 scale ({\\ $ $$) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 5 14 m gs 1 -1 scale ( ) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 245 164 m gs 1 -1 scale (} $ $$) col-1 show gr /Helvetica findfont 12.00 scalefont setfont 245 185 m gs 1 -1 scale ( ) col-1 show gr /Helvetica findfont 20.00 scalefont setfont 41 110 m gs 1 -1 scale (quasi-TeX mode) col-1 show gr $F2psEnd %%EndDocument @endspecial 0 1269 p (Literally)s -2 r (,)s 14 r (T)s 163 1276 p (E)s 182 1269 p (X)s 14 r (mo)s 1 r (de)s 14 r (is)s 15 r (genuine)s 13 r (plain)s 15 r (T)s 579 1276 p (E)s 598 1269 p (X)s 14 r (mo)s 1 r (de.)s 25 r (Y)s -2 r (ou)s 14 r (can)s 14 r (use)s 14 r (plain)s 15 r (T)s 1051 1276 p (E)s 1069 1269 p (X)s 15 r (there)s 14 r (without)s 14 r (any)s 14 r (restrictions.)s f9 SF 0 1309 p (Src2tex)s f0 SF 11 r (is)s 11 r (designed)s 11 r (to)s 11 r (use)s 11 r (the)s 11 r (ab)s 1 r (ov)s -1 r (e)s 11 r (key)s 10 r (words)s 10 r (as)s 11 r (follows:)s 133 1370 p ($)s f11 SF (mathematical)s 11 r (formulae)s f0 SF ($)s 133 1431 p ($$)s f11 SF (display)s 10 r (style)s 10 r (mathematical)s 11 r (formulae)s f0 SF ($$)s f6 SF 133 1491 p (fn)s f11 SF 11 r (T)s -2 r (eXt)s 10 r (and)s 11 r (mathematical)s 11 r (formulae)s f6 SF (g)s f12 SF 0 1552 p (R)s -1 r (emark)s 10 r (1)s f0 SF 5 r (.)s 14 r (In)s 10 r (the)s 10 r (ab)s 1 r (ov)s -1 r (e)s 9 r (expressions)s 10 r ($)s 10 r (,)s 10 r ($$)s 10 r (and)s f6 SF 10 r (n)s f0 SF 10 r (are)s 10 r (all)s 9 r (passed)s 10 r (to)s 10 r (T)s 969 1560 p (E)s 987 1552 p (X)s 10 r (transparently)s -2 r (.)s 13 r (How)s -1 r (ev)s -1 r (er,)s 9 r (braces)s f6 SF 10 r (f)s f0 SF 10 r (and)s f6 SF 0 1592 p (g)s f0 SF 11 r (are)s 11 r (b)s 1 r (oth)s 11 r (replaced)s 11 r (with)s 11 r (blank)s 11 r (spaces.)s 15 r (F)s -2 r (or)s 10 r (example,)s 11 r (a)s 12 r (phrase)s f6 SF 133 1632 p (fn)s f10 SF (bf)s 17 r (bold)s 18 r (face)s f6 SF (g)s f0 SF 0 1673 p (is)s 11 r (translated)s 11 r (into)s f6 SF 150 1713 p (n)s f10 SF (bf)s 18 r (bold)s 17 r (face)s f0 SF 0 1753 p (and)s 11 r (passed)s 11 r (to)s 11 r (T)s 229 1760 p (E)s 248 1753 p (X.)s 11 r (If)s 11 r (you)s 10 r (really)s 11 r (wan)s -1 r (t)s 10 r (to)s 11 r (get)s f6 SF 11 r (fn)s f10 SF (bf)s 18 r (bold)s 17 r (face)s f6 SF (g)s f0 SF (,)s 11 r (then)s 11 r (you)s 10 r (have)s 10 r (to)s 11 r (use)s f6 SF 133 1793 p (ffn)s f10 SF (bf)s 17 r (bold)s 18 r (face)s f6 SF (gg)s f0 SF 0 1834 p (instead.)s 15 r (Actually)s -2 r (,)s f6 SF 133 1895 p (ffn)s f11 SF 11 r (T)s -2 r (eXt)s 10 r (and)s 11 r (mathematical)s 11 r (formulae)s f6 SF (gg)s f0 SF 0 1955 p (is)s 15 r (the)s 14 r (other)s 15 r (do)s 1 r (or)s 14 r (to)s 15 r (T)s 331 1963 p (E)s 349 1955 p (X)s 15 r (mo)s 1 r (de.)s 25 r (This)s 15 r (metho)s 1 r (d)s 15 r (provides)s 13 r (a)s 15 r (safe)s 15 r (encapslated)s 14 r (transition)s 15 r (from)s 14 r (T)s 1379 1963 p (E)s 1398 1955 p (X)s 14 r (mo)s 1 r (de)s 15 r (to)s 0 1995 p (quasi-T)s 104 2002 p (E)s 123 1995 p (X)s 11 r (mo)s 1 r (de.)s f12 SF 0 2056 p (R)s -1 r (emark)s 13 r (2)s f0 SF 5 r (.)s f9 SF 22 r (Src2tex)s f0 SF 13 r (and)s f9 SF 14 r (src2latex)s f0 SF 13 r (hav)s -1 r (e)s 13 r (several)s 12 r (fail-safe)s 14 r (mechanisms.)s 21 r (If)s 13 r (you)s 13 r (do)s 13 r (not)s 14 r (write)s 13 r (mathematical)s 0 2096 p (formula)s 10 r (prop)s 1 r (erly)s -2 r (,)s f9 SF 10 r (src2tex)s f0 SF 11 r (thinks)s 11 r (that)s 11 r (you)s 10 r (have)s 10 r (no)s 11 r (knowledge)s 10 r (of)s 11 r (T)s 966 2103 p (E)s 985 2096 p (X,)s f12 SF 11 r (i.e.)s f0 SF (,)s 11 r (you)s 10 r (are)s 11 r (not)s 11 r (allow)s -1 r (ed)s 10 r (to)s 11 r (use)s 11 r (T)s 1507 2103 p (E)s 1526 2096 p (X.)s 0 2136 p (F)s -2 r (or)s 10 r (instance,)s 11 r (if)s 11 r (you)s 11 r (really)s 11 r (wan)s -1 r (t)s 10 r (to)s 11 r (enter)s 10 r (into)s 10 r (T)s 674 2143 p (E)s 693 2136 p (X)s 11 r (mo)s 1 r (de,)s 11 r (it)s 11 r (is)s 11 r (b)s 1 r (etter)s 11 r (not)s 11 r (to)s 11 r (write)s 1273 2216 p (src2tex.c)s 66 r (page)s 11 r (4)s EP pstopssaved restore %%Page: pstops 5 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s 133 33 p ($T)s 2 r 10 1 ru 10 r (ab)s 1 r (c$)s 11 r (.)s 0 73 p (As)s 11 r (a)s 11 r (substitute,)s 11 r (you)s 10 r (should)s 11 r (use)s 11 r (either)s 133 113 p ($T)s 2 r 10 1 ru f6 SF 10 r (f)s f0 SF (ab)s 1 r (c)s f6 SF (g)s f0 SF ($)s 66 r (or)s 67 r ($T)s 2 r 10 1 ru 9 r (a)s 12 r (bc$)s 0 153 p (\()s f12 SF (cf.)s f0 SF 11 r ([9]\).)s 14 r (In)s 11 r (case)s 10 r (of)s 11 r (BASIC)s 10 r (or)s 11 r (PERL,)s 21 r ($)s 21 r (sign)s 10 r (which)s 10 r (means)s 10 r (string)s 11 r (v)s -1 r (ariable)s 10 r (is)s 10 r (not)s 11 r (alwa)s -1 r (ys)s 9 r (recognized)s 11 r (as)s 10 r (a)s 11 r (T)s 1517 160 p (E)s 1535 153 p (X)s 0 193 p (mo)s 1 r (de)s 11 r (transition)s 11 r (key)s 10 r (word.)s 14 r (F)s -2 r (or)s 10 r (example,)s 11 r (you)s 11 r (cannot)s 11 r (enter)s 10 r (into)s 10 r (T)s 936 200 p (E)s 955 193 p (X)s 11 r (mo)s 1 r (de)s 11 r (with)s f10 SF 133 233 p (A$,)s 17 r (str1$,)s 18 r (...)s f0 SF 0 273 p (in)s 11 r (BASIC)s 11 r (comment)s 10 r (area.)s 15 r (Y)s -2 r (ou)s 10 r (are)s 11 r (not)s 11 r (able)s 12 r (to)s 11 r (use)s 11 r (T)s 750 280 p (E)s 768 273 p (X)s 11 r (mo)s 1 r (de)s 11 r (of)s 11 r (PERL)s 12 r (with)s f10 SF 133 313 p ($A,)s 17 r ($str1,)s 18 r (...)s f0 SF 0 353 p (either.)s 15 r (It)s 11 r (would)s 10 r (b)s 1 r (e)s 11 r (b)s 1 r (etter)s 11 r (to)s 11 r (use)s 11 r ($$)s 11 r (or)s f6 SF 11 r (fn)s f0 SF 11 r (in)s 11 r (BASIC)s 11 r (and)s 12 r (PERL.)s f12 SF 0 413 p (R)s -1 r (emark)s 12 r (3)s f0 SF 5 r (.)s 18 r (As)s 12 r (you)s 11 r (can)s 13 r (easily)s 12 r (imagine,)s 12 r (in)s 13 r (quasi-T)s 720 420 p (E)s 739 413 p (X)s 12 r (mo)s 1 r (de)s 12 r (of)s f9 SF 12 r (src2latex)s f0 SF (,)s 13 r (you)s 11 r (hav)s -1 r (e)s 12 r (to)s 12 r (use)s f6 SF 24 r (n)s f0 SF (\()s 12 r (,)s f6 SF 13 r (n)s f0 SF (\))s 12 r (,)s f6 SF 12 r (n)s f0 SF ([)s 24 r (and)s f6 SF 0 453 p (n)s f0 SF (])s 12 r (instead)s 12 r (of)s 24 r ($)s 12 r (,)s 12 r ($)s 12 r (,)s 12 r ($$)s 13 r (and)s 12 r ($$)s 12 r (resp)s 1 r (ectively)s -3 r (.)s 17 r (In)s 12 r (case)s 12 r (of)s f9 SF 12 r (src2latex)s f0 SF (,)s 12 r (if)s 12 r (you)s 11 r (wan)s -1 r (t)s 11 r (to)s 13 r (use)s 12 r (a)s 12 r (certain)s 12 r (non-default)s 0 493 p (do)s 1 r (cumentst)s -1 r (yle,)s 9 r (say)s f10 SF 25 r (twocolumn,)s 18 r (12pt,)s 17 r (jarticle)s f0 SF 27 r (style,)s 9 r (then)s 9 r (you)s 8 r (hav)s -1 r (e)s 9 r (only)s 9 r (to)s 9 r (insert)s 9 r (a)s 9 r (comment)s 9 r (area)s 9 r (with)s 0 533 p (a)s 11 r (phrase)s f6 SF 133 573 p (fn)s f10 SF (documentstyle[twocolumn,12pt])s f6 SF (f)s f10 SF (jarticle)s f6 SF (gg)s f0 SF 0 633 p (at)s 11 r (the)s 11 r (b)s 1 r (eginning)s 11 r (of)s 11 r (source)s 11 r (\014le.)s 15 r (The)s 11 r (general)s 11 r (form)s 11 r (of)s 11 r (this)s 11 r (phrase)s 11 r (is)s 12 r (given)s 10 r (by)s f6 SF 133 693 p (fn)s f10 SF (documentstyle[)s f11 SF (latex)s 11 r (option)s f10 SF (])s f6 SF (f)s f11 SF (latex)s 11 r (style)s f6 SF (gg)s f0 SF 0 753 p (If)s 11 r (you)s 11 r (hav)s -1 r (e)s 10 r (already)s 12 r (installed)s f11 SF 11 r (dvi2ps)s f0 SF 12 r (or)s 11 r (something)s 11 r (like)s 11 r (that,)s 11 r (you)s 11 r (can)s 11 r (include)s 12 r (EPS)s 11 r (\014les)s 12 r (when)s 11 r (you)s 10 r (are)s 12 r (in)s 11 r (T)s 1517 761 p (E)s 1535 753 p (X)s 0 793 p (mo)s 1 r (de.)s 15 r (In)s 11 r (case)s 11 r (of)s f11 SF 11 r (dvi2ps)s f0 SF (,)s 11 r (a)s 11 r (line)s f6 SF 133 853 p (fn)s f0 SF (sp)s 1 r (ecial)s f6 SF (f)s f0 SF (eps\014le=)s f11 SF (eps)s 11 r (\014le)s 11 r (name)s 11 r (...)s f6 SF (gg)s f0 SF 0 914 p (would)s 10 r (su\016ce)s 11 r (to)s 11 r (patch)s 10 r (an)s 12 r (EPS)s 11 r (\014gure)s 11 r (up)s 1 r (on)s 11 r (comment)s 10 r (area.)s 66 954 p (F)s -1 r (or)s 14 r (practical)s 16 r (usages,)s 17 r (it)s 15 r (is)s 16 r (b)s 1 r (etter)s 16 r (to)s 15 r (read)s 16 r (source)s 16 r (\014les)s 15 r (of)s f9 SF 16 r (src2tex)s f0 SF 16 r (\()s f12 SF (e.g.)s f0 SF (,)s 15 r (\014leio.c,)s 17 r (getdata.c,)s 17 r (lang\015ag.c,)s 0 994 p (mo)s 1 r (d\015ag.c,)s 13 r (src2tex.c,)s 12 r (text2tex.c,)s 13 r (to)s 1 r (ols.c\),)s 12 r (since)s 13 r (they)s 12 r (are)s 12 r (written)s 13 r (in)s 12 r (src2tex)s 12 r (style.)s 18 r (F)s -2 r (or)s 12 r (instance,)s 12 r (if)s 13 r (you)s 11 r (input)s 0 1033 p (three)s 11 r (commands)s f10 SF 133 1094 p (%)s 17 r (src2tex)s 18 r (src2tex.c)s 133 1134 p (%)s 17 r (tex)s 18 r (src2tex.c.tex)s 133 1174 p (%)s 17 r (dvi2ps)s 18 r (src2tex.c.dvi)s 17 r (>)s 18 r (src2tex.c.ps)s f0 SF 0 1234 p (in)s 11 r (the)s 11 r (source)s 11 r (\014les)s 11 r (directory)s 11 r (of)s f9 SF 11 r (src2tex)s f0 SF (,)s 11 r (you)s 11 r (will)s 11 r (get)s 11 r (a)s 11 r (PostScript)s 10 r (\014le)s f10 SF 133 1294 p (src2tex.c.ps)s f0 SF 0 1354 p (which)s 7 r (would)s 8 r (show)s 7 r (most)s 9 r (of)s 8 r (useful)s 9 r (technicalities)s 7 r (of)s f9 SF 9 r (src2tex)s f0 SF (.)s 14 r (W)s -2 r (e)s 7 r (would)s 8 r (like)s 7 r (to)s 9 r (suggest)s 8 r (you)s 8 r (to)s 8 r (compare)s f11 SF 8 r (src2tex.c)s f0 SF 0 1394 p (with)s f11 SF 13 r (src2tex.c.ps)s f0 SF 14 r (carefully)s 13 r (by)s 13 r (using)s 13 r (one)s 14 r (of)s 13 r (PostScript)s 12 r (pre-viewers.)s 21 r (Y)s -2 r (ou)s 13 r (could)s 13 r (learn)s 14 r (practical)s 13 r (usages)s 13 r (quite)s 0 1434 p (easily)s -2 r (.)s f9 SF 655 1514 p (4.)s 17 r (Dirty)s 12 r (T)s -2 r (ric)s -2 r (ks)s f0 SF 66 1595 p (There)s 13 r (is)s 13 r (a)s 13 r (dirty)s 12 r (trick)s 12 r (which)s 12 r (enables)s 13 r (to)s 13 r (change)s 12 r (certain)s 13 r (global)s 13 r (v)s -1 r (ariables)s 12 r (of)s f9 SF 13 r (src2tex)s f0 SF 13 r (and)s f9 SF 13 r (src2latex)s f0 SF 13 r (dy-)s 0 1634 p (namically)s -2 r (.)s 14 r (F)s -2 r (or)s 10 r (instance,)s 11 r (if)s 11 r (you)s 11 r (wan)s -1 r (t)s 10 r (to)s 11 r (put)s f11 SF 133 1695 p (tabulation)s 11 r (size)s 11 r (=)s 11 r (4)s 11 r (characters)s 133 1735 p (T)s -2 r (ext)s 10 r (mo)s 1 r (de)s 11 r (font)s 10 r (=)s 11 r (roman)s 11 r (type)s 133 1775 p (\(quasi-\)T)s 263 1782 p (E)s 282 1775 p (X)s 11 r (mo)s 1 r (de)s 11 r (font)s 10 r (=)s 11 r (slanted)s 10 r (type)s f0 SF 0 1835 p (you)s 10 r (hav)s -1 r (e)s 10 r (only)s 11 r (to)s 12 r (insert)s 11 r (a)s 11 r (line)s 11 r (of)s 11 r (comment)s 10 r (area)s 11 r (with)s 11 r (src2tex)s 11 r (escap)s 1 r (e)s 11 r (sequence)s 11 r (of)s 11 r (the)s 11 r (form)s f6 SF 136 1895 p (fn)s f10 SF (src2tex)s f6 SF (f)s f10 SF (htab=4)s 18 r (textfont=rm)s 17 r (texfont=sl)s f6 SF (gg)s f0 SF 0 1955 p (Generally)s -2 r (,)s 10 r (src2tex)s 11 r (escap)s 1 r (e)s 11 r (sequence)s 11 r (is)s 12 r (de\014ne)s 11 r (by)s f6 SF 136 2016 p (fn)s f10 SF (src2tex)s f6 SF (f)s f10 SF (htab=)s f11 SF (integer)s f10 SF 17 r (textfont=)s f11 SF (font)s 10 r (type1)s f10 SF 17 r (texfont=)s f11 SF (font)s 10 r (type2)s f6 SF (gg)s f0 SF 0 2076 p (where)s f11 SF 22 r (font)s 10 r (type1)s f0 SF 22 r (and)s f11 SF 23 r (font)s 10 r (type2)s f0 SF 22 r (are)s 11 r (equal)s 11 r (to)s 11 r (one)s 11 r (of)s 11 r (the)s 11 r (following)s 10 r (words)s 11 r (respectively:)s f10 SF 136 2136 p (bf,)s 18 r (it,)s 17 r (rm,)s 17 r (sc,)s 18 r (sl,)s 17 r (tt)s 18 r (.)s f0 SF 1273 2216 p (src2tex.c)s 66 r (page)s 11 r (5)s EP pstopssaved restore %%Page: pstops 6 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s 0 33 p (The)s 13 r (meanings)s 13 r (of)s 14 r (the)s 13 r (ab)s 1 r (ov)s -1 r (e)s 12 r (key)s 12 r (words)s 12 r (would)s 13 r (b)s 1 r (e)s 13 r (self-evident)s 12 r (\()s f12 SF (cf.)s f0 SF 13 r ([9]\).)s 21 r (F)s -2 r (or)s 13 r (practical)s 13 r (examples,)s 14 r (it)s 13 r (would)s 12 r (b)s 1 r (e)s 0 73 p (b)s 1 r (etter)s 9 r (to)s 9 r (read)s 8 r (SCHEME)s 9 r (source)s 9 r (program)s f11 SF 18 r (farmer+hen.scm)s f0 SF 17 r (and)s 9 r (PS)s 9 r (\014le)s f11 SF 18 r (farmer+hen.scm.ps)s f0 SF 17 r (which)s 8 r (is)s 9 r (actually)s 0 113 p (generated)s 11 r (by)s 10 r (issuing)s 11 r (the)s 11 r (following)s 11 r (commands:)s f10 SF 136 174 p (%)s 18 r (src2latex)s 17 r (farmer+hen.scm)s 136 215 p (%)s 18 r (latex)s 17 r (farmer+hen.scm.tex)s 136 255 p (%)s 18 r (dvi2ps)s 17 r (farmer+hen.scm.dvi)s 17 r (>)s 18 r (farmer+hen.scm.ps)s f0 SF 66 316 p (Another)s 11 r (dirty)s 11 r (trick)s 10 r (is)s f10 SF 136 378 p (-<)s f4 SF 6 r (n)s f10 SF 5 r (>)s f0 SF 0 439 p (option)s 13 r (of)s f9 SF 13 r (src2tex)s f0 SF 13 r (and)s f9 SF 13 r (src2latex)s f0 SF (.)s 21 r (When)s 13 r (you)s 12 r (are)s 13 r (in)s 13 r (debugging)s 13 r (mo)s 1 r (de,)s 14 r (you)s 12 r (usually)s 13 r (need)s 13 r (line)s 13 r (num)s -1 r (bers)s 13 r (and)s 0 479 p (you)s 10 r (sometimes)s 11 r (wan)s -1 r (t)s 10 r (to)s 12 r (restrict)s 11 r (page)s 11 r (length.)s 14 r (If)s 11 r (you)s 11 r (type)s f10 SF 133 541 p (%)s 17 r (src2tex)s 18 r (-<)s f4 SF (n)s f10 SF (>)s f11 SF 17 r (source-\014le-name)s f10 SF 133 581 p (%)s 17 r (src2latex)s 18 r (-<)s f4 SF (n)s f10 SF (>)s f11 SF 17 r (source-\014le-name)s f0 SF 0 642 p (your)s 10 r (source)s 11 r (\014le)s 11 r (is)s 11 r (translated)s 11 r (into)s 11 r (debugging)s 11 r (format.)s 14 r (F)s -1 r (or)s 10 r (example,)s f10 SF 133 704 p (%)s 17 r (src2tex)s 18 r (-35)s 17 r (sqrt)s 2 r 10 1 ru 11 r (mat.red)s 133 744 p (%)s 17 r (tex)s 18 r (sqrt)s 2 r 10 1 ru 10 r (mat.red.tex)s 133 784 p (%)s 17 r (dvi2ps)s 18 r (sqrt)s 2 r 10 1 ru 10 r (mat.red.dvi)s 18 r (>)s 17 r (sqrt)s 2 r 10 1 ru 11 r (mat.red.ps~)s 133 825 p (%)s 17 r (psnup)s 18 r (-4)s 17 r (sqrt)s 2 r 10 1 ru 11 r (mat.red.ps~)s 35 r (>)s 17 r (sqrt)s 2 r 10 1 ru 11 r (mat.red.ps)s f0 SF 0 886 p (gives)s 10 r (the)s f11 SF 11 r (sqrt)s 2 r 10 1 ru 10 r (mat.red.ps)s f0 SF 11 r (\014le.)s f9 SF 629 1010 p (Ackno)s -1 r (wledgemen)s -1 r (t)s f0 SF 0 1093 p (The)s 11 r (authors)s 11 r (would)s 10 r (like)s 10 r (to)s 12 r (express)s 11 r (their)s 11 r (gratitude)s 11 r (to)s 66 1133 p (Andrew)s 11 r (Allen)s 12 r (ANDA)s 66 1173 p (Mitsuru)s 11 r (AOY)s -3 r (AMA)s 66 1214 p (Y)s -1 r (ouzou)s 10 r (DEGUCHI)s 66 1254 p (Y)s -1 r (oriaki)s 10 r (FUJIMORI)s 66 1295 p (Shinichi)s 11 r (HA)s -2 r (T)s -3 r (AKI)s f6 SF (y)s f0 SF 66 1335 p (Norihiro)s 11 r (ITOH)s 66 1375 p (Y)s -1 r (oh)s 10 r (ITOH)s 66 1416 p (Hiroshi)s 11 r (KAI)s 66 1456 p (Azuki)s 11 r (KANEKO)s 66 1496 p (Shin)s 11 r (MAEDA)s f6 SF (y)s f0 SF 66 1537 p (T)s -1 r (ak)s -2 r (ashi)s 10 r (NAKA)s -2 r (Y)s -3 r (AMA)s 66 1577 p (Naoto)s 11 r (NIKI)s 66 1618 p (Kiyoko)s 10 r (NISHIZA)s -3 r (W)s -4 r (A)s 66 1658 p (Sakuro)s 11 r (OZA)s -2 r (W)s -4 r (A)s 66 1698 p (Issei)s 11 r (SUZUKI)s 66 1739 p (Hitoshi)s 11 r (UCHIDA)s 66 1779 p (Kenji)s 11 r (Y)s -1 r (AMAD)s -1 r (A)s 66 1820 p (Masayuki)s 11 r (Y)s -2 r (AMASAKI)s f6 SF (z)s f0 SF 0 1860 p (for)s 11 r (giving)s 11 r (them)s 11 r (inv)s -2 r (aluable)s 11 r (criticisms)s 11 r (and)s 11 r (suggestions.)s f9 SF 690 2026 p (References)s 0 2059 p 480 1 ru f6 SF 35 2096 p (y)s f0 SF 17 r (one)s 11 r (of)s 11 r (the)s 11 r (authors)s 11 r (of)s 11 r (versions)s 10 r (2.8)s 11 r (and)s 11 r (2.9)s f6 SF 35 2136 p (z)s f0 SF 17 r (one)s 11 r (of)s 11 r (the)s 11 r (authors)s 11 r (of)s 11 r (versions)s 10 r (2.10)s 11 r (and)s 11 r (2.11)s 1273 2216 p (src2tex.c)s 66 r (page)s 11 r (6)s EP pstopssaved restore %%Page: pstops 7 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s 15 33 p ([1])s 16 r (K.)s 11 r (Amano,)s 10 r (S.)s 10 r (Hataki)s 10 r (and)s 10 r (S.)s 10 r (Maeda,)s 10 r (A)s 11 r (text)s 10 r (conv)s -1 r (erter)s 9 r (src2tex)s 10 r (:)s 10 r (Basic,)s 10 r (C,)s 11 r (C++,)s 10 r (F)s -2 r (ortran,)s 9 r (Lisp,)s 10 r (Pascal)s f10 SF 9 r (->)s f0 SF 66 73 p (T)s 85 80 p (E)s 103 73 p (X)s 34 r (\()s f11 SF (to)s 11 r (app)s 1 r (ear)s f0 SF 2 r (\).)s 15 114 p ([2])s 16 r (R.)s 14 r (Baeck)s -1 r (er)s 12 r (and)s 14 r (A.)s 13 r (Marcus,)s 14 r (Human)s 13 r (F)s -1 r (actors)s 12 r (and)s 14 r (Typography)s 12 r (for)s 14 r (More)s 13 r (Readable)s 14 r (Programs,)s f11 SF 13 r (Addison-)s 66 153 p (W)s -1 r (esley)s -3 r (,)s 10 r (Reading,)s 11 r (MA)s f0 SF (,)s 11 r (1990.)s 15 194 p ([3])s 16 r (J.)s 11 r (December,)s 12 r (Presenting)s 10 r (Jav)s -2 r (a,)s f11 SF 10 r (Sams.Net)s 11 r (Publishing)s f0 SF (,)s 11 r (1995.)s 15 234 p ([4])s 16 r (J.)s 12 r (W.)s 11 r (Eaton,)s 12 r (Octav)s -1 r (e:)s 11 r (A)s 11 r (High-Level)s 11 r (Interactiv)s -1 r (e)s 11 r (Language)s 11 r (for)s 12 r (Numerical)s 11 r (Computations,)s 12 r (Edition)s 12 r (1.1)s 11 r (for)s 66 274 p (Octave)s 10 r (version)s 10 r (1.1.1,)s 11 r (1995.)s 15 315 p ([5])s 16 r (B.)s 12 r (F)s -1 r (uc)s -1 r (hssteiner)s 11 r (and)s 12 r (others,)s 11 r (MuP)s -1 r (AD)s 11 r (Multi)s 12 r (Processing)s 12 r (Algera)s 12 r (Data)s 12 r (T)s -1 r (ool)s 11 r (User's)s 12 r (Manual)s 11 r (Draft)s 12 r (V)s -1 r (ersion,)s f11 SF 66 355 p (Bennon)s 11 r (F)s -1 r (uc)s -1 r (hssteiner,)s 10 r (Automath,)s 11 r (Universit)s -1 r (y)s 10 r (of)s 11 r (Paderborn,)s 11 r (Paderborn,)s 11 r (Germany)s f0 SF (,)s 11 r (1992-95.)s 15 395 p ([6])s 16 r (A.)s 11 r (C.)s 12 r (Hearn,)s 11 r (REDUCE)s 11 r (User's)s 11 r (Manual,)s 10 r (version)s 10 r (3.5,)s f11 SF 11 r (RAND)s 11 r (Publication)s f0 SF (,)s 11 r (CP78\(Rev.)s 11 r (7/94\),)s 11 r (1994.)s 15 436 p ([7])s 16 r (B.)s 11 r (W.)s 12 r (Kernighan)s 11 r (and)s 11 r (D.)s 11 r (M.)s 11 r (Ritchie,)s 10 r (The)s 11 r (C)s 11 r (Programming)s 11 r (Language,)s f11 SF 11 r (Prentice)s 10 r (Hall)s f0 SF (,)s 11 r (1978.)s 15 476 p ([8])s 16 r (D.)s 11 r (E.)s 12 r (Knuth,)s 10 r (Literate)s 11 r (Programming,)s f11 SF 11 r (The)s 11 r (Computer)s 11 r (Journal)s f0 SF (,)s f9 SF 11 r (27)s f0 SF 11 r (\(1984\),)s 11 r (97-111.)s 15 516 p ([9])s 16 r (D.)s 11 r (E.)s 12 r (Knuth,)s 10 r (The)s 11 r (T)s 355 524 p (E)s 374 516 p (Xb)s 1 r (ook,)s f11 SF 12 r (Addison-W)s -2 r (esley)s f0 SF (,)s 10 r (1984.)s -1 557 p ([10])s 16 r (P)s -2 r (.)s 10 r (Mohseni,)s 11 r (Maple)s 11 r (in)s 11 r (Action,)s 11 r (An)s 11 r (Introductory)s 11 r (Handb)s 1 r (o)s 1 r (ok,)s f11 SF 11 r (Iowa)s 10 r (State)s 11 r (Universit)s -1 r (y)s f0 SF (,)s 10 r (1995.)s -1 597 p ([11])s 16 r (M.)s 9 r (Noro)s 9 r (and)s 9 r (T.)s 10 r (Shimoy)s -1 r (ama,)s 8 r (Asir)s 9 r (User's)s 10 r (Manual,)s 8 r (Edition)s 9 r (2.0)s 9 r (for)s 10 r (Asir-940420,)s f11 SF 9 r (F)s -2 r (ujitsu)s 8 r (Lab)s 1 r (oratories)s 9 r (Ltd.)s f0 SF (,)s 66 637 p (1994.)s -1 678 p ([12])s 16 r (J.)s 11 r (K.)s 11 r (Ousterhout,)s 11 r (Tcl)s 11 r (and)s 11 r (Tk)s 11 r (T)s -2 r (oolkit,)s 11 r (Addison)s 11 r (W)s -1 r (esley)s 10 r (Publishing)s 11 r (Company)s -3 r (,)s 10 r (Inc.,)s 11 r (1993.)s -1 718 p ([13])s 16 r (K.)s 11 r (Sigmon,)s 11 r (MA)s -2 r (TLAB)s 10 r (Primer,)s 11 r (Second)s 11 r (Edition,)s f11 SF 11 r (University)s 10 r (of)s 11 r (Florida)s f0 SF (,)s 11 r (1992.)s -1 759 p ([14])s 16 r (G.)s 11 r (L.)s 11 r (Steele)s 11 r (Jr.,)s 11 r (Common)s 11 r (Lisp)s 11 r (The)s 11 r (Language,)s 11 r (2nd)s 11 r (edition,)s f11 SF 11 r (Digital)s 12 r (Equipment)s 10 r (Corp)s 1 r (oration)s f0 SF (,)s 11 r (1990.)s -1 799 p ([15])s 16 r (D.)s 15 r (B.)s 15 r (Thompson,)s 16 r (The)s 15 r (Literate)s 16 r (Programming)s 15 r (F)s -2 r (requen)s -1 r (tly)s 15 r (Asked)s 14 r (Questions)s 15 r (List,)s f11 SF 16 r (comp.programming.)s 66 839 p (literate)s 11 r (newsgroup)s f0 SF (,)s 12 r (1995.)s -1 880 p ([16])s 16 r (S.)s 12 r (W)s -2 r (olfram,)s 11 r (Mathematica,)s 12 r (A)s 13 r (System)s 12 r (Doing)s 12 r (Mathematics)s 12 r (by)s 11 r (Computer,)s 12 r (Second)s 12 r (Edition,)s f11 SF 13 r (W)s -2 r (olfram)s 11 r (Re-)s 66 919 p (search)s f0 SF (,)s 11 r (Inc.,)s 11 r (1992.)s f10 SF 0 1002 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 1124 p (/*)s 17 r 654 1 ru f0 SF 665 r (src2tex.c)s 11 r 654 1 ru f10 SF 671 r (*/)s 0 1245 p (#include)s 17 r ()s 0 1286 p (#include)s 17 r ("src2tex.h")s 0 1367 p (extern)s 17 r (void)s 18 r (get)s 2 r 10 1 ru 15 r (fnames\(\);)s 0 1407 p (extern)s 17 r (void)s 18 r (init)s 2 r 10 1 ru 15 r (lang)s 2 r 10 1 ru 16 r (flag\(\);)s 0 1448 p (extern)s 17 r (void)s 18 r (open)s 2 r 10 1 ru 15 r (files\(\);)s 0 1488 p (extern)s 17 r (void)s 18 r (close)s 2 r 10 1 ru 15 r (files\(\);)s 0 1529 p (extern)s 17 r (void)s 18 r (text2tex\(\);)s 0 1650 p (/*)s 17 r 541 1 ru f0 SF 551 r (main)s 11 r (function)s 11 r (of)s 12 r (src2tex)s 11 r 541 1 ru f10 SF 557 r (*/)s 0 1772 p (main\(argc,)s 17 r (argv\))s 0 1812 p (int)s 17 r (argc;)s 0 1853 p (char)s 17 r (**argv;)s 0 1893 p ({)s 70 1934 p (char)s 17 r (*cptr[2];)s 384 r (/*)s f0 SF 16 r (character)s 10 r (p)s 1 r (ointers)s 11 r (of)s 11 r (\014le)s 11 r (names)s f10 SF 321 r (*/)s 70 1974 p (FILE)s 17 r (*fptr[2];)s 384 r (/*)s f0 SF 16 r (stream)s 11 r (p)s 1 r (ointers)s 10 r (of)s 12 r (input/output)s 11 r (\014les)s f10 SF 243 r (*/)s 70 2055 p (get)s 2 r 10 1 ru 15 r (fnames\(argc,)s 18 r (argv,)s 17 r (cptr\);)s 122 r (/*)s f0 SF 17 r (get)s 11 r (\014le)s 11 r (names)s 11 r (from)s 11 r (the)s 11 r (command)s 11 r (line)s f10 SF 227 r (*/)s 70 2095 p (init)s 2 r 10 1 ru 15 r (lang)s 2 r 10 1 ru 16 r (flag\(cptr\);)s 261 r (/*)s f0 SF 17 r (initialize)s 11 r (language)s 11 r (\015ags)s f10 SF 438 r (*/)s 70 2136 p (open)s 2 r 10 1 ru 15 r (files\(cptr,)s 18 r (fptr\);)s 226 r (/*)s f0 SF 17 r (op)s 1 r (en)s 11 r (input)s 11 r (and)s 11 r (output)s 11 r (\014les)s f10 SF 379 r (*/)s f0 SF 1273 2216 p (src2tex.c)s 66 r (page)s 11 r (7)s EP pstopssaved restore %%Page: pstops 8 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f10 SF 70 33 p (text2tex\(cptr,fptr\);)s 279 r (/*)s f0 SF 16 r (T)s -1 r (ext)s f6 SF (!)s f0 SF (T)s 867 40 p (E)s 885 33 p (X)s 11 r (translation)s f10 SF 447 r (*/)s 70 73 p (close)s 2 r 10 1 ru 15 r (files\(cptr,)s 18 r (fptr\);)s 209 r (/*)s f0 SF 16 r (close)s 12 r (input)s 11 r (and)s 11 r (output)s 11 r (\014les)s f10 SF 379 r (*/)s 70 113 p (exit\(EXIT)s 2 r 10 1 ru 15 r (SUCCESS\);)s 0 153 p (})s f0 SF 1273 2216 p (src2tex.c)s 66 r (page)s 11 r (8)s EP pstopssaved restore %%Trailer %%Pages: 8 END %%EOF src2tex-2.12h.orig/src2tex.h.ps100644 1750 1750 117637 6266067160 16336 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: src2tex.h.dvi %%Pages: 3 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 123 /f0 NF f0 SF [ 24 23 -1 0 24.906] 65 D [ 24 23 -1 0 23.522] 66 D [<00FC000382000E01001C0080380040380040780020700020F00020F00000F00000F00000F00000F00000F000207000207800 203800603800601C00E00E01E003826000FC20> 24 23 -2 0 23.984] 67 D [ 24 23 -1 0 25.367] 68 D [ 24 23 -1 0 22.600] 69 D [ 24 23 -1 0 21.678] 70 D [ 24 23 -1 0 24.906] 72 D [ 16 23 0 0 11.992] 73 D [<3E004300C180E1C0E1C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF8> 16 23 -2 0 17.065] 74 D [ 24 23 -1 0 25.829] 75 D [ 24 23 -1 0 20.755] 76 D [ 32 23 -1 0 30.441] 77 D [ 24 23 -1 0 24.906] 78 D [<01FC000707000E03801C01C03800E03800E07800F0700070F00078F00078F00078F00078F00078F00078F000787000707800 F03800E03800E01C01C00E038007070001FC00> 24 23 -2 0 25.829] 79 D [ 24 23 -1 0 22.600] 80 D [<8F80F060C030C01080188018801800180038007003F01FE03FC07E00F000E000C010C010C0104030603030F01F10> 16 23 -2 0 18.449] 83 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<007C000183000700800E00400C00401C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00 201C00201C00201C00201C00201C0070FF81FC> 24 23 -1 0 24.906] 85 D [ 24 23 -1 0 24.906] 88 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [<78EEE6470707070707070707070707070707073F0000000000060F0F06> 8 29 2 6 10.147] 106 D [ 24 23 0 0 17.527] 107 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [<00FF80001C00001C00001C00001C00001C00079C00185C00303C00701C00601C00E01C00E01C00E01C00E01C00601C00701C 00303C001C6C00078400> 24 20 -1 6 17.526] 113 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [ 16 14 -1 0 14.759] 122 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<07FC00E000E000E000E000E0FFFCC0E040E020E030E010E008E004E004E002E001E001E000E000600060> 16 21 -1 0 16.604] 52 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<0FC038306018C008C00CC00CC01C603C607831F00FE00F801FC03C307810601860186018203018600FC0> 16 21 -1 0 16.604] 56 D [<1F0020C060607030703000380018001C0F9C185C303C603CE01CE01CE01CE018E0186038303018600F80> 16 21 -1 0 16.604] 57 D [<60F0F06000000000606060606060606060F0F0F0F0F060> 8 23 -2 0 9.224] 33 D [<40402020101070F0F060> 8 10 -2 -13 9.224] 39 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<060006000600C630E6703FC00F000F003FC0E670C630060006000600> 16 14 -2 -11 16.604] 42 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [ 16 33 -2 8 16.604] 47 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D [<00FF000701E008003810000020F0E0218D904307884703888603888E03888E03888E03888E03888E03888603884703904304 10218C2020F02010004008008007070000F800> 24 23 -2 0 25.829] 64 D [ 8 33 -3 8 9.224] 91 D [ 8 33 0 8 9.224] 93 D [ 24 23 0 0 19.371] 11 D [ 24 23 0 0 18.449] 12 D [ 24 23 0 0 18.449] 13 D [ 8 2 0 -6 11.069] 45 D 1.000 53 /f1 NF f1 SF [ 8 15 -2 0 13.237] 49 D [ 16 15 -1 0 13.237] 50 D [<3E0041808080C0C000C000C0008001801E00030001800180618021001E00> 16 15 -1 0 13.237] 51 D [<1FC00300030003000300FFC0C3004300230013001B000B00070003000300> 16 15 -1 0 13.237] 52 D 1.000 60 /f2 NF f2 SF [<40402020101070F0F060> 8 10 -2 6 9.224] 59 D 1.000 123 /f3 NF f3 SF [ 24 2 -3 -7 25.829] 0 D [<00100030003000600060006000C000C000C00180018001800300030003000600060006000C000C000C001800180018003000 30003000600060006000C000C000C000> 16 33 -2 8 16.604] 110 D [<60F0F060> 8 4 -2 -6 9.224] 1 D [<0C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C00FFC0FFC00C000C000C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 121 D [<0C000C000C000C000C000C00FFC0FFC00C000C000C000C000C000C0000000C000C000C000C000C000C00FFC0FFC00C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 122 D 1.000 61 /f4 NF f4 SF [ 16 30 -13 31 29.518] 56 D [<00C003C007800F001E001C003C003800780078007000F000F000F000F000F000F000F000F000F000F000F000F000F000F000 F000F000F000F000F000> 16 30 -13 29 29.518] 58 D [<01E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E001E003C003C003C007800780 0F000E001C0038007000E000E000700038001C000E000F000780078003C003C003C001E001E001E001E001E001E001E001E0 01E001E001E001E001E001E001E001E001E001E001E001E0> 16 62 -6 61 29.518] 60 D 1.000 121 /f5 NF f5 SF [<87F0DFF8F81CE00EC00FC00FC00F000F001F01FF0FFE3FFC7FF87FF0FF00F800F006F006F00E700E783E3FF60FC2> 16 23 -2 0 21.216] 83 D [<1F8780786F80F02E00F01E00F01E00781E003C1E001F1E0001FE00001E00301E00781E00783C007038001FE000> 24 15 -1 0 18.564] 97 D [<07E01C38380C780C7000F000F000F000F000F0007018783C383C1C1C07F0> 16 15 -1 0 16.973] 99 D [<07F01C18380C78067000F000F000FFFEF00EF00E700E700C381C1C3807E0> 16 15 -1 0 17.503] 101 D [ 8 23 -1 0 10.608] 108 D [ 16 15 -1 0 15.728] 114 D [ 16 15 -1 0 15.063] 115 D [<0F801C403C603C603C603C603C003C003C003C003C003C003C00FFC03FC01C001C000C000C000C000C00> 16 21 -1 0 14.851] 116 D [ 24 15 -1 0 20.155] 120 D [ 16 21 -2 0 19.095] 50 D 1.000 126 /f6 NF f6 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 66 D [<07C00FE01C303838701C701C601CE000E000E000E000E000E000601C701C701C383C1C7C0FFC07CC> 16 20 -1 0 17.434] 67 D [ 16 20 -1 0 17.434] 68 D [ 16 20 -1 0 17.434] 69 D [ 16 20 -1 0 17.434] 70 D [<07B80FF81878387870387038E038E038E0FCE0FCE000E000E000E03870387038387818780FF80798> 16 20 -1 0 17.434] 71 D [ 16 20 -1 0 17.434] 72 D [ 16 20 -3 0 17.434] 73 D [ 16 20 -1 0 17.434] 75 D [ 16 20 -1 0 17.434] 76 D [ 16 20 -1 0 17.434] 77 D [ 16 20 -1 0 17.434] 78 D [<3FC07FE070E0E070E070E070E070E070E070E070E070E070E070E070E070E070E07070E07FE03FC0> 16 20 -2 0 17.434] 79 D [ 16 20 -1 0 17.434] 80 D [ 16 20 -1 0 17.434] 82 D [ 16 20 -2 0 17.434] 83 D [<1FF01FF00380038003800380038003800380038003800380038003800380E39CE39CE39CFFFC7FFC> 16 20 -1 0 17.434] 84 D [<03C007E00C301C38381C381C381C381C381C381C381C381C381C381C381C381C381C381CFE7FFE7F> 16 20 0 0 17.434] 85 D [<0780078007800CC00CC00CC00CC00CC01CE01CE01CE01CE01CE038703870387038707878FCFCFCFC> 16 20 -1 0 17.434] 86 D [ 16 20 -1 0 17.434] 88 D [<0FE00FE0038003800380038003800380038007C007C00EC00EE00CE01CE01C7038703870FCFCFCFC> 16 20 -1 0 17.434] 89 D [ 16 20 -2 0 17.434] 90 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [ 16 20 -2 0 17.434] 108 D [ 16 14 -1 0 17.434] 110 D [ 16 21 -1 7 17.434] 112 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0FC03FE07070E038E01C401C001C001C0038007007E007E00070003000382038703870703FE00FC0> 16 20 -1 0 17.434] 51 D [<07FC07FC00E000E000E000E0FFFCFFFCE0E070E030E038E018E01CE00CE006E006E002E003E001E0> 16 20 -1 0 17.434] 52 D [<1F003F8071C0E0E0E070E07040700070006060E07FC07F007000700070007000700070007FE07FE0> 16 20 -2 0 17.434] 53 D [<07C01FE038707038701C601CE01CE01CE01CF038F870EFE0E7C070007000303838381E3807F003E0> 16 20 -1 0 17.434] 54 D [<0FC03FF078787038E01CE01CE01CE01C7038387007800FC03870703870387038703838701FE00FC0> 16 20 -1 0 17.434] 56 D [<1F003FC070E07070703000380018001C0F9C1FFC387C703CE01CE01CE018E038703838701FE00F80> 16 20 -1 0 17.434] 57 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 112 /f7 NF f7 SF [<3E78E174E0E4E0F2E072E07070701E7003F000381038383038701FC0> 16 14 -2 0 16.604] 97 D [<0F80304070206010E000E000E000E00060007000301018380C3803F0> 16 14 -2 0 14.759] 99 D [<0F0030C060206010E000E000E000E0007FF07038303018300C6007C0> 16 14 -2 0 14.759] 101 D [<1F8000606000C03000C01800C00C00C00C00601C003FF8003FF0003FE0003000003000001780000CE0001870001870001C38 001C38000C30000E798003C780> 24 21 -1 7 16.604] 103 D [ 8 23 -1 0 9.224] 105 D [ 16 23 -1 0 9.224] 108 D [ 16 14 -1 0 18.449] 110 D [<1F8030E06070E038E018E01CE01CE01C601C701C301C18180C3003E0> 16 14 -2 0 16.604] 111 D [<60F07070> 8 4 -2 0 9.224] 46 D [ 16 23 -1 0 18.449] 12 D [ 24 23 -1 0 18.449] 13 D 1.000 123 /f8 NF f8 SF [ 24 23 -1 0 27.027] 65 D [ 24 23 -1 0 27.996] 75 D [ 24 23 -1 0 27.027] 78 D [<87C0D830E018C008800C800C800C000C001C003803F81FF03FE07F00F000E000C008C008C0084018603830580F88> 16 23 -2 0 20.294] 83 D [ 24 17 -1 0 20.368] 97 D [<01F8000E0600180100300100700080600080E00000E00000E00000E00000E000006000807000803001801803800E058001F8 80> 24 17 -1 0 19.629] 99 D [ 24 17 -1 0 20.737] 100 D [ 24 17 -1 0 20.368] 104 D [ 16 17 0 0 10.036] 105 D [ 24 17 -1 0 24.795] 109 D [ 24 17 -1 0 20.368] 110 D [<03F0000E1C00180600300300700380600180E001C0E001C0E001C0E001C0E001C06001807003803003001806000E1C0003F0 00> 24 17 -1 0 21.105] 111 D [<0FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00081C08081C08081C08081C080C1C180FFFF 80> 24 17 -1 0 19.629] 116 D [<03E0000E18001C0400180400380200380200380200380200380200380200380200380200380200380200380200380700FE0F 80> 24 17 -1 0 20.368] 117 D [ 16 17 -1 0 16.678] 122 D 1.000 121 /f9 NF f9 SF [<03F00FFC1F063C037C007800F800F800F800F800F800F800781C783E3C3E1E3E0FFC03F8> 16 18 -2 0 20.367] 99 D [<01FC000FFF001F01803E00C07C0000780000F80000F80000F80000FFFFC0FFFFC0F803C07803C07C03803C07801E0F000FFE 0003F800> 24 18 -1 0 21.004] 101 D [ 16 18 -1 0 18.873] 114 D [ 16 18 -2 0 18.076] 115 D [<03E00FF00F101F181F181F181F181F001F001F001F001F001F001F001F001F00FFF8FFF83F000F0007000700030003000300> 16 25 -1 0 17.822] 116 D [ 24 18 -1 0 24.186] 120 D [ 24 26 -2 0 22.913] 50 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f6 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f9 SF 479 151 p (src2tex)s f0 SF (*)s 45 r (version)s 10 r (2.12)s 33 r (\(Sep)s 11 r (9,)s 11 r (1996\))s f8 SF 466 230 p (Kazuo)s 13 r (Amano)s f3 SF (y)s f8 SF 12 r (and)s 13 r (Shinichi)s 13 r (Nomoto)s f3 SF (z)s f6 SF 0 349 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 468 p (/*)s 17 r 652 1 ru f0 SF 663 r (src2tex.h)s 11 r 652 1 ru f6 SF 669 r (*/)s 0 588 p (/*)s 17 r 592 1 ru f0 SF 603 r (debugging)s 11 r (switch)s 10 r 592 1 ru f6 SF 609 r (*/)s 0 628 p (/*)s f0 SF 17 r (This)s 10 r (parameter)s 10 r (is)s 11 r (just)s 10 r (prepared)s 10 r (for)s 11 r (debugging.)s 14 r (If)s 11 r (you)s 9 r (are)s 10 r (interested)s 10 r (in)s 10 r (what)s f5 SF 11 r (src2tex)s f0 SF 10 r (and)s f5 SF 10 r (src2latex)s f0 SF 11 r (are)s 0 667 p (doing,)s 11 r (you)s 10 r (could)s 11 r (use)s 11 r (it)s f6 SF 1195 r (*/)s 0 747 p (/*)s 17 r (#define)s 18 r (DEBUGGING)s 17 r (*/)s 0 867 p (/*)s 17 r 585 1 ru f0 SF 596 r (plain)s 11 r (mo)s 1 r (de)s 11 r (switch)s 10 r 585 1 ru f6 SF 602 r (*/)s 0 906 p (/*)s f0 SF 17 r (If)s f6 SF 8 r (PLAIN)s f0 SF 9 r (is)s 9 r (de\014ned,)s 9 r (you)s 8 r (will)s 9 r (get)s 8 r (plain)s f5 SF 9 r (src2tex)s f0 SF 9 r (and)s f5 SF 8 r (src2latex)s f0 SF (.)s 14 r (In)s 9 r (this)s 9 r (case,)s 9 r (they)s 9 r (do)s 9 r (not)s 8 r (output)s 9 r (any)s 8 r (escap)s 1 r (e)s 0 946 p (sequences)s f3 SF 12 r (n)s f0 SF (fo)s 1 r (otline)s f3 SF (\001)s 5 r (\001)s 6 r (\001)s f0 SF (,)s f3 SF 12 r (n)s f0 SF (do)s 1 r (cumentst)s -1 r (yle)s f3 SF (\001)s 4 r (\001)s 6 r (\001)s f0 SF (,)s f3 SF 12 r (n)s f0 SF (b)s 1 r (egin)s f3 SF (\001)s 5 r (\001)s 6 r (\001)s f0 SF 12 r (at)s 12 r (the)s 11 r (b)s 1 r (eginning)s 12 r (of)s 12 r (conv)s -1 r (ertion)s 11 r (and)s f3 SF 12 r (n)s f0 SF (by)s -1 r (e)s f3 SF (\001)s 5 r (\001)s 5 r (\001)s f0 SF (,)s f3 SF 12 r (n)s f0 SF (end)s f3 SF (\001)s 6 r (\001)s 5 r (\001)s f0 SF 12 r (at)s 0 986 p (the)s 11 r (end)s 11 r (of)s 11 r (\014le.)s f6 SF 1316 r (*/)s 0 1066 p (/*)s 17 r (#define)s 18 r (PLAIN)s 17 r (*/)s 0 1185 p (/*)s 17 r 599 1 ru f0 SF 610 r (title)s 11 r (and)s 11 r (version)s 10 r 599 1 ru f6 SF 616 r (*/)s 0 1225 p (/*)s f0 SF 17 r (A)s 11 r (string)s f6 SF 11 r (VERSION)s f0 SF 11 r (is)s 11 r (used)s 11 r (in)s f7 SF 11 r (\014leio.c)s f0 SF 11 r (and)s f7 SF 11 r (lang\015ag.c)s f6 SF 758 r (*/)s 0 1305 p (#define)s 17 r (VERSION)s 18 r ("2.12h")s 0 1425 p (/*)s 17 r 501 1 ru f0 SF 511 r (ASCI)s 1 r (I)s 11 r (and)s 12 r (NTT)s 11 r (JT)s 851 1432 p (E)s 869 1425 p (X)s 11 r (switch)s 10 r 501 1 ru f6 SF 518 r (*/)s 0 1464 p (/*)s f5 SF 17 r (Src2tex)s f0 SF 11 r (and)s f5 SF 11 r (src2latex)s f0 SF 11 r (are)s 12 r (designed)s 11 r (to)s 11 r (generate)s 11 r (universal)s 11 r (T)s 936 1472 p (E)s 955 1464 p (X-co)s 1 r (de)s 11 r (which)s 10 r (would)s 11 r (be)s 12 r (acceptable)s 11 r (to)s 11 r (any)s 0 1504 p (T)s 18 1511 p (E)s 37 1504 p (X.)s 13 r (If)s 12 r (you)s 12 r (are)s 12 r (an)s 13 r (ASCI)s 1 r (I)s 13 r (JT)s 428 1511 p (E)s 446 1504 p (X)s 13 r ([resp.)s 19 r (NTT)s 13 r (JT)s 702 1511 p (E)s 720 1504 p (X])s 13 r (user)s 13 r (and)s 12 r (if)s 13 r (you)s 12 r (are)s 12 r (sure)s 13 r (that)s 12 r (you)s 12 r (won't)s 12 r (use)s 12 r (any)s 12 r (other)s 0 1544 p (T)s 18 1551 p (E)s 37 1544 p (X,)s 13 r (it)s 14 r (is)s 13 r (b)s 1 r (etter)s 13 r (to)s 13 r (unde\014ne)s f6 SF 14 r (NTT)s f0 SF 13 r ([resp.)s f6 SF 21 r (ASCII)s f0 SF (].)s 14 r (F)s -2 r (urthermore,)s 13 r (if)s 13 r (you)s 12 r (are)s 14 r (a)s 13 r (non-Japanese)s 13 r (T)s 1334 1551 p (E)s 1352 1544 p (X)s 14 r (user,)s 14 r (please)s 0 1584 p (unde\014ne)s 11 r (the)s 11 r (following)s 10 r (tw)s -1 r (o)s 11 r (parameters)s f6 SF 11 r (ASCII)s f0 SF 11 r (and)s f6 SF 11 r (NTT)s f0 SF (.)s f6 SF 736 r (*/)s 0 1664 p (#define)s 17 r (ASCII)s 0 1703 p (#define)s 17 r (NTT)s 0 1823 p (/*)s 17 r 519 1 ru f0 SF 529 r (LaT)s -1 r (eX)s 10 r (option)s 11 r (and)s 11 r (style)s 10 r (\014le)s 11 r 519 1 ru f6 SF 536 r (*/)s 0 1860 p 480 1 ru f0 SF 33 1897 p (*)s 17 r (Permission)s 8 r (to)s 9 r (use,)s 10 r (copy)s -3 r (,)s 9 r (and)s 9 r (mo)s 1 r (dify)s 9 r (this)s 10 r (softw)s -1 r (are)s 8 r (and)s 9 r (its)s 10 r (do)s 1 r (cumentation)s 8 r (is)s 9 r (granted)s 9 r (under)s 9 r (no)s 9 r (conditions.)s 0 1937 p (How)s -1 r (ev)s -1 r (er,)s 11 r (the)s 12 r (authors)s 11 r (would)s 11 r (b)s 1 r (e)s 12 r (very)s 11 r (happy)s 10 r (if)s 12 r (users)s 12 r (could)s 11 r (inform)s 12 r (any)s 11 r (mo)s 1 r (di\014cations)s 12 r (to)s 11 r (k)s -1 r (amano@tansei.cc.u-)s 0 1977 p (tokyo.ac.jp.)s 14 r (Since)s 11 r (src2tex)s 11 r (is)s 11 r (a)s 11 r (free)s 11 r (softw)s -1 r (are,)s 10 r (there)s 11 r (is)s 12 r (no)s 11 r (warran)s -1 r (t)s -1 r (y)s 10 r (of)s 11 r (any)s 10 r (kind)s 11 r (for)s 11 r (the)s 11 r (program.)s f3 SF 33 2016 p (y)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -3 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -1 r (AN)s 10 r (\(k)s -1 r (amano@)s 0 2056 p (p)s 1 r (o.iijnet.or.jp\))s f3 SF 33 2096 p (z)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -2 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -2 r (AN)s 11 r (\(m93093@)s 0 2136 p (crescent.josai.ac.jp\))s 1269 2216 p (src2tex.h)s 67 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f6 SF 0 33 p (/*)s f0 SF 17 r (If)s 11 r (you)s 10 r (need)s 11 r (no)s 11 r (default)s 11 r (option)s 11 r (and)s 11 r (style,)s 10 r (you)s 10 r (have)s 10 r (only)s 11 r (to)s 11 r (unde\014ne)s 11 r (the)s 11 r (following)s 10 r (de\014nitions.)s f6 SF 146 r (*/)s 0 114 p (#undef)s 17 r (LATEXOPTION)s 18 r ("12pt")s 0 155 p (#define)s 17 r (LATEXSTYLE)s 18 r ("article")s 0 276 p (/*)s 17 r 580 1 ru f0 SF 590 r (DOS/UNIX)s 11 r (switch)s 11 r 580 1 ru f6 SF 596 r (*/)s 0 316 p (/*)s f0 SF 17 r (Unde\014ne)s f6 SF 10 r (UNIX)s f0 SF 11 r (and)s 11 r (de\014ne)s f6 SF 11 r (DOS)s f0 SF 10 r (if)s 11 r (you)s 10 r (are)s 11 r (a)s 10 r (DOS)s 11 r (user.)s 15 r (Be)s 10 r (careful!)s 15 r (If)s 11 r (you)s 10 r (de\014ne)s 10 r (b)s 1 r (oth)s 11 r (parameters)s 11 r (simulta-)s 0 356 p (neously)s -2 r (,)s 10 r (you)s 10 r (will)s 12 r (end)s 11 r (up)s 11 r (with)s 11 r (contradictions.)s f6 SF 873 r (*/)s 0 437 p (/*)s 17 r (#define)s 18 r (UNIX)s 17 r (*/)s 0 478 p (/*)s 17 r (#undef)s 18 r (DOS)s 17 r (*/)s 0 599 p (/*)s 17 r 604 1 ru f0 SF 615 r (exit)s 11 r (parameters)s 11 r 604 1 ru f6 SF 621 r (*/)s 0 680 p (#define)s 17 r (EXIT)s 3 r 10 1 ru 15 r (SUCCESS)s 17 r (0)s 0 720 p (#define)s 17 r (EXIT)s 3 r 10 1 ru 15 r (FAILURE)s 17 r (1)s 0 842 p (/*)s 17 r 598 1 ru f0 SF 608 r (bu\013er)s 11 r (size)s 11 r (=)s 11 r (2)s f1 SF 872 830 p (14)s 911 842 p 598 1 ru f6 SF 614 r (*/)s 0 882 p (/*)s f0 SF 17 r (The)s 12 r (authors)s 12 r (think)s 11 r (that)s 12 r (2)s f1 SF 420 870 p (14)s f0 SF 458 882 p (=)s 11 r (16384)s 12 r (would)s 11 r (b)s 1 r (e)s 12 r (enough.)s 17 r (Howev)s -1 r (er,)s 11 r (if)s 12 r (you)s 11 r (think)s 12 r (that)s f5 SF 12 r (src2tex)s f0 SF 12 r (is)s 12 r (to)s 1 r (o)s 11 r (slow,)s 0 922 p (it)s 11 r (would)s 10 r (b)s 1 r (e)s 11 r (b)s 1 r (etter)s 11 r (to)s 11 r (replace)s 11 r (2)s f1 SF 444 910 p (14)s f0 SF 483 922 p (with)s 11 r (2)s f1 SF 575 910 p (13)s f0 SF 615 922 p (or)s 11 r (2)s f1 SF 672 910 p (12)s f0 SF 700 922 p (.)s f6 SF 816 r (*/)s 0 1003 p (#ifndef)s 17 r (UNIX)s 0 1044 p (#define)s 17 r (BUFFER)s 3 r 10 1 ru 15 r (SIZE)s 17 r (8192)s 0 1084 p (#else)s 0 1124 p (#define)s 17 r (BUFFER)s 3 r 10 1 ru 15 r (SIZE)s 17 r (16384)s 0 1165 p (#endif)s 0 1286 p (/*)s 17 r 529 1 ru f0 SF 540 r (maximum)s 10 r (\014lename)s 11 r (length)s 11 r 529 1 ru f6 SF 546 r (*/)s 0 1367 p (#ifndef)s 17 r (UNIX)s 0 1408 p (#define)s 17 r (FNAME)s 3 r 10 1 ru 15 r (LEN)s 2 r 10 1 ru 15 r (MAX)s 18 r (13)s 0 1448 p (#else)s 0 1489 p (#define)s 17 r (FNAME)s 3 r 10 1 ru 15 r (LEN)s 2 r 10 1 ru 15 r (MAX)s 18 r (256)s 0 1529 p (#endif)s 0 1650 p (/*)s 17 r 437 1 ru f0 SF 448 r (space)s 11 r (size)s 11 r (in)s 11 r (the)s 11 r (unit)s 11 r (of)s 11 r (width)s 11 r (of)s 11 r (an)s 11 r (m)s 11 r 437 1 ru f6 SF 454 r (*/)s 0 1731 p (#define)s 17 r (SPACE)s 18 r (.5)s 0 1853 p (/*)s 17 r 350 1 ru f0 SF 361 r (horizontal)s 10 r (tab)s 11 r (skip)s 11 r (in)s 11 r (the)s 11 r (unit)s 11 r (of)s 11 r (width)s 11 r (of)s 11 r (a)s f6 SF 11 r (SPACE)s 11 r 350 1 ru 367 r (*/)s 0 1934 p (#define)s 17 r (HTAB)s 3 r 10 1 ru 15 r (SKIP)s 17 r (8)s 0 2055 p (/*)s 17 r 391 1 ru f0 SF 402 r (vertical)s 10 r (tab)s 11 r (skip)s 11 r (in)s 11 r (the)s 11 r (unit)s 11 r (of)s 11 r (height)s 11 r (of)s 11 r (an)s 11 r (x)s 11 r 391 1 ru f6 SF 408 r (*/)s 0 2136 p (#define)s 17 r (VTAB)s 3 r 10 1 ru 15 r (SKIP)s 17 r (4)s f0 SF 1269 2216 p (src2tex.h)s 67 r (page)s 11 r (2)s EP pstopssaved restore %%Page: pstops 3 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f6 SF 0 113 p (/*)s 17 r 283 1 ru f0 SF 294 r (maximum)s 10 r (length)s 11 r (of)s 11 r (non-display)s 10 r (style)s 10 r (mathematical)s 12 r (formula)s 10 r 283 1 ru f6 SF 299 r (*/)s 0 153 p (/*)s f0 SF 17 r (One)s 10 r (of)s 10 r (the)s 10 r (authors)s 10 r (b)s 1 r (elieves)s 9 r (that)s 10 r (long)s 10 r (non-display)s 9 r (style)s 9 r (mathematical)s 10 r (formula)s 9 r (is)s 10 r (not)s 10 r (b)s 1 r (eautiful.)s 15 r (He)s 10 r (thinks)s 0 193 p (that)s 11 r (long)s 11 r (formula)s 10 r (should)s 11 r (b)s 1 r (e)s 11 r (written)s 11 r (in)s 11 r (display)s 11 r (style.)s f6 SF 764 r (*/)s 0 272 p (#define)s 17 r (FORMULA)s 3 r 10 1 ru 15 r (LEN)s 2 r 10 1 ru 15 r (MAX)s 18 r (512)s 0 392 p (/*)s 17 r 504 1 ru f0 SF 515 r (structure)s 11 r (of)s 11 r (\015agged)s 11 r (character)s 10 r 504 1 ru f6 SF 521 r (*/)s 0 432 p (/*)s 89 506 p (flag)s f0 SF 10 r (=)s f4 SF 203 438 p (8)s 203 468 p (<)s 203 527 p (:)s f0 SF 238 466 p (0)s 34 r (\(text)s 11 r (mo)s 1 r (de\))s 238 506 p (1)s 34 r (\(quasi)s f3 SF 7 r (\000)s f0 SF 7 r (T)s 435 513 p (E)s 454 506 p (X)s 11 r (mo)s 1 r (de\))s 238 546 p (2)s 34 r (\(T)s 320 553 p (E)s 338 546 p (X)s 11 r (mo)s 1 r (de\))s f2 SF 590 506 p (;)s f6 SF 39 r (character)s f0 SF 9 r (=)s 10 r (input)s 11 r (character)s f2 SF (;)s f6 SF 37 r (buffer)s f0 SF 10 r (=)s 9 r (bu\013er)s 11 r (address)s f2 SF (;)s f6 SF 0 607 p (*/)s 0 687 p (typedef)s 17 r (struct)s 0 727 p ({)s 70 766 p (int)s 17 r (flag;)s 70 806 p (int)s 17 r (character;)s 70 846 p (int)s 17 r (*buffer;)s 0 886 p (})s 0 926 p (flag)s 2 r 10 1 ru 15 r (char;)s f0 SF 1269 2216 p (src2tex.h)s 67 r (page)s 11 r (3)s EP pstopssaved restore %%Trailer %%Pages: 3 END %%EOF src2tex-2.12h.orig/src2tex.s2t100644 1750 1750 53 6063157101 16043 0ustar kawamurakawamura\headline={\hfill\rm src2tex version 2.12} src2tex-2.12h.orig/text2tex.c100644 1750 1750 136416 6266055100 16070 0ustar kawamurakawamura/* {\hrulefill} * {\ % beginning of TeX mode \input fonts.tex % define fonts \input title.tex % title and authors % end of TeX mode} * {\hrulefill} */ /* {\hrulefill\ text2tex.c\ \hrulefill} */ #include #include "src2tex.h" extern int TXT_flag; extern int BAS_flag; extern int C_flag; extern int CBL_flag; extern int F77_flag; extern int HTML_flag; extern int JAVA_flag; extern int LISP_flag; extern int MAKE_flag; extern int PAS_flag; extern int PERL_flag; extern int SH_flag; extern int TCL_flag; extern int ASR_flag; extern int MAC_flag; extern int MAP_flag; extern int MAT_flag; extern int MLAB_flag; extern int MPAD_flag; extern int RED_flag; extern int Page_Len_Max; extern int Htab_Size; extern int Vtab_Size; extern char *TextModeFont; extern char *TeXModeFont; extern int *dec_buf_ptr(); extern int *inc_buf_ptr(); extern int *fgetc2buffer(); extern int *get_phrase(); extern int search_line(); extern int get_comment_flag(); extern int get_tex_flag(); extern int str_cmp(); extern int parse_options(); extern void merge_ntt_ascii(); extern flag_char *get_flag_char(); extern void fprintf_documentstyle(); extern void fprintf_footline(); extern void input_user_style(); extern int choose_tt_font(); extern void fprintf_line_number(); /* {\hrulefill\ Text\ to\ {\TeX}\ translator \hrulefill} */ /* {\tt Text2tex() \rm simply translates text data into {\TeX} data. The most important parts of this function are font selection and mode changes. Typewriter font is used in text mode and roman font is chosen otherwise. One of three modes, text mode, quasi-{\TeX} mode and {\TeX} mode, is selected according to \qquad{\tt get\_flag\_char(fptr)->flag}=0, 1, 2 \noindent respectively. A character {\ \tt get\_flag\_char(fptr)->character\ } is translated into an approprite sequence of characters. Especially, in {\TeX} mode, every character got from input file is passed to output file transparently. \hfill}*/ void text2tex(cptr, fptr) char *cptr[]; FILE *fptr[]; { int char_counter = 0; /* {\ character counter \hfill} */ long line_counter = 0; /* {\ line counter \hfill} */ int page_len = 1; /* {\ lines/page counter \hfill} */ int qt_counter = 0; /* {\ single quotation counter \hfill} */ int dqt_counter = 0; /* {\ double quotation counter \hfill} */ int space_counter = 0; /* {\ space counter \hfill} */ int prev_flag = 0; /* {\ previous flag \hfill} */ int prev_char = 0x20; /* {\ previous character \hfill} */ int bf_flag = 0; /* {\ bold face flag \hfill} */ int skip_amount; /* {\ skip amount of tabulation \hfill} */ int stat_flag = 0; /* {\ status flag \hfill} */ int nl_flag = 0; /* {\ new line flag \hfill} */ int rm_flag = 0; /* {\ cmr font flag \hfill} */ int tt_flag = 0; /* {\ cmtt font flag \hfill} */ int TT_flag = 0; /* {\ choose cmtt font in quasi-{\TeX} mode ? \hfill} */ int doc_flag = 0; /* {\ document style flag \hfill} */ int warn_flag1 = 0; /* {\ circumventing TeX mode warning flag \hfill} */ int warn_flag2 = 0; /* {\ too long lines warning flag \hfill} */ int i, *cptr1, *cptr2, *cptr3, *cptr4, *cptr5, *cptr6, *cptr7; flag_char *ptr; while (((ptr = get_flag_char(fptr))->character) != EOF) { /* {\hrulefill\ opening message\ \hrulefill} */ /* {\ Here {\bf src2tex} [resp. {\bf src2latex}] output preliminary statement of \TeX \hfill} */ if (stat_flag == 0) { ++stat_flag; /* set TT_flag at the beginning of translation {\hfill} */ TT_flag = choose_tt_font(ptr->buffer); #ifndef DEBUGGING /* translating message {\hfill} */ #ifdef LATEX fprintf(stderr, "src2latex: translating ..."); #else fprintf(stderr, "src2tex: translating ..."); #endif #endif #ifndef PLAIN #ifdef LATEX /* LaTeX documentstyle {\hfill} */ fprintf_documentstyle(ptr->buffer, fptr); #else /* TeX footline {\hfill} */ fprintf_footline(cptr, fptr); #endif /* baselineskip amount */ if (Page_Len_Max >= 0) { fprintf(fptr[1], "\n"); fprintf(fptr[1], "\\baselineskip=0pt\n"); } #endif /* input user's style file {\hfill} */ fprintf(fptr[1], "\n"); input_user_style(fptr); /* absorb differences between ASCII and NTT JTeX {\hfill} */ #ifdef ASCII #ifdef NTT /* NTT+ASCII {\hfill} */ fprintf(fptr[1], "\n"); merge_ntt_ascii(fptr); #endif #else #ifdef NTT /* NTT {\hfill} */ fprintf(fptr[1], "\n"); merge_ntt_ascii(fptr); #endif #endif fprintf(fptr[1], "\n"); fprintf(fptr[1], "%s\n", TextModeFont); fprintf(fptr[1], "\n"); if (Page_Len_Max < 0) fprintf(fptr[1], "\\noindent\n"); else { #ifdef LATEX fprintf(fptr[1], "\\hfill"); fprintf_line_number(fptr, line_counter); #else fprintf(fptr[1], "\\hfill\n\n\\item{\\tt %d:\\ }\n", line_counter + 1); #endif } #ifdef LATEX /* {\ If there exists a string "$\{\backslash$null$\}$" then skip it. \hfill} */ if ((char_counter == 0) && (doc_flag == 0)) { if (BAS_flag != 0) if (search_line(ptr->buffer, "'{\null}") || search_line(ptr->buffer, "1'{\null}") || search_line(ptr->buffer, "10'{\null}") || search_line(ptr->buffer, "100'{\null}") || search_line(ptr->buffer, "1000'{\null}") || search_line(ptr->buffer, "rem{\null}") || search_line(ptr->buffer, "1rem{\null}") || search_line(ptr->buffer, "10rem{\null}") || search_line(ptr->buffer, "100rem{\null}") || search_line(ptr->buffer, "1000rem{\null}")) nl_flag = 1; if (C_flag != 0) if (search_line(ptr->buffer, "/*{\\null}*/") || search_line(ptr->buffer, "//{\\null}")) nl_flag = 1; if (CBL_flag != 0) if (search_line(ptr->buffer, "*{\\null}") || search_line(ptr->buffer, "/{\\null}")) nl_flag = 1; if (F77_flag != 0) if (search_line(ptr->buffer, "c{\\null}") || search_line(ptr->buffer, "*{\\null}")) nl_flag = 1; if (LISP_flag != 0) { if (search_line(ptr->buffer, ";{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, ";;{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, ";;;{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, ";;;;{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, ";;;;;{\\null}")) nl_flag = 1; } if (MAKE_flag != 0) if (search_line(ptr->buffer, "#{\\null}")) nl_flag = 1; if (PAS_flag != 0) if (search_line(ptr->buffer, "{{\\null}}") || search_line(ptr->buffer, "(*{\\null}*)")) nl_flag = 1; if (PERL_flag != 0) if (search_line(ptr->buffer, "#{\\null}")) nl_flag = 1; if (SH_flag != 0) if (search_line(ptr->buffer, "#{\\null}")) nl_flag = 1; if (TCL_flag != 0) if (search_line(ptr->buffer, "#{\\null}")) nl_flag = 1; if (MAP_flag != 0) if (search_line(ptr->buffer, "#{\\null}")) nl_flag = 1; if (MAT_flag != 0) if (search_line(ptr->buffer, "(*{\\null}*)")) nl_flag = 1; if (MLAB_flag != 0) if (search_line(ptr->buffer, "#{\\null}") || search_line(ptr->buffer, "%{\\null}")) nl_flag = 1; if (RED_flag != 0) if (search_line(ptr->buffer, "%{\\null}") || search_line(ptr->buffer, "COMMENT{\\null};") || search_line(ptr->buffer, "comment{\\null};")) nl_flag = 1; if (nl_flag != 0) { ++doc_flag; while ((ptr->character != EOF) && ((char)ptr->character != '\n')) ptr = get_flag_char(fptr); continue; } } #endif } if ((char_counter == 0) && (line_counter <= 3) && (doc_flag == 0)) { if (CBL_flag != 0) { if (search_line(ptr->buffer, "*{\\null}") || search_line(ptr->buffer, "/{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, "000001*{\\null}") || search_line(ptr->buffer, "000001/{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, "000002*{\\null}") || search_line(ptr->buffer, "000002/{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, "000003*{\\null}") || search_line(ptr->buffer, "000003/{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, "000004*{\\null}") || search_line(ptr->buffer, "000004/{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, "000010*{\\null}") || search_line(ptr->buffer, "000010/{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, "000020*{\\null}") || search_line(ptr->buffer, "000020/{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, "000030*{\\null}") || search_line(ptr->buffer, "000030/{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, "000040*{\\null}") || search_line(ptr->buffer, "000040/{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, "000100*{\\null}") || search_line(ptr->buffer, "000100/{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, "000200*{\\null}") || search_line(ptr->buffer, "000200/{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, "000300*{\\null}") || search_line(ptr->buffer, "000300/{\\null}")) nl_flag = 1; if (search_line(ptr->buffer, "000400*{\\null}") || search_line(ptr->buffer, "000400/{\\null}")) nl_flag = 1; } if (nl_flag != 0) { ++doc_flag; while ((ptr->character != EOF) && ((char)ptr->character != '\n')) ptr = get_flag_char(fptr); continue; } } /* {\ If there exits a COBOL comment sign {\tt /}\ , {\bf src2tex} output page eject code. \hfill} */ if ((ptr->flag == 1) && (CBL_flag != 0) && (char_counter == 0)) { cptr1 = ptr->buffer; cptr2 = inc_buf_ptr(cptr1); cptr3 = inc_buf_ptr(cptr2); cptr4 = inc_buf_ptr(cptr3); cptr5 = inc_buf_ptr(cptr4); cptr6 = inc_buf_ptr(cptr5); cptr7 = inc_buf_ptr(cptr6); if (*cptr7 == '/') fprintf(fptr[1], "\\vfill\\eject\n\n\\noindent\n"); } if ((prev_flag > 1) && (ptr->flag == 0)) { fprintf(stderr, "\nError: unexpected end of TeX-mode in %s\n", cptr[0]); fprintf(stderr, " illegal transition TeX-mode -> Text-mode\n"); exit(EXIT_FAILURE); } /* {\hrulefill\ font selection\ \hrulefill} */ if ((prev_flag == 0) && (ptr->flag > 0)) { #ifndef DEBUGGING /* i-am-working message {\hfill} */ fprintf(stderr, "."); #endif /* We usually select {\tt TeXModeFont} as follows. {\hfill} */ if (((C_flag == 0) && (F77_flag == 0) && (MAKE_flag == 0) && (PAS_flag == 0) && (PERL_flag == 0) && (SH_flag == 0) && (TCL_flag == 0) && (MAP_flag == 0) && (MAT_flag == 0) && (MLAB_flag == 0)) || (char_counter >= Htab_Size)) { if (TT_flag != 0) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } /* {\ If there exists a C comment area consists of several quasi-\TeX mode lines,\hfill} */ /* {\ {\bf src2tex} uses cmtt font instead of cmr font \hfill} */ if ((C_flag != 0) && (char_counter < Htab_Size)) { tt_flag = 0; cptr1 = ptr->buffer; cptr2 = inc_buf_ptr(cptr1); cptr3 = inc_buf_ptr(cptr2); cptr4 = inc_buf_ptr(cptr3); cptr5 = inc_buf_ptr(cptr4); cptr6 = inc_buf_ptr(cptr5); for (i = 0; i < 1024; ++i) { if ((*cptr1 == '{') && (*cptr2 == '\\')) { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '[')) #else if ((*cptr1 == '$') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '(')) #else if ((*cptr1 != '\\') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } if (((*cptr1 == '*') && (*cptr2 == '/')) && ((*cptr3 == '\n') || (*cptr3 == '\r')) && ((*cptr4 == '/') && (*cptr5 == '*'))) { rm_flag = 0; tt_flag = 2; break; } if (((*cptr1 == '*') && (*cptr2 == '/')) && ((*cptr3 == '\n') || (*cptr3 == '\r')) && ((*cptr4 == '\n') || (*cptr4 == '\r')) && ((*cptr5 == '/') && (*cptr6 == '*'))) { rm_flag = 0; tt_flag = 2; break; } if (((*cptr1 == '*') && (*cptr2 == '/')) && ((*cptr3 == '\n') || (*cptr3 == '\r'))) { rm_flag = 0; tt_flag = 1; break; } if (((*cptr1 == '\n') || (*cptr1 == '\r')) && (*cptr2 == '/') && (*cptr3 == '*')) { rm_flag = 0; tt_flag =1; break; } if ((*cptr1 == '\n') || (*cptr1 == '\r')) tt_flag = 1; cptr1 = inc_buf_ptr(cptr1); cptr2 = inc_buf_ptr(cptr2); cptr3 = inc_buf_ptr(cptr3); cptr4 = inc_buf_ptr(cptr4); cptr5 = inc_buf_ptr(cptr5); cptr6 = inc_buf_ptr(cptr6); } #ifdef DEBUGGING if (tt_flag != 0) printf ("text2tex(): tt_flag is set to %d\n", tt_flag); #endif if ((tt_flag > 1) && (warn_flag1 <= 5)) { ++warn_flag1; #ifdef DEBUGGING printf("text2tex(): warn_flag1 is set to %d\n", warn_flag1); #endif if (warn_flag1 > 5) { if (warn_flag2 <= 2) fprintf(stderr, "\n"); fprintf(stderr, "Warning: It is better to use TeX-mode\n"); fprintf(stderr, " when you write long comment in C.\n"); } } if ((TT_flag == 1) || ((rm_flag == 0) && (tt_flag != 0))) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } /* {\ If there exists a FORTRAN comment area consists of several quasi-\TeX \hfill} */ /* {\ mode lines, {\bf src2tex} uses cmtt font instead of cmr font \hfill} */ if ((F77_flag != 0) && (char_counter < Htab_Size)) { tt_flag = 0; cptr1 = ptr->buffer; cptr2 = inc_buf_ptr(cptr1); cptr3 = inc_buf_ptr(cptr2); for (i = 0; i < 1024; ++i) { if ((*cptr1 == '{') && (*cptr2 == '\\')) { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '[')) #else if ((*cptr1 == '$') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '(')) #else if ((*cptr1 != '\\') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } if (((*cptr1 != '\n') && (*cptr1 != '\r')) && ((*cptr2 == '*') || (*cptr2 == 'C') || (*cptr2 == 'c')) && ((*cptr3 == '\n') || (*cptr3 == '\r'))) { rm_flag = 0; tt_flag = 2; break; } if ((*cptr1 == '\n') || (*cptr1 == '\r')) tt_flag = 1; cptr1 = inc_buf_ptr(cptr1); cptr2 = inc_buf_ptr(cptr2); cptr3 = inc_buf_ptr(cptr3); } #ifdef DEBUGGING if (tt_flag != 0) printf ("text2tex(): tt_flag is set to %d\n", tt_flag); #endif if ((tt_flag > 1) && (warn_flag1 <= 5)) { ++warn_flag1; #ifdef DEBUGGING printf( "text2tex(): warn_flag1 is set to %d\n", warn_flag1); #endif if (warn_flag1 > 5) { if (warn_flag2 <= 2) fprintf(stderr, "\n"); fprintf(stderr, "Warning: It is better to use TeX-mode\n"); fprintf(stderr, " when you write long comment in FORTRAN.\n"); } } if ((TT_flag == 1) || ((rm_flag == 0) && (tt_flag != 0))) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } /* {\ If there exists a MAKE comment area consists of several quasi-\TeX \hfill} */ /* {\ mode lines, {\bf src2tex} uses cmtt font instead of cmr font \hfill} */ if ((MAKE_flag != 0) && (char_counter < Htab_Size)) { tt_flag = 0; cptr1 = ptr->buffer; cptr2 = inc_buf_ptr(cptr1); cptr3 = inc_buf_ptr(cptr2); for (i = 0; i < 1024; ++i) { if ((*cptr1 == '{') && (*cptr2 == '\\')) { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '[')) #else if ((*cptr1 == '$') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '(')) #else if (((*cptr1 == '\t') || (*cptr1 == ' ')) && (*cptr2 == '$') && (*cptr3 != '(')) #endif { rm_flag = 1; tt_flag = 0; break; } if (((*cptr1 != '\n') && (*cptr1 != '\r')) && (*cptr2 == '#') && ((*cptr3 == '\n') || (*cptr3 == '\r'))) { rm_flag = 0; tt_flag = 2; break; } if ((*cptr1 == '\n') || (*cptr1 == '\r')) tt_flag = 1; cptr1 = inc_buf_ptr(cptr1); cptr2 = inc_buf_ptr(cptr2); cptr3 = inc_buf_ptr(cptr3); } #ifdef DEBUGGING if (tt_flag != 0) printf ("text2tex(): tt_flag is set to %d\n", tt_flag); #endif if ((tt_flag > 1) && (warn_flag1 <= 5)) { ++warn_flag1; #ifdef DEBUGGING printf("text2tex(): warn_flag1 is set to %d\n", warn_flag1); #endif if (warn_flag1 > 5) { if (warn_flag2 <= 2) fprintf(stderr, "\n"); fprintf(stderr, "Warning: It is better to use TeX-mode\n"); fprintf(stderr, " when you write long comment in MAKE.\n"); } } if ((TT_flag == 1) || ((rm_flag == 0) && (tt_flag != 0))) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } /* {\ If there exists a PASCAL comment area consists of several quasi-\TeX \hfill} */ /* {\ mode lines, {\bf src2tex} uses cmtt font instead of cmr font \hfill} */ if ((PAS_flag != 0) && (char_counter < Htab_Size)) { tt_flag = 0; cptr1 = ptr->buffer; cptr2 = inc_buf_ptr(cptr1); cptr3 = inc_buf_ptr(cptr2); cptr4 = inc_buf_ptr(cptr3); cptr5 = inc_buf_ptr(cptr4); cptr6 = inc_buf_ptr(cptr5); for (i = 0; i < 1024; ++i) { if ((*cptr1 == '{') && (*cptr2 == '\\')) { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '[')) #else if ((*cptr1 == '$') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '(')) #else if ((*cptr1 != '\\') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } if ((*cptr1 == '}') && ((*cptr2 == '\n') || (*cptr2 == '\r')) && (*cptr3 == '{')) { rm_flag = 0; tt_flag = 2; break; } if (((*cptr1 == '*') && (*cptr2 == ')')) && ((*cptr3 == '\n') || (*cptr3 == '\r')) && ((*cptr4 == '(') && (*cptr5 == '*'))) { rm_flag = 0; tt_flag = 2; break; } if ((*cptr1 == '}') && ((*cptr2 == '\n') || (*cptr2 == '\r')) && ((*cptr3 == '\n') || (*cptr3 == '\r')) && (*cptr4 == '{')) { rm_flag = 0; tt_flag = 2; break; } if (((*cptr1 == '*') && (*cptr2 == ')')) && ((*cptr3 == '\n') || (*cptr3 == '\r')) && ((*cptr4 == '\n') || (*cptr4 == '\r')) && ((*cptr5 == '(') && (*cptr6 == '*'))) { rm_flag = 0; tt_flag = 2; break; } if ((*cptr1 == '}') && ((*cptr2 == '\n') || (*cptr2 == '\r'))) { rm_flag = 0; tt_flag = 1; break; } if (((*cptr1 == '*') && (*cptr2 == ')')) && ((*cptr3 == '\n') || (*cptr3 == '\r'))) { rm_flag = 0; tt_flag = 1; break; } if (((*cptr1 == '\n') || (*cptr1 == '\r')) && (*cptr2 == '}')) { rm_flag = 0; tt_flag = 1; break; } if (((*cptr1 == '\n') || (*cptr1 == '\r')) && (*cptr2 == '(') && (*cptr3 == '*')) { rm_flag = 0; tt_flag = 1; break; } if ((*cptr1 == '\n') || (*cptr1 == '\r')) tt_flag = 1; cptr1 = inc_buf_ptr(cptr1); cptr2 = inc_buf_ptr(cptr2); cptr3 = inc_buf_ptr(cptr3); cptr4 = inc_buf_ptr(cptr4); cptr5 = inc_buf_ptr(cptr5); cptr6 = inc_buf_ptr(cptr6); } #ifdef DEBUGGING if (tt_flag != 0) printf ("text2tex(): tt_flag is set to %d\n", tt_flag); #endif if ((tt_flag > 1) && (warn_flag1 <= 5)) { ++warn_flag1; #ifdef DEBUGGING printf("text2tex(): warn_flag1 is set to %d\n", warn_flag1); #endif if (warn_flag1 > 5) { if (warn_flag2 <= 2) fprintf(stderr, "\n"); fprintf(stderr, "Warning: It is better to use TeX-mode\n"); fprintf(stderr, " when you write long comment in PASCAL.\n"); } } if ((TT_flag == 1) || ((rm_flag == 0) && (tt_flag != 0))) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } /* {\ If there exists a PERL comment area consists of several quasi-\TeX \hfill} */ /* {\ mode lines, {\bf src2tex} uses cmtt font instead of cmr font \hfill} */ if ((PERL_flag != 0) && (char_counter < Htab_Size)) { tt_flag = 0; cptr1 = ptr->buffer; cptr2 = inc_buf_ptr(cptr1); cptr3 = inc_buf_ptr(cptr2); for (i = 0; i < 1024; ++i) { if ((*cptr1 == '{') && (*cptr2 == '\\')) { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '[')) #else if ((*cptr1 == '$') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '(')) #else if (((*cptr1 == '\t') || (*cptr1 == ' ')) && (*cptr2 == '$') && (*cptr3 == '\\')) #endif { rm_flag = 1; tt_flag = 0; break; } if (((*cptr1 != '\n') && (*cptr1 != '\r')) && (*cptr2 == '#') && ((*cptr3 == '\n') || (*cptr3 == '\r'))) { rm_flag = 0; tt_flag = 2; break; } if ((*cptr1 == '\n') || (*cptr1 == '\r')) tt_flag = 1; cptr1 = inc_buf_ptr(cptr1); cptr2 = inc_buf_ptr(cptr2); cptr3 = inc_buf_ptr(cptr3); } #ifdef DEBUGGING if (tt_flag != 0) { printf ("text2tex(): rm_flag is set to %d\n", rm_flag); printf ("text2tex(): tt_flag is set to %d\n", tt_flag); } #endif if ((tt_flag > 1) && (warn_flag1 <= 5)) { ++warn_flag1; #ifdef DEBUGGING printf("text2tex(): warn_flag1 is set to %d\n", warn_flag1); #endif if (warn_flag1 > 5) { if (warn_flag2 <= 2) fprintf(stderr, "\n"); fprintf(stderr, "Warning: It is better to use TeX-mode\n"); fprintf(stderr, " when you write long comment in PERL.\n"); } } if ((TT_flag == 1) || ((rm_flag == 0) && (tt_flag != 0))) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } /* {\ If there exists a SHELL comment area consists of several quasi-\TeX \hfill} */ /* {\ mode lines, {\bf src2tex} uses cmtt font instead of cmr font \hfill} */ if ((SH_flag != 0) && (char_counter < Htab_Size)) { tt_flag = 0; cptr1 = ptr->buffer; cptr2 = inc_buf_ptr(cptr1); cptr3 = inc_buf_ptr(cptr2); for (i = 0; i < 1024; ++i) { if ((*cptr1 == '{') && (*cptr2 == '\\')) { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '[')) #else if ((*cptr1 == '$') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '(')) #else if (((*cptr1 == '\t') || (*cptr1 == ' ')) && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } if (((*cptr1 != '\n') && (*cptr1 != '\r')) && (*cptr2 == '#') && ((*cptr3 == '\n') || (*cptr3 == '\r'))) { rm_flag = 0; tt_flag = 2; break; } if ((*cptr1 == '\n') || (*cptr1 == '\r')) tt_flag = 1; cptr1 = inc_buf_ptr(cptr1); cptr2 = inc_buf_ptr(cptr2); cptr3 = inc_buf_ptr(cptr3); } #ifdef DEBUGGING if (tt_flag != 0) printf ("text2tex(): tt_flag is set to %d\n", tt_flag); #endif if ((tt_flag > 1) && (warn_flag1 <= 5)) { ++warn_flag1; #ifdef DEBUGGING printf("text2tex(): warn_flag1 is set to %d\n", warn_flag1); #endif if (warn_flag1 > 5) { if (warn_flag2 <= 2) fprintf(stderr, "\n"); fprintf(stderr, "Warning: It is better to use TeX-mode\n"); fprintf(stderr, " when you write long comment in SHELL.\n"); } } if ((TT_flag == 1) || ((rm_flag == 0) && (tt_flag != 0))) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } /* {\ If there exists a TCL/TK comment area consists of several quasi-\TeX \hfill} */ /* {\ mode lines, {\bf src2tex} uses cmtt font instead of cmr font \hfill} */ if ((TCL_flag != 0) && (char_counter < Htab_Size)) { tt_flag = 0; cptr1 = ptr->buffer; cptr2 = inc_buf_ptr(cptr1); cptr3 = inc_buf_ptr(cptr2); for (i = 0; i < 1024; ++i) { if ((*cptr1 == '{') && (*cptr2 == '\\')) { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '[')) #else if ((*cptr1 == '$') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '(')) #else if (((*cptr1 == '\t') || (*cptr1 == ' ')) && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } if (((*cptr1 != '\n') && (*cptr1 != '\r')) && (*cptr2 == '#') && ((*cptr3 == '\n') || (*cptr3 == '\r'))) { rm_flag = 0; tt_flag = 2; break; } if ((*cptr1 == '\n') || (*cptr1 == '\r')) tt_flag = 1; cptr1 = inc_buf_ptr(cptr1); cptr2 = inc_buf_ptr(cptr2); cptr3 = inc_buf_ptr(cptr3); } #ifdef DEBUGGING if (tt_flag != 0) printf ("text2tex(): tt_flag is set to %d\n", tt_flag); #endif if ((tt_flag > 1) && (warn_flag1 <= 5)) { ++warn_flag1; #ifdef DEBUGGING printf("text2tex(): warn_flag1 is set to %d\n", warn_flag1); #endif if (warn_flag1 > 5) { if (warn_flag2 <= 2) fprintf(stderr, "\n"); fprintf(stderr, "Warning: It is better to use TeX-mode\n"); fprintf(stderr, " when you write long comment in TCL/TK.\n"); } } if ((TT_flag == 1) || ((rm_flag == 0) && (tt_flag != 0))) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } /* {\ If there exists a MAPLE comment area consists of several quasi-\TeX \hfill} */ /* {\ mode lines, {\bf src2tex} uses cmtt font instead of cmr font \hfill} */ if ((MAP_flag != 0) && (char_counter < Htab_Size)) { tt_flag = 0; cptr1 = ptr->buffer; cptr2 = inc_buf_ptr(cptr1); cptr3 = inc_buf_ptr(cptr2); for (i = 0; i < 1024; ++i) { if ((*cptr1 == '{') && (*cptr2 == '\\')) { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '[')) #else if ((*cptr1 == '$') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '(')) #else if ((*cptr1 != '\\') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } if (((*cptr1 != '\n') && (*cptr1 != '\r')) && (*cptr2 == '#') && ((*cptr3 == '\n') || (*cptr3 == '\r'))) { rm_flag = 0; tt_flag = 2; break; } if ((*cptr1 == '\n') || (*cptr1 == '\r')) tt_flag = 1; cptr1 = inc_buf_ptr(cptr1); cptr2 = inc_buf_ptr(cptr2); cptr3 = inc_buf_ptr(cptr3); } #ifdef DEBUGGING if (tt_flag != 0) printf ("text2tex(): tt_flag is set to %d\n", tt_flag); #endif if ((tt_flag > 1) && (warn_flag1 <= 5)) { ++warn_flag1; #ifdef DEBUGGING printf("text2tex(): warn_flag1 is set to %d\n", warn_flag1); #endif if (warn_flag1 > 5) { if (warn_flag2 <= 2) fprintf(stderr, "\n"); fprintf(stderr, "Warning: It is better to use TeX-mode\n"); fprintf(stderr, " when you write long comment in MAPLE.\n"); } } if ((TT_flag == 11) || ((rm_flag == 0) && (tt_flag != 0))) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } /* {\ If there exists a MATHEMATICA comment area consists of several quasi-\TeX \hfill} */ /* {\ mode lines, {\bf src2tex} uses cmtt font instead of cmr font \hfill} */ if ((MAT_flag != 0) && (char_counter < Htab_Size)) { tt_flag = 0; cptr1 = ptr->buffer; cptr2 = inc_buf_ptr(cptr1); cptr3 = inc_buf_ptr(cptr2); cptr4 = inc_buf_ptr(cptr3); cptr5 = inc_buf_ptr(cptr4); cptr6 = inc_buf_ptr(cptr5); for (i = 0; i < 1024; ++i) { if ((*cptr1 == '{') && (*cptr2 == '\\')) { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '[')) #else if ((*cptr1 == '$') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '(')) #else if ((*cptr1 != '\\') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } if (((*cptr1 == '*') && (*cptr2 == ')')) && ((*cptr3 == '\n') || (*cptr3 == '\r')) && ((*cptr4 == '(') && (*cptr5 == '*'))) { rm_flag = 0; tt_flag = 2; break; } if (((*cptr1 == '*') && (*cptr2 == ')')) && ((*cptr3 == '\n') || (*cptr3 == '\r')) && ((*cptr4 == '\n') || (*cptr4 == '\r')) && ((*cptr5 == '(') && (*cptr6 == '*'))) { rm_flag = 0; tt_flag = 2; break; } if (((*cptr1 == '*') && (*cptr2 == ')')) && ((*cptr3 == '\n') || (*cptr3 == '\r'))) { rm_flag = 0; tt_flag = 1; break; } if (((*cptr1 == '\n') || (*cptr1 == '\r')) && (*cptr2 == '(') && (*cptr3 == '*')) { rm_flag = 0; tt_flag = 1; break; } if ((*cptr1 == '\n') || (*cptr1 == '\r')) tt_flag = 1; cptr1 = inc_buf_ptr(cptr1); cptr2 = inc_buf_ptr(cptr2); cptr3 = inc_buf_ptr(cptr3); cptr4 = inc_buf_ptr(cptr4); cptr5 = inc_buf_ptr(cptr5); cptr6 = inc_buf_ptr(cptr6); } #ifdef DEBUGGING if ((rm_flag == 0) && (tt_flag != 0)) printf ("text2tex(): tt_flag is set to %d\n", tt_flag); #endif if ((tt_flag > 1) && (warn_flag1 <= 5)) { ++warn_flag1; #ifdef DEBUGGING printf("text2tex(): warn_flag1 is set to %d\n", warn_flag1); #endif if (warn_flag1 > 5) { if (warn_flag2 <= 2) fprintf(stderr, "\n"); fprintf(stderr, "Warning: It is better to use TeX-mode\n"); fprintf(stderr, " when you write long comment in"); fprintf(stderr, " MATHEMATICA.\n"); } } if ((TT_flag == 1) || ((rm_flag == 0) && (tt_flag != 0))) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } /* {\ If there exists a MATLAB comment area consists of several quasi-\TeX \hfill} */ /* {\ mode lines, {\bf src2tex} uses cmtt font instead of cmr font \hfill} */ if ((MLAB_flag != 0) && (char_counter < Htab_Size)) { tt_flag = 0; cptr1 = ptr->buffer; cptr2 = inc_buf_ptr(cptr1); cptr3 = inc_buf_ptr(cptr2); for (i = 0; i < 1024; ++i) { if ((*cptr1 == '{') && (*cptr2 == '\\')) { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '[')) #else if ((*cptr1 == '$') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } #ifdef LATEX if ((*cptr1 == '\\') && (*cptr2 == '(')) #else if ((*cptr1 != '\\') && (*cptr2 == '$')) #endif { rm_flag = 1; tt_flag = 0; break; } if ((*cptr1 == '\n') && ((*cptr2 == '#') || (*cptr2 == '%')) && ((*cptr3 == '\t') || (*cptr3 == ' '))) { rm_flag = 0; tt_flag = 2; break; } if (((*cptr1 != '\n') && (*cptr1 != '\r')) && ((*cptr2 == '#') || (*cptr2 == '%')) && ((*cptr3 == '\n') || (*cptr3 == '\r'))) { rm_flag = 0; tt_flag = 2; break; } if ((*cptr1 == '\n') || (*cptr1 == '\r')) tt_flag = 1; cptr1 = inc_buf_ptr(cptr1); cptr2 = inc_buf_ptr(cptr2); cptr3 = inc_buf_ptr(cptr3); } #ifdef DEBUGGING if (tt_flag != 0) printf ("text2tex(): tt_flag is set to %d\n", tt_flag); #endif if ((tt_flag > 1) && (warn_flag1 <= 5)) { ++warn_flag1; #ifdef DEBUGGING printf("text2tex(): warn_flag1 is set to %d\n", warn_flag1); #endif if (warn_flag1 > 5) { if (warn_flag2 <= 2) fprintf(stderr, "\n"); fprintf(stderr, "Warning: It is better to use TeX-mode\n"); fprintf(stderr, " when you write long comment in"); fprintf(stderr, " MATLAB.\n"); } } if ((TT_flag == 1) || ((rm_flag == 0) && (tt_flag != 0))) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } } /* {\ choose either {\tt TextModeFont} or {\tt TeXModeFont} carefully \hfill} */ if ((prev_flag > 0) && (ptr->flag == 0)) { if(char_counter == 0) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "\n%s", TextModeFont); } if ((prev_flag > 1) && (ptr->flag == 1)) { if (TT_flag != 0) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } /* {\ set bold face flag {\tt bf\_flag} for PASCAL and REDUCE \hfill} */ if (ptr->flag == 0) if ((prev_char < 'A') || ((prev_char > 'Z') && (prev_char < 'a')) || (prev_char > 'z')) if (((PAS_flag != 0) || (RED_flag != 0)) && (qt_counter == 0) && (bf_flag == 0)) { bf_flag = get_bf_flag(ptr->buffer); #ifdef DEBUGGING printf("get_bf_flag(): bf_flag = %d\n", bf_flag); #endif } /* parsing options {\hfill} */ if ((ptr->flag >= 1) && (char_counter == 0)) { if (parse_options(ptr) != 0) { if (TT_flag != 0) fprintf(fptr[1], "%s", TextModeFont); else fprintf(fptr[1], "%s", TeXModeFont); } } /* commenting out {\bf src2tex} escape sequence {\hfill} */ if ((ptr->flag >= 1) && (char_counter == 0)) { cptr1 = ptr->buffer; while (((char)*cptr1 != '\\') && ((char)*cptr1 != '\n') && (*cptr1 != EOF)) cptr1 = inc_buf_ptr(cptr1); if (str_cmp(cptr1, "\\src2tex{") == 0) { fprintf(fptr[1], "%c ", 0x25); #ifdef DEBUGGING printf("commenting out \\src2tex{ ... }\n"); #endif } } prev_flag = ptr->flag; prev_char = ptr->character; /* {\hrulefill\ text and quasi-{\TeX}\ mode\ \hrulefill} */ /* {\ Here {\bf src2tex} [resp. {\bf src2latex}] translates each input character into suitable escape sequence of \TeX \hfill} */ if (ptr->flag <= 1) { switch (ptr->character) { case '\0': fprintf(fptr[1], "{\\sevenrm N\\kern-.15em\\lower.5ex\\hbox{U}}"); break; case 0x01: fprintf(fptr[1], "{\\sevenrm S\\kern-.15em\\lower.5ex\\hbox{H}}"); break; case 0x02: fprintf(fptr[1], "{\\sevenrm S\\kern-.15em\\lower.5ex\\hbox{X}}"); break; case 0x03: fprintf(fptr[1], "{\\sevenrm E\\kern-.15em\\lower.5ex\\hbox{X}}"); break; case 0x04: fprintf(fptr[1], "{\\sevenrm E\\kern-.15em\\lower.5ex\\hbox{T}}"); break; case 0x05: fprintf(fptr[1], "{\\sevenrm E\\kern-.15em\\lower.5ex\\hbox{Q}}"); break; case 0x06: fprintf(fptr[1], "{\\sevenrm A\\kern-.15em\\lower.5ex\\hbox{K}}"); break; case 0x07: fprintf(fptr[1], "{\\sevenrm B\\kern-.15em\\lower.5ex\\hbox{L}}"); break; case '\b': fprintf(fptr[1], "{\\sevenrm B\\kern-.15em\\lower.5ex\\hbox{S}}"); break; case '\t': skip_amount = Htab_Size - (char_counter % Htab_Size); fprintf(fptr[1], "{%s\\kern%3.3fem}", TextModeFont, (float) SPACE * (float) skip_amount); char_counter += skip_amount -1; break; case '\n': if ((Page_Len_Max > 0) && (page_len >= Page_Len_Max)) { fprintf(fptr[1], "\n\n\\vfill\\eject\n\n"); page_len = 0; } ++line_counter; ++page_len; if (char_counter == 0) { cptr1 = inc_buf_ptr(ptr->buffer); if ((Page_Len_Max < 0) || (*cptr1 == EOF)) fprintf(fptr[1], "\\hfill\n\n\\noindent\n"); else { #ifdef LATEX fprintf(fptr[1], "\\hfill"); fprintf_line_number(fptr, line_counter); #else fprintf(fptr[1], "\\hfill\n\n\\item{\\tt %d:\\ }\n", line_counter + 1); #endif } } else { cptr1 = inc_buf_ptr(ptr->buffer); if ((Page_Len_Max < 0) || (*cptr1 == EOF)) fprintf(fptr[1], "\n\n\\noindent\n"); else { #ifdef LATEX fprintf_line_number(fptr, line_counter); #else fprintf(fptr[1], "\n\n\\item{\\tt %d:\\ }\n", line_counter + 1); #endif } } if (ptr->flag == 0) fprintf(fptr[1], "{}"); char_counter = -1; break; case '\v': fprintf(fptr[1], "{\\vskip%dex\\relax }", Vtab_Size); break; case '\f': /* fprintf(fptr[1], "{\\sevenrm F\\kern-.15em\\lower.5ex\\hbox{F}}"); */ fprintf(fptr[1], "\\vfill\\eject\n\n\\noindent\n"); break; case '\r': #ifdef UNIX fprintf(fptr[1], "{\\sevenrm C\\kern-.15em\\lower.5ex\\hbox{R}}"); #else fprintf(fptr[1], "%c", (char) ptr->character); #endif break; case 0x0e: fprintf(fptr[1], "{\\sevenrm S\\kern-.15em\\lower.5ex\\hbox{O}}"); break; case 0x0f: fprintf(fptr[1], "{\\sevenrm S\\kern-.15em\\lower.5ex\\hbox{I}}"); break; case 0x10: fprintf(fptr[1], "{\\sevenrm D\\kern-.15em\\lower.5ex\\hbox{L}}"); break; case 0x11: fprintf(fptr[1], "{\\sevenrm D\\kern-.15em\\lower.5ex\\hbox{1}}"); break; case 0x12: fprintf(fptr[1], "{\\sevenrm D\\kern-.15em\\lower.5ex\\hbox{2}}"); break; case 0x13: fprintf(fptr[1], "{\\sevenrm D\\kern-.15em\\lower.5ex\\hbox{3}}"); break; case 0x14: fprintf(fptr[1], "{\\sevenrm D\\kern-.15em\\lower.5ex\\hbox{4}}"); break; case 0x15: fprintf(fptr[1], "{\\sevenrm N\\kern-.15em\\lower.5ex\\hbox{K}}"); break; case 0x16: fprintf(fptr[1], "{\\sevenrm S\\kern-.15em\\lower.5ex\\hbox{Y}}"); break; case 0x17: fprintf(fptr[1], "{\\sevenrm E\\kern-.15em\\lower.5ex\\hbox{B}}"); break; case 0x18: fprintf(fptr[1], "{\\sevenrm C\\kern-.15em\\lower.5ex\\hbox{N}}"); break; case 0x19: fprintf(fptr[1], "{\\sevenrm E\\kern-.15em\\lower.5ex\\hbox{M}}"); break; case 0x1a: fprintf(fptr[1], "{\\sevenrm S\\kern-.15em\\lower.5ex\\hbox{B}}"); break; case 0x1b: fprintf(fptr[1], "{\\sevenrm E\\kern-.15em\\lower.5ex\\hbox{C}}"); break; case 0x1c: fprintf(fptr[1], "{\\sevenrm F\\kern-.15em\\lower.5ex\\hbox{S}}"); break; case 0x1d: fprintf(fptr[1], "{\\sevenrm G\\kern-.15em\\lower.5ex\\hbox{S}}"); break; case 0x1e: fprintf(fptr[1], "{\\sevenrm R\\kern-.15em\\lower.5ex\\hbox{S}}"); break; case 0x1f: fprintf(fptr[1], "{\\sevenrm U\\kern-.15em\\lower.5ex\\hbox{S}}"); break; case ' ': ++ space_counter; cptr1 = inc_buf_ptr(ptr->buffer); if (((char)*cptr1 != ' ') || (*cptr1 == EOF)) { if (ptr->flag == 0) fprintf(fptr[1], "{%s\\kern%3.3fem}", TextModeFont, (float) SPACE * (float) space_counter); else fprintf(fptr[1], "\\kern%3.3fem ", (float) SPACE * (float) space_counter); space_counter = 0; } break; case '"': fprintf(fptr[1], "{\\tt \"}"); break; case '#': fprintf(fptr[1], "{\\tt\\#}"); break; case '$': fprintf(fptr[1], "{\\tt\\$}"); break; case '%': fprintf(fptr[1], "{\\tt\\%c}", (char) ptr->character); break; case '&': fprintf(fptr[1], "{\\tt\\&}"); break; case '*': fprintf(fptr[1], "{\\tt *}"); break; case '-': fprintf(fptr[1], "{\\tt -}"); break; case '/': fprintf(fptr[1], "{\\tt /}"); break; case '<': fprintf(fptr[1], "{\\tt <}"); break; case '>': fprintf(fptr[1], "{\\tt >}"); break; case '\\': fprintf(fptr[1], "{\\tt\\char92}"); break; case '^': fprintf(fptr[1], "{\\tt\\char'136}"); break; case '_': fprintf(fptr[1], "{\\tt\\_\\kern.141em}"); break; case '{': fprintf(fptr[1], "{\\tt\\char'173}"); break; case '|': fprintf(fptr[1], "{\\tt |}"); break; case '}': fprintf(fptr[1], "{\\tt\\char'175}"); break; case '~': fprintf(fptr[1], "{\\tt\\char'176}"); break; case 0x7f: fprintf(fptr[1], "{\\sevenrm D\\kern-.15em\\lower.5ex\\hbox{T}}"); break; default: /* text and bold face mode {\hfill} */ if ((ptr->flag == 0) && (bf_flag != 0)) { --bf_flag; /* in case TextModeFont = \tt {\hfill} */ if ((*TextModeFont == '\\') && (*(TextModeFont + 1) == 't') && (*(TextModeFont + 2) == 't')) { /* {\ text mode bold face font is created by overprinting the slightly \hfill} */ /* {\ shifted same character \hfill} */ fprintf(fptr[1], "%c", (char) ptr->character); switch (ptr->character) { case 'e': fprintf(fptr[1], "\\kern-.445em %c\\kern-.055em ", (char) ptr->character); break; case 'n': fprintf(fptr[1], "\\kern-.46em %c\\kern-.04em ", (char) ptr->character); break; case 't': fprintf(fptr[1], "\\kern-.445em %c\\kern-.055em ", (char) ptr->character); break; case 'u': fprintf(fptr[1], "\\kern-.46em %c\\kern-.04em ", (char) ptr->character); break; default: fprintf(fptr[1], "\\kern-.455em %c\\kern-.045em ", (char) ptr->character); } } else /* in case TextModeFont != \tt {\hfill} */ { /* in case TextModeFont = \bf {\hfill} */ if ((*TextModeFont == '\\') && (*(TextModeFont + 1) == 'b') && (*(TextModeFont + 2) == 'f')) { #ifdef ASCII /* {\ ASCII J\TeX \hfill} */ fprintf(fptr[1], "{\\rm\\mc %c}", (char) ptr->character); #else #ifdef NTT /* {\ NTT J\TeX \hfill} */ fprintf(fptr[1], "{\\rm\\dm %c}", (char) ptr->character); #else /* {\TeX \hfill} */ fprintf(fptr[1], "{\\rm %c}", (char) ptr->character); #endif #endif } else /* in case TextModeFont != \bf {\hfill} */ { #ifdef ASCII /* {\ ASCII J\TeX \hfill} */ fprintf(fptr[1], "{\\bf\\gt %c}", (char) ptr->character); #else #ifdef NTT /* {\ NTT J\TeX \hfill} */ fprintf(fptr[1], "{\\bf\\dg %c}", (char) ptr->character); #else /* {\TeX \hfill} */ fprintf(fptr[1], "{\\bf %c}", (char) ptr->character); #endif #endif } } } /* non-text or non-bold face mode {\hfill} */ else { fprintf(fptr[1], "%c", (char) ptr->character); } } ++char_counter; if ((char_counter >= 100) && (warn_flag2 <= 2)) { ++warn_flag2; #ifdef DEBUGGING printf("text2tex(): warn_flag2 is set to %d\n", warn_flag2); #endif if (warn_flag2 > 2) { if (warn_flag1 <= 5) fprintf(stderr, "\n"); fprintf(stderr, "Warning: source file contains very long lines;\n"); fprintf(stderr, " their tails are sometimes truncated\n"); } } if (((C_flag != 0) || (F77_flag != 0) || (PAS_flag != 0)) && ((char) ptr->character == 0x27)) { ++qt_counter; qt_counter %= 2; } if (((BAS_flag != 0) || (C_flag != 0)) && ((char) ptr->character == '"')) { ++dqt_counter; dqt_counter %= 2; } continue; } /* {\hrulefill\ \TeX\ mode\ \hrulefill}*/ /* {\ Unfortunately, some languages cannot coexist with {\TeX}. So, we sometimes have to modify input data and translate them into \TeX. \hfill} */ if (ptr->flag == 2) { switch (ptr->character) { /* skip BASIC and COBOL line number {\hfill} */ case '\n': fprintf(fptr[1], "\n"); ++line_counter; ++page_len; char_counter = -1; cptr1 = inc_buf_ptr(ptr->buffer); cptr2 = inc_buf_ptr(cptr1); if (((BAS_flag != 0) || (CBL_flag != 0)) && ((*cptr1 <= ' ') || ((*cptr1 >= '0') && (*cptr1 <= '9')))) { #ifdef DEBUGGING printf("skipping BASIC and COBOL line number ...\n"); printf("%c%c...\n", *cptr1, *cptr2); #endif while (*cptr1 != EOF) { cptr1 = fgetc2buffer(fptr); cptr2 = inc_buf_ptr(cptr1); if ((*cptr1 <= ' ') && (((*cptr2 > ' ') && (*cptr2 < '0')) || (*cptr2 > '9'))) { if (BAS_flag != 0) *cptr1 = '\n'; break; } } } break; /* skip MAPLE or MATLAB comment sign {\hfill} */ case '#': if (((MAKE_flag == 0) && (PERL_flag == 0) && (SH_flag == 0) && (TCL_flag == 0) && (MAP_flag == 0) && (MLAB_flag == 0)) || (char_counter != 0)) fprintf(fptr[1], "%c", (char) ptr->character); break; /* skip REDUCE or OCTAVE comment sign {\hfill} */ case '%': if (((RED_flag == 0) && (MLAB_flag == 0)) || (char_counter != 0)) fprintf(fptr[1], "%c", (char) ptr->character); break; /* skip BASIC comment sign {\hfill} */ case 0x27: if ((BAS_flag == 0) || (char_counter != 0)) fprintf(fptr[1], "%c", (char) ptr->character); break; /* skip FORTRAN comment sign {\hfill} */ case '*': if (((F77_flag == 0) && (CBL_flag == 0)) || (char_counter != 0)) fprintf(fptr[1], "*"); break; /* skip C++ or JAVA comment sign {\hfill} */ case '/': if (((C_flag != 0) || (JAVA_flag != 0)) && (char_counter == 0)) { cptr1 = inc_buf_ptr(ptr->buffer); if (*cptr1 == '/') *cptr1 = ' '; } else fprintf(fptr[1], "/"); break; /* skip LISP comment sign {\hfill} */ case ';': if ((LISP_flag != 0) && (char_counter == 0)) { cptr1 = inc_buf_ptr(ptr->buffer); while (*cptr1 == ';') { *cptr1 = ' '; cptr1 = inc_buf_ptr(cptr1); } } else fprintf(fptr[1], ";"); break; /* skip FORTRAN comment sign {\hfill} */ case 'C': if ((F77_flag == 0) || (char_counter != 0)) fprintf(fptr[1], "C"); break; /* skip BASIC comment sign {\hfill} */ case 'R': cptr1 = inc_buf_ptr(ptr->buffer); cptr2 = inc_buf_ptr(cptr1); if ((BAS_flag != 0) && (char_counter == 0) &&((*cptr1 == 'E') || (*cptr1 == 'e')) &&((*cptr2 == 'M') || (*cptr2 == 'm'))) { *cptr1 = ' '; *cptr2 = ' '; } else fprintf(fptr[1],"R"); break; /* skip FORTRAN comment sign {\hfill} */ case 'c': if ((F77_flag == 0) || (char_counter != 0)) fprintf(fptr[1], "c"); break; /* skip BASIC comment sign {\hfill} */ case 'r': cptr1 = inc_buf_ptr(ptr->buffer); cptr2 = inc_buf_ptr(cptr1); if ((BAS_flag != 0) && (char_counter == 0) &&((*cptr1 == 'E') || (*cptr1 == 'e')) &&((*cptr2 == 'M') || (*cptr2 == 'm'))) { *cptr1 = ' '; *cptr2 = ' '; } else fprintf(fptr[1],"r"); break; default: fprintf(fptr[1], "%c", (char) ptr->character); } ++char_counter; continue; } } /* {\hrulefill\ closing message\ \hrulefill} */ fprintf(fptr[1], "\n\n"); #ifndef PLAIN #ifdef LATEX /* {\hfill LaTeX \hfill}*/ #ifdef ASCII /* ASCII JTeX {\hfill} */ fprintf(fptr[1], "\\rm\\mc\n\n"); #else #ifdef NTT /* NTT JTeX {\hfill} */ fprintf(fptr[1], "\\rm\\dm\n\n"); #else fprintf(fptr[1], "\\rm\n\n"); #endif #endif fprintf(fptr[1], "\\end{document}\n"); #else /* {\hfill plain TeX \hfill} */ #ifdef ASCII /* ASCII JTeX {\hfill} */ fprintf(fptr[1], "\\rm\\mc\n\n"); #else #ifdef NTT /* NTT JTeX {\hfill} */ fprintf(fptr[1], "\\rm\\dm\n\n"); #else fprintf(fptr[1], "\\rm\n\n"); #endif #endif fprintf(fptr[1], "\\bye\n"); #endif #endif #ifndef DEBUGGING /* last message {\hfill} */ fprintf(stderr, "... done\n"); #endif } src2tex-2.12h.orig/text2tex.c.ps100644 1750 1750 501142 6266067423 16514 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: text2tex.c.dvi %%Pages: 36 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 122 /f0 NF f0 SF [ 24 23 -1 0 24.906] 65 D [ 24 23 -1 0 23.522] 66 D [<00FC000382000E01001C0080380040380040780020700020F00020F00000F00000F00000F00000F00000F000207000207800 203800603800601C00E00E01E003826000FC20> 24 23 -2 0 23.984] 67 D [ 24 23 -1 0 25.367] 68 D [ 24 23 -1 0 22.600] 69 D [ 24 23 -1 0 21.678] 70 D [ 24 23 -1 0 24.906] 72 D [ 16 23 0 0 11.992] 73 D [<3E004300C180E1C0E1C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF8> 16 23 -2 0 17.065] 74 D [ 24 23 -1 0 25.829] 75 D [ 24 23 -1 0 20.755] 76 D [ 32 23 -1 0 30.441] 77 D [ 24 23 -1 0 24.906] 78 D [<01FC000707000E03801C01C03800E03800E07800F0700070F00078F00078F00078F00078F00078F00078F000787000707800 F03800E03800E01C01C00E038007070001FC00> 24 23 -2 0 25.829] 79 D [ 24 23 -1 0 22.600] 80 D [ 24 23 -1 0 24.445] 82 D [<8F80F060C030C01080188018801800180038007003F01FE03FC07E00F000E000C010C010C0104030603030F01F10> 16 23 -2 0 18.449] 83 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<007C000183000700800E00400C00401C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00 201C00201C00201C00201C00201C0070FF81FC> 24 23 -1 0 24.906] 85 D [<00300000300000300000780000780000FC0000E40000E40001C20001C20001C2000381000381000381000700800700800F00 400E00400E00401C00201C00203C0070FF81FC> 24 23 -1 0 24.906] 86 D [<0040040000C0060000E00E0000E00E0001E00F0001D01D0001D01D0001D01D0003901C800388388003883880070838400704 7040070470400E0470200E02E0200E02E0200E02E0201C03E0101C01C0101C01C0103C03C038FF0FF8FE> 32 23 -1 0 34.131] 87 D [ 24 23 -1 0 24.906] 88 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [<78EEE6470707070707070707070707070707073F0000000000060F0F06> 8 29 2 6 10.147] 106 D [ 24 23 0 0 17.527] 107 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [<00FF80001C00001C00001C00001C00001C00079C00185C00303C00701C00601C00E01C00E01C00E01C00E01C00601C00701C 00303C001C6C00078400> 24 20 -1 6 17.526] 113 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<07FC00E000E000E000E000E0FFFCC0E040E020E030E010E008E004E004E002E001E001E000E000600060> 16 21 -1 0 16.604] 52 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<04000E000E000E000E000E0006000600060002000300010001000080004080408020C0107FF87FF87FFC4000> 16 22 -2 0 16.604] 55 D [<0FC038306018C008C00CC00CC01C603C607831F00FE00F801FC03C307810601860186018203018600FC0> 16 21 -1 0 16.604] 56 D [<1F0020C060607030703000380018001C0F9C185C303C603CE01CE01CE01CE018E0186038303018600F80> 16 21 -1 0 16.604] 57 D [<0C001E001E000C0000000000000000000400040004000400040006000300038001C040E0E0E0E0E080E061C01F00> 16 23 -2 0 15.682] 63 D [<60F0F06000000000606060606060606060F0F0F0F0F060> 8 23 -2 0 9.224] 33 D [<40402020101070F0F060> 8 10 -2 -13 9.224] 39 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<060006000600C630E6703FC00F000F003FC0E670C630060006000600> 16 14 -2 -11 16.604] 42 D [<003000003000003000003000003000003000003000003000003000003000FFFFF8FFFFF80030000030000030000030000030 00003000003000003000003000003000> 24 22 -2 3 25.829] 43 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [ 16 33 -2 8 16.604] 47 D [<40402020101070F0F06000000000000060F0F060> 8 20 -2 6 9.224] 59 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D [<00FF000701E008003810000020F0E0218D904307884703888603888E03888E03888E03888E03888E03888603884703904304 10218C2020F02010004008008007070000F800> 24 23 -2 0 25.829] 64 D [ 8 33 -3 8 9.224] 91 D [ 8 33 0 8 9.224] 93 D [ 24 23 0 0 19.371] 11 D [ 24 23 0 0 18.449] 12 D [ 24 23 0 0 18.449] 13 D [<40804080204020401020102070E0F1E0F1E060C0> 16 10 -1 -13 16.604] 34 D [ 8 2 0 -6 11.069] 45 D [<60C0F1E0F1E0E1C0810081004080408020402040> 16 10 -4 -13 16.604] 92 D 1.000 123 /f1 NF f1 SF [<00100030003000600060006000C000C000C00180018001800300030003000600060006000C000C000C001800180018003000 30003000600060006000C000C000C000> 16 33 -2 8 16.604] 110 D [<00F001800300060006000600060006000600060006000600060006000C001800F00018000C00060006000600060006000600 060006000600060006000300018000F0> 16 33 -2 8 16.604] 102 D [ 16 33 -2 8 16.604] 103 D [<0C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C00FFC0FFC00C000C000C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 121 D [<0C000C000C000C000C000C00FFC0FFC00C000C000C000C000C000C0000000C000C000C000C000C000C00FFC0FFC00C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 122 D 1.000 121 /f2 NF f2 SF [<1F8780786F80F02E00F01E00F01E00781E003C1E001F1E0001FE00001E00301E00781E00783C007038001FE000> 24 15 -1 0 18.564] 97 D [<07E01C38380C780C7000F000F000F000F000F0007018783C383C1C1C07F0> 16 15 -1 0 16.973] 99 D [<07F01C18380C78067000F000F000FFFEF00EF00E700E700C381C1C3807E0> 16 15 -1 0 17.503] 101 D [ 8 23 -1 0 10.608] 108 D [ 16 15 -1 0 15.728] 114 D [ 16 15 -1 0 15.063] 115 D [<0F801C403C603C603C603C603C003C003C003C003C003C003C00FFC03FC01C001C000C000C000C000C00> 16 21 -1 0 14.851] 116 D [ 24 15 -1 0 20.155] 120 D [ 16 21 -2 0 19.095] 50 D 1.000 127 /f3 NF f3 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 66 D [<07C00FE01C303838701C701C601CE000E000E000E000E000E000601C701C701C383C1C7C0FFC07CC> 16 20 -1 0 17.434] 67 D [ 16 20 -1 0 17.434] 68 D [ 16 20 -1 0 17.434] 69 D [ 16 20 -1 0 17.434] 70 D [<07B80FF81878387870387038E038E038E0FCE0FCE000E000E000E03870387038387818780FF80798> 16 20 -1 0 17.434] 71 D [ 16 20 -1 0 17.434] 72 D [ 16 20 -3 0 17.434] 73 D [<3E007F00E180E1C041C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF01FF0> 16 20 -2 0 17.434] 74 D [ 16 20 -1 0 17.434] 75 D [ 16 20 -1 0 17.434] 76 D [ 16 20 -1 0 17.434] 77 D [ 16 20 -1 0 17.434] 78 D [<3FC07FE070E0E070E070E070E070E070E070E070E070E070E070E070E070E070E07070E07FE03FC0> 16 20 -2 0 17.434] 79 D [ 16 20 -1 0 17.434] 80 D [<00F000E000E001E001C03FC07FE073E0E7F0E770E770E070E070E070E070E070E070E070E070E070E070E07070E07FE03FC0> 16 25 -2 5 17.434] 81 D [ 16 20 -1 0 17.434] 82 D [ 16 20 -2 0 17.434] 83 D [<1FF01FF00380038003800380038003800380038003800380038003800380E39CE39CE39CFFFC7FFC> 16 20 -1 0 17.434] 84 D [<03C007E00C301C38381C381C381C381C381C381C381C381C381C381C381C381C381C381CFE7FFE7F> 16 20 0 0 17.434] 85 D [<0780078007800CC00CC00CC00CC00CC01CE01CE01CE01CE01CE038703870387038707878FCFCFCFC> 16 20 -1 0 17.434] 86 D [<3CF03CF03CF034B034B03CF03FF07FF87FF87FF87FF87FF8703870387038703870387038F87CF87C> 16 20 -1 0 17.434] 87 D [ 16 20 -1 0 17.434] 88 D [<0FE00FE0038003800380038003800380038007C007C00EC00EE00CE01CE01C7038703870FCFCFCFC> 16 20 -1 0 17.434] 89 D [ 16 20 -2 0 17.434] 90 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [<7E00FF00E38041C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C03FC03FC00000000000000180 03C003C00180> 16 28 -2 7 17.434] 106 D [ 16 20 -1 0 17.434] 107 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [<00FE00FE003800380038003800380FB81FF8387870786038E038E038E038E0386038707838781FF807B8> 16 21 -1 7 17.434] 113 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<078007800FC00CC00CC00CC01CE01CE01CE01CE038703870FCFCFCFC> 16 14 -1 0 17.434] 118 D [<18E03DF03DF035B035B035B037B037B03030703870387038FFFCFFFC> 16 14 -1 0 17.434] 119 D [ 16 14 -1 0 17.434] 120 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [ 16 14 -1 0 17.434] 122 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0FC03FE07070E038E01C401C001C001C0038007007E007E00070003000382038703870703FE00FC0> 16 20 -1 0 17.434] 51 D [<07FC07FC00E000E000E000E0FFFCFFFCE0E070E030E038E018E01CE00CE006E006E002E003E001E0> 16 20 -1 0 17.434] 52 D [<1F003F8071C0E0E0E070E07040700070006060E07FC07F007000700070007000700070007FE07FE0> 16 20 -2 0 17.434] 53 D [<07C01FE038707038701C601CE01CE01CE01CF038F870EFE0E7C070007000303838381E3807F003E0> 16 20 -1 0 17.434] 54 D [<04000E000E000E000E000E0006000700070007000380038001C001C000E00060E070E038FFFCFFFCE000> 16 21 -1 0 17.434] 55 D [<0FC03FF078787038E01CE01CE01CE01C7038387007800FC03870703870387038703838701FE00FC0> 16 20 -1 0 17.434] 56 D [<1F003FC070E07070703000380018001C0F9C1FFC387C703CE01CE01CE018E038703838701FE00F80> 16 20 -1 0 17.434] 57 D [<0200060006001F003FC076E0E620E630E6304630067006E00FC03F807F007600C620C670C670467076E03FC00F8006000600 0200> 16 26 -2 3 17.434] 36 D [<3C707FF8679CE39CE788EFC0EFC07DC03CE01CE03CE03E703F7C3B7C3B803B803B801B801F000E00> 16 20 -1 0 17.434] 38 D [<60F0F0600000000070F0F0F0F0F0F0F0F0F0F060> 8 20 -6 0 17.434] 33 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<80C060303018181878F8F060> 8 12 -6 -8 17.434] 39 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<60F0F06000000000000060F0F060> 8 14 -6 0 17.434] 58 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [ 16 26 -6 3 17.434] 91 D [ 16 26 -1 3 17.434] 93 D [<4080F3C0FFC03F000C00> 16 5 -3 -15 17.434] 94 D [<4600EF003DC01880> 16 4 -3 -16 17.434] 126 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00300070007000E000E001C001C001C0038003800700070007000E000E000E001C001C0038003800380070007000E000E000 C000> 16 26 -2 3 17.434] 92 D [ 8 26 -7 3 17.434] 124 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 123 /f4 NF f4 SF [ 24 23 -1 0 27.027] 65 D [ 24 23 -1 0 27.996] 75 D [ 24 23 -1 0 27.027] 78 D [<87C0D830E018C008800C800C800C000C001C003803F81FF03FE07F00F000E000C008C008C0084018603830580F88> 16 23 -2 0 20.294] 83 D [ 24 17 -1 0 20.368] 97 D [<01F8000E0600180100300100700080600080E00000E00000E00000E00000E000006000807000803001801803800E058001F8 80> 24 17 -1 0 19.629] 99 D [ 24 17 -1 0 20.737] 100 D [ 24 17 -1 0 20.368] 104 D [ 16 17 0 0 10.036] 105 D [ 24 17 -1 0 24.795] 109 D [ 24 17 -1 0 20.368] 110 D [<03F0000E1C00180600300300700380600180E001C0E001C0E001C0E001C0E001C06001807003803003001806000E1C0003F0 00> 24 17 -1 0 21.105] 111 D [<0FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00081C08081C08081C08081C080C1C180FFFF 80> 24 17 -1 0 19.629] 116 D [<03E0000E18001C0400180400380200380200380200380200380200380200380200380200380200380200380200380700FE0F 80> 24 17 -1 0 20.368] 117 D [ 16 17 -1 0 16.678] 122 D 1.000 121 /f5 NF f5 SF [<03F00FFC1F063C037C007800F800F800F800F800F800F800781C783E3C3E1E3E0FFC03F8> 16 18 -2 0 20.367] 99 D [<01FC000FFF001F01803E00C07C0000780000F80000F80000F80000FFFFC0FFFFC0F803C07803C07C03803C07801E0F000FFE 0003F800> 24 18 -1 0 21.004] 101 D [ 16 18 -1 0 18.873] 114 D [ 16 18 -2 0 18.076] 115 D [<03E00FF00F101F181F181F181F181F001F001F001F001F001F001F001F001F00FFF8FFF83F000F0007000700030003000300> 16 25 -1 0 17.822] 116 D [ 24 18 -1 0 24.186] 120 D [ 24 26 -2 0 22.913] 50 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f5 SF 479 151 p (src2tex)s f0 SF (*)s 45 r (version)s 10 r (2.12)s 33 r (\(Sep)s 11 r (9,)s 11 r (1996\))s f4 SF 466 230 p (Kazuo)s 13 r (Amano)s f1 SF (y)s f4 SF 12 r (and)s 13 r (Shinichi)s 13 r (Nomoto)s f1 SF (z)s f3 SF 0 348 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 467 p (/*)s 17 r 645 1 ru f0 SF 656 r (text2tex.c)s 11 r 645 1 ru f3 SF 662 r (*/)s 0 587 p (#include)s 17 r ()s 0 627 p (#include)s 17 r ("src2tex.h")s 0 706 p (extern)s 17 r (int)s 18 r (TXT)s 2 r 10 1 ru 15 r (flag;)s 0 746 p (extern)s 17 r (int)s 18 r (BAS)s 2 r 10 1 ru 15 r (flag;)s 0 786 p (extern)s 17 r (int)s 18 r (C)s 2 r 10 1 ru 15 r (flag;)s 0 826 p (extern)s 17 r (int)s 18 r (CBL)s 2 r 10 1 ru 15 r (flag;)s 0 866 p (extern)s 17 r (int)s 18 r (F77)s 2 r 10 1 ru 15 r (flag;)s 0 906 p (extern)s 17 r (int)s 18 r (HTML)s 2 r 10 1 ru 15 r (flag;)s 0 946 p (extern)s 17 r (int)s 18 r (JAVA)s 2 r 10 1 ru 15 r (flag;)s 0 985 p (extern)s 17 r (int)s 18 r (LISP)s 2 r 10 1 ru 15 r (flag;)s 0 1025 p (extern)s 17 r (int)s 18 r (MAKE)s 2 r 10 1 ru 15 r (flag;)s 0 1065 p (extern)s 17 r (int)s 18 r (PAS)s 2 r 10 1 ru 15 r (flag;)s 0 1105 p (extern)s 17 r (int)s 18 r (PERL)s 2 r 10 1 ru 15 r (flag;)s 0 1145 p (extern)s 17 r (int)s 18 r (SH)s 2 r 10 1 ru 15 r (flag;)s 0 1185 p (extern)s 17 r (int)s 18 r (TCL)s 2 r 10 1 ru 15 r (flag;)s 0 1264 p (extern)s 17 r (int)s 18 r (ASR)s 2 r 10 1 ru 15 r (flag;)s 0 1304 p (extern)s 17 r (int)s 18 r (MAC)s 2 r 10 1 ru 15 r (flag;)s 0 1344 p (extern)s 17 r (int)s 18 r (MAP)s 2 r 10 1 ru 15 r (flag;)s 0 1384 p (extern)s 17 r (int)s 18 r (MAT)s 2 r 10 1 ru 15 r (flag;)s 0 1424 p (extern)s 17 r (int)s 18 r (MLAB)s 2 r 10 1 ru 15 r (flag;)s 0 1464 p (extern)s 17 r (int)s 18 r (MPAD)s 2 r 10 1 ru 15 r (flag;)s 0 1503 p (extern)s 17 r (int)s 18 r (RED)s 2 r 10 1 ru 15 r (flag;)s 0 1583 p (extern)s 17 r (int)s 18 r (Page)s 2 r 10 1 ru 15 r (Len)s 2 r 10 1 ru 16 r (Max;)s 0 1623 p (extern)s 17 r (int)s 18 r (Htab)s 2 r 10 1 ru 15 r (Size;)s 0 1663 p (extern)s 17 r (int)s 18 r (Vtab)s 2 r 10 1 ru 15 r (Size;)s 0 1703 p (extern)s 17 r (char)s 18 r (*TextModeFont;)s 0 1743 p (extern)s 17 r (char)s 18 r (*TeXModeFont;)s 0 1822 p (extern)s 17 r (int)s 18 r (*dec)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(\);)s 0 1860 p 480 1 ru f0 SF 33 1897 p (*)s 17 r (Permission)s 8 r (to)s 9 r (use,)s 10 r (copy)s -3 r (,)s 9 r (and)s 9 r (mo)s 1 r (dify)s 9 r (this)s 10 r (softw)s -1 r (are)s 8 r (and)s 9 r (its)s 10 r (do)s 1 r (cumentation)s 8 r (is)s 9 r (granted)s 9 r (under)s 9 r (no)s 9 r (conditions.)s 0 1937 p (How)s -1 r (ev)s -1 r (er,)s 11 r (the)s 12 r (authors)s 11 r (would)s 11 r (b)s 1 r (e)s 12 r (very)s 11 r (happy)s 10 r (if)s 12 r (users)s 12 r (could)s 11 r (inform)s 12 r (any)s 11 r (mo)s 1 r (di\014cations)s 12 r (to)s 11 r (k)s -1 r (amano@tansei.cc.u-)s 0 1977 p (tokyo.ac.jp.)s 14 r (Since)s 11 r (src2tex)s 11 r (is)s 11 r (a)s 11 r (free)s 11 r (softw)s -1 r (are,)s 10 r (there)s 11 r (is)s 12 r (no)s 11 r (warran)s -1 r (t)s -1 r (y)s 10 r (of)s 11 r (any)s 10 r (kind)s 11 r (for)s 11 r (the)s 11 r (program.)s f1 SF 33 2016 p (y)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -3 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -1 r (AN)s 10 r (\(k)s -1 r (amano@)s 0 2056 p (p)s 1 r (o.iijnet.or.jp\))s f1 SF 33 2096 p (z)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -2 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -2 r (AN)s 11 r (\(m93093@)s 0 2136 p (crescent.josai.ac.jp\))s 1256 2216 p (text2tex.c)s 66 r (page)s 11 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 0 33 p (extern)s 17 r (int)s 18 r (*inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(\);)s 0 74 p (extern)s 17 r (int)s 18 r (*fgetc2buffer\(\);)s 0 114 p (extern)s 17 r (int)s 18 r (*get)s 2 r 10 1 ru 15 r (phrase\(\);)s 0 155 p (extern)s 17 r (int)s 18 r (search)s 2 r 10 1 ru 15 r (line\(\);)s 0 195 p (extern)s 17 r (int)s 18 r (get)s 2 r 10 1 ru 15 r (comment)s 2 r 10 1 ru 16 r (flag\(\);)s 0 236 p (extern)s 17 r (int)s 18 r (get)s 2 r 10 1 ru 15 r (tex)s 2 r 10 1 ru 16 r (flag\(\);)s 0 276 p (extern)s 17 r (int)s 18 r (str)s 2 r 10 1 ru 15 r (cmp\(\);)s 0 317 p (extern)s 17 r (int)s 18 r (parse)s 2 r 10 1 ru 15 r (options\(\);)s 0 398 p (extern)s 17 r (void)s 18 r (merge)s 2 r 10 1 ru 15 r (ntt)s 2 r 10 1 ru 16 r (ascii\(\);)s 0 438 p (extern)s 17 r (flag)s 3 r 10 1 ru 15 r (char)s 17 r (*get)s 2 r 10 1 ru 16 r (flag)s 2 r 10 1 ru 15 r (char\(\);)s 0 479 p (extern)s 17 r (void)s 18 r (fprintf)s 2 r 10 1 ru 15 r (documentstyle\(\);)s 0 519 p (extern)s 17 r (void)s 18 r (fprintf)s 2 r 10 1 ru 15 r (footline\(\);)s 0 560 p (extern)s 17 r (void)s 18 r (input)s 2 r 10 1 ru 15 r (user)s 2 r 10 1 ru 16 r (style\(\);)s 0 600 p (extern)s 17 r (int)s 18 r (choose)s 2 r 10 1 ru 15 r (tt)s 2 r 10 1 ru 16 r (font\(\);)s 0 641 p (extern)s 17 r (void)s 18 r (fprintf)s 2 r 10 1 ru 15 r (line)s 2 r 10 1 ru 16 r (number\(\);)s 0 762 p (/*)s 17 r 551 1 ru f0 SF 561 r (T)s -1 r (ext)s 10 r (to)s 11 r (T)s 750 769 p (E)s 768 762 p (X)s 11 r (translator)s 11 r 551 1 ru f3 SF 568 r (*/)s 0 802 p (/*)s 17 r (Text2tex\(\))s f0 SF 17 r (simply)s 12 r (translates)s 12 r (text)s 12 r (data)s 12 r (into)s 12 r (T)s 737 810 p (E)s 755 802 p (X)s 13 r (data.)s 17 r (The)s 12 r (most)s 13 r (imp)s 1 r (ortant)s 11 r (parts)s 12 r (of)s 12 r (this)s 12 r (function)s 12 r (are)s 0 842 p (font)s 10 r (selection)s 11 r (and)s 11 r (mo)s 1 r (de)s 11 r (changes.)s 13 r (Typewriter)s 11 r (font)s 10 r (is)s 11 r (used)s 11 r (in)s 11 r (text)s 11 r (mo)s 1 r (de)s 11 r (and)s 11 r (roman)s 11 r (font)s 10 r (is)s 11 r (chosen)s 10 r (otherwise.)s 0 882 p (One)s 11 r (of)s 11 r (three)s 11 r (mo)s 1 r (des,)s 11 r (text)s 11 r (mo)s 1 r (de,)s 11 r (quasi-T)s 577 889 p (E)s 595 882 p (X)s 12 r (mode)s 11 r (and)s 12 r (T)s 804 889 p (E)s 822 882 p (X)s 11 r (mo)s 1 r (de,)s 11 r (is)s 11 r (selected)s 12 r (according)s 11 r (to)s f3 SF 133 923 p (get)s 2 r 10 1 ru 10 r (flag)s 2 r 10 1 ru 11 r (char\(fptr\)->flag)s f0 SF (=0,)s 11 r (1,)s 11 r (2)s 0 963 p (resp)s 1 r (ectively)s -3 r (.)s 15 r (A)s 11 r (character)s f3 SF 22 r (get)s 2 r 10 1 ru 11 r (flag)s 2 r 10 1 ru 10 r (char\(fptr\)->character)s f0 SF 29 r (is)s 11 r (translated)s 12 r (into)s 10 r (an)s 12 r (approprite)s 11 r (sequence)s 11 r (of)s 0 1003 p (characters.)s 13 r (Esp)s 1 r (ecially)s -2 r (,)s 8 r (in)s 9 r (T)s 387 1010 p (E)s 405 1003 p (X)s 9 r (mo)s 1 r (de,)s 9 r (every)s 7 r (character)s 8 r (got)s 8 r (from)s 9 r (input)s 8 r (\014le)s 9 r (is)s 8 r (passed)s 9 r (to)s 8 r (output)s 9 r (\014le)s 8 r (transparently)s -2 r (.)s f3 SF 0 1043 p (*/)s 0 1124 p (void)s 17 r (text2tex\(cptr,)s 18 r (fptr\))s 0 1164 p (char)s 17 r (*cptr[];)s 0 1205 p (FILE)s 17 r (*fptr[];)s 0 1245 p ({)s 70 1286 p (int)s 17 r (char)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 261 r (/*)s f0 SF 17 r (character)s 10 r (counter)s f3 SF 522 r (*/)s 70 1326 p (long)s 17 r (line)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 244 r (/*)s f0 SF 16 r (line)s 11 r (counter)s f3 SF 605 r (*/)s 70 1367 p (int)s 17 r (page)s 2 r 10 1 ru 16 r (len)s 17 r (=)s 18 r (1;)s 331 r (/*)s f0 SF 16 r (lines/page)s 11 r (counter)s f3 SF 509 r (*/)s 70 1407 p (int)s 17 r (qt)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 296 r (/*)s f0 SF 16 r (single)s 12 r (quotation)s 11 r (counter)s f3 SF 424 r (*/)s 70 1448 p (int)s 17 r (dqt)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 278 r (/*)s f0 SF 17 r (double)s 11 r (quotation)s 11 r (counter)s f3 SF 410 r (*/)s 70 1488 p (int)s 17 r (space)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 244 r (/*)s f0 SF 16 r (space)s 11 r (counter)s f3 SF 579 r (*/)s 70 1529 p (int)s 17 r (prev)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 313 r (/*)s f0 SF 17 r (previous)s 11 r (\015ag)s f3 SF 592 r (*/)s 70 1569 p (int)s 17 r (prev)s 2 r 10 1 ru 16 r (char)s 17 r (=)s 18 r (0x20;)s 261 r (/*)s f0 SF 17 r (previous)s 11 r (character)s f3 SF 509 r (*/)s 70 1610 p (int)s 17 r (bf)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 348 r (/*)s f0 SF 17 r (b)s 1 r (old)s 11 r (face)s 11 r (\015ag)s f3 SF 582 r (*/)s 70 1650 p (int)s 17 r (skip)s 2 r 10 1 ru 16 r (amount;)s 348 r (/*)s f0 SF 17 r (skip)s 11 r (amount)s 10 r (of)s 11 r (tabulation)s f3 SF 399 r (*/)s 70 1691 p (int)s 17 r (stat)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 313 r (/*)s f0 SF 17 r (status)s 11 r (\015ag)s f3 SF 626 r (*/)s 70 1731 p (int)s 17 r (nl)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 348 r (/*)s f0 SF 17 r (new)s 11 r (line)s 11 r (\015ag)s f3 SF 594 r (*/)s 70 1772 p (int)s 17 r (rm)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 348 r (/*)s f0 SF 17 r (cmr)s 11 r (font)s 10 r (\015ag)s f3 SF 590 r (*/)s 70 1812 p (int)s 17 r (tt)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 348 r (/*)s f0 SF 17 r (cmtt)s 10 r (font)s 10 r (\015ag)s f3 SF 578 r (*/)s 70 1853 p (int)s 17 r (TT)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 348 r (/*)s f0 SF 17 r (choose)s 11 r (cmtt)s 10 r (font)s 10 r (in)s 11 r (quasi-T)s 1144 1860 p (E)s 1162 1853 p (X)s 12 r (mode)s 12 r (?)s f3 SF 221 r (*/)s 70 1893 p (int)s 17 r (doc)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 331 r (/*)s f0 SF 16 r (do)s 1 r (cument)s 10 r (style)s 11 r (\015ag)s f3 SF 493 r (*/)s 70 1934 p (int)s 17 r (warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (=)s 18 r (0;)s 296 r (/*)s f0 SF 16 r (circumven)s -1 r (ting)s 10 r (T)s -2 r (eX)s 10 r (mo)s 1 r (de)s 11 r (warning)s 10 r (\015ag)s f3 SF 223 r (*/)s 70 1974 p (int)s 17 r (warn)s 2 r 10 1 ru 16 r (flag2)s 17 r (=)s 18 r (0;)s 296 r (/*)s f0 SF 16 r (to)s 1 r (o)s 11 r (long)s 12 r (lines)s 11 r (warning)s 10 r (\015ag)s f3 SF 392 r (*/)s 70 2055 p (int)s 17 r (i,)s 18 r (*cptr1,)s 17 r (*cptr2,)s 17 r (*cptr3,)s 18 r (*cptr4,)s 17 r (*cptr5,)s 18 r (*cptr6,)s 17 r (*cptr7;)s 70 2095 p (flag)s 2 r 10 1 ru 15 r (char)s 18 r (*ptr;)s f0 SF 1256 2216 p (text2tex.c)s 66 r (page)s 11 r (2)s EP pstopssaved restore %%Page: pstops 3 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 70 74 p (while)s 17 r (\(\(\(ptr)s 18 r (=)s 17 r (get)s 2 r 10 1 ru 16 r (flag)s 2 r 10 1 ru 15 r (char\(fptr\)\)->character\))s 17 r (!=)s 18 r (EOF\))s 105 114 p ({)s 0 195 p (/*)s 17 r 597 1 ru f0 SF 608 r (opening)s 12 r (message)s 11 r 597 1 ru f3 SF 613 r (*/)s 0 235 p (/*)s f0 SF 17 r (Here)s f2 SF 11 r (src2tex)s f0 SF 11 r ([resp.)s f2 SF 15 r (src2latex)s f0 SF (])s 11 r (output)s 11 r (preliminary)s 11 r (statement)s 10 r (of)s 11 r (T)s 1019 243 p (E)s 1038 235 p (X)s f3 SF 462 r (*/)s 139 316 p (if)s 18 r (\(stat)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 174 357 p ({)s 209 397 p (++stat)s 2 r 10 1 ru 16 r (flag;)s 209 438 p (/*)s f0 SF 17 r (set)s 16 r (TT)s 3 r 10 1 ru 15 r (\015ag)s 16 r (at)s 17 r (the)s 17 r (b)s 1 r (eginning)s 16 r (of)s 17 r (translation)s f3 SF 606 r (*/)s 209 478 p (TT)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (choose)s 2 r 10 1 ru 15 r (tt)s 2 r 10 1 ru 15 r (font\(ptr->buffer\);)s 0 518 p (#ifndef)s 17 r (DEBUGGING)s 209 559 p (/*)s f0 SF 17 r (translating)s 16 r (message)s f3 SF 975 r (*/)s 0 599 p (#ifdef)s 17 r (LATEX)s 209 640 p (fprintf\(stderr,)s 18 r ("src2latex:)s 17 r (translating)s 18 r (..."\);)s 0 680 p (#else)s 209 721 p (fprintf\(stderr,)s 18 r ("src2tex:)s 17 r (translating)s 18 r (..."\);)s 0 761 p (#endif)s 0 802 p (#endif)s 0 842 p (#ifndef)s 17 r (PLAIN)s 0 882 p (#ifdef)s 17 r (LATEX)s 209 923 p (/*)s f0 SF 17 r (LaT)s -2 r (eX)s 16 r (do)s 1 r (cumentst)s -1 r (yle)s f3 SF 940 r (*/)s 209 963 p (fprintf)s 2 r 10 1 ru 16 r (documentstyle\(ptr->buffer,)s 17 r (fptr\);)s 0 1004 p (#else)s 209 1044 p (/*)s f0 SF 17 r (T)s -2 r (eX)s 16 r (fo)s 1 r (otline)s f3 SF 1078 r (*/)s 209 1085 p (fprintf)s 2 r 10 1 ru 16 r (footline\(cptr,)s 17 r (fptr\);)s 0 1125 p (#endif)s 209 1165 p (/*)s f0 SF 17 r (baselineskip)s 16 r (amount)s f3 SF 16 r (*/)s 209 1206 p (if)s 18 r (\(Page)s 2 r 10 1 ru 15 r (Len)s 2 r 10 1 ru 16 r (Max)s 17 r (>=)s 17 r (0\))s 244 1246 p ({)s 279 1287 p (fprintf\(fptr[1],)s 17 r ("\\n"\);)s 279 1327 p (fprintf\(fptr[1],)s 17 r ("\\\\baselineskip=0pt\\n"\);)s 244 1368 p (})s 0 1408 p (#endif)s 209 1449 p (/*)s f0 SF 17 r (input)s 16 r (user's)s 17 r (style)s 16 r (\014le)s f3 SF 946 r (*/)s 209 1489 p (fprintf\(fptr[1],)s 18 r ("\\n"\);)s 209 1529 p (input)s 2 r 10 1 ru 16 r (user)s 2 r 10 1 ru 15 r (style\(fptr\);)s 209 1610 p (/*)s f0 SF 17 r (absorb)s 16 r (di\013erences)s 17 r (b)s 1 r (etw)s -1 r (een)s 16 r (ASCI)s 1 r (I)s 16 r (and)s 17 r (NTT)s 16 r (JT)s -1 r (eX)s f3 SF 503 r (*/)s 0 1651 p (#ifdef)s 17 r (ASCII)s 0 1691 p (#ifdef)s 17 r (NTT)s 209 1732 p (/*)s f0 SF 17 r (NTT+ASCI)s 1 r (I)s f3 SF 1073 r (*/)s 209 1772 p (fprintf\(fptr[1],)s 18 r ("\\n"\);)s 209 1812 p (merge)s 2 r 10 1 ru 16 r (ntt)s 2 r 10 1 ru 15 r (ascii\(fptr\);)s 0 1853 p (#endif)s 0 1893 p (#else)s 0 1934 p (#ifdef)s 17 r (NTT)s 209 1974 p (/*)s f0 SF 17 r (NTT)s f3 SF 1191 r (*/)s 209 2015 p (fprintf\(fptr[1],)s 18 r ("\\n"\);)s 209 2055 p (merge)s 2 r 10 1 ru 16 r (ntt)s 2 r 10 1 ru 15 r (ascii\(fptr\);)s 0 2096 p (#endif)s 0 2136 p (#endif)s f0 SF 1256 2216 p (text2tex.c)s 66 r (page)s 11 r (3)s EP pstopssaved restore %%Page: pstops 4 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 209 33 p (fprintf\(fptr[1],)s 18 r ("\\n"\);)s 209 74 p (fprintf\(fptr[1],)s 18 r ("%s\\n",)s 17 r (TextModeFont\);)s 209 114 p (fprintf\(fptr[1],)s 18 r ("\\n"\);)s 209 155 p (if)s 18 r (\(Page)s 2 r 10 1 ru 15 r (Len)s 2 r 10 1 ru 16 r (Max)s 17 r (<)s 17 r (0\))s 244 195 p (fprintf\(fptr[1],)s 18 r ("\\\\noindent\\n"\);)s 209 235 p (else)s 244 276 p ({)s 0 316 p (#ifdef)s 17 r (LATEX)s 279 357 p (fprintf\(fptr[1],)s 17 r ("\\\\hfill"\);)s 279 397 p (fprintf)s 2 r 10 1 ru 15 r (line)s 3 r 10 1 ru 15 r (number\(fptr,)s 17 r (line)s 2 r 10 1 ru 16 r (counter\);)s 0 438 p (#else)s 279 478 p (fprintf\(fptr[1],)s 17 r ("\\\\hfill\\n\\n\\\\item{\\\\tt)s 18 r (%d:\\\\)s 17 r (}\\n",)s 418 518 p (line)s 3 r 10 1 ru 15 r (counter)s 17 r (+)s 18 r (1\);)s 0 559 p (#endif)s 244 599 p (})s 0 640 p (#ifdef)s 17 r (LATEX)s 209 680 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exists)s 11 r (a)s 11 r (string)s 11 r (")s f1 SF (fn)s f0 SF (null)s f1 SF (g)s f0 SF (")s 10 r (then)s 11 r (skip)s 11 r (it.)s f3 SF 608 r (*/)s 209 721 p (if)s 18 r (\(\(char)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(doc)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\)\))s 244 761 p ({)s 279 802 p (if)s 17 r (\(BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 842 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("'{\\null}"\))s 384 882 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("1'{\\null}"\))s 384 923 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("10'{\\null}"\))s 384 963 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("100'{\\null}"\))s 384 1004 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("1000'{\\null}"\))s 384 1044 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("rem{\\null}"\))s 384 1085 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("1rem{\\null}"\))s 384 1125 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("10rem{\\null}"\))s 384 1165 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("100rem{\\null}"\))s 384 1206 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("1000rem{\\null}"\)\))s 349 1246 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1287 p (if)s 17 r (\(C)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1327 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("/*{\\\\null}*/"\))s 384 1368 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("//{\\\\null}"\)\))s 349 1408 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1449 p (if)s 17 r (\(CBL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1489 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("*{\\\\null}"\))s 384 1529 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("/{\\\\null}"\)\))s 349 1570 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1610 p (if)s 17 r (\(F77)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1651 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("c{\\\\null}"\))s 384 1691 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("*{\\\\null}"\)\))s 349 1732 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1772 p (if)s 17 r (\(LISP)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1812 p ({)s 349 1853 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r (";{\\\\null}"\)\))s 384 1893 p (nl)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 1934 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r (";;{\\\\null}"\)\))s 384 1974 p (nl)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 2015 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r (";;;{\\\\null}"\)\))s 384 2055 p (nl)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 2096 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r (";;;;{\\\\null}"\)\))s 384 2136 p (nl)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s f0 SF 1256 2216 p (text2tex.c)s 66 r (page)s 11 r (4)s EP pstopssaved restore %%Page: pstops 5 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 349 33 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r (";;;;;{\\\\null}"\)\))s 384 74 p (nl)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 314 114 p (})s 279 155 p (if)s 17 r (\(MAKE)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 195 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("#{\\\\null}"\)\))s 349 235 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 276 p (if)s 17 r (\(PAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 316 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("{{\\\\null}}"\))s 384 357 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("\(*{\\\\null}*\)"\)\))s 349 397 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 438 p (if)s 17 r (\(PERL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 478 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("#{\\\\null}"\)\))s 349 518 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 559 p (if)s 17 r (\(SH)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 599 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("#{\\\\null}"\)\))s 349 640 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 680 p (if)s 17 r (\(TCL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 721 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("#{\\\\null}"\)\))s 349 761 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 802 p (if)s 17 r (\(MAP)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 842 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("#{\\\\null}"\)\))s 349 882 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 923 p (if)s 17 r (\(MAT)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 963 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("\(*{\\\\null}*\)"\)\))s 349 1004 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1044 p (if)s 17 r (\(MLAB)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1085 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("#{\\\\null}"\))s 384 1125 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("%{\\\\null}"\)\))s 349 1165 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1206 p (if)s 17 r (\(RED)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1246 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("%{\\\\null}"\))s 384 1287 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("COMMENT{\\\\null};"\))s 384 1327 p (||)s 17 r (search)s 2 r 10 1 ru 15 r (line\(ptr->buffer,)s 18 r ("comment{\\\\null};"\)\))s 349 1368 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1408 p (if)s 17 r (\(nl)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1449 p ({)s 349 1489 p (++doc)s 2 r 10 1 ru 15 r (flag;)s 349 1529 p (while)s 17 r (\(\(ptr->character)s 18 r (!=)s 17 r (EOF\))s 471 1570 p (&&)s 17 r (\(\(char\)ptr->character)s 18 r (!=)s 17 r ('\\n'\)\))s 384 1610 p (ptr)s 17 r (=)s 17 r (get)s 3 r 10 1 ru 15 r (flag)s 2 r 10 1 ru 15 r (char\(fptr\);)s 349 1651 p (continue;)s 314 1691 p (})s 244 1732 p (})s 0 1772 p (#endif)s 174 1812 p (})s 139 1853 p (if)s 18 r (\(\(char)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(line)s 2 r 10 1 ru 16 r (counter)s 17 r (<=)s 17 r (3\))s 209 1893 p (&&)s 18 r (\(doc)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\)\))s 174 1934 p ({)s 209 1974 p (if)s 18 r (\(CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 244 2015 p ({)s 279 2055 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("*{\\\\null}"\))s 349 2096 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("/{\\\\null}"\)\))s 314 2136 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s f0 SF 1256 2216 p (text2tex.c)s 66 r (page)s 11 r (5)s EP pstopssaved restore %%Page: pstops 6 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 279 33 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000001*{\\\\null}"\))s 349 74 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000001/{\\\\null}"\)\))s 314 114 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 155 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000002*{\\\\null}"\))s 349 195 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000002/{\\\\null}"\)\))s 314 235 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 276 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000003*{\\\\null}"\))s 349 316 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000003/{\\\\null}"\)\))s 314 357 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 397 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000004*{\\\\null}"\))s 349 438 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000004/{\\\\null}"\)\))s 314 478 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 518 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000010*{\\\\null}"\))s 349 559 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000010/{\\\\null}"\)\))s 314 599 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 640 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000020*{\\\\null}"\))s 349 680 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000020/{\\\\null}"\)\))s 314 721 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 761 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000030*{\\\\null}"\))s 349 802 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000030/{\\\\null}"\)\))s 314 842 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 882 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000040*{\\\\null}"\))s 349 923 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000040/{\\\\null}"\)\))s 314 963 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1004 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000100*{\\\\null}"\))s 349 1044 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000100/{\\\\null}"\)\))s 314 1085 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1125 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000200*{\\\\null}"\))s 349 1165 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000200/{\\\\null}"\)\))s 314 1206 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1246 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000300*{\\\\null}"\))s 349 1287 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000300/{\\\\null}"\)\))s 314 1327 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 279 1368 p (if)s 17 r (\(search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000400*{\\\\null}"\))s 349 1408 p (||)s 17 r (search)s 2 r 10 1 ru 16 r (line\(ptr->buffer,)s 17 r ("000400/{\\\\null}"\)\))s 314 1449 p (nl)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (1;)s 244 1489 p (})s 209 1529 p (if)s 18 r (\(nl)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 244 1570 p ({)s 279 1610 p (++doc)s 2 r 10 1 ru 15 r (flag;)s 279 1651 p (while)s 17 r (\(\(ptr->character)s 18 r (!=)s 17 r (EOF\))s 401 1691 p (&&)s 17 r (\(\(char\)ptr->character)s 18 r (!=)s 17 r ('\\n'\)\))s 314 1732 p (ptr)s 17 r (=)s 18 r (get)s 2 r 10 1 ru 15 r (flag)s 2 r 10 1 ru 16 r (char\(fptr\);)s 279 1772 p (continue;)s 244 1812 p (})s 174 1853 p (})s 139 1893 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exits)s 11 r (a)s 11 r (COBOL)s 11 r (comment)s 11 r (sign)s f3 SF 11 r (/)s f0 SF 11 r (,)s f2 SF 11 r (src2tex)s f0 SF 11 r (output)s 11 r (page)s 11 r (eject)s 11 r (co)s 1 r (de.)s f3 SF 249 r (*/)s 139 1934 p (if)s 18 r (\(\(ptr->flag)s 17 r (==)s 18 r (1\))s 209 1974 p (&&)s 18 r (\(CBL)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 17 r (&&)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 2015 p ({)s 209 2055 p (cptr1)s 18 r (=)s 17 r (ptr->buffer;)s 209 2096 p (cptr2)s 18 r (=)s 17 r (inc)s 2 r 10 1 ru 16 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 209 2136 p (cptr3)s 18 r (=)s 17 r (inc)s 2 r 10 1 ru 16 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr2\);)s f0 SF 1256 2216 p (text2tex.c)s 66 r (page)s 11 r (6)s EP pstopssaved restore %%Page: pstops 7 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 209 33 p (cptr4)s 18 r (=)s 17 r (inc)s 2 r 10 1 ru 16 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr3\);)s 209 74 p (cptr5)s 18 r (=)s 17 r (inc)s 2 r 10 1 ru 16 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr4\);)s 209 114 p (cptr6)s 18 r (=)s 17 r (inc)s 2 r 10 1 ru 16 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr5\);)s 209 155 p (cptr7)s 18 r (=)s 17 r (inc)s 2 r 10 1 ru 16 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr6\);)s 209 195 p (if)s 18 r (\(*cptr7)s 17 r (==)s 18 r ('/'\))s 244 235 p (fprintf\(fptr[1],)s 18 r ("\\\\vfill\\\\eject\\n\\n\\\\noindent\\n"\);)s 174 276 p (})s 139 316 p (if)s 18 r (\(\(prev)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (1\))s 18 r (&&)s 17 r (\(ptr->flag)s 18 r (==)s 17 r (0\)\))s 174 357 p ({)s 209 397 p (fprintf\(stderr,)s 349 438 p ("\\nError:)s 17 r (unexpected)s 18 r (end)s 17 r (of)s 17 r (TeX-mode)s 18 r (in)s 17 r (%s\\n",)s 18 r (cptr[0]\);)s 209 478 p (fprintf\(stderr,)s 349 518 p (")s 122 r (illegal)s 17 r (transition)s 18 r (TeX-mode)s 17 r (->)s 17 r (Text-mode\\n"\);)s 209 559 p (exit\(EXIT)s 2 r 10 1 ru 16 r (FAILURE\);)s 174 599 p (})s 0 680 p (/*)s 17 r 621 1 ru f0 SF 632 r (font)s 10 r (selection)s 11 r 621 1 ru f3 SF 638 r (*/)s 139 761 p (if)s 18 r (\(\(prev)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(ptr->flag)s 18 r (>)s 17 r (0\)\))s 174 802 p ({)s 0 842 p (#ifndef)s 17 r (DEBUGGING)s 209 882 p (/*)s f0 SF 17 r (i)s f3 SF (-)s f0 SF (am)s f3 SF (-)s f0 SF (working)s 15 r (message)s f3 SF 929 r (*/)s 209 923 p (fprintf\(stderr,)s 18 r ("."\);)s 0 963 p (#endif)s 209 1004 p (/*)s f0 SF 17 r (W)s -2 r (e)s 16 r (usually)s 16 r (select)s f3 SF 17 r (TeXModeFont)s f0 SF 34 r (as)s 16 r (follows.)s f3 SF 607 r (*/)s 209 1044 p (if)s 18 r (\(\(\(C)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 17 r (&&)s 18 r (\(F77)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 296 1085 p (&&)s 18 r (\(MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 296 1125 p (&&)s 18 r (\(PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(SH)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(TCL)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 296 1165 p (&&)s 18 r (\(MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(MLAB)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\)\))s 279 1206 p (||)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (>=)s 18 r (Htab)s 2 r 10 1 ru 15 r (Size\)\))s 244 1246 p ({)s 279 1287 p (if)s 17 r (\(TT)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1327 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TextModeFont\);)s 279 1368 p (else)s 314 1408 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TeXModeFont\);)s 244 1449 p (})s 209 1529 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exists)s 11 r (a)s 11 r (C)s 11 r (comment)s 10 r (area)s 11 r (consists)s 11 r (of)s 12 r (several)s 10 r (quasi-T)s 1122 1537 p (E)s 1140 1529 p (Xmo)s 1 r (de)s 11 r (lines,)s f3 SF 197 r (*/)s 209 1570 p (/*)s f2 SF 17 r (src2tex)s f0 SF 11 r (uses)s 11 r (cmtt)s 10 r (font)s 10 r (instead)s 11 r (of)s 11 r (cmr)s 11 r (font)s f3 SF 640 r (*/)s 209 1610 p (if)s 18 r (\(\(C)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 279 1651 p (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (<)s 18 r (Htab)s 2 r 10 1 ru 15 r (Size\)\))s 244 1691 p ({)s 279 1732 p (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 1772 p (cptr1)s 17 r (=)s 18 r (ptr->buffer;)s 279 1812 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 1853 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr2\);)s 279 1893 p (cptr4)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr3\);)s 279 1934 p (cptr5)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr4\);)s 279 1974 p (cptr6)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr5\);)s 279 2015 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 18 r (i)s 17 r (<)s 18 r (1024;)s 17 r (++i\))s 314 2055 p ({)s 349 2096 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\\\\'\)\))s 384 2136 p ({)s f0 SF 1256 2216 p (text2tex.c)s 66 r (page)s 11 r (7)s EP pstopssaved restore %%Page: pstops 8 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 418 33 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 74 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 114 p (break;)s 384 155 p (})s 0 195 p (#ifdef)s 17 r (LATEX)s 349 235 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('['\)\))s 0 276 p (#else)s 349 316 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('$'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 357 p (#endif)s 384 397 p ({)s 418 438 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 478 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 518 p (break;)s 384 559 p (})s 0 599 p (#ifdef)s 17 r (LATEX)s 349 640 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\('\)\))s 0 680 p (#else)s 349 721 p (if)s 17 r (\(\(*cptr1)s 18 r (!=)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 761 p (#endif)s 384 802 p ({)s 418 842 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 882 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 923 p (break;)s 384 963 p (})s 349 1004 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('*'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('/'\)\))s 418 1044 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\))s 418 1085 p (&&)s 18 r (\(\(*cptr4)s 17 r (==)s 18 r ('/'\))s 17 r (&&)s 18 r (\(*cptr5)s 17 r (==)s 17 r ('*'\)\)\))s 384 1125 p ({)s 418 1165 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1206 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 1246 p (break;)s 384 1287 p (})s 349 1327 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('*'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('/'\)\))s 418 1368 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\))s 418 1408 p (&&)s 18 r (\(\(*cptr4)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr4)s 17 r (==)s 17 r ('\\r'\)\))s 418 1449 p (&&)s 18 r (\(\(*cptr5)s 17 r (==)s 18 r ('/'\))s 17 r (&&)s 18 r (\(*cptr6)s 17 r (==)s 17 r ('*'\)\)\))s 384 1489 p ({)s 418 1529 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1570 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 1610 p (break;)s 384 1651 p (})s 349 1691 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('*'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('/'\)\))s 418 1732 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\)\))s 384 1772 p ({)s 418 1812 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1853 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1893 p (break;)s 384 1934 p (})s 349 1974 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 418 2015 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('/'\))s 17 r (&&)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('*'\)\))s 384 2055 p ({)s 418 2096 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 2136 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=1;)s f0 SF 1256 2216 p (text2tex.c)s 66 r (page)s 11 r (8)s EP pstopssaved restore %%Page: pstops 9 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 418 33 p (break;)s 384 74 p (})s 349 114 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 384 155 p (tt)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 195 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 349 235 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr2\);)s 349 276 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr3\);)s 349 316 p (cptr4)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr4\);)s 349 357 p (cptr5)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr5\);)s 349 397 p (cptr6)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr6\);)s 314 438 p (})s 0 478 p (#ifdef)s 17 r (DEBUGGING)s 279 518 p (if)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 559 p (printf)s 17 r (\("text2tex\(\):)s 18 r (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (is)s 17 r (set)s 17 r (to)s 18 r (%d\\n",)s 17 r (tt)s 2 r 10 1 ru 16 r (flag\);)s 0 599 p (#endif)s 279 640 p (if)s 17 r (\(\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (>)s 18 r (1\))s 17 r (&&)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag1)s 17 r (<=)s 18 r (5\)\))s 314 680 p ({)s 349 721 p (++warn)s 2 r 10 1 ru 15 r (flag1;)s 0 761 p (#ifdef)s 17 r (DEBUGGING)s 349 802 p (printf\("text2tex\(\):)s 17 r (warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (is)s 17 r (set)s 18 r (to)s 17 r (%d\\n",)s 471 842 p (warn)s 2 r 10 1 ru 15 r (flag1\);)s 0 882 p (#endif)s 349 923 p (if)s 17 r (\(warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (>)s 17 r (5\))s 384 963 p ({)s 418 1004 p (if)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag2)s 18 r (<=)s 17 r (2\))s 453 1044 p (fprintf\(stderr,)s 18 r ("\\n"\);)s 418 1085 p (fprintf\(stderr,)s 488 1125 p ("Warning:)s 18 r (It)s 17 r (is)s 17 r (better)s 18 r (to)s 17 r (use)s 18 r (TeX-mode\\n"\);)s 418 1165 p (fprintf\(stderr,)s 488 1206 p (")s 157 r (when)s 17 r (you)s 18 r (write)s 17 r (long)s 18 r (comment)s 17 r (in)s 18 r (C.\\n"\);)s 384 1246 p (})s 314 1287 p (})s 279 1327 p (if)s 17 r (\(\(TT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 349 1368 p (||)s 17 r (\(\(rm)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\)\)\))s 314 1408 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TextModeFont\);)s 279 1449 p (else)s 314 1489 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TeXModeFont\);)s 244 1529 p (})s 209 1610 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exists)s 11 r (a)s 11 r (FOR)s -3 r (TRAN)s 10 r (comment)s 11 r (area)s 11 r (consists)s 11 r (of)s 11 r (several)s 10 r (quasi-T)s 1264 1617 p (E)s 1283 1610 p (X)s f3 SF 217 r (*/)s 209 1651 p (/*)s f0 SF 17 r (mo)s 1 r (de)s 11 r (lines,)s f2 SF 11 r (src2tex)s f0 SF 11 r (uses)s 11 r (cmtt)s 10 r (font)s 10 r (instead)s 11 r (of)s 11 r (cmr)s 12 r (font)s f3 SF 465 r (*/)s 209 1691 p (if)s 18 r (\(\(F77)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 279 1732 p (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (<)s 18 r (Htab)s 2 r 10 1 ru 15 r (Size\)\))s 244 1772 p ({)s 279 1812 p (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 1853 p (cptr1)s 17 r (=)s 18 r (ptr->buffer;)s 279 1893 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 1934 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr2\);)s 279 1974 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 18 r (i)s 17 r (<)s 18 r (1024;)s 17 r (++i\))s 314 2015 p ({)s 349 2055 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\\\\'\)\))s 384 2096 p ({)s 418 2136 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s f0 SF 1256 2216 p (text2tex.c)s 66 r (page)s 11 r (9)s EP pstopssaved restore %%Page: pstops 10 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 418 33 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 74 p (break;)s 384 114 p (})s 0 155 p (#ifdef)s 17 r (LATEX)s 349 195 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('['\)\))s 0 235 p (#else)s 349 276 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('$'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 316 p (#endif)s 384 357 p ({)s 418 397 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 438 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 478 p (break;)s 384 518 p (})s 0 559 p (#ifdef)s 17 r (LATEX)s 349 599 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\('\)\))s 0 640 p (#else)s 349 680 p (if)s 17 r (\(\(*cptr1)s 18 r (!=)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 721 p (#endif)s 384 761 p ({)s 418 802 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 842 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 882 p (break;)s 384 923 p (})s 349 963 p (if)s 17 r (\(\(\(*cptr1)s 18 r (!=)s 17 r ('\\n'\))s 17 r (&&)s 18 r (\(*cptr1)s 17 r (!=)s 18 r ('\\r'\)\))s 418 1004 p (&&)s 18 r (\(\(*cptr2)s 17 r (==)s 18 r ('*'\))s 17 r (||)s 18 r (\(*cptr2)s 17 r (==)s 17 r ('C'\))s 488 1044 p (||)s 18 r (\(*cptr2)s 17 r (==)s 17 r ('c'\)\))s 418 1085 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\)\))s 384 1125 p ({)s 418 1165 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1206 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 1246 p (break;)s 384 1287 p (})s 349 1327 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 384 1368 p (tt)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 1408 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 349 1449 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr2\);)s 349 1489 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr3\);)s 314 1529 p (})s 0 1570 p (#ifdef)s 17 r (DEBUGGING)s 279 1610 p (if)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1651 p (printf)s 17 r (\("text2tex\(\):)s 18 r (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (is)s 17 r (set)s 17 r (to)s 18 r (%d\\n",)s 17 r (tt)s 2 r 10 1 ru 16 r (flag\);)s 0 1691 p (#endif)s 279 1732 p (if)s 17 r (\(\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (>)s 18 r (1\))s 17 r (&&)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag1)s 17 r (<=)s 18 r (5\)\))s 314 1772 p ({)s 349 1812 p (++warn)s 2 r 10 1 ru 15 r (flag1;)s 0 1853 p (#ifdef)s 17 r (DEBUGGING)s 349 1893 p (printf\()s 418 1934 p ("text2tex\(\):)s 18 r (warn)s 2 r 10 1 ru 15 r (flag1)s 18 r (is)s 17 r (set)s 18 r (to)s 17 r (%d\\n",)s 17 r (warn)s 3 r 10 1 ru 15 r (flag1\);)s 0 1974 p (#endif)s 349 2015 p (if)s 17 r (\(warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (>)s 17 r (5\))s 384 2055 p ({)s 418 2096 p (if)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag2)s 18 r (<=)s 17 r (2\))s 453 2136 p (fprintf\(stderr,)s 18 r ("\\n"\);)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (10)s EP pstopssaved restore %%Page: pstops 11 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 418 33 p (fprintf\(stderr,)s 418 74 p ("Warning:)s 18 r (It)s 17 r (is)s 18 r (better)s 17 r (to)s 18 r (use)s 17 r (TeX-mode\\n"\);)s 418 114 p (fprintf\(stderr,)s 418 155 p (")s 157 r (when)s 18 r (you)s 17 r (write)s 18 r (long)s 17 r (comment)s 17 r (in)s 18 r (FORTRAN.\\n"\);)s 384 195 p (})s 314 235 p (})s 279 276 p (if)s 17 r (\(\(TT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 349 316 p (||)s 17 r (\(\(rm)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\)\)\))s 314 357 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TextModeFont\);)s 279 397 p (else)s 314 438 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TeXModeFont\);)s 244 478 p (})s 209 559 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exists)s 11 r (a)s 11 r (MAKE)s 11 r (comment)s 10 r (area)s 11 r (consists)s 11 r (of)s 12 r (several)s 10 r (quasi-T)s 1202 566 p (E)s 1220 559 p (X)s f3 SF 280 r (*/)s 209 599 p (/*)s f0 SF 17 r (mo)s 1 r (de)s 11 r (lines,)s f2 SF 11 r (src2tex)s f0 SF 11 r (uses)s 11 r (cmtt)s 10 r (font)s 10 r (instead)s 11 r (of)s 11 r (cmr)s 12 r (font)s f3 SF 465 r (*/)s 209 640 p (if)s 18 r (\(\(MAKE)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 279 680 p (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (<)s 18 r (Htab)s 2 r 10 1 ru 15 r (Size\)\))s 244 721 p ({)s 279 761 p (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 802 p (cptr1)s 17 r (=)s 18 r (ptr->buffer;)s 279 842 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 882 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr2\);)s 279 923 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 18 r (i)s 17 r (<)s 18 r (1024;)s 17 r (++i\))s 314 963 p ({)s 349 1004 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\\\\'\)\))s 384 1044 p ({)s 418 1085 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1125 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1165 p (break;)s 384 1206 p (})s 0 1246 p (#ifdef)s 17 r (LATEX)s 349 1287 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('['\)\))s 0 1327 p (#else)s 349 1368 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('$'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 1408 p (#endif)s 384 1449 p ({)s 418 1489 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1529 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1570 p (break;)s 384 1610 p (})s 0 1651 p (#ifdef)s 17 r (LATEX)s 349 1691 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\('\)\))s 0 1732 p (#else)s 349 1772 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r (')s 17 r ('\)\))s 418 1812 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\))s 17 r (&&)s 18 r (\(*cptr3)s 17 r (!=)s 17 r ('\('\)\))s 0 1853 p (#endif)s 384 1893 p ({)s 418 1934 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1974 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 2015 p (break;)s 384 2055 p (})s 349 2096 p (if)s 17 r (\(\(\(*cptr1)s 18 r (!=)s 17 r ('\\n'\))s 17 r (&&)s 18 r (\(*cptr1)s 17 r (!=)s 18 r ('\\r'\)\))s 418 2136 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('#'\))s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (11)s EP pstopssaved restore %%Page: pstops 12 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 418 33 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\)\))s 384 74 p ({)s 418 114 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 155 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 195 p (break;)s 384 235 p (})s 349 276 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 384 316 p (tt)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 357 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 349 397 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr2\);)s 349 438 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr3\);)s 314 478 p (})s 0 518 p (#ifdef)s 17 r (DEBUGGING)s 279 559 p (if)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 599 p (printf)s 17 r (\("text2tex\(\):)s 18 r (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (is)s 17 r (set)s 17 r (to)s 18 r (%d\\n",)s 17 r (tt)s 2 r 10 1 ru 16 r (flag\);)s 0 640 p (#endif)s 279 680 p (if)s 17 r (\(\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (>)s 18 r (1\))s 17 r (&&)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag1)s 17 r (<=)s 18 r (5\)\))s 314 721 p ({)s 349 761 p (++warn)s 2 r 10 1 ru 15 r (flag1;)s 0 802 p (#ifdef)s 17 r (DEBUGGING)s 349 842 p (printf\("text2tex\(\):)s 17 r (warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (is)s 17 r (set)s 18 r (to)s 17 r (%d\\n",)s 471 882 p (warn)s 2 r 10 1 ru 15 r (flag1\);)s 0 923 p (#endif)s 349 963 p (if)s 17 r (\(warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (>)s 17 r (5\))s 384 1004 p ({)s 418 1044 p (if)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag2)s 18 r (<=)s 17 r (2\))s 453 1085 p (fprintf\(stderr,)s 18 r ("\\n"\);)s 418 1125 p (fprintf\(stderr,)s 418 1165 p ("Warning:)s 18 r (It)s 17 r (is)s 18 r (better)s 17 r (to)s 18 r (use)s 17 r (TeX-mode\\n"\);)s 418 1206 p (fprintf\(stderr,)s 418 1246 p (")s 157 r (when)s 18 r (you)s 17 r (write)s 18 r (long)s 17 r (comment)s 17 r (in)s 18 r (MAKE.\\n"\);)s 384 1287 p (})s 314 1327 p (})s 279 1368 p (if)s 17 r (\(\(TT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 349 1408 p (||)s 17 r (\(\(rm)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\)\)\))s 314 1449 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TextModeFont\);)s 279 1489 p (else)s 314 1529 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TeXModeFont\);)s 244 1570 p (})s 209 1651 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exists)s 11 r (a)s 11 r (P)s -2 r (ASCAL)s 10 r (comment)s 11 r (area)s 11 r (consists)s 11 r (of)s 11 r (several)s 10 r (quasi-T)s 1231 1658 p (E)s 1249 1651 p (X)s f3 SF 251 r (*/)s 209 1691 p (/*)s f0 SF 17 r (mo)s 1 r (de)s 11 r (lines,)s f2 SF 11 r (src2tex)s f0 SF 11 r (uses)s 11 r (cmtt)s 10 r (font)s 10 r (instead)s 11 r (of)s 11 r (cmr)s 12 r (font)s f3 SF 465 r (*/)s 209 1732 p (if)s 18 r (\(\(PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 279 1772 p (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (<)s 18 r (Htab)s 2 r 10 1 ru 15 r (Size\)\))s 244 1812 p ({)s 279 1853 p (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 1893 p (cptr1)s 17 r (=)s 18 r (ptr->buffer;)s 279 1934 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 1974 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr2\);)s 279 2015 p (cptr4)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr3\);)s 279 2055 p (cptr5)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr4\);)s 279 2096 p (cptr6)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr5\);)s 279 2136 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 18 r (i)s 17 r (<)s 18 r (1024;)s 17 r (++i\))s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (12)s EP pstopssaved restore %%Page: pstops 13 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 314 33 p ({)s 349 74 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\\\\'\)\))s 384 114 p ({)s 418 155 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 195 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 235 p (break;)s 384 276 p (})s 0 316 p (#ifdef)s 17 r (LATEX)s 349 357 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('['\)\))s 0 397 p (#else)s 349 438 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('$'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 478 p (#endif)s 384 518 p ({)s 418 559 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 599 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 640 p (break;)s 384 680 p (})s 0 721 p (#ifdef)s 17 r (LATEX)s 349 761 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\('\)\))s 0 802 p (#else)s 349 842 p (if)s 17 r (\(\(*cptr1)s 18 r (!=)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 882 p (#endif)s 384 923 p ({)s 418 963 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1004 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1044 p (break;)s 384 1085 p (})s 349 1125 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('}'\))s 418 1165 p (&&)s 18 r (\(\(*cptr2)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr2)s 17 r (==)s 17 r ('\\r'\)\))s 418 1206 p (&&)s 18 r (\(*cptr3)s 17 r (==)s 18 r ('{'\)\))s 384 1246 p ({)s 418 1287 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1327 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 1368 p (break;)s 384 1408 p (})s 349 1449 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('*'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\)'\)\))s 418 1489 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\))s 418 1529 p (&&)s 18 r (\(\(*cptr4)s 17 r (==)s 18 r ('\('\))s 17 r (&&)s 18 r (\(*cptr5)s 17 r (==)s 17 r ('*'\)\)\))s 384 1570 p ({)s 418 1610 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1651 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 1691 p (break;)s 384 1732 p (})s 349 1772 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('}'\))s 418 1812 p (&&)s 18 r (\(\(*cptr2)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr2)s 17 r (==)s 17 r ('\\r'\)\))s 418 1853 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\))s 418 1893 p (&&)s 18 r (\(*cptr4)s 17 r (==)s 18 r ('{'\)\))s 384 1934 p ({)s 418 1974 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 2015 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 2055 p (break;)s 384 2096 p (})s 349 2136 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('*'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\)'\)\))s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (13)s EP pstopssaved restore %%Page: pstops 14 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 418 33 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\))s 418 74 p (&&)s 18 r (\(\(*cptr4)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr4)s 17 r (==)s 17 r ('\\r'\)\))s 418 114 p (&&)s 18 r (\(\(*cptr5)s 17 r (==)s 18 r ('\('\))s 17 r (&&)s 18 r (\(*cptr6)s 17 r (==)s 17 r ('*'\)\)\))s 384 155 p ({)s 418 195 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 235 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 276 p (break;)s 384 316 p (})s 349 357 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('}'\))s 418 397 p (&&)s 18 r (\(\(*cptr2)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr2)s 17 r (==)s 17 r ('\\r'\)\)\))s 384 438 p ({)s 418 478 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 518 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 559 p (break;)s 384 599 p (})s 349 640 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('*'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\)'\)\))s 418 680 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\)\))s 384 721 p ({)s 418 761 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 802 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 842 p (break;)s 384 882 p (})s 349 923 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 418 963 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('}'\)\))s 384 1004 p ({)s 418 1044 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1085 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1125 p (break;)s 384 1165 p (})s 349 1206 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 418 1246 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\('\))s 17 r (&&)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('*'\)\))s 384 1287 p ({)s 418 1327 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1368 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1408 p (break;)s 384 1449 p (})s 349 1489 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 384 1529 p (tt)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 1570 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 349 1610 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr2\);)s 349 1651 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr3\);)s 349 1691 p (cptr4)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr4\);)s 349 1732 p (cptr5)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr5\);)s 349 1772 p (cptr6)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr6\);)s 314 1812 p (})s 0 1853 p (#ifdef)s 17 r (DEBUGGING)s 279 1893 p (if)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1934 p (printf)s 17 r (\("text2tex\(\):)s 18 r (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (is)s 17 r (set)s 17 r (to)s 18 r (%d\\n",)s 17 r (tt)s 2 r 10 1 ru 16 r (flag\);)s 0 1974 p (#endif)s 279 2015 p (if)s 17 r (\(\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (>)s 18 r (1\))s 17 r (&&)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag1)s 17 r (<=)s 18 r (5\)\))s 314 2055 p ({)s 349 2096 p (++warn)s 2 r 10 1 ru 15 r (flag1;)s 0 2136 p (#ifdef)s 17 r (DEBUGGING)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (14)s EP pstopssaved restore %%Page: pstops 15 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 349 33 p (printf\("text2tex\(\):)s 17 r (warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (is)s 17 r (set)s 18 r (to)s 17 r (%d\\n",)s 471 74 p (warn)s 2 r 10 1 ru 15 r (flag1\);)s 0 114 p (#endif)s 349 155 p (if)s 17 r (\(warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (>)s 17 r (5\))s 384 195 p ({)s 418 235 p (if)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag2)s 18 r (<=)s 17 r (2\))s 453 276 p (fprintf\(stderr,)s 18 r ("\\n"\);)s 418 316 p (fprintf\(stderr,)s 418 357 p ("Warning:)s 18 r (It)s 17 r (is)s 18 r (better)s 17 r (to)s 18 r (use)s 17 r (TeX-mode\\n"\);)s 418 397 p (fprintf\(stderr,)s 418 438 p (")s 157 r (when)s 18 r (you)s 17 r (write)s 18 r (long)s 17 r (comment)s 17 r (in)s 18 r (PASCAL.\\n"\);)s 384 478 p (})s 314 518 p (})s 279 559 p (if)s 17 r (\(\(TT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 349 599 p (||)s 17 r (\(\(rm)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\)\)\))s 314 640 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TextModeFont\);)s 279 680 p (else)s 314 721 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TeXModeFont\);)s 244 761 p (})s 209 842 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exists)s 11 r (a)s 11 r (PERL)s 11 r (comment)s 10 r (area)s 11 r (consists)s 11 r (of)s 12 r (several)s 10 r (quasi-T)s 1188 849 p (E)s 1207 842 p (X)s f3 SF 293 r (*/)s 209 882 p (/*)s f0 SF 17 r (mo)s 1 r (de)s 11 r (lines,)s f2 SF 11 r (src2tex)s f0 SF 11 r (uses)s 11 r (cmtt)s 10 r (font)s 10 r (instead)s 11 r (of)s 11 r (cmr)s 12 r (font)s f3 SF 465 r (*/)s 209 923 p (if)s 18 r (\(\(PERL)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 279 963 p (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (<)s 18 r (Htab)s 2 r 10 1 ru 15 r (Size\)\))s 244 1004 p ({)s 279 1044 p (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 1085 p (cptr1)s 17 r (=)s 18 r (ptr->buffer;)s 279 1125 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 1165 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr2\);)s 279 1206 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 18 r (i)s 17 r (<)s 18 r (1024;)s 17 r (++i\))s 314 1246 p ({)s 349 1287 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\\\\'\)\))s 384 1327 p ({)s 418 1368 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1408 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1449 p (break;)s 384 1489 p (})s 0 1529 p (#ifdef)s 17 r (LATEX)s 349 1570 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('['\)\))s 0 1610 p (#else)s 349 1651 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('$'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 1691 p (#endif)s 384 1732 p ({)s 418 1772 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1812 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1853 p (break;)s 384 1893 p (})s 0 1934 p (#ifdef)s 17 r (LATEX)s 349 1974 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\('\)\))s 0 2015 p (#else)s 349 2055 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r (')s 17 r ('\)\))s 418 2096 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\))s 17 r (&&)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\\\'\)\))s 0 2136 p (#endif)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (15)s EP pstopssaved restore %%Page: pstops 16 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 384 33 p ({)s 418 74 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 114 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 155 p (break;)s 384 195 p (})s 349 235 p (if)s 17 r (\(\(\(*cptr1)s 18 r (!=)s 17 r ('\\n'\))s 17 r (&&)s 18 r (\(*cptr1)s 17 r (!=)s 18 r ('\\r'\)\))s 418 276 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('#'\))s 418 316 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\)\))s 384 357 p ({)s 418 397 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 438 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 478 p (break;)s 384 518 p (})s 349 559 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 384 599 p (tt)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 640 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 349 680 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr2\);)s 349 721 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr3\);)s 314 761 p (})s 0 802 p (#ifdef)s 17 r (DEBUGGING)s 279 842 p (if)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 882 p ({)s 349 923 p (printf)s 17 r (\("text2tex\(\):)s 18 r (rm)s 2 r 10 1 ru 15 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 18 r (%d\\n",)s 17 r (rm)s 2 r 10 1 ru 16 r (flag\);)s 349 963 p (printf)s 17 r (\("text2tex\(\):)s 18 r (tt)s 2 r 10 1 ru 15 r (flag)s 17 r (is)s 18 r (set)s 17 r (to)s 18 r (%d\\n",)s 17 r (tt)s 2 r 10 1 ru 16 r (flag\);)s 314 1004 p (})s 0 1044 p (#endif)s 279 1085 p (if)s 17 r (\(\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (>)s 18 r (1\))s 17 r (&&)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag1)s 17 r (<=)s 18 r (5\)\))s 314 1125 p ({)s 349 1165 p (++warn)s 2 r 10 1 ru 15 r (flag1;)s 0 1206 p (#ifdef)s 17 r (DEBUGGING)s 349 1246 p (printf\("text2tex\(\):)s 17 r (warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (is)s 17 r (set)s 18 r (to)s 17 r (%d\\n",)s 471 1287 p (warn)s 2 r 10 1 ru 15 r (flag1\);)s 0 1327 p (#endif)s 349 1368 p (if)s 17 r (\(warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (>)s 17 r (5\))s 384 1408 p ({)s 418 1449 p (if)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag2)s 18 r (<=)s 17 r (2\))s 453 1489 p (fprintf\(stderr,)s 18 r ("\\n"\);)s 418 1529 p (fprintf\(stderr,)s 418 1570 p ("Warning:)s 18 r (It)s 17 r (is)s 18 r (better)s 17 r (to)s 18 r (use)s 17 r (TeX-mode\\n"\);)s 418 1610 p (fprintf\(stderr,)s 418 1651 p (")s 157 r (when)s 18 r (you)s 17 r (write)s 18 r (long)s 17 r (comment)s 17 r (in)s 18 r (PERL.\\n"\);)s 384 1691 p (})s 314 1732 p (})s 279 1772 p (if)s 17 r (\(\(TT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 349 1812 p (||)s 17 r (\(\(rm)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\)\)\))s 314 1853 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TextModeFont\);)s 279 1893 p (else)s 314 1934 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TeXModeFont\);)s 244 1974 p (})s 209 2055 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exists)s 11 r (a)s 11 r (SHELL)s 11 r (comment)s 10 r (area)s 11 r (consists)s 11 r (of)s 12 r (several)s 10 r (quasi-T)s 1205 2062 p (E)s 1224 2055 p (X)s f3 SF 276 r (*/)s 209 2096 p (/*)s f0 SF 17 r (mo)s 1 r (de)s 11 r (lines,)s f2 SF 11 r (src2tex)s f0 SF 11 r (uses)s 11 r (cmtt)s 10 r (font)s 10 r (instead)s 11 r (of)s 11 r (cmr)s 12 r (font)s f3 SF 465 r (*/)s 209 2136 p (if)s 18 r (\(\(SH)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (16)s EP pstopssaved restore %%Page: pstops 17 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 279 33 p (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (<)s 18 r (Htab)s 2 r 10 1 ru 15 r (Size\)\))s 244 74 p ({)s 279 114 p (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 155 p (cptr1)s 17 r (=)s 18 r (ptr->buffer;)s 279 195 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 235 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr2\);)s 279 276 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 18 r (i)s 17 r (<)s 18 r (1024;)s 17 r (++i\))s 314 316 p ({)s 349 357 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\\\\'\)\))s 384 397 p ({)s 418 438 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 478 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 518 p (break;)s 384 559 p (})s 0 599 p (#ifdef)s 17 r (LATEX)s 349 640 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('['\)\))s 0 680 p (#else)s 349 721 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('$'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 761 p (#endif)s 384 802 p ({)s 418 842 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 882 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 923 p (break;)s 384 963 p (})s 0 1004 p (#ifdef)s 17 r (LATEX)s 349 1044 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\('\)\))s 0 1085 p (#else)s 349 1125 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r (')s 17 r ('\)\))s 418 1165 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 1206 p (#endif)s 384 1246 p ({)s 418 1287 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1327 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1368 p (break;)s 384 1408 p (})s 349 1449 p (if)s 17 r (\(\(\(*cptr1)s 18 r (!=)s 17 r ('\\n'\))s 17 r (&&)s 18 r (\(*cptr1)s 17 r (!=)s 18 r ('\\r'\)\))s 418 1489 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('#'\))s 418 1529 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\)\))s 384 1570 p ({)s 418 1610 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1651 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 1691 p (break;)s 384 1732 p (})s 349 1772 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 384 1812 p (tt)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 1853 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 349 1893 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr2\);)s 349 1934 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr3\);)s 314 1974 p (})s 0 2015 p (#ifdef)s 17 r (DEBUGGING)s 279 2055 p (if)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 2096 p (printf)s 17 r (\("text2tex\(\):)s 18 r (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (is)s 17 r (set)s 17 r (to)s 18 r (%d\\n",)s 17 r (tt)s 2 r 10 1 ru 16 r (flag\);)s 0 2136 p (#endif)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (17)s EP pstopssaved restore %%Page: pstops 18 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 279 33 p (if)s 17 r (\(\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (>)s 18 r (1\))s 17 r (&&)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag1)s 17 r (<=)s 18 r (5\)\))s 314 74 p ({)s 349 114 p (++warn)s 2 r 10 1 ru 15 r (flag1;)s 0 155 p (#ifdef)s 17 r (DEBUGGING)s 349 195 p (printf\("text2tex\(\):)s 17 r (warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (is)s 17 r (set)s 18 r (to)s 17 r (%d\\n",)s 471 235 p (warn)s 2 r 10 1 ru 15 r (flag1\);)s 0 276 p (#endif)s 349 316 p (if)s 17 r (\(warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (>)s 17 r (5\))s 384 357 p ({)s 418 397 p (if)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag2)s 18 r (<=)s 17 r (2\))s 453 438 p (fprintf\(stderr,)s 18 r ("\\n"\);)s 418 478 p (fprintf\(stderr,)s 418 518 p ("Warning:)s 18 r (It)s 17 r (is)s 18 r (better)s 17 r (to)s 18 r (use)s 17 r (TeX-mode\\n"\);)s 418 559 p (fprintf\(stderr,)s 418 599 p (")s 157 r (when)s 18 r (you)s 17 r (write)s 18 r (long)s 17 r (comment)s 17 r (in)s 18 r (SHELL.\\n"\);)s 384 640 p (})s 314 680 p (})s 279 721 p (if)s 17 r (\(\(TT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 349 761 p (||)s 17 r (\(\(rm)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\)\)\))s 314 802 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TextModeFont\);)s 279 842 p (else)s 314 882 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TeXModeFont\);)s 244 923 p (})s 209 1004 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exists)s 11 r (a)s 11 r (TCL/TK)s 11 r (comment)s 10 r (area)s 11 r (consists)s 11 r (of)s 12 r (several)s 10 r (quasi-T)s 1233 1011 p (E)s 1252 1004 p (X)s f3 SF 248 r (*/)s 209 1044 p (/*)s f0 SF 17 r (mo)s 1 r (de)s 11 r (lines,)s f2 SF 11 r (src2tex)s f0 SF 11 r (uses)s 11 r (cmtt)s 10 r (font)s 10 r (instead)s 11 r (of)s 11 r (cmr)s 12 r (font)s f3 SF 465 r (*/)s 209 1085 p (if)s 18 r (\(\(TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 279 1125 p (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (<)s 18 r (Htab)s 2 r 10 1 ru 15 r (Size\)\))s 244 1165 p ({)s 279 1206 p (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 1246 p (cptr1)s 17 r (=)s 18 r (ptr->buffer;)s 279 1287 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 1327 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr2\);)s 279 1368 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 18 r (i)s 17 r (<)s 18 r (1024;)s 17 r (++i\))s 314 1408 p ({)s 349 1449 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\\\\'\)\))s 384 1489 p ({)s 418 1529 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1570 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1610 p (break;)s 384 1651 p (})s 0 1691 p (#ifdef)s 17 r (LATEX)s 349 1732 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('['\)\))s 0 1772 p (#else)s 349 1812 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('$'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 1853 p (#endif)s 384 1893 p ({)s 418 1934 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1974 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 2015 p (break;)s 384 2055 p (})s 0 2096 p (#ifdef)s 17 r (LATEX)s 349 2136 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\('\)\))s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (18)s EP pstopssaved restore %%Page: pstops 19 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 0 33 p (#else)s 349 74 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('\\t'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r (')s 17 r ('\)\))s 418 114 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 155 p (#endif)s 384 195 p ({)s 418 235 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 276 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 316 p (break;)s 384 357 p (})s 349 397 p (if)s 17 r (\(\(\(*cptr1)s 18 r (!=)s 17 r ('\\n'\))s 17 r (&&)s 18 r (\(*cptr1)s 17 r (!=)s 18 r ('\\r'\)\))s 418 438 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('#'\))s 418 478 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\)\))s 384 518 p ({)s 418 559 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 599 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 640 p (break;)s 384 680 p (})s 349 721 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 384 761 p (tt)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 802 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 349 842 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr2\);)s 349 882 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr3\);)s 314 923 p (})s 0 963 p (#ifdef)s 17 r (DEBUGGING)s 279 1004 p (if)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1044 p (printf)s 17 r (\("text2tex\(\):)s 18 r (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (is)s 17 r (set)s 17 r (to)s 18 r (%d\\n",)s 17 r (tt)s 2 r 10 1 ru 16 r (flag\);)s 0 1085 p (#endif)s 279 1125 p (if)s 17 r (\(\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (>)s 18 r (1\))s 17 r (&&)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag1)s 17 r (<=)s 18 r (5\)\))s 314 1165 p ({)s 349 1206 p (++warn)s 2 r 10 1 ru 15 r (flag1;)s 0 1246 p (#ifdef)s 17 r (DEBUGGING)s 349 1287 p (printf\("text2tex\(\):)s 17 r (warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (is)s 17 r (set)s 18 r (to)s 17 r (%d\\n",)s 471 1327 p (warn)s 2 r 10 1 ru 15 r (flag1\);)s 0 1368 p (#endif)s 349 1408 p (if)s 17 r (\(warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (>)s 17 r (5\))s 384 1449 p ({)s 418 1489 p (if)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag2)s 18 r (<=)s 17 r (2\))s 453 1529 p (fprintf\(stderr,)s 18 r ("\\n"\);)s 418 1570 p (fprintf\(stderr,)s 418 1610 p ("Warning:)s 18 r (It)s 17 r (is)s 18 r (better)s 17 r (to)s 18 r (use)s 17 r (TeX-mode\\n"\);)s 418 1651 p (fprintf\(stderr,)s 418 1691 p (")s 157 r (when)s 18 r (you)s 17 r (write)s 18 r (long)s 17 r (comment)s 17 r (in)s 18 r (TCL/TK.\\n"\);)s 384 1732 p (})s 314 1772 p (})s 279 1812 p (if)s 17 r (\(\(TT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 349 1853 p (||)s 17 r (\(\(rm)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\)\)\))s 314 1893 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TextModeFont\);)s 279 1934 p (else)s 314 1974 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TeXModeFont\);)s 244 2015 p (})s 209 2096 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exists)s 11 r (a)s 11 r (MAPLE)s 11 r (comment)s 10 r (area)s 11 r (consists)s 11 r (of)s 12 r (several)s 10 r (quasi-T)s 1219 2103 p (E)s 1238 2096 p (X)s f3 SF 262 r (*/)s 209 2136 p (/*)s f0 SF 17 r (mo)s 1 r (de)s 11 r (lines,)s f2 SF 11 r (src2tex)s f0 SF 11 r (uses)s 11 r (cmtt)s 10 r (font)s 10 r (instead)s 11 r (of)s 11 r (cmr)s 12 r (font)s f3 SF 465 r (*/)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (19)s EP pstopssaved restore %%Page: pstops 20 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 209 33 p (if)s 18 r (\(\(MAP)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 279 74 p (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (<)s 18 r (Htab)s 2 r 10 1 ru 15 r (Size\)\))s 244 114 p ({)s 279 155 p (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 195 p (cptr1)s 17 r (=)s 18 r (ptr->buffer;)s 279 235 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 276 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr2\);)s 279 316 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 18 r (i)s 17 r (<)s 18 r (1024;)s 17 r (++i\))s 314 357 p ({)s 349 397 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\\\\'\)\))s 384 438 p ({)s 418 478 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 518 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 559 p (break;)s 384 599 p (})s 0 640 p (#ifdef)s 17 r (LATEX)s 349 680 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('['\)\))s 0 721 p (#else)s 349 761 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('$'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 802 p (#endif)s 384 842 p ({)s 418 882 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 923 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 963 p (break;)s 384 1004 p (})s 0 1044 p (#ifdef)s 17 r (LATEX)s 349 1085 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\('\)\))s 0 1125 p (#else)s 349 1165 p (if)s 17 r (\(\(*cptr1)s 18 r (!=)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 1206 p (#endif)s 384 1246 p ({)s 418 1287 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1327 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1368 p (break;)s 384 1408 p (})s 349 1449 p (if)s 17 r (\(\(\(*cptr1)s 18 r (!=)s 17 r ('\\n'\))s 17 r (&&)s 18 r (\(*cptr1)s 17 r (!=)s 18 r ('\\r'\)\))s 418 1489 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('#'\))s 418 1529 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\)\))s 384 1570 p ({)s 418 1610 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1651 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 1691 p (break;)s 384 1732 p (})s 349 1772 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 384 1812 p (tt)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 1853 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 349 1893 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr2\);)s 349 1934 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr3\);)s 314 1974 p (})s 0 2015 p (#ifdef)s 17 r (DEBUGGING)s 279 2055 p (if)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 2096 p (printf)s 17 r (\("text2tex\(\):)s 18 r (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (is)s 17 r (set)s 17 r (to)s 18 r (%d\\n",)s 17 r (tt)s 2 r 10 1 ru 16 r (flag\);)s 0 2136 p (#endif)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (20)s EP pstopssaved restore %%Page: pstops 21 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 279 33 p (if)s 17 r (\(\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (>)s 18 r (1\))s 17 r (&&)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag1)s 17 r (<=)s 18 r (5\)\))s 314 74 p ({)s 349 114 p (++warn)s 2 r 10 1 ru 15 r (flag1;)s 0 155 p (#ifdef)s 17 r (DEBUGGING)s 349 195 p (printf\("text2tex\(\):)s 17 r (warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (is)s 17 r (set)s 18 r (to)s 17 r (%d\\n",)s 471 235 p (warn)s 2 r 10 1 ru 15 r (flag1\);)s 0 276 p (#endif)s 349 316 p (if)s 17 r (\(warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (>)s 17 r (5\))s 384 357 p ({)s 418 397 p (if)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag2)s 18 r (<=)s 17 r (2\))s 453 438 p (fprintf\(stderr,)s 18 r ("\\n"\);)s 418 478 p (fprintf\(stderr,)s 418 518 p ("Warning:)s 18 r (It)s 17 r (is)s 18 r (better)s 17 r (to)s 18 r (use)s 17 r (TeX-mode\\n"\);)s 418 559 p (fprintf\(stderr,)s 418 599 p (")s 157 r (when)s 18 r (you)s 17 r (write)s 18 r (long)s 17 r (comment)s 17 r (in)s 18 r (MAPLE.\\n"\);)s 384 640 p (})s 314 680 p (})s 279 721 p (if)s 17 r (\(\(TT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (11\))s 349 761 p (||)s 17 r (\(\(rm)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\)\)\))s 314 802 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TextModeFont\);)s 279 842 p (else)s 314 882 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TeXModeFont\);)s 244 923 p (})s 209 1004 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exists)s 11 r (a)s 11 r (MA)s -2 r (THEMA)s -2 r (TICA)s 10 r (comment)s 10 r (area)s 11 r (consists)s 11 r (of)s 11 r (several)s 10 r (quasi-T)s 1359 1011 p (E)s 1378 1004 p (X)s f3 SF 122 r (*/)s 209 1044 p (/*)s f0 SF 17 r (mo)s 1 r (de)s 11 r (lines,)s f2 SF 11 r (src2tex)s f0 SF 11 r (uses)s 11 r (cmtt)s 10 r (font)s 10 r (instead)s 11 r (of)s 11 r (cmr)s 12 r (font)s f3 SF 465 r (*/)s 209 1085 p (if)s 18 r (\(\(MAT)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 279 1125 p (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (<)s 18 r (Htab)s 2 r 10 1 ru 15 r (Size\)\))s 244 1165 p ({)s 279 1206 p (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 1246 p (cptr1)s 17 r (=)s 18 r (ptr->buffer;)s 279 1287 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 1327 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr2\);)s 279 1368 p (cptr4)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr3\);)s 279 1408 p (cptr5)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr4\);)s 279 1449 p (cptr6)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr5\);)s 279 1489 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 18 r (i)s 17 r (<)s 18 r (1024;)s 17 r (++i\))s 314 1529 p ({)s 349 1570 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\\\\'\)\))s 384 1610 p ({)s 418 1651 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1691 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1732 p (break;)s 384 1772 p (})s 0 1812 p (#ifdef)s 17 r (LATEX)s 349 1853 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('['\)\))s 0 1893 p (#else)s 349 1934 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('$'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 1974 p (#endif)s 384 2015 p ({)s 418 2055 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 2096 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 2136 p (break;)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (21)s EP pstopssaved restore %%Page: pstops 22 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 384 33 p (})s 0 74 p (#ifdef)s 17 r (LATEX)s 349 114 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\('\)\))s 0 155 p (#else)s 349 195 p (if)s 17 r (\(\(*cptr1)s 18 r (!=)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 235 p (#endif)s 384 276 p ({)s 418 316 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 357 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 397 p (break;)s 384 438 p (})s 349 478 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('*'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\)'\)\))s 418 518 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\))s 418 559 p (&&)s 18 r (\(\(*cptr4)s 17 r (==)s 18 r ('\('\))s 17 r (&&)s 18 r (\(*cptr5)s 17 r (==)s 17 r ('*'\)\)\))s 384 599 p ({)s 418 640 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 680 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 721 p (break;)s 384 761 p (})s 349 802 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('*'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\)'\)\))s 418 842 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\))s 418 882 p (&&)s 18 r (\(\(*cptr4)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr4)s 17 r (==)s 17 r ('\\r'\)\))s 418 923 p (&&)s 18 r (\(\(*cptr5)s 17 r (==)s 18 r ('\('\))s 17 r (&&)s 18 r (\(*cptr6)s 17 r (==)s 17 r ('*'\)\)\))s 384 963 p ({)s 418 1004 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1044 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 1085 p (break;)s 384 1125 p (})s 349 1165 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('*'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\)'\)\))s 418 1206 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\)\))s 384 1246 p ({)s 418 1287 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1327 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1368 p (break;)s 384 1408 p (})s 349 1449 p (if)s 17 r (\(\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 418 1489 p (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\('\))s 17 r (&&)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('*'\)\))s 384 1529 p ({)s 418 1570 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1610 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1651 p (break;)s 384 1691 p (})s 349 1732 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 384 1772 p (tt)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 1812 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 349 1853 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr2\);)s 349 1893 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr3\);)s 349 1934 p (cptr4)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr4\);)s 349 1974 p (cptr5)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr5\);)s 349 2015 p (cptr6)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr6\);)s 314 2055 p (})s 0 2096 p (#ifdef)s 17 r (DEBUGGING)s 279 2136 p (if)s 17 r (\(\(rm)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(tt)s 2 r 10 1 ru 15 r (flag)s 17 r (!=)s 18 r (0\)\))s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (22)s EP pstopssaved restore %%Page: pstops 23 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 314 33 p (printf)s 17 r (\("text2tex\(\):)s 18 r (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (is)s 17 r (set)s 17 r (to)s 18 r (%d\\n",)s 17 r (tt)s 2 r 10 1 ru 16 r (flag\);)s 0 74 p (#endif)s 279 114 p (if)s 17 r (\(\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (>)s 18 r (1\))s 17 r (&&)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag1)s 17 r (<=)s 18 r (5\)\))s 314 155 p ({)s 349 195 p (++warn)s 2 r 10 1 ru 15 r (flag1;)s 0 235 p (#ifdef)s 17 r (DEBUGGING)s 349 276 p (printf\("text2tex\(\):)s 17 r (warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (is)s 17 r (set)s 18 r (to)s 17 r (%d\\n",)s 471 316 p (warn)s 2 r 10 1 ru 15 r (flag1\);)s 0 357 p (#endif)s 349 397 p (if)s 17 r (\(warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (>)s 17 r (5\))s 384 438 p ({)s 418 478 p (if)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag2)s 18 r (<=)s 17 r (2\))s 453 518 p (fprintf\(stderr,)s 18 r ("\\n"\);)s 418 559 p (fprintf\(stderr,)s 558 599 p ("Warning:)s 17 r (It)s 18 r (is)s 17 r (better)s 18 r (to)s 17 r (use)s 17 r (TeX-mode\\n"\);)s 418 640 p (fprintf\(stderr,)s 558 680 p (")s 157 r (when)s 17 r (you)s 18 r (write)s 17 r (long)s 18 r (comment)s 17 r (in"\);)s 418 721 p (fprintf\(stderr,)s 558 761 p (")s 17 r (MATHEMATICA.\\n"\);)s 384 802 p (})s 314 842 p (})s 279 882 p (if)s 17 r (\(\(TT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 349 923 p (||)s 17 r (\(\(rm)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\)\)\))s 314 963 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TextModeFont\);)s 279 1004 p (else)s 314 1044 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TeXModeFont\);)s 244 1085 p (})s 209 1165 p (/*)s f0 SF 17 r (If)s 11 r (there)s 11 r (exists)s 11 r (a)s 11 r (MA)s -2 r (TLAB)s 10 r (comment)s 11 r (area)s 11 r (consists)s 11 r (of)s 11 r (several)s 10 r (quasi-T)s 1244 1173 p (E)s 1262 1165 p (X)s f3 SF 238 r (*/)s 209 1206 p (/*)s f0 SF 17 r (mo)s 1 r (de)s 11 r (lines,)s f2 SF 11 r (src2tex)s f0 SF 11 r (uses)s 11 r (cmtt)s 10 r (font)s 10 r (instead)s 11 r (of)s 11 r (cmr)s 12 r (font)s f3 SF 465 r (*/)s 209 1246 p (if)s 18 r (\(\(MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 279 1287 p (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (<)s 18 r (Htab)s 2 r 10 1 ru 15 r (Size\)\))s 244 1327 p ({)s 279 1368 p (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 279 1408 p (cptr1)s 17 r (=)s 18 r (ptr->buffer;)s 279 1449 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 1489 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr2\);)s 279 1529 p (for)s 17 r (\(i)s 18 r (=)s 17 r (0;)s 18 r (i)s 17 r (<)s 18 r (1024;)s 17 r (++i\))s 314 1570 p ({)s 349 1610 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('{'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\\\\'\)\))s 384 1651 p ({)s 418 1691 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 1732 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1772 p (break;)s 384 1812 p (})s 0 1853 p (#ifdef)s 17 r (LATEX)s 349 1893 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('['\)\))s 0 1934 p (#else)s 349 1974 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('$'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 2015 p (#endif)s 384 2055 p ({)s 418 2096 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 2136 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (23)s EP pstopssaved restore %%Page: pstops 24 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 418 33 p (break;)s 384 74 p (})s 0 114 p (#ifdef)s 17 r (LATEX)s 349 155 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('\('\)\))s 0 195 p (#else)s 349 235 p (if)s 17 r (\(\(*cptr1)s 18 r (!=)s 17 r ('\\\\'\))s 17 r (&&)s 18 r (\(*cptr2)s 17 r (==)s 18 r ('$'\)\))s 0 276 p (#endif)s 384 316 p ({)s 418 357 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 418 397 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 438 p (break;)s 384 478 p (})s 349 518 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 418 559 p (&&)s 18 r (\(\(*cptr2)s 17 r (==)s 18 r ('#'\))s 17 r (||)s 18 r (\(*cptr2)s 17 r (==)s 17 r ('%'\)\))s 418 599 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\t'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r (')s 18 r ('\)\)\))s 384 640 p ({)s 418 680 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 721 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 761 p (break;)s 384 802 p (})s 349 842 p (if)s 17 r (\(\(\(*cptr1)s 18 r (!=)s 17 r ('\\n'\))s 17 r (&&)s 18 r (\(*cptr1)s 17 r (!=)s 18 r ('\\r'\)\))s 418 882 p (&&)s 18 r (\(\(*cptr2)s 17 r (==)s 18 r ('#'\))s 17 r (||)s 18 r (\(*cptr2)s 17 r (==)s 17 r ('%'\)\))s 418 923 p (&&)s 18 r (\(\(*cptr3)s 17 r (==)s 18 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr3)s 17 r (==)s 17 r ('\\r'\)\)\))s 384 963 p ({)s 418 1004 p (rm)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (0;)s 418 1044 p (tt)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (2;)s 418 1085 p (break;)s 384 1125 p (})s 349 1165 p (if)s 17 r (\(\(*cptr1)s 18 r (==)s 17 r ('\\n'\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r ('\\r'\)\))s 384 1206 p (tt)s 2 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (1;)s 349 1246 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 349 1287 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr2\);)s 349 1327 p (cptr3)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr3\);)s 314 1368 p (})s 0 1408 p (#ifdef)s 17 r (DEBUGGING)s 279 1449 p (if)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1489 p (printf)s 17 r (\("text2tex\(\):)s 18 r (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (is)s 17 r (set)s 17 r (to)s 18 r (%d\\n",)s 17 r (tt)s 2 r 10 1 ru 16 r (flag\);)s 0 1529 p (#endif)s 279 1570 p (if)s 17 r (\(\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (>)s 18 r (1\))s 17 r (&&)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag1)s 17 r (<=)s 18 r (5\)\))s 314 1610 p ({)s 349 1651 p (++warn)s 2 r 10 1 ru 15 r (flag1;)s 0 1691 p (#ifdef)s 17 r (DEBUGGING)s 349 1732 p (printf\("text2tex\(\):)s 17 r (warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (is)s 17 r (set)s 18 r (to)s 17 r (%d\\n",)s 471 1772 p (warn)s 2 r 10 1 ru 15 r (flag1\);)s 0 1812 p (#endif)s 349 1853 p (if)s 17 r (\(warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (>)s 17 r (5\))s 384 1893 p ({)s 418 1934 p (if)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag2)s 18 r (<=)s 17 r (2\))s 453 1974 p (fprintf\(stderr,)s 18 r ("\\n"\);)s 418 2015 p (fprintf\(stderr,)s 558 2055 p ("Warning:)s 17 r (It)s 18 r (is)s 17 r (better)s 18 r (to)s 17 r (use)s 17 r (TeX-mode\\n"\);)s 418 2096 p (fprintf\(stderr,)s 558 2136 p (")s 157 r (when)s 17 r (you)s 18 r (write)s 17 r (long)s 18 r (comment)s 17 r (in"\);)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (24)s EP pstopssaved restore %%Page: pstops 25 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 418 33 p (fprintf\(stderr,)s 558 74 p (")s 17 r (MATLAB.\\n"\);)s 384 114 p (})s 314 155 p (})s 279 195 p (if)s 17 r (\(\(TT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (1\))s 349 235 p (||)s 17 r (\(\(rm)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\)\)\))s 314 276 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TextModeFont\);)s 279 316 p (else)s 314 357 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TeXModeFont\);)s 244 397 p (})s 174 438 p (})s 139 518 p (/*)s f0 SF 17 r (choose)s 11 r (either)s f3 SF 11 r (TextModeFont)s f0 SF 11 r (or)s f3 SF 11 r (TeXModeFont)s f0 SF 11 r (carefully)s f3 SF 548 r (*/)s 139 559 p (if)s 18 r (\(\(prev)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (0\))s 18 r (&&)s 17 r (\(ptr->flag)s 18 r (==)s 17 r (0\)\))s 174 599 p ({)s 209 640 p (if\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (0\))s 244 680 p (fprintf\(fptr[1],)s 18 r ("%s",)s 17 r (TextModeFont\);)s 209 721 p (else)s 244 761 p (fprintf\(fptr[1],)s 18 r ("\\n%s",)s 17 r (TextModeFont\);)s 174 802 p (})s 139 842 p (if)s 18 r (\(\(prev)s 2 r 10 1 ru 15 r (flag)s 18 r (>)s 17 r (1\))s 18 r (&&)s 17 r (\(ptr->flag)s 18 r (==)s 17 r (1\)\))s 174 882 p ({)s 209 923 p (if)s 18 r (\(TT)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 244 963 p (fprintf\(fptr[1],)s 18 r ("%s",)s 17 r (TextModeFont\);)s 209 1004 p (else)s 244 1044 p (fprintf\(fptr[1],)s 18 r ("%s",)s 17 r (TeXModeFont\);)s 174 1085 p (})s 139 1125 p (/*)s f0 SF 17 r (set)s 11 r (b)s 1 r (old)s 11 r (face)s 11 r (\015ag)s f3 SF 11 r (bf)s 2 r 10 1 ru 11 r (flag)s f0 SF 11 r (for)s 11 r (P)s -2 r (ASCAL)s 10 r (and)s 11 r (REDUCE)s f3 SF 546 r (*/)s 139 1165 p (if)s 18 r (\(ptr->flag)s 17 r (==)s 18 r (0\))s 174 1206 p (if)s 18 r (\(\(prev)s 2 r 10 1 ru 15 r (char)s 18 r (<)s 17 r ('A'\))s 244 1246 p (||)s 18 r (\(\(prev)s 2 r 10 1 ru 15 r (char)s 17 r (>)s 18 r ('Z'\))s 17 r (&&)s 18 r (\(prev)s 2 r 10 1 ru 15 r (char)s 18 r (<)s 17 r ('a'\)\))s 244 1287 p (||)s 18 r (\(prev)s 2 r 10 1 ru 15 r (char)s 17 r (>)s 18 r ('z'\)\))s 209 1327 p (if)s 18 r (\(\(\(PAS)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 17 r (||)s 18 r (\(RED)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\)\))s 279 1368 p (&&)s 17 r (\(qt)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(bf)s 2 r 10 1 ru 15 r (flag)s 17 r (==)s 18 r (0\)\))s 244 1408 p ({)s 279 1449 p (bf)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (get)s 2 r 10 1 ru 16 r (bf)s 2 r 10 1 ru 15 r (flag\(ptr->buffer\);)s 0 1489 p (#ifdef)s 17 r (DEBUGGING)s 279 1529 p (printf\("get)s 2 r 10 1 ru 15 r (bf)s 3 r 10 1 ru 15 r (flag\(\):)s 17 r (bf)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (%d\\n",)s 17 r (bf)s 2 r 10 1 ru 16 r (flag\);)s 0 1570 p (#endif)s 244 1610 p (})s 139 1651 p (/*)s f0 SF 17 r (parsing)s 17 r (options)s f3 SF 1106 r (*/)s 139 1691 p (if)s 18 r (\(\(ptr->flag)s 17 r (>=)s 18 r (1\))s 17 r (&&)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s 174 1732 p ({)s 209 1772 p (if)s 18 r (\(parse)s 2 r 10 1 ru 15 r (options\(ptr\))s 18 r (!=)s 17 r (0\))s 244 1812 p ({)s 279 1853 p (if)s 17 r (\(TT)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 314 1893 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TextModeFont\);)s 279 1934 p (else)s 314 1974 p (fprintf\(fptr[1],)s 17 r ("%s",)s 18 r (TeXModeFont\);)s 244 2015 p (})s 174 2055 p (})s 139 2096 p (/*)s f0 SF 17 r (commenting)s 16 r (out)s f2 SF 16 r (src2tex)s f0 SF 30 r (escap)s 1 r (e)s 16 r (sequence)s f3 SF 692 r (*/)s 139 2136 p (if)s 18 r (\(\(ptr->flag)s 17 r (>=)s 18 r (1\))s 17 r (&&)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 18 r (==)s 17 r (0\)\))s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (25)s EP pstopssaved restore %%Page: pstops 26 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 174 33 p ({)s 209 74 p (cptr1)s 18 r (=)s 17 r (ptr->buffer;)s 209 114 p (while)s 18 r (\(\(\(char\)*cptr1)s 17 r (!=)s 18 r ('\\\\'\))s 331 155 p (&&)s 18 r (\(\(char\)*cptr1)s 17 r (!=)s 18 r ('\\n'\))s 17 r (&&)s 17 r (\(*cptr1)s 18 r (!=)s 17 r (EOF\)\))s 244 195 p (cptr1)s 18 r (=)s 17 r (inc)s 2 r 10 1 ru 15 r (buf)s 3 r 10 1 ru 15 r (ptr\(cptr1\);)s 209 235 p (if)s 18 r (\(str)s 2 r 10 1 ru 15 r (cmp\(cptr1,)s 18 r ("\\\\src2tex{"\))s 17 r (==)s 17 r (0\))s 244 276 p ({)s 279 316 p (fprintf\(fptr[1],)s 17 r ("%c)s 18 r (",)s 17 r (0x25\);)s 0 357 p (#ifdef)s 17 r (DEBUGGING)s 279 397 p (printf\("commenting)s 17 r (out)s 18 r (\\\\src2tex{)s 17 r (...)s 18 r (}\\n"\);)s 0 438 p (#endif)s 244 478 p (})s 174 518 p (})s 139 559 p (prev)s 3 r 10 1 ru 15 r (flag)s 17 r (=)s 18 r (ptr->flag;)s 139 599 p (prev)s 3 r 10 1 ru 15 r (char)s 17 r (=)s 18 r (ptr->character;)s 0 680 p (/*)s 17 r 532 1 ru f0 SF 543 r (text)s 11 r (and)s 11 r (quasi-T)s 833 687 p (E)s 851 680 p (X)s 11 r (mo)s 1 r (de)s 11 r 532 1 ru f3 SF 549 r (*/)s 0 721 p (/*)s f0 SF 17 r (Here)s f2 SF 10 r (src2tex)s f0 SF 11 r ([resp.)s f2 SF 14 r (src2latex)s f0 SF (])s 11 r (translates)s 10 r (each)s 10 r (input)s 11 r (character)s 9 r (into)s 10 r (suitable)s 11 r (escap)s 1 r (e)s 10 r (sequence)s 11 r (of)s 10 r (T)s 1465 728 p (E)s 1484 721 p (X)s f3 SF 16 r (*/)s 139 802 p (if)s 18 r (\(ptr->flag)s 17 r (<=)s 18 r (1\))s 174 842 p ({)s 209 882 p (switch)s 18 r (\(ptr->character\))s 244 923 p ({)s 244 963 p (case)s 18 r ('\\0':)s 279 1004 p (fprintf\(fptr[1],)s 418 1044 p ("{\\\\sevenrm)s 18 r (N\\\\kern-.15em\\\\lower.5ex\\\\hbox{U}}"\);)s 279 1085 p (break;)s 244 1125 p (case)s 18 r (0x01:)s 279 1165 p (fprintf\(fptr[1],)s 418 1206 p ("{\\\\sevenrm)s 18 r (S\\\\kern-.15em\\\\lower.5ex\\\\hbox{H}}"\);)s 279 1246 p (break;)s 244 1287 p (case)s 18 r (0x02:)s 279 1327 p (fprintf\(fptr[1],)s 418 1368 p ("{\\\\sevenrm)s 18 r (S\\\\kern-.15em\\\\lower.5ex\\\\hbox{X}}"\);)s 279 1408 p (break;)s 244 1449 p (case)s 18 r (0x03:)s 279 1489 p (fprintf\(fptr[1],)s 418 1529 p ("{\\\\sevenrm)s 18 r (E\\\\kern-.15em\\\\lower.5ex\\\\hbox{X}}"\);)s 279 1570 p (break;)s 244 1610 p (case)s 18 r (0x04:)s 279 1651 p (fprintf\(fptr[1],)s 418 1691 p ("{\\\\sevenrm)s 18 r (E\\\\kern-.15em\\\\lower.5ex\\\\hbox{T}}"\);)s 279 1732 p (break;)s 244 1772 p (case)s 18 r (0x05:)s 279 1812 p (fprintf\(fptr[1],)s 418 1853 p ("{\\\\sevenrm)s 18 r (E\\\\kern-.15em\\\\lower.5ex\\\\hbox{Q}}"\);)s 279 1893 p (break;)s 244 1934 p (case)s 18 r (0x06:)s 279 1974 p (fprintf\(fptr[1],)s 418 2015 p ("{\\\\sevenrm)s 18 r (A\\\\kern-.15em\\\\lower.5ex\\\\hbox{K}}"\);)s 279 2055 p (break;)s 244 2096 p (case)s 18 r (0x07:)s 279 2136 p (fprintf\(fptr[1],)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (26)s EP pstopssaved restore %%Page: pstops 27 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 418 33 p ("{\\\\sevenrm)s 18 r (B\\\\kern-.15em\\\\lower.5ex\\\\hbox{L}}"\);)s 279 74 p (break;)s 244 114 p (case)s 18 r ('\\b':)s 279 155 p (fprintf\(fptr[1],)s 418 195 p ("{\\\\sevenrm)s 18 r (B\\\\kern-.15em\\\\lower.5ex\\\\hbox{S}}"\);)s 279 235 p (break;)s 244 276 p (case)s 18 r ('\\t':)s 279 316 p (skip)s 2 r 10 1 ru 15 r (amount)s 18 r (=)s 17 r (Htab)s 2 r 10 1 ru 16 r (Size)s 17 r (-)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 18 r (%)s 17 r (Htab)s 2 r 10 1 ru 15 r (Size\);)s 279 357 p (fprintf\(fptr[1],)s 17 r ("{%s\\\\kern%3.3fem}",)s 418 397 p (TextModeFont,)s 18 r (\(float\))s 17 r (SPACE)s 18 r (*)s 17 r (\(float\))s 18 r (skip)s 2 r 10 1 ru 15 r (amount\);)s 279 438 p (char)s 2 r 10 1 ru 15 r (counter)s 18 r (+=)s 17 r (skip)s 2 r 10 1 ru 16 r (amount)s 17 r (-1;)s 279 478 p (break;)s 244 518 p (case)s 18 r ('\\n':)s 279 559 p (if)s 17 r (\(\(Page)s 2 r 10 1 ru 16 r (Len)s 2 r 10 1 ru 15 r (Max)s 18 r (>)s 17 r (0\))s 18 r (&&)s 17 r (\(page)s 2 r 10 1 ru 16 r (len)s 17 r (>=)s 17 r (Page)s 2 r 10 1 ru 16 r (Len)s 2 r 10 1 ru 15 r (Max\)\))s 314 599 p ({)s 349 640 p (fprintf\(fptr[1],)s 17 r ("\\n\\n\\\\vfill\\\\eject\\n\\n"\);)s 349 680 p (page)s 2 r 10 1 ru 15 r (len)s 18 r (=)s 17 r (0;)s 314 721 p (})s 279 761 p (++line)s 2 r 10 1 ru 15 r (counter;)s 279 802 p (++page)s 2 r 10 1 ru 15 r (len;)s 279 842 p (if)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 18 r (0\))s 314 882 p ({)s 349 923 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(ptr->buffer\);)s 349 963 p (if)s 17 r (\(\(Page)s 2 r 10 1 ru 16 r (Len)s 2 r 10 1 ru 15 r (Max)s 17 r (<)s 18 r (0\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r (EOF\)\))s 384 1004 p (fprintf\(fptr[1],)s 17 r ("\\\\hfill\\n\\n\\\\noindent\\n"\);)s 349 1044 p (else)s 384 1085 p ({)s 0 1125 p (#ifdef)s 17 r (LATEX)s 418 1165 p (fprintf\(fptr[1],)s 18 r ("\\\\hfill"\);)s 418 1206 p (fprintf)s 3 r 10 1 ru 15 r (line)s 2 r 10 1 ru 15 r (number\(fptr,)s 18 r (line)s 2 r 10 1 ru 15 r (counter\);)s 0 1246 p (#else)s 418 1287 p (fprintf\(fptr[1],)s 18 r ("\\\\hfill\\n\\n\\\\item{\\\\tt)s 17 r (%d:\\\\)s 18 r (}\\n",)s 558 1327 p (line)s 2 r 10 1 ru 15 r (counter)s 18 r (+)s 17 r (1\);)s 0 1368 p (#endif)s 384 1408 p (})s 314 1449 p (})s 279 1489 p (else)s 314 1529 p ({)s 349 1570 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(ptr->buffer\);)s 349 1610 p (if)s 17 r (\(\(Page)s 2 r 10 1 ru 16 r (Len)s 2 r 10 1 ru 15 r (Max)s 17 r (<)s 18 r (0\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 18 r (EOF\)\))s 384 1651 p (fprintf\(fptr[1],)s 17 r ("\\n\\n\\\\noindent\\n"\);)s 349 1691 p (else)s 384 1732 p ({)s 0 1772 p (#ifdef)s 17 r (LATEX)s 418 1812 p (fprintf)s 3 r 10 1 ru 15 r (line)s 2 r 10 1 ru 15 r (number\(fptr,)s 18 r (line)s 2 r 10 1 ru 15 r (counter\);)s 0 1853 p (#else)s 418 1893 p (fprintf\(fptr[1],)s 18 r ("\\n\\n\\\\item{\\\\tt)s 17 r (%d:\\\\)s 18 r (}\\n",)s 558 1934 p (line)s 2 r 10 1 ru 15 r (counter)s 18 r (+)s 17 r (1\);)s 0 1974 p (#endif)s 384 2015 p (})s 314 2055 p (})s 279 2096 p (if)s 17 r (\(ptr->flag)s 18 r (==)s 17 r (0\))s 314 2136 p (fprintf\(fptr[1],)s 17 r ("{}"\);)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (27)s EP pstopssaved restore %%Page: pstops 28 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 279 33 p (char)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (-1;)s 279 74 p (break;)s 244 114 p (case)s 18 r ('\\v':)s 279 155 p (fprintf\(fptr[1],)s 17 r ("{\\\\vskip%dex\\\\relax)s 18 r (}",)s 17 r (Vtab)s 2 r 10 1 ru 16 r (Size\);)s 279 195 p (break;)s 244 235 p (case)s 18 r ('\\f':)s 0 276 p (/*)s f0 SF 279 316 p (fprintf\(fptr[1],)s f3 SF 418 357 p (")s f0 SF 11 r (\\sevenrm)s 11 r (F\\kern-.15em\\lo)s -1 r (w)s -1 r (er.5ex\\h)s -1 r (boxF)s f3 SF 10 r (")s f0 SF (\);)s f3 SF 0 397 p (*/)s 279 438 p (fprintf\(fptr[1],)s 418 478 p ("\\\\vfill\\\\eject\\n\\n\\\\noindent\\n"\);)s 279 518 p (break;)s 244 559 p (case)s 18 r ('\\r':)s 0 599 p (#ifdef)s 17 r (UNIX)s 279 640 p (fprintf\(fptr[1],)s 418 680 p ("{\\\\sevenrm)s 18 r (C\\\\kern-.15em\\\\lower.5ex\\\\hbox{R}}"\);)s 0 721 p (#else)s 279 761 p (fprintf\(fptr[1],)s 418 802 p ("%c",)s 18 r (\(char\))s 17 r (ptr->character\);)s 0 842 p (#endif)s 279 882 p (break;)s 244 923 p (case)s 18 r (0x0e:)s 279 963 p (fprintf\(fptr[1],)s 418 1004 p ("{\\\\sevenrm)s 18 r (S\\\\kern-.15em\\\\lower.5ex\\\\hbox{O}}"\);)s 279 1044 p (break;)s 244 1085 p (case)s 18 r (0x0f:)s 279 1125 p (fprintf\(fptr[1],)s 418 1165 p ("{\\\\sevenrm)s 18 r (S\\\\kern-.15em\\\\lower.5ex\\\\hbox{I}}"\);)s 279 1206 p (break;)s 244 1246 p (case)s 18 r (0x10:)s 279 1287 p (fprintf\(fptr[1],)s 418 1327 p ("{\\\\sevenrm)s 18 r (D\\\\kern-.15em\\\\lower.5ex\\\\hbox{L}}"\);)s 279 1368 p (break;)s 244 1408 p (case)s 18 r (0x11:)s 279 1449 p (fprintf\(fptr[1],)s 418 1489 p ("{\\\\sevenrm)s 18 r (D\\\\kern-.15em\\\\lower.5ex\\\\hbox{1}}"\);)s 279 1529 p (break;)s 244 1570 p (case)s 18 r (0x12:)s 279 1610 p (fprintf\(fptr[1],)s 418 1651 p ("{\\\\sevenrm)s 18 r (D\\\\kern-.15em\\\\lower.5ex\\\\hbox{2}}"\);)s 279 1691 p (break;)s 244 1732 p (case)s 18 r (0x13:)s 279 1772 p (fprintf\(fptr[1],)s 418 1812 p ("{\\\\sevenrm)s 18 r (D\\\\kern-.15em\\\\lower.5ex\\\\hbox{3}}"\);)s 279 1853 p (break;)s 244 1893 p (case)s 18 r (0x14:)s 279 1934 p (fprintf\(fptr[1],)s 418 1974 p ("{\\\\sevenrm)s 18 r (D\\\\kern-.15em\\\\lower.5ex\\\\hbox{4}}"\);)s 279 2015 p (break;)s 244 2055 p (case)s 18 r (0x15:)s 279 2096 p (fprintf\(fptr[1],)s 418 2136 p ("{\\\\sevenrm)s 18 r (N\\\\kern-.15em\\\\lower.5ex\\\\hbox{K}}"\);)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (28)s EP pstopssaved restore %%Page: pstops 29 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 279 33 p (break;)s 244 74 p (case)s 18 r (0x16:)s 279 114 p (fprintf\(fptr[1],)s 418 155 p ("{\\\\sevenrm)s 18 r (S\\\\kern-.15em\\\\lower.5ex\\\\hbox{Y}}"\);)s 279 195 p (break;)s 244 235 p (case)s 18 r (0x17:)s 279 276 p (fprintf\(fptr[1],)s 418 316 p ("{\\\\sevenrm)s 18 r (E\\\\kern-.15em\\\\lower.5ex\\\\hbox{B}}"\);)s 279 357 p (break;)s 244 397 p (case)s 18 r (0x18:)s 279 438 p (fprintf\(fptr[1],)s 418 478 p ("{\\\\sevenrm)s 18 r (C\\\\kern-.15em\\\\lower.5ex\\\\hbox{N}}"\);)s 279 518 p (break;)s 244 559 p (case)s 18 r (0x19:)s 279 599 p (fprintf\(fptr[1],)s 418 640 p ("{\\\\sevenrm)s 18 r (E\\\\kern-.15em\\\\lower.5ex\\\\hbox{M}}"\);)s 279 680 p (break;)s 244 721 p (case)s 18 r (0x1a:)s 279 761 p (fprintf\(fptr[1],)s 418 802 p ("{\\\\sevenrm)s 18 r (S\\\\kern-.15em\\\\lower.5ex\\\\hbox{B}}"\);)s 279 842 p (break;)s 244 882 p (case)s 18 r (0x1b:)s 279 923 p (fprintf\(fptr[1],)s 418 963 p ("{\\\\sevenrm)s 18 r (E\\\\kern-.15em\\\\lower.5ex\\\\hbox{C}}"\);)s 279 1004 p (break;)s 244 1044 p (case)s 18 r (0x1c:)s 279 1085 p (fprintf\(fptr[1],)s 418 1125 p ("{\\\\sevenrm)s 18 r (F\\\\kern-.15em\\\\lower.5ex\\\\hbox{S}}"\);)s 279 1165 p (break;)s 244 1206 p (case)s 18 r (0x1d:)s 279 1246 p (fprintf\(fptr[1],)s 418 1287 p ("{\\\\sevenrm)s 18 r (G\\\\kern-.15em\\\\lower.5ex\\\\hbox{S}}"\);)s 279 1327 p (break;)s 244 1368 p (case)s 18 r (0x1e:)s 279 1408 p (fprintf\(fptr[1],)s 418 1449 p ("{\\\\sevenrm)s 18 r (R\\\\kern-.15em\\\\lower.5ex\\\\hbox{S}}"\);)s 279 1489 p (break;)s 244 1529 p (case)s 18 r (0x1f:)s 279 1570 p (fprintf\(fptr[1],)s 418 1610 p ("{\\\\sevenrm)s 18 r (U\\\\kern-.15em\\\\lower.5ex\\\\hbox{S}}"\);)s 279 1651 p (break;)s 244 1691 p (case)s 18 r (')s 17 r (':)s 279 1732 p (++)s 17 r (space)s 2 r 10 1 ru 16 r (counter;)s 279 1772 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr->buffer\);)s 279 1812 p (if)s 17 r (\(\(\(char\)*cptr1)s 18 r (!=)s 17 r (')s 18 r ('\))s 17 r (||)s 18 r (\(*cptr1)s 17 r (==)s 17 r (EOF\)\))s 314 1853 p ({)s 349 1893 p (if)s 17 r (\(ptr->flag)s 18 r (==)s 17 r (0\))s 384 1934 p (fprintf\(fptr[1],)s 17 r ("{%s\\\\kern%3.3fem}",)s 17 r (TextModeFont,)s 523 1974 p (\(float\))s 17 r (SPACE)s 18 r (*)s 17 r (\(float\))s 18 r (space)s 2 r 10 1 ru 15 r (counter\);)s 349 2015 p (else)s 384 2055 p (fprintf\(fptr[1],)s 17 r ("\\\\kern%3.3fem)s 17 r (",)s 523 2096 p (\(float\))s 17 r (SPACE)s 18 r (*)s 17 r (\(float\))s 18 r (space)s 2 r 10 1 ru 15 r (counter\);)s 349 2136 p (space)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (0;)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (29)s EP pstopssaved restore %%Page: pstops 30 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 314 33 p (})s 279 74 p (break;)s 244 114 p (case)s 18 r ('"':)s 279 155 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (\\"}"\);)s 279 195 p (break;)s 244 235 p (case)s 18 r ('#':)s 279 276 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\#}"\);)s 279 316 p (break;)s 244 357 p (case)s 18 r ('$':)s 279 397 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\$}"\);)s 279 438 p (break;)s 244 478 p (case)s 18 r ('%':)s 279 518 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\%c}",)s 18 r (\(char\))s 17 r (ptr->character\);)s 279 559 p (break;)s 244 599 p (case)s 18 r ('&':)s 279 640 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\&}"\);)s 279 680 p (break;)s 244 721 p (case)s 18 r ('*':)s 279 761 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (*}"\);)s 279 802 p (break;)s 244 842 p (case)s 18 r ('-':)s 279 882 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (-}"\);)s 279 923 p (break;)s 244 963 p (case)s 18 r ('/':)s 279 1004 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (/}"\);)s 279 1044 p (break;)s 244 1085 p (case)s 18 r ('<':)s 279 1125 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (<}"\);)s 279 1165 p (break;)s 244 1206 p (case)s 18 r ('>':)s 279 1246 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (>}"\);)s 279 1287 p (break;)s 244 1327 p (case)s 18 r ('\\\\':)s 279 1368 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\char92}"\);)s 279 1408 p (break;)s 244 1449 p (case)s 18 r ('^':)s 279 1489 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\char'136}"\);)s 279 1529 p (break;)s 244 1570 p (case)s 18 r (')s 2 r 10 1 ru 15 r (':)s 279 1610 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\)s 2 r 10 1 ru 16 r (\\\\kern.141em}"\);)s 279 1651 p (break;)s 244 1691 p (case)s 18 r ('{':)s 279 1732 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\char'173}"\);)s 279 1772 p (break;)s 244 1812 p (case)s 18 r ('|':)s 279 1853 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (|}"\);)s 279 1893 p (break;)s 244 1934 p (case)s 18 r ('}':)s 279 1974 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\char'175}"\);)s 279 2015 p (break;)s 244 2055 p (case)s 18 r ('~':)s 279 2096 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\char'176}"\);)s 279 2136 p (break;)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (30)s EP pstopssaved restore %%Page: pstops 31 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 244 33 p (case)s 18 r (0x7f:)s 279 74 p (fprintf\(fptr[1],)s 418 114 p ("{\\\\sevenrm)s 18 r (D\\\\kern-.15em\\\\lower.5ex\\\\hbox{T}}"\);)s 279 155 p (break;)s 244 195 p (default:)s 279 235 p (/*)s f0 SF 17 r (text)s 16 r (and)s 17 r (b)s 1 r (old)s 16 r (face)s 17 r (mo)s 1 r (de)s f3 SF 818 r (*/)s 279 276 p (if)s 17 r (\(\(ptr->flag)s 18 r (==)s 17 r (0\))s 18 r (&&)s 17 r (\(bf)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 17 r (0\)\))s 314 316 p ({)s 349 357 p (--bf)s 2 r 10 1 ru 15 r (flag;)s 349 397 p (/*)s f0 SF 16 r (in)s 17 r (case)s 16 r (T)s -1 r (extModeF)s -2 r (on)s -1 r (t)s 16 r (=)s f3 SF 16 r (\\)s f0 SF (tt)s f3 SF 689 r (*/)s 349 438 p (if)s 17 r (\(\(*TextModeFont)s 18 r (==)s 17 r ('\\\\'\))s 418 478 p (&&)s 18 r (\(*\(TextModeFont)s 17 r (+)s 18 r (1\))s 17 r (==)s 18 r ('t'\))s 418 518 p (&&)s 18 r (\(*\(TextModeFont)s 17 r (+)s 18 r (2\))s 17 r (==)s 18 r ('t'\)\))s 384 559 p ({)s 418 599 p (/*)s f0 SF 17 r (text)s 11 r (mo)s 1 r (de)s 11 r (b)s 1 r (old)s 11 r (face)s 11 r (font)s 10 r (is)s 11 r (created)s 11 r (by)s 11 r (ov)s -1 r (erprin)s -1 r (ting)s 10 r (the)s 11 r (slightly)s f3 SF 140 r (*/)s 418 640 p (/*)s f0 SF 17 r (shifted)s 11 r (same)s 11 r (character)s f3 SF 729 r (*/)s 418 680 p (fprintf\(fptr[1],)s 18 r ("%c",)s 17 r (\(char\))s 18 r (ptr->character\);)s 418 721 p (switch)s 18 r (\(ptr->character\))s 453 761 p ({)s 453 802 p (case)s 18 r ('e':)s 488 842 p (fprintf\(fptr[1],)s 18 r ("\\\\kern-.445em)s 17 r (%c\\\\kern-.055em)s 17 r (",)s 628 882 p (\(char\))s 17 r (ptr->character\);)s 488 923 p (break;)s 453 963 p (case)s 18 r ('n':)s 488 1004 p (fprintf\(fptr[1],)s 18 r ("\\\\kern-.46em)s 17 r (%c\\\\kern-.04em)s 17 r (",)s 628 1044 p (\(char\))s 17 r (ptr->character\);)s 488 1085 p (break;)s 453 1125 p (case)s 18 r ('t':)s 488 1165 p (fprintf\(fptr[1],)s 18 r ("\\\\kern-.445em)s 17 r (%c\\\\kern-.055em)s 17 r (",)s 628 1206 p (\(char\))s 17 r (ptr->character\);)s 488 1246 p (break;)s 453 1287 p (case)s 18 r ('u':)s 488 1327 p (fprintf\(fptr[1],)s 18 r ("\\\\kern-.46em)s 17 r (%c\\\\kern-.04em)s 17 r (",)s 628 1368 p (\(char\))s 17 r (ptr->character\);)s 488 1408 p (break;)s 453 1449 p (default:)s 488 1489 p (fprintf\(fptr[1],)s 18 r ("\\\\kern-.455em)s 17 r (%c\\\\kern-.045em)s 17 r (",)s 628 1529 p (\(char\))s 17 r (ptr->character\);)s 453 1570 p (})s 384 1610 p (})s 349 1651 p (else)s 384 1691 p (/*)s f0 SF 16 r (in)s 17 r (case)s 16 r (T)s -1 r (extModeF)s -2 r (on)s -1 r (t)s 15 r (!=)s f3 SF 17 r (\\)s f0 SF (tt)s f3 SF 645 r (*/)s 384 1732 p ({)s 418 1772 p (/*)s f0 SF 17 r (in)s 17 r (case)s 16 r (T)s -2 r (extModeF)s -1 r (on)s -1 r (t)s 15 r (=)s f3 SF 17 r (\\)s f0 SF (bf)s f3 SF 616 r (*/)s 418 1812 p (if)s 18 r (\(\(*TextModeFont)s 17 r (==)s 18 r ('\\\\'\))s 488 1853 p (&&)s 18 r (\(*\(TextModeFont)s 17 r (+)s 17 r (1\))s 18 r (==)s 17 r ('b'\))s 488 1893 p (&&)s 18 r (\(*\(TextModeFont)s 17 r (+)s 17 r (2\))s 18 r (==)s 17 r ('f'\)\))s 453 1934 p ({)s 0 1974 p (#ifdef)s 17 r (ASCII)s 488 2015 p (/*)s f0 SF 17 r (ASCI)s 1 r (I)s 11 r (JT)s 678 2022 p (E)s 697 2015 p (X)s f3 SF 803 r (*/)s 488 2055 p (fprintf\(fptr[1],)s 18 r ("{\\\\rm\\\\mc)s 17 r (%c}",)s 628 2096 p (\(char\))s 17 r (ptr->character\);)s 0 2136 p (#else)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (31)s EP pstopssaved restore %%Page: pstops 32 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 0 33 p (#ifdef)s 17 r (NTT)s 488 74 p (/*)s f0 SF 17 r (NTT)s 11 r (JT)s 659 81 p (E)s 678 74 p (X)s f3 SF 822 r (*/)s 488 114 p (fprintf\(fptr[1],)s 18 r ("{\\\\rm\\\\dm)s 17 r (%c}",)s 628 155 p (\(char\))s 17 r (ptr->character\);)s 0 195 p (#else)s 488 235 p (/*)s f0 SF 17 r (T)s 558 243 p (E)s 577 235 p (X)s f3 SF 923 r (*/)s 488 276 p (fprintf\(fptr[1],)s 18 r ("{\\\\rm)s 17 r (%c}",)s 628 316 p (\(char\))s 17 r (ptr->character\);)s 0 357 p (#endif)s 0 397 p (#endif)s 453 438 p (})s 418 478 p (else)s 453 518 p (/*)s f0 SF 17 r (in)s 16 r (case)s 17 r (T)s -2 r (extModeF)s -2 r (ont)s 15 r (!=)s f3 SF 17 r (\\)s f0 SF (bf)s f3 SF 572 r (*/)s 453 559 p ({)s 0 599 p (#ifdef)s 17 r (ASCII)s 488 640 p (/*)s f0 SF 17 r (ASCI)s 1 r (I)s 11 r (JT)s 678 647 p (E)s 697 640 p (X)s f3 SF 803 r (*/)s 488 680 p (fprintf\(fptr[1],)s 18 r ("{\\\\bf\\\\gt)s 17 r (%c}",)s 628 721 p (\(char\))s 17 r (ptr->character\);)s 0 761 p (#else)s 0 802 p (#ifdef)s 17 r (NTT)s 488 842 p (/*)s f0 SF 17 r (NTT)s 11 r (JT)s 659 849 p (E)s 678 842 p (X)s f3 SF 822 r (*/)s 488 882 p (fprintf\(fptr[1],)s 18 r ("{\\\\bf\\\\dg)s 17 r (%c}",)s 628 923 p (\(char\))s 17 r (ptr->character\);)s 0 963 p (#else)s 488 1004 p (/*)s f0 SF 17 r (T)s 558 1011 p (E)s 577 1004 p (X)s f3 SF 923 r (*/)s 488 1044 p (fprintf\(fptr[1],)s 18 r ("{\\\\bf)s 17 r (%c}",)s 628 1085 p (\(char\))s 17 r (ptr->character\);)s 0 1125 p (#endif)s 0 1165 p (#endif)s 453 1206 p (})s 384 1246 p (})s 314 1287 p (})s 279 1327 p (/*)s f0 SF 17 r (non)s f3 SF (-)s f0 SF (text)s 16 r (or)s 17 r (non)s f3 SF (-)s f0 SF (b)s 1 r (old)s 16 r (face)s 17 r (mo)s 1 r (de)s f3 SF 700 r (*/)s 279 1368 p (else)s 314 1408 p ({)s 349 1449 p (fprintf\(fptr[1],)s 17 r ("%c",)s 18 r (\(char\))s 17 r (ptr->character\);)s 314 1489 p (})s 244 1529 p (})s 209 1570 p (++char)s 2 r 10 1 ru 16 r (counter;)s 209 1610 p (if)s 18 r (\(\(char)s 2 r 10 1 ru 15 r (counter)s 18 r (>=)s 17 r (100\))s 17 r (&&)s 18 r (\(warn)s 2 r 10 1 ru 15 r (flag2)s 18 r (<=)s 17 r (2\)\))s 244 1651 p ({)s 279 1691 p (++warn)s 2 r 10 1 ru 15 r (flag2;)s 0 1732 p (#ifdef)s 17 r (DEBUGGING)s 279 1772 p (printf\("text2tex\(\):)s 17 r (warn)s 2 r 10 1 ru 16 r (flag2)s 17 r (is)s 18 r (set)s 17 r (to)s 18 r (%d\\n",)s 17 r (warn)s 2 r 10 1 ru 15 r (flag2\);)s 0 1812 p (#endif)s 279 1853 p (if)s 17 r (\(warn)s 2 r 10 1 ru 16 r (flag2)s 17 r (>)s 18 r (2\))s 314 1893 p ({)s 349 1934 p (if)s 17 r (\(warn)s 2 r 10 1 ru 16 r (flag1)s 17 r (<=)s 17 r (5\))s 384 1974 p (fprintf\(stderr,)s 17 r ("\\n"\);)s 349 2015 p (fprintf\(stderr,)s 418 2055 p ("Warning:)s 18 r (source)s 17 r (file)s 18 r (contains)s 17 r (very)s 18 r (long)s 17 r (lines;\\n"\);)s 349 2096 p (fprintf\(stderr,)s 418 2136 p (")s 157 r (their)s 18 r (tails)s 17 r (are)s 18 r (sometimes)s 17 r (truncated\\n"\);)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (32)s EP pstopssaved restore %%Page: pstops 33 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 314 33 p (})s 244 74 p (})s 209 114 p (if)s 18 r (\(\(\(C)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 17 r (||)s 18 r (\(F77)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 18 r (||)s 17 r (\(PAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 17 r (0\)\))s 279 155 p (&&)s 17 r (\(\(char\))s 18 r (ptr->character)s 17 r (==)s 18 r (0x27\)\))s 244 195 p ({)s 279 235 p (++qt)s 2 r 10 1 ru 15 r (counter;)s 279 276 p (qt)s 2 r 10 1 ru 15 r (counter)s 18 r (%=)s 17 r (2;)s 244 316 p (})s 209 357 p (if)s 18 r (\(\(\(BAS)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\))s 17 r (||)s 18 r (\(C)s 2 r 10 1 ru 15 r (flag)s 18 r (!=)s 17 r (0\)\))s 279 397 p (&&)s 17 r (\(\(char\))s 18 r (ptr->character)s 17 r (==)s 18 r ('"'\)\))s 244 438 p ({)s 279 478 p (++dqt)s 2 r 10 1 ru 15 r (counter;)s 279 519 p (dqt)s 2 r 10 1 ru 15 r (counter)s 18 r (%=)s 17 r (2;)s 244 559 p (})s 209 599 p (continue;)s 174 640 p (})s 0 721 p (/*)s 17 r 650 1 ru f0 SF 661 r (T)s 731 728 p (E)s 750 721 p (X)s 11 r (mo)s 1 r (de)s 11 r 650 1 ru f3 SF 650 r (*/)s 0 761 p (/*)s f0 SF 17 r (Unfortunately)s -2 r (,)s 12 r (some)s 13 r (languages)s 13 r (cannot)s 13 r (co)s 1 r (exist)s 13 r (with)s 13 r (T)s 833 768 p (E)s 852 761 p (X.)s 13 r (So,)s 13 r (we)s 12 r (sometimes)s 13 r (have)s 12 r (to)s 13 r (modify)s 13 r (input)s 13 r (data)s 0 801 p (and)s 11 r (translate)s 11 r (them)s 11 r (into)s 10 r (T)s 374 808 p (E)s 392 801 p (X.)s f3 SF 1099 r (*/)s 139 882 p (if)s 18 r (\(ptr->flag)s 17 r (==)s 18 r (2\))s 174 922 p ({)s 209 963 p (switch)s 18 r (\(ptr->character\))s 244 1003 p ({)s 279 1044 p (/*)s f0 SF 17 r (skip)s 16 r (BASIC)s 17 r (and)s 16 r (COBOL)s 17 r (line)s 17 r (num)s -1 r (ber)s f3 SF 615 r (*/)s 244 1084 p (case)s 18 r ('\\n':)s 279 1125 p (fprintf\(fptr[1],)s 17 r ("\\n"\);)s 279 1165 p (++line)s 2 r 10 1 ru 15 r (counter;)s 279 1206 p (++page)s 2 r 10 1 ru 15 r (len;)s 279 1246 p (char)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (-1;)s 279 1287 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr->buffer\);)s 279 1327 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 1367 p (if)s 17 r (\(\(\(BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 17 r (||)s 18 r (\(CBL)s 2 r 10 1 ru 15 r (flag)s 17 r (!=)s 18 r (0\)\))s 366 1408 p (&&)s 18 r (\(\(*cptr1)s 17 r (<=)s 17 r (')s 18 r ('\))s 436 1448 p (||)s 17 r (\(\(*cptr1)s 18 r (>=)s 17 r ('0'\))s 18 r (&&)s 17 r (\(*cptr1)s 17 r (<=)s 18 r ('9'\)\)\)\))s 314 1489 p ({)s 0 1529 p (#ifdef)s 17 r (DEBUGGING)s 349 1570 p (printf\("skipping)s 17 r (BASIC)s 18 r (and)s 17 r (COBOL)s 17 r (line)s 18 r (number)s 17 r (...\\n"\);)s 349 1610 p (printf\("%c%c...\\n",)s 17 r (*cptr1,)s 18 r (*cptr2\);)s 0 1651 p (#endif)s 349 1691 p (while)s 17 r (\(*cptr1)s 18 r (!=)s 17 r (EOF\))s 384 1731 p ({)s 418 1772 p (cptr1)s 18 r (=)s 17 r (fgetc2buffer\(fptr\);)s 418 1812 p (cptr2)s 18 r (=)s 17 r (inc)s 2 r 10 1 ru 16 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 418 1853 p (if)s 18 r (\(\(*cptr1)s 17 r (<=)s 18 r (')s 17 r ('\))s 18 r (&&)s 488 1893 p (\(\(\(*cptr2)s 18 r (>)s 17 r (')s 17 r ('\))s 18 r (&&)s 17 r (\(*cptr2)s 18 r (<)s 17 r ('0'\)\))s 506 1934 p (||)s 17 r (\(*cptr2)s 17 r (>)s 18 r ('9'\)\)\))s 453 1974 p ({)s 488 2015 p (if)s 18 r (\(BAS)s 2 r 10 1 ru 15 r (flag)s 17 r (!=)s 18 r (0\))s 523 2055 p (*cptr1)s 17 r (=)s 18 r ('\\n';)s 488 2095 p (break;)s 453 2136 p (})s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (33)s EP pstopssaved restore %%Page: pstops 34 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 384 33 p (})s 314 74 p (})s 279 114 p (break;)s 279 155 p (/*)s f0 SF 17 r (skip)s 16 r (MAPLE)s 17 r (or)s 16 r (MA)s -1 r (TLAB)s 15 r (comment)s 16 r (sign)s f3 SF 567 r (*/)s 244 195 p (case)s 18 r ('#':)s 279 235 p (if)s 17 r (\(\(\(MAKE)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(PERL)s 2 r 10 1 ru 15 r (flag)s 17 r (==)s 18 r (0\))s 366 276 p (&&)s 18 r (\(SH)s 2 r 10 1 ru 15 r (flag)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(TCL)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 366 316 p (&&)s 18 r (\(MAP)s 2 r 10 1 ru 15 r (flag)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(MLAB)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\)\))s 349 357 p (||)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (!=)s 17 r (0\)\))s 314 397 p (fprintf\(fptr[1],)s 17 r ("%c",)s 18 r (\(char\))s 17 r (ptr->character\);)s 279 438 p (break;)s 279 478 p (/*)s f0 SF 17 r (skip)s 16 r (REDUCE)s 17 r (or)s 16 r (OCT)s -1 r (A)s -4 r (VE)s 16 r (comment)s 15 r (sign)s f3 SF 551 r (*/)s 244 518 p (case)s 18 r ('%':)s 279 559 p (if)s 17 r (\(\(\(RED)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(MLAB)s 2 r 10 1 ru 15 r (flag)s 17 r (==)s 18 r (0\)\))s 349 599 p (||)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (!=)s 17 r (0\)\))s 314 640 p (fprintf\(fptr[1],)s 17 r ("%c",)s 18 r (\(char\))s 17 r (ptr->character\);)s 279 680 p (break;)s 279 721 p (/*)s f0 SF 17 r (skip)s 16 r (BASIC)s 17 r (comment)s 15 r (sign)s f3 SF 795 r (*/)s 244 761 p (case)s 18 r (0x27:)s 279 802 p (if)s 17 r (\(\(BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 17 r (||)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 17 r (!=)s 18 r (0\)\))s 314 842 p (fprintf\(fptr[1],)s 17 r ("%c",)s 18 r (\(char\))s 17 r (ptr->character\);)s 279 882 p (break;)s 279 923 p (/*)s f0 SF 17 r (skip)s 16 r (FOR)s -3 r (TRAN)s 16 r (comment)s 16 r (sign)s f3 SF 731 r (*/)s 244 963 p (case)s 18 r ('*':)s 279 1004 p (if)s 17 r (\(\(\(F77)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 17 r (&&)s 18 r (\(CBL)s 2 r 10 1 ru 15 r (flag)s 17 r (==)s 18 r (0\)\))s 349 1044 p (||)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (!=)s 17 r (0\)\))s 314 1085 p (fprintf\(fptr[1],)s 17 r ("*"\);)s 279 1125 p (break;)s 279 1165 p (/*)s f0 SF 17 r (skip)s 16 r (C++)s 17 r (or)s 16 r (JA)s -2 r (V)s -4 r (A)s 16 r (comment)s 15 r (sign)s f3 SF 675 r (*/)s 244 1206 p (case)s 18 r ('/':)s 279 1246 p (if)s 17 r (\(\(\(C)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 17 r (||)s 18 r (\(JAVA)s 2 r 10 1 ru 15 r (flag)s 17 r (!=)s 18 r (0\)\))s 349 1287 p (&&)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (==)s 17 r (0\)\))s 314 1327 p ({)s 349 1368 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(ptr->buffer\);)s 349 1408 p (if)s 17 r (\(*cptr1)s 18 r (==)s 17 r ('/'\))s 384 1449 p (*cptr1)s 17 r (=)s 17 r (')s 18 r (';)s 314 1489 p (})s 279 1529 p (else)s 314 1570 p (fprintf\(fptr[1],)s 17 r ("/"\);)s 279 1610 p (break;)s 279 1651 p (/*)s f0 SF 17 r (skip)s 16 r (LISP)s 17 r (comment)s 15 r (sign)s f3 SF 824 r (*/)s 244 1691 p (case)s 18 r (';':)s 279 1732 p (if)s 17 r (\(\(LISP)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 17 r (&&)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 17 r (==)s 18 r (0\)\))s 314 1772 p ({)s 349 1812 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 15 r (ptr\(ptr->buffer\);)s 349 1853 p (while)s 17 r (\(*cptr1)s 18 r (==)s 17 r (';'\))s 384 1893 p ({)s 418 1934 p (*cptr1)s 18 r (=)s 17 r (')s 18 r (';)s 418 1974 p (cptr1)s 18 r (=)s 17 r (inc)s 2 r 10 1 ru 16 r (buf)s 2 r 10 1 ru 15 r (ptr\(cptr1\);)s 384 2015 p (})s 314 2055 p (})s 279 2096 p (else)s 314 2136 p (fprintf\(fptr[1],)s 17 r (";"\);)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (34)s EP pstopssaved restore %%Page: pstops 35 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 279 33 p (break;)s 279 74 p (/*)s f0 SF 17 r (skip)s 16 r (FOR)s -3 r (TRAN)s 16 r (comment)s 16 r (sign)s f3 SF 731 r (*/)s 244 114 p (case)s 18 r ('C':)s 279 155 p (if)s 17 r (\(\(F77)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 17 r (||)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 17 r (!=)s 18 r (0\)\))s 314 195 p (fprintf\(fptr[1],)s 17 r ("C"\);)s 279 235 p (break;)s 279 276 p (/*)s f0 SF 17 r (skip)s 16 r (BASIC)s 17 r (comment)s 15 r (sign)s f3 SF 795 r (*/)s 244 316 p (case)s 18 r ('R':)s 279 357 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr->buffer\);)s 279 397 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 438 p (if)s 17 r (\(\(BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 17 r (&&)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 17 r (==)s 18 r (0\))s 349 478 p (&&\(\(*cptr1)s 17 r (==)s 18 r ('E'\))s 17 r (||)s 17 r (\(*cptr1)s 18 r (==)s 17 r ('e'\)\))s 349 518 p (&&\(\(*cptr2)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 17 r (\(*cptr2)s 18 r (==)s 17 r ('m'\)\)\))s 314 559 p ({)s 349 599 p (*cptr1)s 17 r (=)s 18 r (')s 17 r (';)s 349 640 p (*cptr2)s 17 r (=)s 18 r (')s 17 r (';)s 314 680 p (})s 279 721 p (else)s 314 761 p (fprintf\(fptr[1],"R"\);)s 279 802 p (break;)s 279 842 p (/*)s f0 SF 17 r (skip)s 16 r (FOR)s -3 r (TRAN)s 16 r (comment)s 16 r (sign)s f3 SF 731 r (*/)s 244 882 p (case)s 18 r ('c':)s 279 923 p (if)s 17 r (\(\(F77)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 18 r (0\))s 17 r (||)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 17 r (!=)s 18 r (0\)\))s 314 963 p (fprintf\(fptr[1],)s 17 r ("c"\);)s 279 1004 p (break;)s 279 1044 p (/*)s f0 SF 17 r (skip)s 16 r (BASIC)s 17 r (comment)s 15 r (sign)s f3 SF 795 r (*/)s 244 1085 p (case)s 18 r ('r':)s 279 1125 p (cptr1)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(ptr->buffer\);)s 279 1165 p (cptr2)s 17 r (=)s 18 r (inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(cptr1\);)s 279 1206 p (if)s 17 r (\(\(BAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 17 r (&&)s 18 r (\(char)s 2 r 10 1 ru 15 r (counter)s 17 r (==)s 18 r (0\))s 349 1246 p (&&\(\(*cptr1)s 17 r (==)s 18 r ('E'\))s 17 r (||)s 17 r (\(*cptr1)s 18 r (==)s 17 r ('e'\)\))s 349 1287 p (&&\(\(*cptr2)s 17 r (==)s 18 r ('M'\))s 17 r (||)s 17 r (\(*cptr2)s 18 r (==)s 17 r ('m'\)\)\))s 314 1327 p ({)s 349 1368 p (*cptr1)s 17 r (=)s 18 r (')s 17 r (';)s 349 1408 p (*cptr2)s 17 r (=)s 18 r (')s 17 r (';)s 314 1449 p (})s 279 1489 p (else)s 314 1529 p (fprintf\(fptr[1],"r"\);)s 279 1570 p (break;)s 244 1610 p (default:)s 279 1651 p (fprintf\(fptr[1],)s 17 r ("%c",)s 18 r (\(char\))s 17 r (ptr->character\);)s 244 1691 p (})s 209 1732 p (++char)s 2 r 10 1 ru 16 r (counter;)s 209 1772 p (continue;)s 174 1812 p (})s 105 1853 p (})s 0 1934 p (/*)s 17 r 605 1 ru f0 SF 615 r (closing)s 11 r (message)s 11 r 605 1 ru f3 SF 622 r (*/)s 70 1974 p (fprintf\(fptr[1],)s 17 r ("\\n\\n"\);)s 0 2015 p (#ifndef)s 17 r (PLAIN)s 0 2055 p (#ifdef)s 17 r (LATEX)s 210 r (/*)s f0 SF 489 r (LaT)s -2 r (eX)s f3 SF 483 r (*/)s 0 2096 p (#ifdef)s 17 r (ASCII)s 210 r (/*)s f0 SF 16 r (ASCI)s 1 r (I)s 17 r (JT)s -2 r (eX)s f3 SF 867 r (*/)s 70 2136 p (fprintf\(fptr[1],)s 17 r ("\\\\rm\\\\mc\\n\\n"\);)s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (35)s EP pstopssaved restore %%Page: pstops 36 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f3 SF 0 33 p (#else)s 0 73 p (#ifdef)s 17 r (NTT)s 245 r (/*)s f0 SF 16 r (NTT)s 17 r (JT)s -2 r (eX)s f3 SF 887 r (*/)s 70 113 p (fprintf\(fptr[1],)s 17 r ("\\\\rm\\\\dm\\n\\n"\);)s 0 153 p (#else)s 70 193 p (fprintf\(fptr[1],)s 17 r ("\\\\rm\\n\\n"\);)s 0 232 p (#endif)s 0 272 p (#endif)s 70 312 p (fprintf\(fptr[1],)s 17 r ("\\\\end{document}\\n"\);)s 0 352 p (#else)s 331 r (/*)s f0 SF 459 r (plain)s 11 r (T)s -2 r (eX)s f3 SF 468 r (*/)s 0 392 p (#ifdef)s 17 r (ASCII)s 210 r (/*)s f0 SF 16 r (ASCI)s 1 r (I)s 17 r (JT)s -2 r (eX)s f3 SF 867 r (*/)s 70 432 p (fprintf\(fptr[1],)s 17 r ("\\\\rm\\\\mc\\n\\n"\);)s 0 472 p (#else)s 0 511 p (#ifdef)s 17 r (NTT)s 245 r (/*)s f0 SF 16 r (NTT)s 17 r (JT)s -2 r (eX)s f3 SF 887 r (*/)s 70 551 p (fprintf\(fptr[1],)s 17 r ("\\\\rm\\\\dm\\n\\n"\);)s 0 591 p (#else)s 70 631 p (fprintf\(fptr[1],)s 17 r ("\\\\rm\\n\\n"\);)s 0 671 p (#endif)s 0 711 p (#endif)s 70 751 p (fprintf\(fptr[1],)s 17 r ("\\\\bye\\n"\);)s 0 790 p (#endif)s 0 830 p (#endif)s 0 870 p (#ifndef)s 17 r (DEBUGGING)s 122 r (/*)s f0 SF 17 r (last)s 17 r (message)s f3 SF 870 r (*/)s 70 910 p (fprintf\(stderr,)s 17 r ("...)s 18 r (done\\n"\);)s 0 950 p (#endif)s 0 990 p (})s f0 SF 1239 2216 p (text2tex.c)s 66 r (page)s 11 r (36)s EP pstopssaved restore %%Trailer %%Pages: 36 END %%EOF src2tex-2.12h.orig/thanks.tex100644 1750 1750 1100 6266055244 16075 0ustar kawamurakawamura \centerline{\bf Acknowledgement} \bigskip \noindent The authors would like to express their gratitude to Andrew Allen ANDA Mitsuru AOYAMA Youzou DEGUCHI Yoriaki FUJIMORI Shinichi HATAKI{\dag} Norihiro ITOH Yoh ITOH Hiroshi KAI Azuki KANEKO Shin MAEDA\footnote{\dag}{one of the authors of versions 2.8 and 2.9} Takashi NAKAYAMA Naoto NIKI Kiyoko NISHIZAWA Sakuro OZAWA Issei SUZUKI Hitoshi UCHIDA Kenji YAMADA Masayuki YAMASAKI\footnote{\ddag}{one of the authors of versions 2.10 and 2.11} \noindent for giving them invaluable criticisms and suggestions. src2tex-2.12h.orig/title.tex100644 1750 1750 1506 6063152457 15737 0ustar kawamurakawamura% title.tex \bigskip \bigskip % title \centerline{{\twelvecmbx src2tex}\footnote{*} {Permission to use, copy, and modify this software and its documentation is granted under no conditions. However, the authors would be very happy if users could inform any modifications to kamano@tansei.cc.u-tokyo.ac.jp. Since src2tex is a free software, there is no warranty of any kind for the program.} \quad\rm version 2.12\quad (Sep 9, 1996)} \bigskip % authors \centerline{\tencmcsc Kazuo Amano\footnote{\dag} {\rm Department of Mathematics, Josai University, Keyakidai, Sakado, Saitama, 350-02, JAPAN (kamano@ po.iijnet.or.jp)} and Shinichi Nomoto\footnote{\ddag} {\rm Department of Mathematics, Josai University, Keyakidai, Sakado, Saitama, 350-02, JAPAN (m93093@ crescent.josai.ac.jp)}} \bigskip \bigskip src2tex-2.12h.orig/tools.c.ps100644 1750 1750 204251 6266067434 16070 0ustar kawamurakawamura%!PS-Adobe-2.0 %%Creator: dvi2ps %%Title: tools.c.dvi %%Pages: 9 0 %%BoundingBox: 0 0 595 842 %%DocumentPaperSizes: A4 %%Orientation: Portrait %%EndComments %%BeginProcSet: pstops-clip 1 0 [/showpage/erasepage/copypage]{dup where{pop dup load type/operatortype eq{1 array cvx dup 0 3 index cvx put bind def}{pop}ifelse}{pop}ifelse}forall [/letter/legal/executivepage/a4/a4small/b5/com10envelope /monarchenvelope/c5envelope/dlenvelope/lettersmall/note /folio/quarto/a5]{dup where{dup wcheck{exch{}put} {pop{}def}ifelse}{pop}ifelse}forall /lcvx{dup load dup type dup/operatortype eq{pop exch pop} {/arraytype eq{dup xcheck{exch pop aload pop} {pop cvx}ifelse}{pop cvx}ifelse}ifelse}bind def /pstopsmatrix matrix currentmatrix def /pstopsxform matrix def /defaultmatrix{pstopsmatrix exch pstopsxform exch concatmatrix}bind def /initmatrix{matrix defaultmatrix setmatrix}bind def /pathtoproc{[{currentpoint}stopped{$error/newerror false put{newpath}}{/newpath cvx 3 1 roll/moveto cvx 4 array astore cvx}ifelse]{[/newpath cvx{/moveto cvx}{/lineto cvx} {/curveto cvx}{/closepath cvx}pathforall]cvx exch pop} stopped{$error/errorname get/invalidaccess eq{cleartomark $error/newerror false put cvx exec}{stop}ifelse}if}def /initclip[/matrix lcvx/currentmatrix lcvx/pstopsmatrix cvx/setmatrix lcvx /pathtoproc lcvx/initclip lcvx/newpath lcvx 0 0 /moveto lcvx 595.000000 0/rlineto lcvx 0 842.000000/rlineto lcvx -595.000000 0/rlineto lcvx /closepath lcvx/clip lcvx /newpath lcvx/exec lcvx/setmatrix lcvx]cvx def /initgraphics{initmatrix newpath initclip 1 setlinewidth 0 setlinecap 0 setlinejoin []0 setdash 0 setgray 10 setmiterlimit}bind def %%EndProcSet %%BeginFile: /home/kamano/lib/dvi2ps/tex.ps % systemdict /setpacking known { /savepacking currentpacking def true setpacking } if /TeXDict 200 dict def TeXDict begin /inch { 72 mul } bind def /largepaperarray [ /letter /legal /11x17 /b4 /b5 /a5 /a4 /a3 ] def /smallpaperarray [ /note dup where { pop }{ pop /lettersmall dup where { pop }{ pop /letter } ifelse } ifelse /legal /11x17 /b4 /b5 /a5 /a4small dup where { pop }{ pop /note dup where { pop }{ pop /a4 } ifelse } ifelse /a3 ] def /setpaper { dup where papertray and { exch get exec } if } bind def /trayarray [ /lettertray /legaltray /11x17tray /b4tray /b5tray /a5tray /a4tray /a3tray ] def /settray { dup statusdict exch known { { statusdict begin load exec end } stopped { $error /newerror get { $error /errorname get /rangecheck eq { (Tray not found, using default tray.) print flush /papertray false def }{ handleerror } ifelse $error /newerror false put } if } if }{ pop } ifelse } bind def /papertray true def /widtharray [ 8.5 inch 8.5 inch 11 inch 9.84 inch 6.93 inch 5.83 inch 8.27 inch 11.69 inch ] def /heightarray [ 11 inch 14 inch 17 inch 13.9 inch 9.84 inch 8.27 inch 11.69 inch 16.54 inch ] def /xoffset 0 def /yoffset 0 def /landscape false def /pagesetup { dup widtharray exch get /paperwidth exch def dup heightarray exch get /paperheight exch def dup trayarray exch get settray large {largepaperarray}{smallpaperarray} ifelse exch get setpaper } bind def /@letter {0 pagesetup} def /@legal {1 pagesetup} def /@tabloid {2 pagesetup} def /@b4 {3 pagesetup} def /@b5 {4 pagesetup} def /@a5 {5 pagesetup} def /@a4 {6 pagesetup} def /@a3 {7 pagesetup} def /@landscape {/landscape true def} bind def /@manualfeed { statusdict /manualfeed known { statusdict /manualfeed true put statusdict /manualfeedtimeout 120 put } if } bind def /@large { /large true def } bind def /@small { /large false def } bind def /@envelope { /xoffset 4.28 inch def /yoffset 1.5 inch def @letter } bind def /COPIES { /#copies exch def } bind def /NF { /newname exch def /fsize exch def /corr exch def newname 7 dict def newname load begin /FontType 3 def /FontMatrix [corr 0 0 corr neg 0 0] def /FontBBox [0 0 1 1] def /BitMaps fsize array def /BuildChar /CharBuilder load def /Encoding 256 array def 0 1 255 {Encoding exch /.notdef put} for end newname newname load definefont pop } bind def /ch-image {ch-data 0 get} bind def /ch-width {ch-data 1 get} bind def /ch-height {ch-data 2 get} bind def /ch-xoff {ch-data 3 get} bind def /ch-yoff {ch-data 4 get} bind def /ch-tfmw {ch-data 5 get} bind def /CharBuilder { /ch-code exch def /font-dict exch def /ch-data font-dict /BitMaps get ch-code get def ch-data null eq not { ch-tfmw 0 ch-xoff neg ch-yoff neg ch-width ch-xoff sub ch-height ch-yoff sub setcachedevice ch-width ch-height true [1 0 0 1 ch-xoff ch-yoff] {ch-image} imagemask } if } bind def /LWF { /lw-v exch def /lw-h exch def findfont [lw-h 0 0 lw-v 0 0] makefont def } bind def /LWFX { /lw-v exch def /lw-h exch def /savecurfont currentfont def findfont dup setfont [ ( ) stringwidth pop dup lw-h exch div exch lw-v exch div 0 0 3 -1 roll 0 0 ] makefont def savecurfont setfont } bind def /LWJF /LWF load def /SF /setfont load def /s3 3 string def /D { /ch-code exch def dup 0 get length 2 lt { pop [ <00> 1 1 0 0 8.00 ] } if /ch-data exch def currentfont /BitMaps get ch-code ch-data put currentfont /Encoding get ch-code dup s3 cvs cvn put } bind def /BP { /SaveImage save def xoffset yoffset translate 72 72 landscape { exch translate 90 rotate }{ paperheight exch sub translate } ifelse 72 Resolution div dup neg scale 0 0 moveto } bind def /EP { showpage SaveImage restore } bind def /START { /Resolution exch def } bind def /END /end load def /l /lineto load def /p /moveto load def /r { 0 rmoveto } def /s /show load def /ru { /dy exch neg def /dx exch def /x currentpoint /y exch def def newpath x y moveto dx 0 rlineto 0 dy rlineto dx neg 0 rlineto closepath fill x y moveto } bind def /@SpecialDefaults { /hsi paperwidth inch def /vsi paperheight inch def /hof 0 def /vof 0 def /hsc 1 def /vsc 1 def /rotat 0 def /CLIP false def /BBOX false def /EPSF false def } bind def /@hsize {/hsi exch def /CLIP true def} bind def /@vsize {/vsi exch def /CLIP true def} bind def /@hoffset {/hof exch def} bind def /@voffset {/vof exch def} bind def /@hscale {/hsc exch def} bind def /@vscale {/vsc exch def} bind def /@rotation {/rotat exch def} bind def /@bbox { /ury exch def /urx exch def /lly exch def /llx exch def /BBOX true def } bind def /@epsf { /hsi 0 def /vsi 0 def /EPSF true def } bind def /@setclipper { CLIP { newpath 0 0 moveto hsi 0 rlineto 0 vsi rlineto hsi neg 0 rlineto closepath clip } if } bind def /@beginspecial { /SpecialSave save def currentpoint transform initgraphics itransform translate dup scale landscape {90 rotate} if @SpecialDefaults @MacSetUp } bind def /@setspecial { hof vof translate EPSF BBOX and { hsi 0 eq { vsi 0 eq { hsc vsc }{ vsi ury lly sub div dup }ifelse }{ vsi 0 eq { hsi urx llx sub div dup }{ hsi urx llx sub div vsi ury lly sub div } ifelse } ifelse scale llx neg ury neg translate newpath llx lly moveto urx llx sub 0 rlineto 0 ury lly sub rlineto llx urx sub 0 rlineto closepath clip newpath }{ @setclipper hsc vsc scale rotat rotate } ifelse end /letter {} def /note {} def /legal {} def /11x17 /b4 {} def /b5 {} def /a5 {} def /a4 {} def /a3 {} def /showpage {} def /copypage {} def /erasepage {} def } bind def /@MacSetUp { userdict /md known { userdict /md get type /dicttype eq { /MacDrwgs true def md /txpose known { md /txpose {pxs pys neg scale} put } if md /cp known { md /cp {pop pop pm restore} put } if } if } if } bind def /@push { /SpecialSave save def currentpoint translate dup scale newpath } bind def /@pop { SpecialSave restore } bind def /@pn /setlinewidth load def /@pt { moveto currentpoint currentlinewidth 2 div 0 360 arc fill } bind def /@ln { moveto lineto stroke } bind def /@ar { matrix currentmatrix 7 -2 roll moveto currentpoint translate newpath 5 -2 roll scale 0 0 1 6 -2 roll arc setmatrix } bind def /@wh {1 setgray} bind def /@sh {0.75 setgray} bind def /@bk {0 setgray} bind def /@RGB {setrgbcolor} bind def /@HSB {sethsbcolor} bind def /@CMYK {setcmykcolor} bind def end /@endspecial { clear TeXDict begin SpecialSave restore } bind def systemdict /setpacking known { savepacking setpacking } if %%EndFile %%EndProlog %%BeginSetup %%PaperSize: A4 %%Feature: *ManualFeed False %%Feature: *Resolution 240 TeXDict begin @large @a4 240 START 1.000 123 /f0 NF f0 SF [ 24 23 -1 0 24.906] 65 D [<00FC000382000E01001C0080380040380040780020700020F00020F00000F00000F00000F00000F00000F000207000207800 203800603800601C00E00E01E003826000FC20> 24 23 -2 0 23.984] 67 D [ 24 23 -1 0 25.367] 68 D [ 24 23 -1 0 22.600] 69 D [ 24 23 -1 0 24.906] 72 D [ 16 23 0 0 11.992] 73 D [<3E004300C180E1C0E1C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C001C01FF8> 16 23 -2 0 17.065] 74 D [ 24 23 -1 0 25.829] 75 D [ 24 23 -1 0 20.755] 76 D [ 32 23 -1 0 30.441] 77 D [ 24 23 -1 0 24.906] 78 D [ 24 23 -1 0 22.600] 80 D [<8F80F060C030C01080188018801800180038007003F01FE03FC07E00F000E000C010C010C0104030603030F01F10> 16 23 -2 0 18.449] 83 D [<0FFF800070000070000070000070000070000070000070000070000070000070000070000070000070000070000070008070 088070088070084070104070106070307FFFF0> 24 23 -1 0 23.984] 84 D [<007C000183000700800E00400C00401C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00201C00 201C00201C00201C00201C00201C0070FF81FC> 24 23 -1 0 24.906] 85 D [<0040040000C0060000E00E0000E00E0001E00F0001D01D0001D01D0001D01D0003901C800388388003883880070838400704 7040070470400E0470200E02E0200E02E0200E02E0201C03E0101C01C0101C01C0103C03C038FF0FF8FE> 32 23 -1 0 34.131] 87 D [ 24 23 -1 0 24.906] 88 D [<1F3C70FEE072E072E072607070701C7007F000702070706070E03F80> 16 14 -1 0 16.604] 97 D [<11F01A181C0C1C061C071C071C071C071C071C071C061C0C1E181DF01C001C001C001C001C001C001C001C00FC00> 16 23 0 0 18.449] 98 D [<0F80186030107010E000E000E000E000E000E0007020307018700FE0> 16 14 -1 0 14.759] 99 D [<0FBF187830386038E038E038E038E038E038E0386038303818780FB80038003800380038003800380038003801F8> 16 23 -1 0 18.449] 100 D [<0F80186030106010E000E000E000E000FFF0E0306070306018C00F80> 16 14 -1 0 14.759] 101 D [ 16 23 0 0 10.147] 102 D [<0FC030306018C00CC00CC00C601C3FF83FF03FE0600060002F0039C030C070E070E070E030C039E60F3C> 16 21 -1 7 16.604] 103 D [ 24 23 0 0 18.449] 104 D [ 8 23 0 0 9.224] 105 D [<78EEE6470707070707070707070707070707073F0000000000060F0F06> 8 29 2 6 10.147] 106 D [ 24 23 0 0 17.527] 107 D [ 16 23 0 0 9.224] 108 D [ 32 14 0 0 27.673] 109 D [ 24 14 0 0 18.449] 110 D [<0FC0186030306018E01CE01CE01CE01CE01CE01C6018303018600FC0> 16 14 -1 0 16.604] 111 D [ 16 20 0 6 18.449] 112 D [<00FF80001C00001C00001C00001C00001C00079C00185C00303C00701C00601C00E01C00E01C00E01C00E01C00601C00701C 00303C001C6C00078400> 24 20 -1 6 17.526] 113 D [ 16 14 0 0 13.006] 114 D [<9F00E180C0C080C080C003C03F807F00FE00E000C080C08061803E80> 16 14 -1 0 13.099] 115 D [<0F00198038803880388038803800380038003800380038003800FF80380018001800080008000800> 16 20 -1 0 12.914] 116 D [<07DF800C3C001C3C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C001C1C00FCFC00> 24 14 0 0 18.449] 117 D [<0100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 14 -1 0 17.527] 118 D [<030600030600070700078F00078F000E8E800E5C800E5C801C58401C38401C3840383020387070FCFCF8> 24 14 -1 0 23.984] 119 D [ 16 14 -1 0 17.527] 120 D [<7800EC00E600E200020001000100038003800380074007400F200E200E201C101C103C18381CFE3E> 16 20 -1 6 17.527] 121 D [ 16 14 -1 0 14.759] 122 D [<0FC018603030703860186018E01CE01CE01CE01CE01CE01CE01CE01CE01C601860187038303018600FC0> 16 21 -1 0 16.604] 48 D [ 16 21 -3 0 16.604] 49 D [ 16 21 -2 0 16.604] 50 D [<0FC030604070C038E03CE03C003C003C00380070006007C000E000700070007870787078607030600FC0> 16 21 -1 0 16.604] 51 D [<07FC00E000E000E000E000E0FFFCC0E040E020E030E010E008E004E004E002E001E001E000E000600060> 16 21 -1 0 16.604] 52 D [<1F00218040C08060E070E070407000700070006040E070C04F0040004000400040007F007F807FC06060> 16 21 -2 0 16.604] 53 D [<07C0186030307018601C601CE01CE01CE01CF018F030E860E7C0E000600070003038303818180E1003E0> 16 21 -1 0 16.604] 54 D [<04000E000E000E000E000E0006000600060002000300010001000080004080408020C0107FF87FF87FFC4000> 16 22 -2 0 16.604] 55 D [<0FC038306018C008C00CC00CC01C603C607831F00FE00F801FC03C307810601860186018203018600FC0> 16 21 -1 0 16.604] 56 D [<1F0020C060607030703000380018001C0F9C185C303C603CE01CE01CE01CE018E0186038303018600F80> 16 21 -1 0 16.604] 57 D [<40402020101070F0F060> 8 10 -2 -13 9.224] 39 D [<0102040C1818303070606060E0E0E0E0E0E0E0E0E0E060606070303018180C040201> 8 34 -2 9 12.914] 40 D [<8040203018180C0C0E060606070707070707070707070606060E0C0C181830204080> 8 34 -2 9 12.914] 41 D [<060006000600C630E6703FC00F000F003FC0E670C630060006000600> 16 14 -2 -11 16.604] 42 D [<003000003000003000003000003000003000003000003000003000003000FFFFF8FFFFF80030000030000030000030000030 00003000003000003000003000003000> 24 22 -2 3 25.829] 43 D [<40402020101070F0F060> 8 10 -2 6 9.224] 44 D [<60F0F060> 8 4 -2 0 9.224] 46 D [<7FFFF0FFFFF8000000000000000000000000000000000000FFFFF87FFFF0> 24 10 -2 -3 25.829] 61 D [<00FF000701E008003810000020F0E0218D904307884703888603888E03888E03888E03888E03888E03888603884703904304 10218C2020F02010004008008007070000F800> 24 23 -2 0 25.829] 64 D [ 8 33 -3 8 9.224] 91 D [ 8 33 0 8 9.224] 93 D [ 24 23 0 0 19.371] 11 D [ 24 23 0 0 18.449] 12 D [ 24 23 0 0 18.449] 13 D [ 32 23 0 0 27.673] 14 D [<40804080204020401020102070E0F1E0F1E060C0> 16 10 -1 -13 16.604] 34 D [ 8 2 0 -6 11.069] 45 D [<60C0F1E0F1E0E1C0810081004080408020402040> 16 10 -4 -13 16.604] 92 D 1.000 63 /f1 NF f1 SF [<60F0F060> 8 4 -2 0 9.224] 58 D [ 24 20 -3 2 25.829] 62 D 1.000 123 /f2 NF f2 SF [ 24 2 -3 -7 25.829] 0 D [<00100030003000600060006000C000C000C00180018001800300030003000600060006000C000C000C001800180018003000 30003000600060006000C000C000C000> 16 33 -2 8 16.604] 110 D [<00F001800300060006000600060006000600060006000600060006000C001800F00018000C00060006000600060006000600 060006000600060006000300018000F0> 16 33 -2 8 16.604] 102 D [ 16 33 -2 8 16.604] 103 D [<0C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C000C00FFC0FFC00C000C000C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 121 D [<0C000C000C000C000C000C00FFC0FFC00C000C000C000C000C000C0000000C000C000C000C000C000C00FFC0FFC00C000C00 0C000C000C000C00> 16 29 -2 6 14.759] 122 D 1.000 41 /f3 NF f3 SF [<0003000F001E0038007000E000E001C001C00380038003800380038003800380038003800380038003800380038003800380 0380038003800380038003800380038003800380038003800380038003800300070007000E000E001C0038007000E000E000 700038001C000E000E0007000700030003800380038003800380038003800380038003800380038003800380038003800380 0380038003800380038003800380038003800380038003800380038001C001C000E000E000700038001E000F0003> 16 98 -5 97 26.751] 40 D 1.000 121 /f4 NF f4 SF [<1F8780786F80F02E00F01E00F01E00781E003C1E001F1E0001FE00001E00301E00781E00783C007038001FE000> 24 15 -1 0 18.564] 97 D [<07E01C38380C780C7000F000F000F000F000F0007018783C383C1C1C07F0> 16 15 -1 0 16.973] 99 D [<07F01C18380C78067000F000F000FFFEF00EF00E700E700C381C1C3807E0> 16 15 -1 0 17.503] 101 D [ 8 23 -1 0 10.608] 108 D [ 16 15 -1 0 15.728] 114 D [ 16 15 -1 0 15.063] 115 D [<0F801C403C603C603C603C603C003C003C003C003C003C003C00FFC03FC01C001C000C000C000C000C00> 16 21 -1 0 14.851] 116 D [ 24 15 -1 0 20.155] 120 D [ 16 21 -2 0 19.095] 50 D 1.000 127 /f5 NF f5 SF [ 16 20 -1 0 17.434] 65 D [ 16 20 -1 0 17.434] 66 D [<07C00FE01C303838701C701C601CE000E000E000E000E000E000601C701C701C383C1C7C0FFC07CC> 16 20 -1 0 17.434] 67 D [ 16 20 -1 0 17.434] 68 D [ 16 20 -1 0 17.434] 69 D [ 16 20 -1 0 17.434] 70 D [<07B80FF81878387870387038E038E038E0FCE0FCE000E000E000E03870387038387818780FF80798> 16 20 -1 0 17.434] 71 D [ 16 20 -1 0 17.434] 72 D [ 16 20 -3 0 17.434] 73 D [ 16 20 -1 0 17.434] 75 D [ 16 20 -1 0 17.434] 76 D [ 16 20 -1 0 17.434] 77 D [ 16 20 -1 0 17.434] 78 D [<3FC07FE070E0E070E070E070E070E070E070E070E070E070E070E070E070E070E07070E07FE03FC0> 16 20 -2 0 17.434] 79 D [ 16 20 -1 0 17.434] 80 D [ 16 20 -1 0 17.434] 82 D [ 16 20 -2 0 17.434] 83 D [<1FF01FF00380038003800380038003800380038003800380038003800380E39CE39CE39CFFFC7FFC> 16 20 -1 0 17.434] 84 D [<03C007E00C301C38381C381C381C381C381C381C381C381C381C381C381C381C381C381CFE7FFE7F> 16 20 0 0 17.434] 85 D [ 16 20 -1 0 17.434] 88 D [<0FE00FE0038003800380038003800380038007C007C00EC00EE00CE01CE01C7038703870FCFCFCFC> 16 20 -1 0 17.434] 89 D [ 16 20 -2 0 17.434] 90 D [<1F3E3FFE70F0E070E070E07078703FF00FF00070107038E03FC01F80> 16 14 -1 0 17.434] 97 D [<1BC03FE03C703838381C381C381C381C381C381C38383C303FE03BC03800380038003800F800F800> 16 20 -1 0 17.434] 98 D [<07C01FE0387070706000E000E000E000E0006000702038701FF007E0> 16 14 -2 0 17.434] 99 D [<0F7C1FFC30F07070E070E070E070E070E070E070707038F01FF00F70007000700070007001F001F0> 16 20 -1 0 17.434] 100 D [<07C01FF0383870386000E000FFF8FFF8E0386038707038701FE00780> 16 14 -1 0 17.434] 101 D [<3FF83FF80380038003800380038003800380038003800380FFFC7FFC03800380038401CE00FE007C> 16 20 0 0 17.434] 102 D [<0FC03FF078786018E01CE01CE01C703C3FF83FF03FC070007F003F8039C070E070E070E070E039CE1FFE0F3C> 16 22 -1 8 17.434] 103 D [ 16 20 -1 0 17.434] 104 D [ 16 21 -2 0 17.434] 105 D [ 16 20 -1 0 17.434] 107 D [ 16 20 -2 0 17.434] 108 D [ 24 14 0 0 17.434] 109 D [ 16 14 -1 0 17.434] 110 D [<0F003FC079E070E0E070E070E070E070E070E07070E079E03FC00F00> 16 14 -2 0 17.434] 111 D [ 16 21 -1 7 17.434] 112 D [<00FE00FE003800380038003800380FB81FF8387870786038E038E038E038E0386038707838781FF807B8> 16 21 -1 7 17.434] 113 D [ 16 14 -1 0 17.434] 114 D [ 16 14 -2 0 17.434] 115 D [<03C007F00E380E380E380E000E000E000E000E000E000E00FFF07FF00E000E000E000600> 16 18 -1 0 17.434] 116 D [<0F7C1FFC38F0387038703870387038703870387038703870F9F0F9F0> 16 14 -1 0 17.434] 117 D [<078007800FC00CC00CC00CC01CE01CE01CE01CE038703870FCFCFCFC> 16 14 -1 0 17.434] 118 D [<18E03DF03DF035B035B035B037B037B03030703870387038FFFCFFFC> 16 14 -1 0 17.434] 119 D [ 16 14 -1 0 17.434] 120 D [<3C007E0077007700038003800380038003C007C006C006C00EE00EE00CE01CE01C701C703870FCFCFCFC> 16 21 -1 7 17.434] 121 D [ 16 14 -1 0 17.434] 122 D [<07801FE03CF0387070387038E01CE01CE01CE01CE01CE01CE01CE01C7038703838703CF01FE00780> 16 20 -1 0 17.434] 48 D [ 16 20 -3 0 17.434] 49 D [<7FF0FFF0707038701C000E000700038001C000C000E0006000704070E070E070E0E070E03FC01F00> 16 20 -2 0 17.434] 50 D [<0FC03FE07070E038E01C401C001C001C0038007007E007E00070003000382038703870703FE00FC0> 16 20 -1 0 17.434] 51 D [<07FC07FC00E000E000E000E0FFFCFFFCE0E070E030E038E018E01CE00CE006E006E002E003E001E0> 16 20 -1 0 17.434] 52 D [<1F003F8071C0E0E0E070E07040700070006060E07FC07F007000700070007000700070007FE07FE0> 16 20 -2 0 17.434] 53 D [<07C01FE038707038701C601CE01CE01CE01CF038F870EFE0E7C070007000303838381E3807F003E0> 16 20 -1 0 17.434] 54 D [<04000E000E000E000E000E0006000700070007000380038001C001C000E00060E070E038FFFCFFFCE000> 16 21 -1 0 17.434] 55 D [<1F003FC070E07070703000380018001C0F9C1FFC387C703CE01CE01CE018E038703838701FE00F80> 16 20 -1 0 17.434] 57 D [<0200060006001F003FC076E0E620E630E6304630067006E00FC03F807F007600C620C670C670467076E03FC00F8006000600 0200> 16 26 -2 3 17.434] 36 D [<3C707FF8679CE39CE788EFC0EFC07DC03CE01CE03CE03E703F7C3B7C3B803B803B801B801F000E00> 16 20 -1 0 17.434] 38 D [<60F0F0600000000070F0F0F0F0F0F0F0F0F0F060> 8 20 -6 0 17.434] 33 D [<39C039C039C039C039C0FFFCFFFC7FFC1CE01CE01CE01CE01CE07FFCFFFCFFFC0E700E700E700E70> 16 20 -1 0 17.434] 35 D [<30107038707C387C387C1C7C1C7C1C380E100E0007000700070003800380038021C071C0F8E0F8E0F8E0F870F870F8387038 2018> 16 26 -1 3 17.434] 37 D [<80C060303018181878F8F060> 8 12 -6 -8 17.434] 39 D [<0180038006000C0018003800300070007000E000E000E000E000E000E000E000700070003000380018000C00060003800180> 16 25 -4 2 17.434] 40 D [<80C06030181C0C0E0E070707070707070E0E0C1C183060C080> 8 25 -4 2 17.434] 41 D [<060007000600E670F6F0FFF03FC03FC0FFF0F6F0E670060007000600> 16 14 -2 -3 17.434] 42 D [<038003800380038003800380FFFCFFFCFFFC038003800380038003800380> 16 15 -1 -3 17.434] 43 D [ 8 9 -6 5 17.434] 44 D [<60F0F060> 8 4 -6 0 17.434] 46 D [ 16 26 -2 3 17.434] 47 D [<60F0F06000000000000060F0F060> 8 14 -6 0 17.434] 58 D [<80C060303070F0F06000000000000060F0F060> 8 19 -6 5 17.434] 59 D [ 16 9 -1 -6 17.434] 61 D [ 16 26 -6 3 17.434] 91 D [ 16 26 -1 3 17.434] 93 D [<4080F3C0FFC03F000C00> 16 5 -3 -15 17.434] 94 D [<4600EF003DC01880> 16 4 -3 -16 17.434] 126 D [ 16 3 -2 -9 17.434] 45 D [<007000F003E007C00F001E003C00F800F000F8003C001E000F0007C003E000F00070> 16 17 -2 -2 17.434] 60 D [<4000E000F0007C003E000F00078003C001F000F001F003C007800F003E007C00F000E0004000> 16 19 -2 -1 17.434] 62 D [<00300070007000E000E001C001C001C0038003800700070007000E000E000E001C001C0038003800380070007000E000E000 C000> 16 26 -2 3 17.434] 92 D [ 8 26 -7 3 17.434] 124 D [<00F001F00380070007000700070007000700070007000E00FC00FC000E0007000700070007000700070007000700038001F0 00F0> 16 26 -2 3 17.434] 123 D [<7800FC000E0007000700070007000700070007000700038001F001F00380070007000700070007000700070007000E00FC00 7800> 16 26 -2 3 17.434] 125 D [ 16 9 -3 -11 17.434] 34 D 1.000 121 /f6 NF f6 SF [<3E78E174E0E4E0F2E072E07070701E7003F000381038383038701FC0> 16 14 -2 0 16.604] 97 D [<0F80304070206010E000E000E000E00060007000301018380C3803F0> 16 14 -2 0 14.759] 99 D [<0F0030C060206010E000E000E000E0007FF07038303018300C6007C0> 16 14 -2 0 14.759] 101 D [ 16 23 -1 0 18.449] 104 D [ 16 23 -1 0 9.224] 108 D [ 32 14 -1 0 27.673] 109 D [ 16 14 -1 0 18.449] 110 D [ 16 14 -1 0 13.006] 114 D [<9F00E180C0C0404040E001E00FC03FC03F00380030203020186007A0> 16 14 -1 0 13.099] 115 D [<3C00720072007100710071007000700070003800380038003800FF8038001C000C00040004000400> 16 20 -3 0 12.914] 116 D [ 24 14 -1 0 17.527] 120 D [ 16 21 -2 0 16.604] 50 D [<60F07070> 8 4 -2 0 9.224] 46 D [ 16 23 -1 0 18.449] 12 D [ 8 2 -1 -6 11.069] 45 D 1.000 115 /f7 NF f7 SF [<38E065A04390C190C190C18060C060C060C030C0306018E008E00720> 16 14 -4 0 16.973] 97 D [<38004600C10080808000C000C000C000FE0041006080308018800F00> 16 14 -5 0 15.276] 101 D [ 16 23 -3 0 15.276] 107 D [<6060386060243030623030623030323030301818181818181818189818184C0C084E0A0849191830F0F0> 24 14 -3 0 27.157] 109 D [<60006000300030003000300018001800180098004C604C704A3031E0> 16 14 -3 0 14.003] 114 D [ 24 23 -2 0 24.223] 82 D [<60F07830> 8 4 -3 0 10.184] 46 D 1.000 123 /f8 NF f8 SF [ 24 23 -1 0 27.027] 65 D [ 24 23 -1 0 27.996] 75 D [ 24 23 -1 0 27.027] 78 D [<87C0D830E018C008800C800C800C000C001C003803F81FF03FE07F00F000E000C008C008C0084018603830580F88> 16 23 -2 0 20.294] 83 D [ 24 17 -1 0 20.368] 97 D [<01F8000E0600180100300100700080600080E00000E00000E00000E00000E000006000807000803001801803800E058001F8 80> 24 17 -1 0 19.629] 99 D [ 24 17 -1 0 20.737] 100 D [ 24 17 -1 0 20.368] 104 D [ 16 17 0 0 10.036] 105 D [ 24 17 -1 0 24.795] 109 D [ 24 17 -1 0 20.368] 110 D [<03F0000E1C00180600300300700380600180E001C0E001C0E001C0E001C0E001C06001807003803003001806000E1C0003F0 00> 24 17 -1 0 21.105] 111 D [<0FF80001C00001C00001C00001C00001C00001C00001C00001C00001C00001C00081C08081C08081C08081C080C1C180FFFF 80> 24 17 -1 0 19.629] 116 D [<03E0000E18001C0400180400380200380200380200380200380200380200380200380200380200380200380200380700FE0F 80> 24 17 -1 0 20.368] 117 D [ 16 17 -1 0 16.678] 122 D 1.000 121 /f9 NF f9 SF [<03F00FFC1F063C037C007800F800F800F800F800F800F800781C783E3C3E1E3E0FFC03F8> 16 18 -2 0 20.367] 99 D [<01FC000FFF001F01803E00C07C0000780000F80000F80000F80000FFFFC0FFFFC0F803C07803C07C03803C07801E0F000FFE 0003F800> 24 18 -1 0 21.004] 101 D [ 16 18 -1 0 18.873] 114 D [ 16 18 -2 0 18.076] 115 D [<03E00FF00F101F181F181F181F181F001F001F001F001F001F001F001F001F00FFF8FFF83F000F0007000700030003000300> 16 25 -1 0 17.822] 116 D [ 24 18 -1 0 24.186] 120 D [ 24 26 -2 0 22.913] 50 D /pstopsxform pstopsmatrix matrix currentmatrix matrix invertmatrix matrix concatmatrix matrix invertmatrix store %%EndSetup %%Page: pstops 1 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 0 33 p (/*)s 17 r 1474 1 ru 1491 r (*)s f9 SF 479 151 p (src2tex)s f0 SF (*)s 45 r (version)s 10 r (2.12)s 33 r (\(Sep)s 11 r (9,)s 11 r (1996\))s f8 SF 466 230 p (Kazuo)s 13 r (Amano)s f2 SF (y)s f8 SF 12 r (and)s 13 r (Shinichi)s 13 r (Nomoto)s f2 SF (z)s f5 SF 0 348 p (*)s 17 r 1474 1 ru 1491 r (*/)s 0 468 p (/*)s 17 r 671 1 ru f0 SF 681 r (to)s 1 r (ols.c)s 11 r 671 1 ru f5 SF 688 r (*/)s 0 587 p (#include)s 17 r ()s 0 627 p (#include)s 17 r ("src2tex.h")s 0 707 p (extern)s 17 r (int)s 18 r (TXT)s 2 r 10 1 ru 15 r (flag;)s 0 746 p (extern)s 17 r (int)s 18 r (BAS)s 2 r 10 1 ru 15 r (flag;)s 0 786 p (extern)s 17 r (int)s 18 r (C)s 2 r 10 1 ru 15 r (flag;)s 0 826 p (extern)s 17 r (int)s 18 r (CBL)s 2 r 10 1 ru 15 r (flag;)s 0 866 p (extern)s 17 r (int)s 18 r (F77)s 2 r 10 1 ru 15 r (flag;)s 0 906 p (extern)s 17 r (int)s 18 r (LISP)s 2 r 10 1 ru 15 r (flag;)s 0 946 p (extern)s 17 r (int)s 18 r (MAKE)s 2 r 10 1 ru 15 r (flag;)s 0 986 p (extern)s 17 r (int)s 18 r (PAS)s 2 r 10 1 ru 15 r (flag;)s 0 1025 p (extern)s 17 r (int)s 18 r (PERL)s 2 r 10 1 ru 15 r (flag;)s 0 1065 p (extern)s 17 r (int)s 18 r (SH)s 2 r 10 1 ru 15 r (flag;)s 0 1105 p (extern)s 17 r (int)s 18 r (TCL)s 2 r 10 1 ru 15 r (flag;)s 0 1185 p (extern)s 17 r (int)s 18 r (MAP)s 2 r 10 1 ru 15 r (flag;)s 0 1225 p (extern)s 17 r (int)s 18 r (MAT)s 2 r 10 1 ru 15 r (flag;)s 0 1265 p (extern)s 17 r (int)s 18 r (MLAB)s 2 r 10 1 ru 15 r (flag;)s 0 1304 p (extern)s 17 r (int)s 18 r (RED)s 2 r 10 1 ru 15 r (flag;)s 0 1384 p (extern)s 17 r (int)s 18 r (*dec)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(\);)s 0 1424 p (extern)s 17 r (int)s 18 r (*inc)s 2 r 10 1 ru 15 r (buf)s 2 r 10 1 ru 16 r (ptr\(\);)s 0 1464 p (extern)s 17 r (int)s 18 r (*fgetc2buffer\(\);)s 0 1504 p (extern)s 17 r (int)s 18 r (*get)s 2 r 10 1 ru 15 r (phrase\(\);)s 0 1543 p (extern)s 17 r (int)s 18 r (search)s 2 r 10 1 ru 15 r (line\(\);)s 0 1583 p (extern)s 17 r (int)s 18 r (get)s 2 r 10 1 ru 15 r (comment)s 2 r 10 1 ru 16 r (flag\(\);)s 0 1623 p (extern)s 17 r (int)s 18 r (get)s 2 r 10 1 ru 15 r (tex)s 2 r 10 1 ru 16 r (flag\(\);)s 0 1663 p (extern)s 17 r (int)s 18 r (str)s 2 r 10 1 ru 15 r (cmp\(\);)s 0 1703 p (extern)s 17 r (int)s 18 r (parse)s 2 r 10 1 ru 15 r (options\(\);)s 0 1822 p (/*)s 17 r 388 1 ru f0 SF 398 r (absorb)s 11 r (di\013erencies)s 11 r (of)s 11 r (NTT)s 11 r (and)s 12 r (ASCII)s 12 r (JT)s 1053 1830 p (E)s 1072 1822 p (Xs)s 11 r 388 1 ru f5 SF 404 r (*/)s 0 1860 p 480 1 ru f0 SF 33 1897 p (*)s 17 r (Permission)s 8 r (to)s 9 r (use,)s 10 r (copy)s -3 r (,)s 9 r (and)s 9 r (mo)s 1 r (dify)s 9 r (this)s 10 r (softw)s -1 r (are)s 8 r (and)s 9 r (its)s 10 r (do)s 1 r (cumentation)s 8 r (is)s 9 r (granted)s 9 r (under)s 9 r (no)s 9 r (conditions.)s 0 1937 p (How)s -1 r (ev)s -1 r (er,)s 11 r (the)s 12 r (authors)s 11 r (would)s 11 r (b)s 1 r (e)s 12 r (very)s 11 r (happy)s 10 r (if)s 12 r (users)s 12 r (could)s 11 r (inform)s 12 r (any)s 11 r (mo)s 1 r (di\014cations)s 12 r (to)s 11 r (k)s -1 r (amano@tansei.cc.u-)s 0 1977 p (tokyo.ac.jp.)s 14 r (Since)s 11 r (src2tex)s 11 r (is)s 11 r (a)s 11 r (free)s 11 r (softw)s -1 r (are,)s 10 r (there)s 11 r (is)s 12 r (no)s 11 r (warran)s -1 r (t)s -1 r (y)s 10 r (of)s 11 r (any)s 10 r (kind)s 11 r (for)s 11 r (the)s 11 r (program.)s f2 SF 33 2016 p (y)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -3 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -1 r (AN)s 10 r (\(k)s -1 r (amano@)s 0 2056 p (p)s 1 r (o.iijnet.or.jp\))s f2 SF 33 2096 p (z)s f0 SF 19 r (Department)s 10 r (of)s 11 r (Mathematics,)s 11 r (Josai)s 11 r (Universit)s -1 r (y)s -2 r (,)s 10 r (Keyakidai,)s 10 r (Sak)s -1 r (ado,)s 10 r (Saitama,)s 11 r (350-02,)s 11 r (JAP)s -2 r (AN)s 11 r (\(m93093@)s 0 2136 p (crescent.josai.ac.jp\))s 1306 2216 p (to)s 1 r (ols.c)s 66 r (page)s 12 r (1)s EP pstopssaved restore %%Page: pstops 2 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 0 33 p (/*)s f0 SF 17 r (Unfortunately)s -2 r (,)s 12 r (Japanese)s 12 r (T)s 436 40 p (E)s 454 33 p (X)s 13 r (is)s 12 r (splitted)s 13 r (into)s 11 r (NTT)s 13 r (JT)s 838 40 p (E)s 856 33 p (X)s 13 r (and)s 13 r (ASCII)s 13 r (JT)s 1100 40 p (E)s 1119 33 p (X.)s 12 r (Their)s 13 r (escap)s 1 r (e)s 12 r (sequences)s 13 r (are)s 0 73 p (often)s 16 r (di\013erent.)s 29 r (So,)s 18 r (we)s 15 r (write)s 16 r (the)s 17 r (following)s 15 r (lines)s 16 r (at)s 16 r (the)s 17 r (beginning)s 17 r (of)s 16 r (output)s 16 r (T)s 1184 80 p (E)s 1202 73 p (X)s 16 r (\014le)s 17 r (and)s 16 r (absorb)s 16 r (those)s 0 113 p (di\013erences.)s f5 SF 1365 r (*/)s 0 193 p (void)s 17 r (merge)s 3 r 10 1 ru 15 r (ntt)s 2 r 10 1 ru 15 r (ascii\(fptr\))s 0 233 p (FILE)s 17 r (*fptr[];)s 0 273 p ({)s 0 313 p (#ifdef)s 17 r (ASCII)s 35 353 p (/*)s f0 SF 16 r (NTT+ASCI)s 1 r (I)s 11 r (JT)s 324 360 p (E)s 342 353 p (X)s f5 SF 1158 r (*/)s 35 393 p (fprintf\(fptr[1],)s 17 r ("\\\\ifx\\\\gtfam\\\\undefined\\n"\);)s 35 433 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\ifx\\\\dm\\\\undefined\\n"\);)s 35 473 p (fprintf\(fptr[1],)s 17 r (")s 70 r (\\\\ifx\\\\tendm\\\\undefined\\n"\);)s 35 513 p (fprintf\(fptr[1],)s 17 r (")s 105 r (\\\\def\\\\mc{\\\\null}\\n"\);)s 35 553 p (fprintf\(fptr[1],)s 17 r (")s 70 r (\\\\else\\n"\);)s 35 593 p (fprintf\(fptr[1],)s 17 r (")s 105 r (\\\\def\\\\mc{\\\\tendm}\\n"\);)s 35 633 p (fprintf\(fptr[1],)s 17 r (")s 70 r (\\\\fi\\n"\);)s 35 673 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\else\\n"\);)s 35 713 p (fprintf\(fptr[1],)s 17 r (")s 70 r (\\\\def\\\\mc{\\\\dm}\\n"\);)s 35 753 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\fi\\n"\);)s 35 793 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\ifx\\\\dg\\\\undefined\\n"\);)s 35 833 p (fprintf\(fptr[1],)s 17 r (")s 70 r (\\\\ifx\\\\tendg\\\\undefined\\n"\);)s 35 873 p (fprintf\(fptr[1],)s 17 r (")s 105 r (\\\\def\\\\gt{\\\\null}\\n"\);)s 35 913 p (fprintf\(fptr[1],)s 17 r (")s 70 r (\\\\else\\n"\);)s 35 953 p (fprintf\(fptr[1],)s 17 r (")s 105 r (\\\\def\\\\gt{\\\\tendg}\\n"\);)s 35 993 p (fprintf\(fptr[1],)s 17 r (")s 70 r (\\\\fi\\n"\);)s 35 1033 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\else\\n"\);)s 35 1073 p (fprintf\(fptr[1],)s 17 r (")s 70 r (\\\\def\\\\gt{\\\\dg}\\n"\);)s 35 1113 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\fi\\n"\);)s 35 1153 p (fprintf\(fptr[1],)s 17 r ("\\\\fi\\n"\);)s 35 1193 p (fprintf\(fptr[1],)s 17 r ("\\\\ifx\\\\sc\\\\undefined\\n"\);)s 35 1233 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\def\\\\sc{\\\\null}\\n"\);)s 35 1273 p (fprintf\(fptr[1],)s 17 r ("\\\\fi\\n"\);)s 0 1313 p (#else)s 35 1353 p (/*)s f0 SF 16 r (NTT)s 12 r (JT)s 206 1360 p (E)s 224 1353 p (X)s f5 SF 1276 r (*/)s 35 1393 p (fprintf\(fptr[1],)s 17 r ("\\\\ifx\\\\dm\\\\undefined\\n"\);)s 35 1433 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\def\\\\dm{\\\\tendm}\\n"\);)s 35 1473 p (fprintf\(fptr[1],)s 17 r ("\\\\fi\\n"\);)s 35 1513 p (fprintf\(fptr[1],)s 17 r ("\\\\ifx\\\\dg\\\\undefined\\n"\);)s 35 1553 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\def\\\\dg{\\\\tendg}\\n"\);)s 35 1593 p (fprintf\(fptr[1],)s 17 r ("\\\\fi\\n"\);)s 35 1633 p (fprintf\(fptr[1],)s 17 r ("\\\\ifx\\\\sc\\\\undefined\\n"\);)s 35 1673 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\def\\\\sc{\\\\null}\\n"\);)s 35 1713 p (fprintf\(fptr[1],)s 17 r ("\\\\fi\\n"\);)s 0 1753 p (#endif)s 0 1793 p (})s 0 1913 p (/*)s 17 r 567 1 ru f0 SF 577 r (get)s 11 r (\015agged)s 11 r (character)s 10 r 567 1 ru f5 SF 584 r (*/)s 0 1953 p (/*)s f0 SF 17 r (This)s 11 r (function)s 11 r (substitutes)s f5 SF 133 2023 p (ptr)s f2 SF (\000)s f1 SF 9 r (>)s f5 SF 9 r (flag)s f0 SF 10 r (=)s f3 SF 369 1966 p (\()s f0 SF 402 1983 p (0)s 33 r (when)s 11 r (text)s 11 r (mo)s 1 r (de)s 402 2022 p (1)s 33 r (when)s 11 r (quasi-T)s 642 2030 p (E)s 661 2022 p (X)s 11 r (mdo)s 1 r (e)s 402 2062 p (2)s 33 r (when)s 11 r (T)s 557 2069 p (E)s 575 2062 p (X)s 11 r (mo)s 1 r (de)s 11 r (,)s f5 SF 133 2096 p (ptr)s f2 SF (\000)s f1 SF 9 r (>)s f5 SF 9 r (character)s f0 SF 10 r (=)s 9 r (a)s 11 r (character)s 10 r (read)s 11 r (from)s 11 r (a)s 11 r (given)s 10 r (\014le)s 0 2136 p (and)s 1306 2216 p (to)s 1 r (ols.c)s 66 r (page)s 12 r (2)s EP pstopssaved restore %%Page: pstops 3 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 133 33 p (ptr)s f2 SF (\000)s f1 SF 9 r (>)s f5 SF 9 r (buffer)s f0 SF 10 r (=)s 9 r (bu\013er)s 11 r (address)s f1 SF 11 r (:)s f0 SF 0 74 p (After)s 11 r (that,)s 11 r (it)s 11 r (returns)s 11 r (\015ag)s 2 r 10 1 ru 10 r (char)s 10 r (p)s 1 r (ointer)s f5 SF 28 r (ptr)s f0 SF 17 r (.)s f7 SF 0 114 p (R)s -1 r (emark.)s f0 SF 26 r (In)s 10 r (case)s 11 r (of)s 11 r (P)s -2 r (ASCAL,)s 10 r (it)s 10 r (is)s 11 r (very)s 10 r (imp)s 1 r (ortant)s 10 r (to)s 10 r (delay)s 10 r (getting)s 11 r (mo)s 1 r (de)s 10 r (\015ag)s 11 r (by)s 10 r (observing)s 11 r (the)s 10 r (value)s 9 r (of)s 11 r (\015ag)s f5 SF 133 155 p (prev)s 2 r 10 1 ru 10 r (flag)s 18 r (.)s f0 SF 0 195 p (Since)s 11 r (we)s 10 r (cannot)s 11 r (translate)s 11 r (a)s 11 r (phrase)s f2 SF 133 235 p (fn)s f5 SF (\(...)s f2 SF (n)s f5 SF (\))s f2 SF (g)s f0 SF 0 276 p (or)s 11 r (something)s 11 r (like)s 10 r (that)s 11 r (prop)s 1 r (erly)s 11 r (without)s 11 r (delaying)s 11 r (mode)s 12 r (transitions.)s f5 SF 552 r (*/)s 0 357 p (flag)s 2 r 10 1 ru 15 r (char)s 18 r (*get)s 2 r 10 1 ru 15 r (flag)s 2 r 10 1 ru 16 r (char\(fptr\))s 0 397 p (FILE)s 17 r (*fptr[];)s 0 438 p ({)s 70 478 p (static)s 17 r (flag)s 2 r 10 1 ru 16 r (char)s 17 r (ptr[1];)s 209 r (/*)s f0 SF 17 r (\015agged)s 11 r (character)s f5 SF 529 r (*/)s 70 519 p (static)s 17 r (int)s 18 r (prev)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 192 r (/*)s f0 SF 16 r (previous)s 11 r (\015ag)s f5 SF 593 r (*/)s 70 559 p (int)s 17 r (flag;)s 70 599 p (int)s 17 r (*buf)s 2 r 10 1 ru 16 r (ptr;)s 70 680 p (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (fgetc2buffer\(fptr\);)s 70 721 p (flag)s 17 r (=)s 18 r (get)s 2 r 10 1 ru 15 r (comment)s 2 r 10 1 ru 16 r (flag\(buf)s 2 r 10 1 ru 15 r (ptr\);)s 70 761 p (if)s 17 r (\(\(prev)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 18 r (0\))s 17 r (&&)s 17 r (\(flag)s 18 r (!=)s 17 r (0\))s 18 r (&&)s 17 r (\(TXT)s 2 r 10 1 ru 16 r (flag)s 17 r (==)s 17 r (0\)\))s 105 802 p (if)s 17 r (\(get)s 2 r 10 1 ru 16 r (tex)s 2 r 10 1 ru 15 r (flag\(buf)s 2 r 10 1 ru 15 r (ptr\))s 18 r (!=)s 17 r (0\))s 139 842 p (++flag;)s 70 883 p (ptr->flag)s 17 r (=)s 18 r (flag;)s 70 923 p (ptr->character)s 17 r (=)s 18 r (*buf)s 2 r 10 1 ru 15 r (ptr;)s 70 964 p (ptr->buffer)s 17 r (=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr;)s 70 1004 p (prev)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (flag;)s 70 1044 p (return)s 17 r (ptr;)s 0 1085 p (})s 0 1206 p (/*)s 17 r 562 1 ru f0 SF 573 r (fprintf)s 10 r (do)s 1 r (cumentst)s -1 r (yle)s 10 r 562 1 ru f5 SF 578 r (*/)s 0 1247 p (/*)s f0 SF 17 r (This)s 11 r (function)s 11 r (simply)s 11 r (outputs)s 11 r (a)s 11 r (line)s 11 r (of)s 11 r (the)s 11 r (form)s f5 SF 66 1287 p (\\)s f0 SF (do)s 1 r (cumentst)s -1 r (yle[)s f5 SF 11 r (LATEXOPTION)s f0 SF 17 r (])s f5 SF ({)s 11 r (LATEXSTYLE)s 11 r (})s f0 SF 0 1328 p (where)s f5 SF 10 r (LATEXOPTION)s f0 SF 10 r (and)s f5 SF 10 r (LATEXSTYLE)s f0 SF 10 r (are)s 10 r (de\014ned)s 10 r (in)s f6 SF 11 r (src2tex.h)s f0 SF (.)s 14 r (If)s 10 r (there)s 10 r (exists)s 10 r (a)s 10 r (string)s 10 r (\\)s f2 SF (fn)s f0 SF (do)s 1 r (cumentst)s -1 r (yle....)s f2 SF (g)s f0 SF (")s 0 1367 p (at)s 11 r (the)s 11 r (b)s 1 r (eginning)s 11 r (of)s 11 r (input)s 11 r (\014le,)s 11 r (then)s f4 SF 11 r (src2latex)s f0 SF 11 r (moves)s 10 r (it)s 11 r (to)s 11 r (the)s 11 r (top)s 11 r (of)s 11 r (output)s 11 r (\014le.)s f5 SF 364 r (*/)s 0 1448 p (void)s 17 r (fprintf)s 3 r 10 1 ru 15 r (documentstyle\(buf)s 2 r 10 1 ru 15 r (ptr,fptr\))s 0 1489 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 1529 p (FILE)s 17 r (*fptr[];)s 0 1570 p ({)s 35 1610 p (int)s 17 r (i,)s 18 r (*b)s 2 r 10 1 ru 15 r (ptr,)s 18 r (*tail)s 2 r 10 1 ru 15 r (ptr;)s 35 1651 p (char)s 17 r (c1,)s 18 r (c2,)s 17 r (mini)s 2 r 10 1 ru 16 r (buffer[256];)s 35 1731 p (b)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (get)s 2 r 10 1 ru 16 r (phrase\(buf)s 2 r 10 1 ru 15 r (ptr,"{\\\\documentstyle"\);)s 35 1772 p (tail)s 2 r 10 1 ru 15 r (ptr)s 18 r (=)s 17 r (b)s 2 r 10 1 ru 16 r (ptr;)s 35 1812 p (while)s 17 r (\(\(*tail)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 18 r ('}'\))s 17 r (&&)s 18 r (\(*tail)s 2 r 10 1 ru 15 r (ptr)s 17 r (>=)s 18 r (')s 17 r ('\)\))s 70 1853 p (++tail)s 2 r 10 1 ru 15 r (ptr;)s 35 1893 p (c1)s 17 r (=)s 18 r (*\(tail)s 2 r 10 1 ru 15 r (ptr)s 18 r (-)s 17 r (1\);)s 35 1934 p (c2)s 17 r (=)s 18 r (*tail)s 2 r 10 1 ru 15 r (ptr;)s 35 1974 p (if)s 17 r (\(\(\(char\)*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 18 r (0x00\))s 105 2015 p (||)s 17 r (\(c1)s 17 r (<)s 18 r ('0'\))s 17 r (||)s 18 r (\(\(c1)s 17 r (>)s 18 r ('9'\))s 17 r (&&)s 18 r (\(c1)s 17 r (<)s 17 r ('A'\)\))s 105 2055 p (||)s 17 r (\(\(c1)s 17 r (>)s 18 r ('Z'\))s 17 r (&&)s 18 r (\(c1)s 17 r (<)s 18 r ('a'\)\))s 17 r (||)s 18 r (\(c1)s 17 r (>)s 17 r ('z'\))s 105 2095 p (||)s 17 r (\(c2)s 17 r (!=)s 18 r ('}'\)\))s 70 2136 p ({)s f0 SF 1306 2216 p (to)s 1 r (ols.c)s 66 r (page)s 12 r (3)s EP pstopssaved restore %%Page: pstops 4 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 0 33 p (#ifdef)s 17 r (LATEXSTYLE)s 105 74 p (fprintf\(fptr[1],"\\\\documentstyle"\);)s 0 114 p (#ifdef)s 17 r (LATEXOPTION)s 105 155 p (fprintf\(fptr[1],"["\);)s 105 195 p (fprintf\(fptr[1],LATEXOPTION\);)s 87 r (/*)s f0 SF 16 r (LaT)s -1 r (eX)s 10 r (option)s f5 SF 574 r (*/)s 105 235 p (fprintf\(fptr[1],"]"\);)s 0 276 p (#endif)s 105 316 p (fprintf\(fptr[1],"{"\);)s 105 357 p (fprintf\(fptr[1],LATEXSTYLE\);)s 104 r (/*)s f0 SF 17 r (LaT)s -2 r (eX)s 10 r (style)s f5 SF 600 r (*/)s 105 397 p (fprintf\(fptr[1],"}"\);)s 105 438 p (fprintf\(fptr[1],"\\n"\);)s 0 478 p (#endif)s 0 518 p (#ifdef)s 17 r (DEBUGGING)s 105 559 p (printf\("outputting)s 17 r (the)s 17 r (default)s 18 r (\\"\\\\documentstyle)s 17 r (...\\"\\n"\);)s 0 599 p (#endif)s 70 640 p (})s 35 680 p (else)s 70 721 p ({)s 105 761 p (for)s 17 r (\(i=0;)s 17 r (\(\(i)s 18 r (<)s 17 r (255\))s 18 r (&&)s 17 r (\(\(char\)*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (>=)s 18 r (')s 17 r ('\)\);)s 17 r (++i\))s 139 802 p ({)s 174 842 p (mini)s 2 r 10 1 ru 16 r (buffer[i])s 17 r (=)s 18 r (\(char\)*++b)s 2 r 10 1 ru 15 r (ptr;)s 174 882 p (/*)s f0 SF 17 r (Here)s 11 r (we)s 10 r (replace)s 11 r (the)s 11 r (original)s 11 r (string)s f2 SF 23 r (n)s f0 SF (documentstyle)s 10 r (...)s 25 r (with)s 12 r (a)s 11 r (string)s f2 SF 22 r (n)s f0 SF (null)s 10 r (...)s 15 r (.)s f5 SF 144 r (*/)s 174 923 p (switch\(i\))s 209 963 p ({)s 209 1004 p (case)s 18 r (0:)s 244 1044 p (*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 17 r ('\\\\';)s 244 1085 p (break;)s 209 1125 p (case)s 18 r (1:)s 244 1165 p (*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 17 r ('n';)s 244 1206 p (break;)s 209 1246 p (case)s 18 r (2:)s 244 1287 p (*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 17 r ('u';)s 244 1327 p (break;)s 209 1368 p (case)s 18 r (3:)s 244 1408 p (*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 17 r ('l';)s 244 1449 p (break;)s 209 1489 p (case)s 18 r (4:)s 244 1529 p (*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 17 r ('l';)s 244 1570 p (break;)s 209 1610 p (default:)s 244 1651 p (*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 17 r (0x20;)s 209 1691 p (})s 174 1732 p (if)s 18 r (\(mini)s 2 r 10 1 ru 15 r (buffer[i])s 18 r (==)s 17 r ('}'\))s 209 1772 p ({)s 244 1812 p (++i;)s 244 1853 p (break;)s 209 1893 p (})s 139 1934 p (})s 105 1974 p (mini)s 2 r 10 1 ru 15 r (buffer[i])s 18 r (=)s 17 r (0x00;)s 105 2015 p (fprintf\(fptr[1],"%s\\n",)s 17 r (mini)s 2 r 10 1 ru 16 r (buffer\);)s 0 2055 p (#ifdef)s 17 r (DEBUGGING)s 105 2096 p (printf\("outputting)s 17 r (a)s 17 r (string)s 18 r (\\"%s...\\"\\n",)s 17 r (mini)s 2 r 10 1 ru 16 r (buffer\);)s 0 2136 p (#endif)s f0 SF 1306 2216 p (to)s 1 r (ols.c)s 66 r (page)s 12 r (4)s EP pstopssaved restore %%Page: pstops 5 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 70 33 p (})s 35 74 p (fprintf\(fptr[1],"\\\\begin{document}\\n"\);)s 35 114 p (fprintf\(fptr[1],"\\n"\);)s 35 155 p (/*)s f0 SF 16 r (W)s -1 r (e)s 10 r (de\014ne)s 11 r (sevenrm)s 10 r (escap)s 1 r (e)s 11 r (sequence)s 11 r (here,)s 11 r (since)s 11 r (it)s 11 r (is)s 11 r (not)s 11 r (de\014ned)s 11 r (in)s 12 r (some)s 11 r (LaT)s -2 r (eX)s 10 r (systems.)s f5 SF 159 r (*/)s 35 195 p (fprintf\(fptr[1],)s 17 r ("\\\\ifx\\\\sevenrm\\\\undefined\\n"\);)s 35 235 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\font\\\\sevenrm=cmr7)s 18 r (scaled)s 17 r (\\\\magstep0\\n"\);)s 35 276 p (fprintf\(fptr[1],)s 17 r ("\\\\fi\\n"\);)s 0 316 p (})s 0 438 p (/*)s 17 r 612 1 ru f0 SF 622 r (fprintf)s 11 r (fo)s 1 r (otline)s 11 r 612 1 ru f5 SF 628 r (*/)s 0 478 p (/*)s f0 SF 17 r (This)s 11 r (function)s 11 r (simply)s 11 r (outputs)s 11 r (a)s 11 r (line)s 11 r (of)s 11 r (the)s 11 r (form)s f5 SF 66 518 p (\\)s f0 SF (fo)s 1 r (otline=)s f2 SF (f)s f5 SF (\\)s f0 SF (rm)s f5 SF (\\)s f0 SF (h\014ll)s f6 SF 17 r (\014le-name)s f5 SF 28 r (\\)s f0 SF (qquad)s f5 SF (\\)s f0 SF (folio)s f2 SF (g)s f0 SF 0 559 p (where)s f6 SF 11 r (\014le-name)s f0 SF 11 r (is)s 11 r (a)s 11 r (string)s 11 r (stored)s 11 r (at)s 11 r (cptr[0].)s f5 SF 888 r (*/)s 0 640 p (void)s 17 r (fprintf)s 3 r 10 1 ru 15 r (footline\(cptr,)s 17 r (fptr\))s 0 680 p (char)s 17 r (*cptr[];)s 0 721 p (FILE)s 17 r (*fptr[];)s 0 761 p ({)s 70 802 p (char)s 17 r (*ptr;)s 70 882 p (fprintf\(fptr[1],)s 17 r ("\\\\footline={\\\\rm\\\\hfill)s 18 r ("\);)s 70 923 p (for)s 17 r (\(ptr)s 18 r (=)s 17 r (cptr[0];)s 17 r (*ptr)s 18 r (!=)s 17 r ('\\0';)s 18 r (++ptr\))s 105 963 p ({)s 174 1004 p (switch)s 18 r (\(*ptr\))s 209 1044 p ({)s 209 1085 p (case)s 18 r ('"':)s 279 1125 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (\\"}"\);)s 279 1165 p (break;)s 209 1206 p (case)s 18 r ('#':)s 279 1246 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\#}"\);)s 279 1287 p (break;)s 209 1327 p (case)s 18 r ('$':)s 279 1368 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\$}"\);)s 279 1408 p (break;)s 209 1449 p (case)s 18 r ('%':)s 279 1489 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\%c}",)s 18 r (*ptr\);)s 279 1529 p (break;)s 209 1570 p (case)s 18 r ('&':)s 279 1610 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\&}"\);)s 279 1651 p (break;)s 209 1691 p (case)s 18 r ('*':)s 279 1732 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (*}"\);)s 279 1772 p (break;)s 209 1812 p (case)s 18 r ('-':)s 279 1853 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (-}"\);)s 279 1893 p (break;)s 209 1934 p (case)s 18 r ('/':)s 279 1974 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (/}"\);)s 279 2015 p (break;)s 209 2055 p (case)s 18 r ('<':)s 279 2096 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (<}"\);)s 279 2136 p (break;)s f0 SF 1306 2216 p (to)s 1 r (ols.c)s 66 r (page)s 12 r (5)s EP pstopssaved restore %%Page: pstops 6 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 209 33 p (case)s 18 r ('>':)s 279 74 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (>}"\);)s 279 114 p (break;)s 209 155 p (case)s 18 r ('\\\\':)s 279 195 p (fprintf\(fptr[1],)s 17 r ("$\\\\backslash$"\);)s 279 236 p (break;)s 209 276 p (case)s 18 r ('^':)s 279 316 p (fprintf\(fptr[1],)s 17 r ("$\\\\hat{\\\\)s 18 r (}$"\);)s 279 357 p (break;)s 209 397 p (case)s 18 r (')s 2 r 10 1 ru 15 r (':)s 279 438 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt\\\\)s 2 r 10 1 ru 16 r (}"\);)s 279 478 p (break;)s 209 519 p (case)s 18 r ('{':)s 279 559 p (fprintf\(fptr[1],)s 17 r ("$\\\\{$"\);)s 279 600 p (break;)s 209 640 p (case)s 18 r ('|':)s 279 681 p (fprintf\(fptr[1],)s 17 r ("{\\\\tt)s 18 r (|}"\);)s 279 721 p (break;)s 209 762 p (case)s 18 r ('}':)s 279 802 p (fprintf\(fptr[1],)s 17 r ("$\\\\}$"\);)s 279 842 p (break;)s 209 883 p (case)s 18 r ('~':)s 279 923 p (fprintf\(fptr[1],)s 17 r ("$\\\\tilde{\\\\)s 18 r (}$"\);)s 279 964 p (break;)s 209 1004 p (default:)s 279 1045 p (fprintf\(fptr[1],)s 17 r ("%c",)s 18 r (*ptr\);)s 209 1085 p (})s 105 1126 p (})s 70 1166 p (fprintf\(fptr[1],)s 17 r ("\\\\qquad)s 18 r (page)s 17 r (\\\\folio}\\n"\);)s 0 1207 p (})s 0 1328 p (/*)s 17 r 567 1 ru f0 SF 577 r (input)s 12 r (user's)s 11 r (style)s 10 r (\014le)s 11 r 567 1 ru f5 SF 583 r (*/)s 0 1368 p (/*)s f0 SF 17 r (This)s 8 r (function)s f5 SF 8 r (input)s 2 r 10 1 ru 11 r (usr)s 2 r 10 1 ru 10 r (style\(\))s f0 SF 9 r (simply)s 8 r (tries)s 8 r (to)s 9 r (input)s 8 r (either)s f6 SF 9 r (src2tex.s2t)s f0 SF 8 r (or)s f6 SF 8 r (src2latex.s2t)s f0 SF 9 r (at)s 8 r (the)s 8 r (b)s 1 r (eginning)s 0 1408 p (of)s 13 r (output)s 13 r (op)s 1 r (eration.)s 21 r (If)s 14 r (you)s 12 r (wan)s -1 r (t)s 12 r (to)s 14 r (customize)s 13 r (src2tex)s 13 r ([resp.)s 21 r (src2latex],)s 14 r (it)s 13 r (will)s 13 r (su\016ce)s 13 r (to)s 14 r (write)s 13 r (a)s 13 r (style)s 12 r (\014le)s f6 SF 0 1448 p (src2tex.s2t)s f0 SF 11 r ([resp.)s f6 SF 15 r (src2latex.s2t)s f0 SF (].)s f5 SF 1068 r (*/)s 0 1529 p (void)s 17 r (input)s 3 r 10 1 ru 15 r (user)s 2 r 10 1 ru 15 r (style\(fptr\))s 0 1569 p (FILE)s 17 r (*fptr[];)s 0 1610 p ({)s 0 1650 p (#ifdef)s 17 r (LATEX)s 35 1691 p (fprintf\(fptr[1],)s 17 r ("\\\\newread\\\\MyStyle\\n"\);)s 0 1731 p (#ifndef)s 17 r (UNIX)s 35 1772 p (fprintf\(fptr[1],)s 17 r ("\\\\openin\\\\MyStyle=src2ltex.s2t\\n"\);)s 0 1812 p (#else)s 35 1853 p (fprintf\(fptr[1],)s 17 r ("\\\\openin\\\\MyStyle=src2latex.s2t\\n"\);)s 0 1893 p (#endif)s 35 1934 p (fprintf\(fptr[1],)s 17 r ("\\\\ifeof\\\\MyStyle\\n"\);)s 35 1974 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\closein\\\\MyStyle\\n"\);)s 35 2015 p (fprintf\(fptr[1],)s 17 r ("\\\\else\\n"\);)s 0 2055 p (#ifndef)s 17 r (UNIX)s 35 2095 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\input)s 18 r (src2ltex.s2t\\n"\);)s 0 2136 p (#else)s f0 SF 1306 2216 p (to)s 1 r (ols.c)s 66 r (page)s 12 r (6)s EP pstopssaved restore %%Page: pstops 7 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 35 33 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\input)s 18 r (src2latex.s2t\\n"\);)s 0 74 p (#endif)s 35 114 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\closein\\\\MyStyle\\n"\);)s 35 155 p (fprintf\(fptr[1],)s 17 r ("\\\\fi\\n"\);)s 0 195 p (#ifdef)s 17 r (DEBUGGING)s 35 235 p (printf)s 17 r (\("input)s 2 r 10 1 ru 16 r (user)s 2 r 10 1 ru 15 r (style\(\):)s 18 r (src2latex.s2t)s 17 r (is)s 18 r (included\\n"\);)s 0 276 p (#endif)s 0 316 p (#else)s 35 357 p (fprintf\(fptr[1],)s 17 r ("\\\\newread\\\\MyStyle\\n"\);)s 35 397 p (fprintf\(fptr[1],)s 17 r ("\\\\openin\\\\MyStyle=src2tex.s2t\\n"\);)s 35 438 p (fprintf\(fptr[1],)s 17 r ("\\\\ifeof\\\\MyStyle\\n"\);)s 35 478 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\closein\\\\MyStyle\\n"\);)s 35 519 p (fprintf\(fptr[1],)s 17 r ("\\\\else\\n"\);)s 35 559 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\input)s 18 r (src2tex.s2t\\n"\);)s 35 599 p (fprintf\(fptr[1],)s 17 r (")s 35 r (\\\\closein\\\\MyStyle\\n"\);)s 35 640 p (fprintf\(fptr[1],)s 17 r ("\\\\fi\\n"\);)s 0 680 p (#ifdef)s 17 r (DEBUGGING)s 35 721 p (printf)s 17 r (\("input)s 2 r 10 1 ru 16 r (user)s 2 r 10 1 ru 15 r (style\(\):)s 18 r (src2tex.s2t)s 17 r (is)s 18 r (included\\n"\);)s 0 761 p (#endif)s 0 802 p (#endif)s 0 842 p (})s 0 964 p (/*)s 17 r 538 1 ru f0 SF 549 r (set)s 11 r (TT)s 2 r 10 1 ru 10 r (\015ag)s 11 r (of)s 11 r (text2tex\(\))s 11 r 538 1 ru f5 SF 555 r (*/)s 0 1004 p (/*)s f0 SF 17 r (This)s 8 r (function)s f5 SF 8 r (choose)s 2 r 10 1 ru 11 r (tt)s 2 r 10 1 ru 10 r (font\(\))s f0 SF 9 r (returns)s 8 r (1)s 8 r (if)s 9 r (and)s 8 r (only)s 9 r (if)s 8 r (it)s 8 r (is)s 9 r (b)s 1 r (etter)s 8 r (to)s 8 r (choose)s 9 r (typewriter)s 8 r (font)s 7 r (in)s 9 r (quasi-T)s 1517 1011 p (E)s 1535 1004 p (X)s 0 1044 p (mo)s 1 r (de.)s 15 r (Actually)s -2 r (,)s 10 r (this)s 11 r (function)s 11 r (tries)s 11 r (to)s 11 r (determine)s 11 r (whether)s 11 r (or)s 11 r (not)s 12 r (the)s 11 r (user)s 11 r (prefers)s 11 r (cmtt)s 10 r (font)s 10 r (to)s 11 r (cmr)s 11 r (font.)s f5 SF 33 r (*/)s 0 1125 p (int)s 17 r (choose)s 3 r 10 1 ru 15 r (tt)s 2 r 10 1 ru 15 r (font\(buf)s 2 r 10 1 ru 16 r (ptr\))s 0 1165 p (int)s 17 r (*buf)s 3 r 10 1 ru 15 r (ptr;)s 0 1206 p ({)s 35 1246 p (int)s 17 r (*b)s 2 r 10 1 ru 16 r (ptr,)s 17 r (char)s 2 r 10 1 ru 16 r (counter,)s 17 r (tt)s 2 r 10 1 ru 16 r (flag,)s 17 r (tex)s 2 r 10 1 ru 15 r (flag;)s 35 1287 p (int)s 17 r (line)s 2 r 10 1 ru 16 r (length0,)s 17 r (line)s 2 r 10 1 ru 16 r (length1,)s 17 r (line)s 2 r 10 1 ru 16 r (length2;)s 35 1367 p (char)s 2 r 10 1 ru 15 r (counter)s 18 r (=)s 17 r (0;)s 35 1408 p (line)s 2 r 10 1 ru 15 r (length0)s 18 r (=)s 17 r (0;)s 35 1448 p (line)s 2 r 10 1 ru 15 r (length1)s 18 r (=)s 17 r (0;)s 35 1489 p (line)s 2 r 10 1 ru 15 r (length2)s 18 r (=)s 17 r (0;)s 35 1529 p (tt)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 35 1570 p (tex)s 2 r 10 1 ru 15 r (flag)s 18 r (=)s 17 r (0;)s 35 1610 p (for)s 17 r (\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr;)s 18 r (b)s 2 r 10 1 ru 15 r (ptr)s 17 r (!=)s 18 r (buf)s 2 r 10 1 ru 15 r (ptr)s 18 r (+)s 17 r (\(int\)\(BUFFER)s 2 r 10 1 ru 16 r (SIZE)s 17 r (/)s 18 r (2\);)s 17 r (++b)s 2 r 10 1 ru 15 r (ptr\))s 70 1651 p ({)s 105 1691 p (if)s 17 r (\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('\\t'\))s 139 1731 p (char)s 3 r 10 1 ru 15 r (counter)s 17 r (+=)s 18 r (\(int\)\(HTAB)s 2 r 10 1 ru 15 r (SKIP\))s 18 r (-)s 17 r (\(char)s 2 r 10 1 ru 16 r (counter)s 17 r (%)s 17 r (\(int\)\(HTAB)s 3 r 10 1 ru 15 r (SKIP\)\);)s 105 1772 p (else)s 139 1812 p (++char)s 3 r 10 1 ru 15 r (counter;)s 105 1853 p (if)s 17 r (\(\(\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 17 r ('{'\))s 18 r (&&)s 17 r (\(*\(b)s 2 r 10 1 ru 16 r (ptr)s 17 r (+)s 18 r (1\))s 17 r (==)s 17 r ('\\\\'\)\))s 18 r (||)s 17 r (\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (==)s 18 r ('$'\)\))s 139 1893 p (++tex)s 3 r 10 1 ru 15 r (flag;)s 0 1934 p (#ifdef)s 17 r (UNIX)s 105 1974 p (if)s 17 r (\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 17 r ('\\n'\))s 139 2015 p (continue;)s 0 2055 p (#else)s 105 2095 p (if)s 17 r (\(*b)s 2 r 10 1 ru 16 r (ptr)s 17 r (!=)s 17 r ('\\r'\))s 139 2136 p (continue;)s f0 SF 1306 2216 p (to)s 1 r (ols.c)s 66 r (page)s 12 r (7)s EP pstopssaved restore %%Page: pstops 8 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 0 33 p (#endif)s 105 74 p (else)s 139 114 p ({)s 174 155 p (line)s 2 r 10 1 ru 16 r (length0)s 17 r (=)s 18 r (line)s 2 r 10 1 ru 15 r (length1;)s 174 195 p (line)s 2 r 10 1 ru 16 r (length1)s 17 r (=)s 18 r (line)s 2 r 10 1 ru 15 r (length2;)s 174 235 p (if)s 18 r (\(tex)s 2 r 10 1 ru 15 r (flag)s 18 r (==)s 17 r (0\))s 209 276 p (line)s 2 r 10 1 ru 16 r (length2)s 17 r (=)s 18 r (char)s 2 r 10 1 ru 15 r (counter;)s 174 316 p (else)s 209 357 p (line)s 2 r 10 1 ru 16 r (length2)s 17 r (=)s 18 r (0;)s 174 397 p (char)s 2 r 10 1 ru 16 r (counter)s 17 r (=)s 18 r (0;)s 174 438 p (tex)s 2 r 10 1 ru 16 r (flag)s 17 r (=)s 18 r (0;)s 139 478 p (})s 105 518 p (if)s 17 r (\(\(line)s 2 r 10 1 ru 16 r (length0)s 17 r (==)s 17 r (0\))s 18 r (||)s 17 r (\(line)s 2 r 10 1 ru 16 r (length1)s 17 r (==)s 18 r (0\))s 17 r (||)s 17 r (\(line)s 3 r 10 1 ru 15 r (length2)s 17 r (==)s 18 r (0\))s 174 559 p (||)s 18 r (\(line)s 2 r 10 1 ru 15 r (length0)s 18 r (!=)s 17 r (line)s 2 r 10 1 ru 16 r (length1\))s 17 r (||)s 17 r (\(line)s 3 r 10 1 ru 15 r (length1)s 17 r (!=)s 18 r (line)s 2 r 10 1 ru 15 r (length2\)\))s 139 599 p (continue;)s 105 640 p (if)s 17 r (\(C)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 17 r (0\))s 139 680 p ({)s 174 721 p (if)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-)s 17 r (2\))s 18 r (==)s 17 r ('*'\))s 17 r (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-1\))s 17 r (==)s 18 r ('/'\)\))s 209 761 p (++tt)s 2 r 10 1 ru 16 r (flag;)s 174 802 p (if)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-)s 17 r (2\))s 18 r (==)s 17 r ('/'\))s 17 r (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-1\))s 17 r (==)s 18 r ('/'\)\))s 209 842 p (++tt)s 2 r 10 1 ru 16 r (flag;)s 139 882 p (})s 105 923 p (if)s 17 r (\(CBL)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 17 r (0\))s 139 963 p ({)s 174 1004 p (if)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-)s 17 r (1\))s 18 r (==)s 17 r ('*'\))s 209 1044 p (++tt)s 2 r 10 1 ru 16 r (flag;)s 139 1085 p (})s 105 1125 p (if)s 17 r (\(F77)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 17 r (0\))s 139 1165 p ({)s 174 1206 p (if)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-)s 17 r (1\))s 18 r (==)s 17 r ('*'\))s 209 1246 p (++tt)s 2 r 10 1 ru 16 r (flag;)s 139 1287 p (})s 105 1327 p (if)s 17 r (\(PAS)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 17 r (0\))s 139 1368 p ({)s 174 1408 p (if)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-)s 17 r (2\))s 18 r (==)s 17 r ('*'\))s 17 r (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-1\))s 17 r (==)s 18 r ('\)'\)\))s 209 1449 p (++tt)s 2 r 10 1 ru 16 r (flag;)s 174 1489 p (if)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-)s 17 r (1\))s 18 r (==)s 17 r ('}'\))s 209 1529 p (++tt)s 2 r 10 1 ru 16 r (flag;)s 139 1570 p (})s 105 1610 p (if)s 17 r (\(MAP)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 17 r (0\))s 139 1651 p ({)s 174 1691 p (if)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-)s 17 r (1\))s 18 r (==)s 17 r ('#'\))s 209 1732 p (++tt)s 2 r 10 1 ru 16 r (flag;)s 139 1772 p (})s 105 1812 p (if)s 17 r (\(MAT)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 17 r (0\))s 139 1853 p ({)s 174 1893 p (if)s 18 r (\(\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-)s 17 r (2\))s 18 r (==)s 17 r ('*'\))s 17 r (&&)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-1\))s 17 r (==)s 18 r ('\)'\)\))s 209 1934 p (++tt)s 2 r 10 1 ru 16 r (flag;)s 139 1974 p (})s 105 2015 p (if)s 17 r (\(MLAB)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 17 r (0\))s 139 2055 p ({)s 174 2096 p (if)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-)s 17 r (1\))s 18 r (==)s 17 r ('#'\))s 209 2136 p (++tt)s 2 r 10 1 ru 16 r (flag;)s f0 SF 1306 2216 p (to)s 1 r (ols.c)s 66 r (page)s 12 r (8)s EP pstopssaved restore %%Page: pstops 9 /pstopssaved save def pstopsmatrix setmatrix 0.000000 0.000000 translate 1.000000 dup scale /pstopsmatrix matrix currentmatrix def initclip pstopsxform concat BP f0 SF 1274 -45 p (src2tex)s 11 r (version)s 11 r (2.12)s f5 SF 174 33 p (if)s 18 r (\(*\(b)s 2 r 10 1 ru 15 r (ptr)s 18 r (-)s 17 r (1\))s 18 r (==)s 17 r ('%'\))s 209 73 p (++tt)s 2 r 10 1 ru 16 r (flag;)s 139 113 p (})s 105 153 p (if)s 17 r (\(tt)s 2 r 10 1 ru 16 r (flag)s 17 r (!=)s 17 r (0\))s 139 193 p (break;)s 70 232 p (})s 0 272 p (#ifdef)s 17 r (DEBUGGING)s 35 312 p (printf)s 17 r (\("choose)s 2 r 10 1 ru 16 r (tt)s 2 r 10 1 ru 15 r (font\(\):\\n"\);)s 35 352 p (printf)s 17 r (\("TT)s 2 r 10 1 ru 16 r (flag)s 17 r (=%d\\n",)s 18 r (tt)s 2 r 10 1 ru 15 r (flag\);)s 0 392 p (#endif)s 35 432 p (return)s 17 r (tt)s 2 r 10 1 ru 16 r (flag;)s 0 472 p (})s 0 551 p (/*)s 17 r 589 1 ru f0 SF 600 r (fprintf)s 10 r (line)s 11 r (numer)s 10 r 589 1 ru f5 SF 606 r (*/)s 0 591 p (/*)s f0 SF 17 r (This)s 11 r (function)s f5 SF 11 r (fprintf)s 2 r 10 1 ru 10 r (line)s 2 r 10 1 ru 11 r (numer\(\))s f0 SF 11 r (simply)s 11 r (prints)s 10 r (line)s 11 r (num)s -1 r (ber)s 11 r (at)s 11 r (the)s 11 r (b)s 1 r (eginning)s 11 r (of)s 12 r (each)s 10 r (line.)s f5 SF 109 r (*/)s 0 671 p (void)s 17 r (fprintf)s 3 r 10 1 ru 15 r (line)s 2 r 10 1 ru 15 r (number\(fptr,)s 18 r (line)s 2 r 10 1 ru 15 r (counter\))s 0 711 p (FILE)s 17 r (*fptr[];)s 0 751 p (long)s 17 r (line)s 3 r 10 1 ru 15 r (counter;)s 0 790 p ({)s 35 830 p (if)s 17 r (\(line)s 2 r 10 1 ru 16 r (counter)s 17 r (<)s 18 r (9\))s 70 870 p (fprintf\(fptr[1],)s 209 910 p ("\\n\\n{\\\\tt\\\\noindent\\\\phantom{00000}%d:\\\\)s 18 r (}\\n",)s 209 950 p (line)s 2 r 10 1 ru 16 r (counter)s 17 r (+)s 18 r (1\);)s 35 990 p (if)s 17 r (\(\(line)s 2 r 10 1 ru 16 r (counter)s 17 r (>=)s 18 r (9\))s 17 r (&&)s 18 r (\(line)s 2 r 10 1 ru 15 r (counter)s 17 r (<)s 18 r (99\)\))s 70 1029 p (fprintf\(fptr[1],)s 209 1069 p ("\\n\\n{\\\\tt\\\\noindent\\\\phantom{0000}%d:\\\\)s 18 r (}\\n",)s 209 1109 p (line)s 2 r 10 1 ru 16 r (counter)s 17 r (+)s 18 r (1\);)s 35 1149 p (if)s 17 r (\(\(line)s 2 r 10 1 ru 16 r (counter)s 17 r (>=)s 18 r (99\))s 17 r (&&)s 18 r (\(line)s 2 r 10 1 ru 15 r (counter)s 17 r (<)s 18 r (999\)\))s 70 1189 p (fprintf\(fptr[1],)s 209 1229 p ("\\n\\n{\\\\tt\\\\noindent\\\\phantom{000}%d:\\\\)s 18 r (}\\n",)s 209 1269 p (line)s 2 r 10 1 ru 16 r (counter)s 17 r (+)s 18 r (1\);)s 35 1308 p (if)s 17 r (\(\(line)s 2 r 10 1 ru 16 r (counter)s 17 r (>=)s 18 r (999\))s 17 r (&&)s 18 r (\(line)s 2 r 10 1 ru 15 r (counter)s 17 r (<)s 18 r (9999\)\))s 70 1348 p (fprintf\(fptr[1],)s 209 1388 p ("\\n\\n{\\\\tt\\\\noindent\\\\phantom{00}%d:\\\\)s 18 r (}\\n",)s 209 1428 p (line)s 2 r 10 1 ru 16 r (counter)s 17 r (+)s 18 r (1\);)s 35 1468 p (if)s 17 r (\(\(line)s 2 r 10 1 ru 16 r (counter)s 17 r (>=)s 18 r (9999\))s 17 r (&&)s 18 r (\(line)s 2 r 10 1 ru 15 r (counter)s 17 r (<)s 18 r (99999\)\))s 70 1508 p (fprintf\(fptr[1],)s 209 1547 p ("\\n\\n{\\\\tt\\\\noindent\\\\phantom{0}%d:\\\\)s 18 r (}\\n",)s 209 1587 p (line)s 2 r 10 1 ru 16 r (counter)s 17 r (+)s 18 r (1\);)s 35 1627 p (if)s 17 r (\(line)s 2 r 10 1 ru 16 r (counter)s 17 r (>=)s 18 r (99999\))s 70 1667 p (fprintf\(fptr[1],)s 209 1707 p ("\\n\\n{\\\\tt)s 18 r (%d:\\\\)s 17 r (}\\n",)s 209 1747 p (line)s 2 r 10 1 ru 16 r (counter)s 17 r (+)s 18 r (1\);)s 0 1787 p (})s f0 SF 1306 2216 p (to)s 1 r (ols.c)s 66 r (page)s 12 r (9)s EP pstopssaved restore %%Trailer %%Pages: 9 END %%EOF