編集履歴

質問編集履歴

誤字

2019/07/04 01:06

投稿

t.ewjspo

スコア17

title CHANGED Viewed

File without changes

body CHANGED Viewed

@@ -25,7 +25,7 @@
 open(1, file="u initial condition.txt",status='old')
   DO i = 1, 100
   DO j = 1, 100
-    read (1,*) p(i,j)
+    read (1,*) u(i,j)
   END DO
   END DO
   close(1)

試したことを追加

2019/07/04 01:06

投稿

t.ewjspo

スコア17

title CHANGED Viewed

File without changes

body CHANGED Viewed

@@ -8,7 +8,7 @@
 1.0	4.3	-1.5
 9.0	2.5	-2.4
  :       :        :
-のようにデータが1000個あるようなファイルに対して
+のようにデータが10000個あるようなファイルに対して
 u(1,1)はファイルの1列1行目に書いてある値を
 u(1,2)はファイルの1列2行目に書いてある値を代入したい場合について教えてください．
 i,jはそれぞれ0~100までの範囲とします。
@@ -21,5 +21,14 @@
   close(10)
 ```
+```fortran
+open(1, file="u initial condition.txt",status='old')
+  DO i = 1, 100
+  DO j = 1, 100
+    read (1,*) p(i,j)
+  END DO
+  END DO
+  close(1)
+```
-以上のプログラムを試したのですが、ブレイクポイントがでて
+以上のような２つのプログラムを試したのですが、どちらもブレイクポイントがでて
 うまくいきませんでした。

修正

2019/07/04 00:58

投稿

t.ewjspo

スコア17

title CHANGED Viewed

File without changes

body CHANGED Viewed

@@ -14,12 +14,12 @@
 i,jはそれぞれ0~100までの範囲とします。
 ```fortran
-コード
-```
- open(10, file="u initial condition.txt",status='old')
+コード open(10, file="u initial condition.txt",status='old')
   DO i = 1, 100
     read (10,*) (u(i,j), j=1,100)
   END DO
   close(10)
+```
 以上のプログラムを試したのですが、ブレイクポイントがでて
 うまくいきませんでした。

修正

2019/07/03 03:18

投稿

t.ewjspo

スコア17

title CHANGED Viewed

File without changes

body CHANGED Viewed

@@ -18,7 +18,7 @@
 ```
  open(10, file="u initial condition.txt",status='old')
   DO i = 1, 100
-    read (*,*) (u(i,j), j=1,100)
+    read (10,*) (u(i,j), j=1,100)
   END DO
   close(10)
 以上のプログラムを試したのですが、ブレイクポイントがでて

試したことを記入

2019/07/03 02:24

投稿

t.ewjspo

スコア17

title CHANGED Viewed

File without changes

body CHANGED Viewed

@@ -11,4 +11,15 @@
 のようにデータが1000個あるようなファイルに対して
 u(1,1)はファイルの1列1行目に書いてある値を
 u(1,2)はファイルの1列2行目に書いてある値を代入したい場合について教えてください．
-i,jはそれぞれ0~100までの範囲とします。
+i,jはそれぞれ0~100までの範囲とします。
+```fortran
+コード
+```
+ open(10, file="u initial condition.txt",status='old')
+  DO i = 1, 100
+    read (*,*) (u(i,j), j=1,100)
+  END DO
+  close(10)
+以上のプログラムを試したのですが、ブレイクポイントがでて
+うまくいきませんでした。

書式の修正

2019/07/03 02:22

投稿

t.ewjspo

スコア17

title CHANGED Viewed

File without changes

body CHANGED Viewed

@@ -3,11 +3,11 @@
 もし可能なら，
 例えば，テキストファイルが
 U,V,P
-2.04E-03	2.04E-03	2.91E+00
+2.0	2.1	2.91
-3.10E-03	9.39E-04	1.77E-01
+3.0	9.3	 1.4
-1.65E-03	4.31E-04	-1.51E-01
+1.0	4.3	-1.5
-9.49E-04	2.08E-04	-2.75E-01
+9.0	2.5	-2.4
-    :               :               :
+ :       :        :
 のようにデータが1000個あるようなファイルに対して
 u(1,1)はファイルの1列1行目に書いてある値を
 u(1,2)はファイルの1列2行目に書いてある値を代入したい場合について教えてください．

より詳細に記述

2019/07/02 06:44

投稿

t.ewjspo

スコア17

title CHANGED Viewed

	@@ -1,1 +1,1 @@
1	- ~~excel~~の値を取り込む方法
1	+ ファイルの値を取り込む方法

body CHANGED Viewed

@@ -1,7 +1,14 @@
 visualstudio2005を使いfortran90のプログラムを書いているのですが，
-u(i,j)という値の初期値を定義するのにexcelもしくはテキストファイルなどにある値を代入したいのですが，
+u(i,j)という値の初期値を定義するのにexcelもしくはテキストファイル、DATファイルなどにある値を読み込み代入したいのですが，可能でしょうか？
-可能でしょうか？
 もし可能なら，
+例えば，テキストファイルが
+U,V,P
+2.04E-03	2.04E-03	2.91E+00
+3.10E-03	9.39E-04	1.77E-01
+1.65E-03	4.31E-04	-1.51E-01
+9.49E-04	2.08E-04	-2.75E-01
+    :               :               :
+のようにデータが1000個あるようなファイルに対して
-例えば，u(1,1)はファイルの1列1行目に書いてある値を
+u(1,1)はファイルの1列1行目に書いてある値を
-　　　　u(1,2)はファイルの1列2行目に書いてある値を代入したい場合について教えてください．
+u(1,2)はファイルの1列2行目に書いてある値を代入したい場合について教えてください．
 i,jはそれぞれ0~100までの範囲とします。

より詳しく記述した

2019/07/02 06:36

投稿

t.ewjspo

スコア17

title CHANGED Viewed

File without changes

body CHANGED Viewed

@@ -1,5 +1,7 @@
 visualstudio2005を使いfortran90のプログラムを書いているのですが，
-u(i,j)という値を定義するのにexcelで打ち込んだ値を代入したいのですが，
+u(i,j)という値の初期値を定義するのにexcelもしくはテキストファイルなどにある値を代入したいのですが，
 可能でしょうか？
 もし可能なら，
+例えば，u(1,1)はファイルの1列1行目に書いてある値を
-例えば，u(1,1)はexcelの1列1行目に書いてある値を代入したい場合について教えてください．
+　　　　u(1,2)はファイルの1列2行目に書いてある値を代入したい場合について教えてください．
+i,jはそれぞれ0~100までの範囲とします。