「FortranのSUBROUTINE文」の版間の差分

2025年2月28日 (金) 06:56時点における最新版

FortranのSUBROUTINE文とは、戻り値のないサブルーチンを定義する構文です。

C言語やJavaなどでいうvoid関数です。

戻り値のある関数を定義する場合はFUNCTION文を使います。

サブルーチンや関数を利用する場合はCALL文です。

PROGRAM Main
    ! サブルーチンを呼び出す
    CALL Hello('YourName')

CONTAINS
    SUBROUTINE Hello(name)
        CHARACTER(LEN=*) :: name
        PRINT *, 'Hello, ', name, '!'
    END SUBROUTINE Hello

END PROGRAM Main

ちなみにEND以降は省略できますが、省略すると宗教上の理由により古参のプログラマーから叩かれます。

PROGRAM Main
    ! サブルーチンを呼び出す
    CALL Hello('YourName')

CONTAINS
    SUBROUTINE Hello(name)
        CHARACTER(LEN=*) :: name
        PRINT *, 'Hello, ', name, '!'
    END

END

@@ 35行目: / 35行目: @@
 END
 </source>
+<amazon> Fortran </amazon>
 [[category: Fortran]]