fortran90

    0

    1答えて

    私は10000の擬似ランダム値を端末に出力する線形合同ジェネレータをプログラムしました。これはモジュールの一部であり、したがってそれ自身の機能です。今度は、2つのランダムに一様に分布した数を取り、それをボックスマラー法で使用して2つの数を生成する新しい関数を書きたいと思う。私はボックスマラーの部品そのものを理解していますが、これまでの10000からわずか2つの値を取るようにプログラムする方法は分か

    1

    2答えて

    私は、ボックスマラーアルゴリズムを使ってより多くの乱数を計算する関数としてlcgを使うプログラムを書こうとしています。私はlcgを動作させましたが、ボックスマラーアルゴリズムを使用する関数は間違った値を出しています。 module rng implicit none integer, parameter :: dp = selected_real_kind(15,300)

    0

    1答えて

    私は入力ファイル(実際には複数のファイル)からデータを読み取り、各ファイルのデータに対して特定の操作を実行し、各入力ファイルの出力をFortranの、 は、だから、このようなものだ... Open (20, file="a0001.csv) [perform operation on this file] print output0001.txt input files :a0001.cs

    0

    2答えて

    既存のサブルーチンA(a,b,c,d,e)は正常に動作しています。 a,b,cが実際の引数です。dとeは省略可能な引数です。 多くの他のサブルーチンは、今 call A(a,b,c) または call A(a,b,c,d=2.0D0) または call A(a,b,c,e=1.0D0) としてサブルーチンAを呼び出します。 サブルーチンAからcを削除することにしました。 私はコードを再

    2

    1答えて

    私は整数をとり、それを文字列に変換する関数strを持っています。また、その値の文字列の部分文字列を考慮したいと思います。文字列関数ではなく文字値であれば簡単です。 言い換えれば、私はこのような何かを書きたいのですが: str(12345)(2:3) 代わりにこれを行うために有するので: character(10) :: c c = str(12345) print *, c(2:3)

    2

    1答えて

    私はgfortranバージョン7.2.0を使用しています。私はFortranにはかなり新しいです。私はFortranの異なるバージョンがあることを知っています。以下のコードでは、私は一つのケースでは異なる構文 program arrays implicit none integer :: m(3, 4) integer, dimension(3, 4) :: n

    0

    1答えて

    Fortran 77で書かれたコードをFortran 90に変更しました。また、次のエラーをコンパイルしているImが見つかった場合、私はすでに検索していますが、xintは配列として宣言されています。 Integer :: n,nitp,m Integer,parameter :: mdi1=3500 Double Precision :: xint(mdi1),yint(mdi1) D50

    0

    1答えて

    免責事項:私はFortranプログラミングには非常に新しいので、多分ここにかなりの間違いがあります。 目的はsin(x)関数のためにテイラー級数を実行することです:多項式の次数と評価されるべき点(真のsin(x)と比較される)にはプログラムが与えられますpannelコマンドを使用します。 次に、与えられた点でsin(x)関数と多項式の値を比較し、両者の差が最初に与えられた "許容値"より大きい場合

    0

    2答えて

    私の質問はかなりシンプルです。私はいくつかの古いFortranコードを継承しており、一般的な感じを得るためにそれを探しています。 TYPEの代わりにSTRUCTUREを使用していることに気付きました。両者の間に実用的な違いはありますか? TYPEを使用する上で他のメリットはありますか? この質問はよりphilosphicalなものです。私は(私は)書き直しコードがテストの面で何を意味しているかを知

    -3

    1答えて

    私は最近、このコードの背後にあるコンセプトに関してこのコードに関する質問を投稿しましたが、私は今これを分類しました。しかし、コードでは間違った値が出力されているので、その理由を特定できません。ここで、コードは次のとおりです。ここで program rungekutta implicit none integer, parameter :: dp = selected_real_kind(15,