Fortran でも令和

STOP 文の拡張（まだ）

Fortran 2018 では、STOP文の STOP コードが文字定数・整数定数の制限が外れて、文字変数・整数変数も可能になります。

Intel Fortran ではまだ対応していないようです。

プログラム

new_line() 関数は、C言語系の '\n' に対応する内部コードを出力します。

    program reiwa
        implicit none
        character(len = *), parameter   :: c0 = ' 平成'
        character(len = :), allocatable :: c1
        c1 = '令和'
        print *, c1, new_line (' ')
        stop c0 
    end program reiwa

 令和

 平成

Modern Fortran Explained: Incorporating Fortran 2018 (Numerical Mathematics and Scientific Computation)