Article View: fj.lang.fortran
Article #97Re: script $1 wuth Fortran
From: Mori Kouji
Date: Thu, 11 Sep 1997 00:00
Date: Thu, 11 Sep 1997 00:00
45 lines
1773 bytes
1773 bytes
In article <5v80t7$49u$1@news.fukuoka-u.ac.jp> td964001@cc.fukuoka-u.ac.jp (ICHIMIYA Katsuya) writes:
> $B%U%)!<%H%i%s$r(BEWS$B$G7W;;$7$F$$$^$9$,!"%7%'%k%9%/%j%W%H$NMM$K(B
> $1 $BEy$r;H$$$?$$$N$G$9$,!"NI$/J,$+$j$^$;$s!#(B
$B<B9T%U%!%$%k$r(B hoge $B$H$7$F!"(B
hoge arg1 arg2 ...
$B$H$$$&7A<0$G(B arg1, arg2 $B$J$I$N0z?t$rEO$7$?$$$H$$$&$3$H$G$7$g$&$+(B?
$B7kO@$+$i$$$&$H(B FORTRAN77 $B!V$@$1!W$G$OL5M}$G$9!#(B
$B<B8=$N$?$a$K$O<!$N$h$&$JJ}K!$,$"$j$^$9!#(B
1) $B3F=hM}7O$KMQ0U$5$l$F$$$k(B($B$+$b$7$l$J$$(B)$B3HD%5!G=$r;H$&!#(B
2) C $B$J$I$G=q$$$?%W%m%0%i%`$H%j%s%/$9$k!#(B
3) $B%f!<%6!<%$%s%?!<%U%'!<%9$r%7%'%k%9%/%j%W%H$G=q$/!#(B
3) $B$NJ}K!$@$H!"(B
hoge.sh
1: #!/bin/sh
2: hoge << EOF
3: $1
4: $2
5: EOF
hoge.f
1: CHARACTER*80 FLIN, FLOUT
2: READ(5,*) FLIN
3: READ(5,*) FLOUT
: :
$B$H$$$&$h$&$K$9$l$P(B (hoge.f $B$N<B9T%U%!%$%k$O(B hoge $B$G$"$k$H$7$^$9(B)
hoge.sh arg1 arg2
$B$H<B9T$7$?;~$K(B FLIN $B$K(B 'arg1' $B$,(B FLOUT $B$K(B 'arg2' $B$,%;%C%H$5$l$^$9!#(B
$B$d$j$?$$$3$H$O$3$&$$$&$3$H$G$O$J$$$G$7$g$&$+(B?
--
$B?9(B $B9@Fs(B (MORI Kouji)
($B3t(B)$B^I>BAH(B $B5;=Q8&5f=j(B
E-mail: mori@asanuma.co.jp
Technical Details
Message-ID:
<5v89r0$def@shiva.tri.asanuma.co.jp>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<5v80t7$49u$1@news.fukuoka-u.ac.jp>Show Full Headers
Complete Article Headers
X-Google-Language: Japanese,JIS X-Google-Thread: 167b2b,74e94bb070300eea X-Google-Attributes: gid167b2b,public From: mori@asanuma.co.jp (Mori Kouji) Subject: Re: script $1 wuth Fortran Date: 1997/09/11 Message-ID: <5v89r0$def@shiva.tri.asanuma.co.jp> X-Deja-AN: 271539535 References: <5v80t7$49u$1@news.fukuoka-u.ac.jp> Followup-To: fj.lang.fortran Organization: Technical Research Institute, Asanuma Corp., Takatsuki, Japan Newsgroups: fj.lang.fortran