gfortran

1熱

1答えて

私はこの簡単なFortranコードと、メインプログラムの引数を明示的に指定する関数を持っています。コードは以下の通りです： Program received signal SIGBUS: Access to an undefined portion of a memory object. Backtrace for this error: #0 0x10f43bfe6 #1 0x10f43

0熱

2答えて

Fortran - 1小数点以下を切り捨てたい

Fortranでは、緯度と経度を小数点以下1桁に丸める必要があります。私はのgfortranコンパイラとNINT機能を使用していますが、以下では動作しません - rlons(i,j) = nint(rla2rlarot*10.0)/10.0

0熱

2答えて

間違ったマトリックス乗算（Fortranの）

私はminimalexample.f90: MODULE FUNCTION_CONTAINER IMPLICIT NONE SAVE INTEGER, PARAMETER :: DBL = SELECTED_REAL_KIND(P = 15,R = 200) INTEGER :: DIMSYS, DIMMAT COMPLEX(KI

-1熱

1答えて

プログラムはシグナルSIGABRTを受けた：プロセスが中止信号

をI次のサブルーチンを持っている：私はコマンドを使用して、次のサブルーチンを使用してそれを呼び出す SUBROUTINE UNITARYEVOLUTION(X,Z) IMPLICIT NONE COMPLEX(KIND = DBL), DIMENSION(DIMMAT,1), INTENT(IN) :: X COMPLEX(KIND = DBL),DIMENSION(DIMMAT,1),IN

1熱

1答えて

並列環境でサブルーチンを呼び出す

私の問題は、説明した問題と関連しているか、または同一であると思います。hereしかし、私は実際に何が起こっているのか分かりません。私のgfortranコンパイラでのOpenMPを使用していると私は実行する次のタスクを持っている：私は、x座標X及びy座標Y有する2次元表面上で濃度分布F(X, Y)を有します。行列Fは、サイズがNx x Nyです。私は座標Xp(i)とYp(i)のセットを持っており

1熱

1答えて

gfortranでDGEMM呼び出しエラーが発生したOpenACC

gfortranには現在host_dataがサポートされていますので、DGEMMをテストしたかったのです。テストケースに基づいて、ここに host_data patch 私はCUBLASを使用してDGEMMのためのサンプルコードを書いて投稿しました。 program test use iso_c_binding implicit none integer(c_i

0熱

1答えて

FortranサブルーチンからRラッパーにオプションの引数を渡す方法

私はコールでオプションの引数を使用するFortranサブルーチンを持っています。 subroutine data (n,ns,alpha,covmat,x,y) integer, intent(in):: n,ns double precision, intent(in) :: alpha double precision, intent(in), optional ::covmat(n,

1熱

1答えて

gfortranはテールコールの削除をサポートしていますか？私がテストするために、この小さなプログラムを作った

のgfortranは末尾呼び出し除去した場合、： program tailrec implicit none print *, tailrecsum(5, 0) contains recursive function tailrecsum (x, running_total) result (ret_val) integer, intent(in) :: x in

0熱

1答えて

動的スライシングによる純粋なFortranサブルーチン

私は最近、純粋なサブルーチンがより良い視差最適化を可能にすることを（here）読みました。これが本当であると仮定して、私は次のルーチンを純粋にすることができる方法はありますか？ subroutine diff_stag(operator,dfdh,f,T,dir,pad,gt) implicit none procedure(stencils_stag) :: operator