INTEGER FUNCTION OMP_GET_NUM_THREADS()呼び出し元の並列領域を実行しているチーム内に現在あるスレッドの数を返します。 OMP_GET_MAX_THREADS 関数 INTEGER FUNCTION OMP_GET_NUM_THREADS( )OMP_GET_NUM_THREADS 関数への呼び出しで返すことが可能な最大値を返します。 OMP_GET_THREAD_NUM 関数 INTE...
BLCKX の呼び出しによって、一般的なコンパイルでは BLCK_32 が呼び出され、-xtypemap=integer:64 を使用してコンパイルした場合は BLCK_64 が呼び出されます。S の実際の型は、どのルーチンを呼び出すかを定義しません。これによって、引数の型、種別、次元数に基づいてライブラリルーチ...
module sample_mod implicit none integer, parameter :: isize=32 contains subroutine example1 call example2(isize) end subroutine example1 subroutine example2(jsize) integer, intent(in) :: jsize write(*,*) jsize end subroutine example2 end module...
character my_lvarchar(10000+2) integer*2 my_lvarchar_length character my_lvarchar_data(10000) equivalence( my_lvarchar(1), + my_lvarchar_length ) equivalence( my_lvarchar(3), + my_lvarchar_data ) アプリケーションは、例えば、ホスト変数の内容の設定や検査の...
integer*2 my_varchar_length character my_varchar_data(1000) equivalence( my_varchar(1), + my_varchar_length ) equivalence( my_varchar(3), + my_varchar_data ) アプリケーションは、例えば、ホスト変数の内容の設定や検査のために、my_varchar_lengthおよびmy_varchar...
1962 年出现的FortranIV对原来的Fortran作了一些改变,使得FortranII源程序在 FortranIV编译程序下不能全部直接使用,导致了语言不兼容的问题。这样就形 成了当时同时使用FortranII和FortranIV两种程序设计语言的局面。 正因为Fortran满足了现实的需要,所以它传播得很快,在传播和使...
概要Fortran 2003から浮動小数点の丸めモードを変更できるようになりました.本記事ではそれの簡単な挙動の解説を行います.加えて,浮動小数点の整数化を行うときに似たような話が出てくるので,そ…
Fortran是目前国际上广泛流行的一种高级语言，适用于科学计算。Fortran是英文FORmula TRANslation的缩写，意为“公式翻译”。它是为科学、工程问题中的那些能够用数学公式表达的问题而设计的语言，主要用于数值计算。这种语言简单易学，因为可以像抄写数学教科书里的公式一样书写数学公式，它比英文书写的自然语言更接近数学...
(割り当て型)* GOTO (単純)* IF (算術)* IF (ブロック)* IF (論理)* IMPLICIT INCLUDE INQUIRE* INTEGER INTRINSIC LOGICAL MAP NAMELIST OPEN* OPTIONS PARAMETER PAUSE* POINTER PRINT* PRAGMA PROGRAM REAL RECORD RETURN* REWIND* SAVE 文関数 STATIC* STOP* STRUCTURE SUBROUTINE TYPE UNION VIRTUAL ...
Fortran 副プログラムがサブルーチンの場合は、C から int (これは Fortran の INTEGER*4 に対応します) または void を返す関数として呼び出します。Fortran のサブルーチンが選択戻りをする場合は 1 つの値が戻されます。この場合、RETURN 文にある式の値です。RETURN 文に式がない場合、ま...