非標準のテープ入出力パッケージ (topen(3F) のマニュアルページを参照) を使用して、テープドライブと、Fortran の文字変数として宣言されたバッファの間でブロックを転送できます。その次に、内部入出力を使用して、このバッファを満たしたり空にしたりすることができます。ただし、この機...
bは文字の配列で,要素数は5です.表示すると,aaaaaと出力されました.この挙動から,bはb(1), b(2), b(3), b(4), b(5)が長さ1の文字列であって,すべての要素b(:)に対してabcdefgを代入しようとして,最初の1文字だけが代入されていると判断できます. 一方,長さ5の文字列cではabcdeと出...
ファイルの拡張子は何でもよいのですが,Fortranのソースであること,.f90ではなく何らかの前処理を行う必要のあるファイルであることを明示するために,.fy90としています.これは任意に決めてよく,Fortran-stdlibでは.fyppを拡張子として用いています. 入力ファイル,出力ファイルを指定しな...
itime: 現在の時刻 itime は,現在のシステム時刻の時,分,秒を整数配列に入れます.サブルーチン は,次のように呼び出します. call itime( iarray ) iarray INTEGER*4 出力 3 要素の配列: iarray(1) = 時 iarray(2) = 分 iarray(3) = 秒例: itime: demo% cat titime.f INTEGER*4 iarray...