Class: file_operate

auto_read_file( file_name, d2n, d3n, d2val, d3val, ad2val, ad3val, nx, ny, nz, d2var, d3var )

Subroutine :

file_name :

character(*), intent(in)

:

読み出すファイル名

d2n :

integer, intent(in)

:	d2 変数用に用意すべき配列総数 (変数の種類数)

d3n :

integer, intent(in)

:	d3 変数用に用意すべき配列総数 (変数の種類数)

d2val :

character(*), intent(in)

:	CReSS のダンプファイルの最初の d2 データ

d3val :

character(*), intent(in)

:	CReSS のダンプファイルの最初の d3 データ

ad2val :

character(*), intent(in)

:	CReSS のダンプファイルの後の d2 データ

ad3val :

character(*), intent(in)

:	CReSS のダンプファイルの後の d3 データ

nx :

integer, intent(in)

:

x 方向の要素数

ny :

integer, intent(in)

:

y 方向の要素数

nz :

integer, intent(in)

:

z 方向の要素数

d2var :

real, dimension(nx,ny,d2n), intent(inout)

:

d2 変数用配列

d3var :

real, dimension(nx,ny,nz,d3n), intent(inout)

:

d3 変数用配列

読み込む変数の個数を指定することで, 不要な変数データはメモリに読み込まないルーチン. (For CReSS) このルーチンを呼び出す前に必ず, val_counter で用意する変数の総数を求めておく.

read_file( file_name, nx, ny, rec_num, var )

Subroutine :

file_name :

character(*), intent(in)

:	読み出すデータファイル名

nx :

integer, intent(in)

:	データの x 方向の個数

ny :

integer, intent(in)

:	データの y 方向の個数

rec_num :

integer, intent(in)

:	読み出すデータのレコード番号

var(nx,ny) :

real, intent(inout)

:

読み出すデータ

出力結果読み取りルーチン本ルーチンでは, ダイレクトアクセスを読み出す際, 1 変数のバイト数を 4 バイトと仮定して読み出すので, 4 バイト以外のファイルを読み出すときは, やはりソースファイルの書き換えが必要となる（要修正）

write_file( file_name, nx, ny, rec_num, var, [mode] )

Subroutine :

file_name :

character(*), intent(in)

:	読み出すデータファイル名

nx :

integer, intent(in)

:	データの x 方向の個数

ny :

integer, intent(in)

:	データの y 方向の個数

rec_num :

integer, intent(in)

:	読み出すデータのレコード番号

var(nx,ny) :

real, intent(inout)

:

読み出すデータ

mode :

character(*), optional, intent(in)

:	ファイルの書き出しオプション

解析出力ルーチン本ルーチンでは, ダイレクトアクセスを読み出す際, 1 変数のバイト数を 4 バイトと仮定して読み出すので, 4 バイト以外のファイルを読み出すときは, やはりソースファイルの書き換えが必要となる（要修正）

Methods

Public Instance methods