The BAQ/Memo/Fortran/サブルーチンや関数たち

Japanese English
Nuclear Physics Data Acquisition Orchestra Gallery Memo Diary Link Home
Linux C Fortran Postscript Home

もどる

GETARG - コマンドライン引数を得る （サブルーチン）

CHARACTER*10 LINE
CALL GETARG(1,LINE)
とやるとコマンドラインの1番目の引数がLINEに入る。


GETENV - 環境変数を得る （サブルーチン） 

CHARACTER*10 LINE
CALL GETARG('USER',LINE)
とやると環境変数'USER'がLINEに入ります。


LEN_TRIM - 末尾の空白文字を除いた文字引数の長さを返す　（関数） 

INTEGER L
CHARACTER*20 LINE
LINE = 'TEST'
L = LEN_TRIM(LINE)
とやると、Lに'TEST'の長さの4が入る。

Last Update: 2005/3/4
Hidetada Baba
baba ＠ rarfaxp.riken.jp