逆行列を解くために Fortran ではどのような関数を呼び出すことができますか?

1. Fortran における逆行列の呼び出し関数は何ですか?

Fortran では、LAPACK ライブラリ関数を使用して逆行列を計算できます。 LAPACK を呼び出して逆行列を計算する一般的な手順は次のとおりです。

1. LAPACK ライブラリをインポートします。
   • Fortran プログラムで、## を使用します。 #EXTERNAL LAPACK にサブルーチンをインポートするステートメント。

EXTERNAL DGETRF, DGETRI

2. 逆行列関数を呼び出します:
   LAPACK によって提供される関数 (
   • DGETRF など) を使用します。 LU 分解を実行し、DGETRI を使用して逆行列を計算します。

CALL DGETRF(N, N, A, LDA, IPIV, INFO)
CALL DGETRI(N, A, LDA, IPIV, WORK, LWORK, INFO)

3. パラメータの説明:
   • N: マトリックスの順序。
   #A
   • : 入力行列。
   LDA
   • : 行列 A の最初の次元のサイズ。
   IPIV
   • : LU 分解の中間結果を格納します。
   WORK
   • : 作業配列。 #LWORK
   : 作業配列のサイズ。
   • INFO
   : 操作ステータスを返します。
#2. 線形方程式を解くための Fortran プログラミングの質問ですか?

連立一次方程式を解くには、LAPACK の関数を使用できます。一般的な手順は次のとおりです。

LAPACK ライブラリをインポートします。

1. LAPACK ライブラリを Fortran プログラムにインポートし、関連するサブルーチンの使用を宣言します。

   • EXTERNAL DGESV

線形方程式を解く関数を呼び出します:

2. LAPACKDGESV## が提供する関数を使用します。 # 連立一次方程式を解きます。

   • CALL DGESV(N, NRHS, A, LDA, IPIV, B, LDB, INFO)

パラメータの説明:

3. N: マトリックスの順序。
   • NRHS: 右行列の列数。
   • #A: 係数行列。
   • LDA: 行列 A
   の最初の次元のサイズ。
   • IPIV: LU 分解の中間結果を格納します。
   • B: 右の行列。
   • LDB: 行列 B
   の最初の次元のサイズ。
   • INFO: 操作ステータスを返します。
   3. Fortran95 サブルーチン命名エキスパートは、間違いを修正して高スコアを獲得するのに役立ちますか?

Fortran95 では、サブルーチンの命名規則は比較的自由ですが、いくつかの一般的な規則は次のとおりです。

明確な命名:

サブルーチンの名前はその機能を明確に表現できる必要があり、単純すぎる名前や意味のない名前の使用は避けてください。

1. SUBROUTINE SolveLinearSystem
   アンダースコアを使用して単語を接続します:

読みやすくするには、アンダースコアを使用します
2. _言葉をつなげる。
   • <pre class='brush:php;toolbar:false;'>SUBROUTINE Matrix_Multiplication</pre>
   組み込み関数との競合を避ける:

Fortran 組み込み関数と同じ名前を使用しないでください。混乱を避けるための機能です。

3. SUBROUTINE MySum

   • 概要

(1) Fortran では、行列の逆変換は次の関数を使用して実現できます。 LAPACK ライブラリ 連立一次方程式を解きます。 (2) サブルーチンの名前はその機能を明確に表現する必要があり、組み込み関数との競合を避けるために単語をアンダースコアでつなぐことができます。

以上が逆行列を解くために Fortran ではどのような関数を呼び出すことができますか?の詳細内容です。詳細については、PHP 中国語 Web サイトの他の関連記事を参照してください。