🚀 go-pugleaf

In article <5sdnf5$f23$1@jaist-news.jaist.ac.jp>, s-nisida@jaist.ac.jp says...
>
>$B%3%s%Q%$%k$7$?%U%!%$%k$r<B9T$7$?;~$K!"%G!<%?$,=P$:$K!"(B
>
>Traceback has been recorded in file:
>         /tmp_mnt/home/fs028/s-nisida/MC4/./monte4.out.trace 
>Note: Line numbers for system and library calls may be incorrect 
>Abort

$B!!$=$N$^$^FI$`$H!$(BFunction$B$+(BSubroutine$B$+$N8F$S=P$7$,$*$+$7$$!$$H$$$&$3$H(B
$B$_$?$$$G$9$1$I!#(B

$B!!%=!<%9$N3:EvItJ,$H$+!$%3%s%Q%$%i(B(Fortran$B$J$s$G$9$h$M!)(B)$B$H$+$N>pJs$r=P$7(B
$B$FD:$1$k$H!$B>$NJ}$+$iM-MQ$J$*Ez$($,D:$1$k$N$G$O!)(B

--
----------------------------------------
Tomonori Kouya: juneco@po.incl.or.jp
                tkouya@ishikawa-pc.ac.jp
Ishikawa Polytechnic College
----------------------------------------

>>>>> On 7 Aug 1997 23:58:29 GMT, s-nisida@jaist.ac.jp (Satoshi
Nishida) said:

> $B%3%s%Q%$%k$7$?%U%!%$%k$r<B9T$7$?;~$K!"%G!<%?$,=P$:$K!"(B

> Traceback has been recorded in file:
>          /tmp_mnt/home/fs028/s-nisida/MC4/./monte4.out.trace 
> Note: Line numbers for system and library calls may be incorrect 
> Abort

> $B$H$$$&%3%^%s%I$,=P$F<B9T%U%!%$%k(Bmonte4.out$B$KBP$7!"(Bmonte4.out.trace$B$H$$$&(B
> $B%U%!%$%k$r:n@.$9$k$N$G$9$,!"$3$N%U%!%$%k$NFbMF$,(B

> Note: Line numbers for system and library calls may be incorrect 
> Begin traceback...
> Called from [func: (null)], at 0xef706c4c, args=0xb 0x3 0xef7d3a44 0xef8028b0
> Called from [func: (null)], at 0xd3d9b018, args=0x2ce78 0xb52a311a 0x2a882748 
> 0x2ce74
> Called from [func: _height_], at 0x4408, args=0x2ce70 0x2ce74 0x2ce78 0x6c7b0
> Called from [func: _MAIN_], at 0x2dac, args=0x79398 0x793e4 0x793e8 0x793ec
> Called from [func: (null)], at 0xef780c38, args=0x81150 0x96 0x78 0x1
> Called from [func: start], at 0x2064, args=0x0 0x10 0xeffff9cc 0x2a000
> End traceback...

> $B$H$J$C$F$$$k$N$G$9$,FbMF$,$h$/J,$+$j$^$;$s!#BP=hK!$rCN$C$F$$$kJ}!"$^$?(B
> $B$3$N%U%!%$%k$NFbMF$,J,$+$kJ}!"$<$R65$($F$$$?$@$1$J$$$G$7$g$&$+!#$h$m$7$/(B
> $B$*4j$$$7$^$9!#(B

$B0U30$K%U%)%m!<$,$D$+$J$$$G$9$M!#$($C$H!"B?J,(B Sun $B$r$*;H$$$G$"$k$H(B
$B;W$$$^$9$,!"$&!<$s!"(B

$B!&%3%s%Q%$%i$N%^%K%e%"%k(B
$B!&(B dbx $B$+$J$s$+%G%P%C%,$N;H$$J}(B

$B$J$I$r8fMw$K$J$C$F$_$k$H$$$$$+$b$7$l$^$;$s!#>e$NCf?H$O!"$*$=$i$/(B 
height $B$H$$$&L>A0$N%5%V%k!<%A%s$+4X?t$N$J$+$G%W%m%0%i%`$,0[>o=*N;(B
$B$7$?$H$$$&$3$H$r0UL#$7$F$$$^$9!#(B dbx$B$J$I$N%G%P%C%,$r;H$C$F8+$k$H(B
$B$b$&>/$7>\$7$$>pJs$,F@$i$l$k$G$7$g$&!#(B

$BKRLn!wElBg6p>l(B

<5sdnf5$f23$1@jaist-news.jaist.ac.jp>$B$N5-;v$K$*$$$F(B
s-nisida@jaist.ac.jp$B$5$s$O0J2<$N$h$&$K=q$-$^$7$?!#(B

>> Note: Line numbers for system and library calls may be incorrect 
>> Begin traceback...
>> Called from [func: (null)], at 0xef706c4c, args=0xb 0x3 0xef7d3a44 0xef8028b0
>> Called from [func: (null)], at 0xd3d9b018, args=0x2ce78 0xb52a311a 0x2a882748 
>> 0x2ce74
>> Called from [func: _height_], at 0x4408, args=0x2ce70 0x2ce74 0x2ce78 0x6c7b0
>> Called from [func: _MAIN_], at 0x2dac, args=0x79398 0x793e4 0x793e8 0x793ec
>> Called from [func: (null)], at 0xef780c38, args=0x81150 0x96 0x78 0x1
>> Called from [func: start], at 0x2064, args=0x0 0x10 0xeffff9cc 0x2a000
>> End traceback...
>> 
>> $B$H$J$C$F$$$k$N$G$9$,FbMF$,$h$/J,$+$j$^$;$s!#BP=hK!$rCN$C$F$$$kJ}!"$^$?(B
>> $B$3$N%U%!%$%k$NFbMF$,J,$+$kJ}!"$<$R65$($F$$$?$@$1$J$$$G$7$g$&$+!#$h$m$7$/(B
>> $B$*4j$$$7$^$9!#(B

$B$9$G$K(B Follow$B$,IU$$$F$$$k$N$G!"(Btraceback $B$K$D$$$F$N$_!D(B

$BHFMQBg7?5!$N(B FORTRAN$B$G$O$"$k%b%8%e!<%k$+$iB>$N%b%8%e!<%k(B(FORTRAN$B$G$O(B
SUBROUTINE$B$d(BFUNCTION)$B$r8F$S=P$9$?$S$K!"%l%8%9%?$N(B SAVE AREA$B$KFCDj$N(B
$B%l%8%9%?$r;H$C$?%j%s%/$r:n$j$^$9!#(B

$B%W%m%0%i%`<B9TCf$KNc303d$j9~$_$,F~$k$H!"$3$N(B SAVE AREA$B$N%j%s%/$r5U=g(B
$B$K$?$I$C$F!"$=$N%b%8%e!<%k$,8F$S=P$5$l$?0MB84X78$r=PNO$9$k$h$&$K(B
$B$J$C$F$*$j!"$3$l$r%H%l!<%9%P%C%/$H8@$$$^$9!#(B

UNIX$B$N(B fortran$B$G$b35$M$=$N;EAH$_$rF'=1$7$F$*$j!"%9%?%C%/>e$KF1MM$N(B
$B%j%s%/$r:n$j!">e$N>l9g$O!"(B[]$B$NCf$K%b%8%e!<%kL>!"8F$S=P$5$l$?=g=x$N(B
$B5U=g$KC)$C$?7P2a$,I=<($5$l$F$$$^$9!#(B

$B$G!"(Bfunc: _height_ $B$^$G$O$h$$$N$G$9$,!"(B func: (null) $B$H$J$k$O$:$,(B
$B$J$$$N$G!"(Bheight$B$N%b%8%e!<%kFb$G%a%b%j$+%9%?%C%/$r2u$9$h$&$J=hM}$,(B
$B9T$J$o$l$?$N$@$m$&$HM=B,$G$-$^$9!#(B

$B$$$:$l$K$7$m!"B>$NJ}$,(B follow$B$5$l$F$$$^$9$h$&$K!"%G%P%C%,$r;H$C$F(B
$BD4$Y$F8+$k$N$,0lHV<j$C<h$jAa$$$H;W$$$^$9!#(B

---
$BCfB<(B yas@cc.nda.ac.jp

fj.lang.fortran$B$N5-;v(B<5shndu$a20@cmnews.nda.ac.jp>$B$G(B
	yas@cc.nda.ac.jp$B$5$s$O=q$-$^$7$?!#(B
> $BHFMQBg7?5!$N(B FORTRAN$B$G$O$"$k%b%8%e!<%k$+$iB>$N%b%8%e!<%k(B(FORTRAN$B$G$O(B
> SUBROUTINE$B$d(BFUNCTION)$B$r8F$S=P$9$?$S$K!"%l%8%9%?$N(B SAVE AREA$B$KFCDj$N(B
> $B%l%8%9%?$r;H$C$?%j%s%/$r:n$j$^$9!#(B

$B$H$$$&$+!"(BIBM360$B%7%j!<%:$G%5%V%k!<%A%s8F$S=P$7$K;H(B
$B$o$l$F$$$?5!3#8lL?Na(BBALR(Branch and Link Register)
$B$,$=$&$$$&<BAu$K$J$C$F$$$?$H$$$&OC$G$O$J$$$G$9$+(B?

$B$1$C$-$g$/!"%5%V%k!<%A%s$+$iI|5"$9$k$?$a$K$O8F$S=P(B
$B$785$,$I$3$@$C$?$+$r21$($F$*$+$J$1$l$P$J$i$J$$$H$$(B
$B$&$3$H$G$7$g$&!#$[$+$N%"!<%-%F%/%A%c!<$G$b%5%V%k!<(B
$B%A%s8F$S=P$7$K$OF1MM$N=hM}$,I,MW$J$O$:$G!"$3$N$h$&(B
$B$J<BAu$K$J$C$F$$$k$3$H$,K\<A$G$O$J$$$H;W$$$^$9!#(B
--
$BB@ED=c(B(Junn Ohta) ($B3t(B)$B%j%3!<(B MS$B;v6H?d?J<<(B
ohta@src.ricoh.co.jp/JCF00656@niftyserve.or.jp

$B$I$&$b!#(B

<5shqsa$li0@ns.src.ricoh.co.jp>$B$N5-;v$K$*$$$F(B
ohta@src.ricoh.co.jp$B$5$s$O0J2<$N$h$&$K=q$-$^$7$?!#(B

>> fj.lang.fortran$B$N5-;v(B<5shndu$a20@cmnews.nda.ac.jp>$B$G(B
>> 	yas@cc.nda.ac.jp$B$5$s$O=q$-$^$7$?!#(B
>> > $BHFMQBg7?5!$N(B FORTRAN$B$G$O$"$k%b%8%e!<%k$+$iB>$N%b%8%e!<%k(B(FORTRAN$B$G$O(B
>> > SUBROUTINE$B$d(BFUNCTION)$B$r8F$S=P$9$?$S$K!"%l%8%9%?$N(B SAVE AREA$B$KFCDj$N(B
>> > $B%l%8%9%?$r;H$C$?%j%s%/$r:n$j$^$9!#(B
>> 
>> $B$H$$$&$+!"(BIBM360$B%7%j!<%:$G%5%V%k!<%A%s8F$S=P$7$K;H(B
>> $B$o$l$F$$$?5!3#8lL?Na(BBALR(Branch and Link Register)
>> $B$,$=$&$$$&<BAu$K$J$C$F$$$?$H$$$&OC$G$O$J$$$G$9$+(B?

$B$=$&$G$9!#(B

>> $B$1$C$-$g$/!"%5%V%k!<%A%s$+$iI|5"$9$k$?$a$K$O8F$S=P(B
>> $B$785$,$I$3$@$C$?$+$r21$($F$*$+$J$1$l$P$J$i$J$$$H$$(B
>> $B$&$3$H$G$7$g$&!#(B

$B$G!"$I$&$d$C$F!)(B
$B$H$$$&$3$H$K$J$k$G$7$g$&$+$i!"$o$+$j$d$9$$!J$G$"$m$&!K(B
$B$h$&$K!"6qBNE*$J0lNc$r5s$2$?$@$1$G$9!#(B

>> $B$[$+$N%"!<%-%F%/%A%c!<$G$b%5%V%k!<(B
>> $B%A%s8F$S=P$7$K$OF1MM$N=hM}$,I,MW$J$O$:$G!"$3$N$h$&(B
>> $B$J<BAu$K$J$C$F$$$k$3$H$,K\<A$G$O$J$$$H;W$$$^$9!#(B

$B$O$$!#3N$+$K!#(B
$B<BAu$N;EJ}$r$b$C$F%H%l!<%9%P%C%/$@!"$H2r<a$5$l$?$J$i(B
$BI=8=$,%^%:$+$C$?$G$9!#(B
$B%"!<%-%F%/%A%c$d=hM}7O$K$h$C$F<BAu$NJ}K!$O0[$J$j$^$9!#(B

---
$BCfB<(B yas@cc.nda.ac.jp

$@2CF#!s85(JLISP$@20!w%K%e!<%m20$G$9!%(Jfj$@$K$O5W$7$V$j$NEj9F$G$9!%85(J
$@$N5-;v$H$O$"$^(J$@$j4X78$J$$$3$H$G$9$,!$@53N$5$N$?$a$K(Jfollow$@$7$F(J
$@$*$-$^$9!%(J

In article <5shqsa$li0@ns.src.ricoh.co.jp> ohta@src.ricoh.co.jp (Junn Ohta) writes:
>fj.lang.fortran$@$N5-;v(J<5shndu$a20@cmnews.nda.ac.jp>$@$G(J
>	 yas@cc.nda.ac.jp$@$5$s$O=q$-$^$7$?!#(J
>> $@HFMQBg7?5!$N(J FORTRAN$@$G$O$"$k%b%8%e!<%k$+$iB>$N%b%8%e!<%k(J(FORTRAN$@$G(J$@$O(J
>> SUBROUTINE$@$d(JFUNCTION)$@$r8F$S=P$9$?$S$K!"%l%8%9%?$N(J SAVE AREA$@$KFCDj$N(J
>> $@%l%8%9%?$r;H$C$?%j%s%/$r(J$@:n$j$^$9!#(J
>
>$@$H$$$&$+!"(JIBM360$@%7%j!<%:$G%5%V%k!<%A%s8F$S=P$7$K;H(J
>$@$o$l$F$$$?5!3#8lL?Na(JBALR(Branch and Link Register)
>$@$,$=$&$$$&<BAu$K$J$C$F$$$?$H$$$&OC$G$O$J$$$G$9$+(J?

$@@53N$K8@$&$H!$(JBALR$@L?Na$N<BAu$G$O$"(J$@$j$^$;$s$M!%(JBALR$@L?Na$O$=$N(J
$@L>$NDL$j!$;XDj$5$l$?%l%8%9%?$KLa$jHVCO$r3JG<$7$F!$;XDj$5$l$?(J
$@%l%8%9%?$,:9$7(J$@$F$$$kHVCO$KD7$s$G$$$/$@$1$G$9!%!J(JVAX $@$_$?$$$K(J
$@%l%8%9%?$NFbMF$r<+F0E*$K%a%b%j$KJ]B8$7$?$j$O$7$J$$!K(J

$@$3$l$OD7$s$G$$$C$?@h$G!$3F%l%8%9%?$NFbMF$r$I$&$$$&Iw$K3JG<$9(J
$@$k$+$H8@$&%3%s%Y%s%7%g%s$NLdBj$G$9!%$3$l(J$@$O(JSystem360$@$G$O%"%;%s(J
$@%V%i$@$m$&$,!$(JFORTRAN$@$@$m$&$,!$8@8l$K4X78$J$/7h$^$C$F$*$j!$%"(J
$@%;%s%V%i$J$i<+J,$G(JSTM (Store Multiple) $@L?Na$r;H$C$F=q$+$J$1$l(J
$@$P$J$j$^$;$s!%$D$$$G$K$$$&$H!$(JSystem360$@$G$ON>J}8~$N%j%s%/(J$@$rD%(J
$@$kLsB+$K$J$C$F$^$9!%!J$"$k8@8l!$Nc$($P(JLISP$@$J$I$N%$%s%W%j%a%s(J
$@%H$r!$>5CN$N>e$GJQ99$9$k$N$O>!<j$G$9(J$@!K(J

>$@$1$C$-$g$/!"%5%V%k!<%A%s$+$iI|5"$9$k$?$a$K$O8F$S=P(J
>$@$785$,$I$3$@$C$?$+$r21$($F$*$+$J$1$l$P$J$i$J(J$@$$$H$$(J
>$@$&$3$H$G$7$g$&!#$[$+$N%"!<%-%F%/%A%c!<$G$b%5%V%k!<(J
>$@%A%s8F$S=P$7$K$OF1MM$N=hM}$,I,MW$J$O$:$G!"(J$@$3$N$h$&(J
>$@$J<BAu$K$J$C$F$$$k$3$H$,K\<A$G$O$J$$$H;W$$$^$9!#(J

$@855-;v$NJ}$OJ,$+$j0W$$$h$&$K@bL@$7$?$s$G$7(J$@$g$&!%$H$$$&FM$C9~(J
$@$_$O$*$$$H$$$F!$%(%i!<$,5/$-$?8e$G$b!$8F$S$@$785$H$=$N;~$N%l(J
$@%8%9%?$NFbMF$,3N<B$KJ,(J$@$+$k$h$&$K$9$k<BAu$OI,$:$7$b0lHLE*$G$O(J
$@$"$j$^$;$s!%!J$A$g$C$HL5BL$,B?$/$J$k$N$G!K!%(J

fj.lang.fortran$B$N5-;v(B<KATOH.97Aug10024853@regain.flab.fujitsu.co.jp>$B$G(B
	katoh@flab.Fujitsu.co.jp$B$5$s$O=q$-$^$7$?!#(B
> $B$3$l$OD7$s$G$$$C$?@h$G!$3F%l%8%9%?$NFbMF$r$I$&$$$&Iw$K3JG<$9(B
> $B$k$+$H8@$&%3%s%Y%s%7%g%s$NLdBj$G$9!%$3$l$O(BSystem360$B$G$O%"%;%s(B
> $B%V%i$@$m$&$,!$(BFORTRAN$B$@$m$&$,!$8@8l$K4X78$J$/7h$^$C$F$*$j!$(B

$B$=$&$G$9$M!#;d$N5-;v$b$:$$$V$s@53N$5$r7g$$$F$$$?$h(B
$B$&$G$9!#%U%)%m!<$"$j$,$H$&$4$6$$$^$9!#$3$l$O7W;;5!(B
$B%"!<%-%F%/%A%c!<$K5/0x$9$k%3%s%Y%s%7%g%s$G$"$C$F!"(B
$B8@8l$K4X78$J$$$H$$$&$H$3$m$,$$$A$P$sBg;v$G$9$h$M!#(B

> $B%(%i!<$,5/$-$?8e$G$b!$8F$S$@$785$H$=$N;~$N%l(B
> $B%8%9%?$NFbMF$,3N<B$KJ,$+$k$h$&$K$9$k<BAu$OI,$:$7$b0lHLE*$G$O(B
> $B$"$j$^$;$s!%!J$A$g$C$HL5BL$,B?$/$J$k$N$G!K!%(B

$B$J$k$[$I!#(B

$B;d$,;W$&$K!"$3$N$h$&$J%5%V%k!<%A%s8F$S=P$7$N$7$/$_(B
$B$O:r:#$N%9%?%C%/%^%7%s$HHf3S$7$FG[N8$,2a>j$G$"$k$h(B
$B$&$J5$$,$7$^$9!#%G%P%C%0$,86B'$H$7$F%9%J%C%W%7%g%C(B
$B%H$K$h$k$h$&$J%9%?%$%k$rH?1G$7$F$$$?$N$G$7$g$&$+(B?

$B$3$N$"$?$j$rM}2r$9$k$K$O;d$NCN<1$O@u$9$.$k$N$G(B...$B!#(B:-)
--
$BB@ED=c(B(Junn Ohta) ($B3t(B)$B%j%3!<(B MS$B;v6H?d?J<<(B
ohta@src.ricoh.co.jp/JCF00656@niftyserve.or.jp