🚀 go-pugleaf

In article <NKAWAI.92Feb10194317@rkna50.riken.go.jp> nkawai@rkna50.riken.go.jp (Nobuyuki Kawai) writes:
>$BIY;NDL$NBg7?7W;;5!>e$N(J $B%0%i%U%#%C%/!&%Q%C%1!<%8$N(J PSP $B$rMQ$$$?(J FORTRAN 
>$B%W%m%0%i%`$,$?$/$5$s$"$k$N$G$9$,!"%=!<%9$r=q$-49$($:$K!"(JPSP$B$N%G!<%?$N(J
>$BBe$o$j$K%]%9%H%9%/%j%W%H$r=PNO$9$k$h$&$J(J FORTRAN $B%i%$%V%i%j!<$r$I$J$?(J
>$B$+$4B8$8$J$$$G$7$g$&$+!)(J
>PSP $B$O$b$H$b$H(J CALCOMP $B$N%Z%s!&%W%m%C%?!<MQ$N(J FORTRAN $B%i%$%V%i%j!<$G$9(J

c     CALPAK    - graphic library upward compatible to the CALCOMP library
c                 an interface driver (e.g. laspac, tekpac, Xpac) is required.
c
c     Originally written by Brian Kennett, Harb McQueen (ANU)
c                           A. Chave (IGPP/UCSD, symbol subroutine)
c     Last modified -  11/10/91 (Kazuki K2 Koketsu)

$B$H$$$&$N$,$"$j$^$9$N$G!"$h$+$C$?$i(J hato.eri.u-tokyo.ac.jp $B$+$i(J ftp
$B$7$F$/$@$5$$!#(JPostScript(BoundingBox$BIU$-(J)$B!"(JTektronix$B!"(JX window $B$K(J
$B3($,IA$1$^$9!#$?$@$7%0%i%U%#%C%/$N3+;O$H=*N;$O<j$rF~$l$kI,MW$,$"$k(J
$B$H;W$$$^$9!#(J
-- 
$@ever(J $@0l5/(J(KOKETSU Kazuki)$@!wElBgCO?L8&(J(Earthq. Res. Inst., Univ. Tokyo)
$@L>;z(J(JIS 6576,6572)$@$O8EBe@w$a$NL>A0$@$=$&$G(J,$@Ic?F$O4tIl8)B?<#8+IU6a$N=P?H$G$9(J.