Thread View: fj.lang.fortran
3 messages
3 total messages
Started by ICHIMIYA Katsuya
Mon, 20 Oct 1997 00:00
compile Error
Author: ICHIMIYA Katsuya
Date: Mon, 20 Oct 1997 00:00
Date: Mon, 20 Oct 1997 00:00
65 lines
2241 bytes
2241 bytes
$B0l5\!wJ!2,Bg3X$H8@$$$^$9!#(B
$B=q@R$KIUB0$7$F$$$?(BFortran$B$N%=!<%9$r%3%s%Q%$%k$7$h$&$H(B
$B;W$$!"%3%s%Q%$%k;~$NCm0U;v9`$rFI$_!"<jD>$7$,I,MW$JItJ,$O(B
$BD{@5$7$F%3%s%Q%$%k$7$^$7$?$,!"0J2<$NMM$J%(%i!<%a%C%;!<%8(B
$B$,$G$^$9!#(B
% f77 -o foo foo.f
231 Error on line 1530 of foo.f: Declaration error for hoge: adjustable automatic array
231 Error on line 1547 of foo.f: Declaration error for huga: adjustable automatic array
170 Error on line 1564 of foo.f: Declaration error for huga: adjustable dimension on non-argument
170 Error on line 1564 of foo.f: Declaration error for hoge: adjustable dimension on non-argument
231$B$N%(%i!<$H$O!"(B
$B<BG[Ns$N@#K!@k8@;R$K2>0z?t$,8=$l$F$$$^$9!#(B
170$B$N%(%i!<$O(B
$B@09g@#K!$,2>0z?tJB$S$NCf$K$"$j$^$;$s!#(B
$B%(%i!<$N=P$F$$$k6aJU$rI=<($9$k$H(B
1529: DO I=1,3*NP
1530: hoge(I)=0.0D+0
1531: END DO
1547: CALL MA_EX(huga,MAXNE,MAXFREE)
1564: END
$BLdBj$K$J$C$F$$$k=j$N%5%V%k!<%A%s$N@k8@$NItJ,$G$9!#(B
SUBROUTINE WR_SUB(MAXNE,MAXFREE)
C
IMPLICIT REAL*8(A-H,O-Z)
C
DIMENSION huga(6,8,MAXNE),hoge(MAXFREE)
parameter( MAXNE=500
+ ,MAXFREE=6600)
NEC EWS4800$B%7%j!<%:(B
UX-FORTRAN77
System V
$B$J$*=q@R$N%=!<%9$O(BHP$B@=(BWS$B$GF0:n3NG'$7$F$$$k$=$&$G$9!#(B
$B$3$s$J46$8$G$9!#G[Ns$,4V0c$C$F$$$k$H$b;W$($^$;$s$,!"$I$J$?$+2r7h:v$,(B
$B$o$+$kJ}$O!"$465<x$M$,$$$^$9!#(B
$B5-=R$,B-$j$J$$;~$O$4;XE&2<$5$$!#(B
--------------------------------
$B0l5\(B $B9nLo(B (Ichimiya Katsuya) JK6LRI Mail:td964001@tsat.fukuoka-u.ac.jp
$BJ!2,Bg3X(B $B9)3X8&5f(B $B7z@_9)3X(B M2 Web:http://133.100.222.30/HomePage/
$BEZLZ3X2q@>It;YIt!"6e=82q(B(InterNet)$B!"3X@8$@$1$N=8$^$j$G$9!#(B
http://133.100.222.30/kyusyu/
Re: compile Error
Author: Arasaki Yasuki
Date: Mon, 20 Oct 1997 00:00
Date: Mon, 20 Oct 1997 00:00
26 lines
1411 bytes
1411 bytes
In article <62erl9$egh$1@news.fukuoka-u.ac.jp>
td964001@cc.fukuoka-u.ac.jp (ICHIMIYA Katsuya) $B$5$s(Bwrote:
>> SUBROUTINE WR_SUB(MAXNE,MAXFREE)
>> IMPLICIT REAL*8(A-H,O-Z)
>> DIMENSION huga(6,8,MAXNE),hoge(MAXFREE)
>> parameter(MAXNE=500,MAXFREE=6600)
>> $B$3$s$J46$8$G$9!#G[Ns$,4V0c$C$F$$$k$H$b;W$($^$;$s$,!"$I$J$?$+2r7h:v$,(B
>> $B5-=R$,B-$j$J$$;~$O$4;XE&2<$5$$!#(B
$B=P$F$-$?K\$NL>A0$H%Z!<%8$"$k$$$O2?$r$9$k$D$b$j$N%W%m%0%i%`$J$N$+!"(B
$B$I$3$,!V<jD>$7$,I,MW!W$@$C$?$N$+!"$J$I$r=q$$$F$b$i$($k$HFI$`?M$N(B
$B;29M$K$J$k$H;W$$$^$9!#$b$H$b$H(BHP$BMQ$N%W%m%0%i%`$@$C$?!"$H$$$&$3$H(B
$B$+$i?dB,$9$k$H!"(BPARAMETER$BJ8$rIU$1B-$7$?$^$G$O$h$+$C$?$,!"(B
MAXNE$B$H(BMAXFREE$B$r2>0z?t$+$i=|$/$N$rK:$l$F$$$?!"$H$$$&$3$H$G$O(B
$B$J$$$+$H;W$$$^$9!#(B
SUBROUTINE WR_SUB(IDUMMY,JDUMMY)
$B$H$G$b$9$l$P$$$$$N$+$b$7$l$^$;$s!#(B
--
$B?7:j(B@$BL>Bg?M>p(B
arasaki@info.human.nagoya-u.ac.jp
Re: compile Error
Author: Yamaguchi Tadashi
Date: Mon, 20 Oct 1997 00:00
Date: Mon, 20 Oct 1997 00:00
26 lines
1622 bytes
1622 bytes
$B;38}!wCfItBg3X$H?=$7$^$9!#(B
fj.lang.fortran$B$N(B<62erl9$egh$1@news.fukuoka-u.ac.jp>$B$N5-;v$K$*$$$F(B
JST$B;~4V(B1997$BG/(B10$B7n(B20$BF|(B($B7n(B) 14$B;~(B53$BJ,(B45$BIC:"!"(Btd964001@cc.fukuoka-u.ac.jp $B$5$s$O=q$-$^$7$?!#(B
$B!JN,!K(B
| $BLdBj$K$J$C$F$$$k=j$N%5%V%k!<%A%s$N@k8@$NItJ,$G$9!#(B
| SUBROUTINE WR_SUB(MAXNE,MAXFREE)
| C
| IMPLICIT REAL*8(A-H,O-Z)
| C
| DIMENSION huga(6,8,MAXNE),hoge(MAXFREE)
|
| parameter( MAXNE=500
| + ,MAXFREE=6600)
$B!JN,!K(B
$B%Q%i%a!<%?J8$r(BDIMENSION$B$NA0$G;HMQ$9$l$P$$$$$N$G$O$J$$$G$7$g$&$+!#(B
===============================================================
$B")(B487 $B0&CN8)(B $B=UF|0f;T(B $B>>K\D.(B 1200
$BCfItBg3X(B $B9)3XIt(B $BEE5$9)3X2J(B
$B;3(B $B8}(B $BCi(B
Phone : 0568-51-1111 (Ext.2378)
F a x : 0568-51-1141
E-mail: yamachu@solan.chubu.ac.jp
===============================================================
Thread Navigation
This is a paginated view of messages in the thread with full content displayed inline.
Messages are displayed in chronological order, with the original post highlighted in green.
Use pagination controls to navigate through all messages in large threads.
Back to All Threads