くだすれFORTRAN（超初心者用）その6

1 ：デフォルトの名無しさん：2012/08/16(木) 20:58:00.31 .net

このスレッドは、他のスレッドでは書き込めない超低レベル、
もしくは質問者自身何が何だか分からない質問を勇気を持って書き込むスレッドです。
FORTRAN使いが優しくコメントを返しますが、
お礼はFORTRANの布教と初心者の救済と次期Fortran2008規格でのCOMEFROM文採用をお願いします。

●注意事項
・質問する前にGoogle等の検索サイトで検索しましょう。
・回答者にわかりやすい様に、質問内容はできる限り詳しく書きましょう。
・エラーの場合は起きた状況、環境（OS・コンパイラ・バージョン）、エラーメッセージも詳しく書きましょう。

●前スレ
くだすれFORTRAN（超初心者用）その5
http://toro.2ch.net/test/read.cgi/tech/1269704830/

●過去スレ
くだすれFORTRAN（超初心者用）その4
http://pc12.2ch.net/test/read.cgi/tech/1232789521/
くだすれFORTRAN（超初心者用）その3
http://pc11.2ch.net/test/read.cgi/tech/1196384126/
くだすれFORTRAN（超初心者用）その2
http://pc11.2ch.net/test/read.cgi/tech/1164121236/
くだすれFORTRAN（超初心者用）
http://pc8.2ch.net/test/read.cgi/tech/1138063703/

978 ：デフォルトの名無しさん：2019/01/26(土) 11:12:15.29 ID:yVAkGzul.net

むしろ同じにしといた方が無難

979 ：デフォルトの名無しさん：2019/01/26(土) 13:43:45.62 ID:Z89DHn3T.net

>>978
安心しました、ありがとうございます。

980 ：デフォルトの名無しさん：2019/01/26(土) 13:53:32.02 ID:6SK3WITg.net

ファイルシステムの無い時代、例えばパンチの名残だろうかね

981 ：デフォルトの名無しさん：2019/02/08(金) 00:44:25.09 ID:YfKMGwNZ.net

環境はCygwin、f90、gfortranです。
open文のaction指定子に関する質問です。

ミス防止のため、念には念を入れて
「readもwriteもするファイルでも、場面に応じてaction='read'と'write'を切り替える」
と理想的なんじゃないだろうか、とふと思いまして、

open(100,file='foo.dat',status='old',action='read')
〜
open(100,action='write',position='append')
〜
close(100)

という記述を試してみたのですが、実行時にエラーになってしまいました。
(Fortran runtime error: Cannot change ACTION parameter in OPEN statement)
「open文で既に開いているファイルを開き直してもよい」って仕様はこういう用途のためのものではないんですね……

一度closeすれば事は足るのですが、それだと今度は「同じfile名を二回記述しなければならない」という無駄が解消できず……
何か、巧い方法はないのでしょうか。

982 ：デフォルトの名無しさん：2019/02/08(金) 01:15:11.98 ID:YfKMGwNZ.net

すみません、一応自己解決しました。
指定子に文字型の変数を与えることができる、ということに先ほど気づきました。
なので「一度closeする」で問題ありませんでした。
name1 = 'foo.dat'としておいて、
open文に file=name1 とでも書けば済む話でした（つまるところ、ファイル名変更時の手間が一番の問題だと考えていたので）。

983 ：Linux ペンギン：2019/02/08(金) 23:01:52.12 ID:DyJ7QOpE.net

lapack インスコ方法教えてんか？

984 ：デフォルトの名無しさん：2019/02/28(木) 02:25:49.99 ID:43+kEwYn.net

>>983
mklが手軽かつ最速だがクソでか&環境依存
配布も考えるならソースをnetlibでwget -r url
ラッパのLAPACK95もあると便利

985 ：デフォルトの名無しさん：2019/02/28(木) 13:08:32.71 ID:43+kEwYn.net

>>978
遅レスだけど、program名って何か意味あるんかね？
program書かないでも動くし(endは必要)、programは他から呼ばれないし

moduleやsubroutineの名前は呼ぶのに大事だけど
ファイル名はinclude "fname"で使うから意味ある

986 ：デフォルトの名無しさん：2019/04/05(金) 16:47:28.90 ID:0wY7QsOH4

誰かhankel関数の使い方教えて

987 ：デフォルトの名無しさん：2019/05/02(木) 22:03:24.81 ID:bI33l//4.net

他人が作ったコードで、
real*4 宣言を全部real*8に書き換えたら、
計算結果がNaNになっちゃったんだけど、
どんな原因が考えられますか？

988 ：デフォルトの名無しさん：2019/05/03(金) 14:28:23.81 ID:3Vz/qKoh.net

色々

教えて欲しかったらソース出せ

989 ：デフォルトの名無しさん：2019/06/19(水) 04:49:42.26 ID:tVNS+22r.net

【出資】松本卓朗 人工知能詐欺【注意】
https://rio2016.5ch.net/test/read.cgi/rikei/1560859403/

990 ：デフォルトの名無しさん：2019/06/22(土) 10:06:49.78 ID:ecTKxvDL.net

Fortranは1956年？だかに作られたそうだけど
当初からクラス設計とかあったの？

991 ：デフォルトの名無しさん：2019/06/22(土) 10:33:22.05 ID:fiI8bn9U.net

データベースに合わせたORMみたいな
メンバーとか何かあった気がするが
クラスは無いんじゃね

992 ：デフォルトの名無しさん：2019/07/15(月) 18:22:34.81 ID:totsCoub.net

>>990
ねーよ
元々メインフレーム言語だし