🚀 go-pugleaf

大阪府大、松浦です。

In article <01bd2b32$fd3351c0$258adbca@fwhv8704>, 
fumihiro@mb.infoweb.ne.jp says...
>フォートランのソフトはfortran power
>stationを使ってます。よく使い方がわかりません。全部英語だし．．．。例え
ば、
>行列を500*500行にしたときガウス・ザイデル法をなどでは、作業領域のせいか
答え

IF( 5*5 で正しい答えが出る ） THEN
  500*500の問題には別のアルゴリズムを使う
ELSE
  POWER STATIONの使い方を勉強する
END IF


>がでません。大きいプログラムを回す場合どうしたらいいのですか？

茶々ですが、プログラムを「回す」とはどうすることですか？

-- 
Hiroto Matsuura@Osaka Pref. Univ, Energy System Eng.
松浦  寛人＠大阪府立大学工学部エネルギー機械工学科
e-mail: matus@aeslab.mecha.osakafu-u.ac.jp
Tel   : 081-(0)722-52-1161(ext.2229)   Fax   : 081-(0)722-59-3340

	竹内＠間借り埼玉と申します。
"Fumihiro Uematsu" <fumihiro@mb.infoweb.ne.jp> writes:
> フォートランのソフトはfortran power
> stationを使ってます。よく使い方がわかりません。全部英語だし．．．。例えば、
> 行列を500*500行にしたときガウス・ザイデル法をなどでは、作業領域のせいか答え
> がでません。大きいプログラムを回す場合どうしたらいいのですか？

すんません、fortran power stationなるものとガウス・ザイデル法を使った
ことがないのでよーわからないのですが「作業領域のせいか」とおっしゃるな
ら以下のような感じでもっと分類された方がアドバイスを受けやすいと存じます。

(a) 「答えが出ない」＝答えが間違ってる。
(b) 「答えが出ない」＝途中でプログラムが止る。なんかメッセージは出る。
(b')「答えが出ない」＝途中でプログラムが止る。なんもメッセージは出ない。
(c) 「答えが出ない」＝延々待っても返ってこない。
(d) 「答えが出ない」＝JCLの間違いでプログラムは合っていても吐き出すファ
                      イルがあさってのやつだった。
(e) 「答えが出ない」＝出力formatの間違いで、NAMELISTで吐き出したら合ってた。
(f) 「答えが出ない」＝(a)--(e)の現象のランダム

(1) 松浦さんもMessage-ID: <6am8rf$3be$1@mecha3.mecha.osakafu-u.ac.jp>
    で書かれていたように 5*5では正しい答えがでるですか。
(2) 500*500の行列を（実際の必要個数分）宣言だけして、print文一行程度の
    プログラムも通るですか。
(3) DO I=1,500
	II=I
	DO J=1,500
	JJ=J
		DATA1(II,JJ)=I*J
		DATA2(II,JJ)=I*J
		.....
	ENDDO
    ENDDO
    みたいな一応行列をなめるだけのプログラムなら通るですか。
(4) ガウス・ザイデル法は別ルーチンで準備されているですか。
    作業領域の引き渡しは十分？
(5) OSでdatasizeやstacksizeなど制限に引っ掛からない容量のプログラムで
    すか。
(6) 基本的に全部dynamicにメモリを確保してたりして。強制的に大きな
    dimensionの変数をCOMMONやstaticで宣言したら通るか。save optionで
    コンパイルしたら通りますか。
(7) サブルーチンで仮引数←→COMMON渡しにしてもおなじですか。

あと、fortran power stationなるものがwindowsで動作するという認識でいる
のですが、同一プログラムは別のプラットフォームでは正常に動作しますか？
---
		kazunori@lab.kdd.co.jp たけうち かずのり