gtool4/Fortran 90 リファレンスマニュアル

subroutine Put, Put_Line

2001年10月02日 豊田英司

概要

Put または Put_Line  は出力を行うためのサブルーチンです。Fortran の WRITE 文または PRINT 文に倣ったものです。Put という名前は ISO_VARYING_STRING の同名のサブルーチンに由来しています。

Put は gtool 変数(gt_variable 型)に書き出しを行います。

Put_Line は印字処理です。変数の内容を文字列化して出力します。

書式

任意次元配列の変数への書き出し

subroutine Put(var, value, nvalue, err)
    type(gt_variable), intent(in):: var
    integer, intent(in):: nvalue
    内部型, intent(in):: value(nvalue)
    logical, intent(out):: err
end subroutine

長さ nvalue の配列 value （内部型としては現在 REAL または DOUBLE PRECISION がサポートされます）を var が指示する変数に出力します。var の現在の入出力範囲（スライス）の大きさは nvalue でなければなりません。err は失敗した場合真に確定されます。

1〜3次元配列の変数への書き出し

! 2次元の例
subroutine Put(var, value, err)
    type(gt_variable), intent(in):: var
    内部型, intent(in):: value(:, :)
    logical, intent(out), optional:: err
end subroutine

出力される配列が1〜3次元の場合は配列の大きさを省略することができます。また、ここで err を省略するとエラーが起こった場合にはプログラムが異常終了します。

変数内容の印字

subroutine Put_Line(var, err)
    type(gt_variable), intent(in):: var
    logical, intent(out), optional:: err
end subroutine

Get と書式つき WRITE 文をあわせたような機能です。変数 var の内容を標準出力（正確には * で識別される装置）に印字します。