Module LAPACK_Linear

• Developer: SUGIYAMA Ko-ichiro (sugiyama(at)gfd-dennou.org)
• Version: $Id: lapack_linear.f90,v 1.2 2005/04/22 15:01:52 sugiyama Exp $
• Tag Name: $Name: $
• Change History:

Overview

LAPACK 線形計算のためのパッケージ型モジュール

Error Handling

Known Bugs

Note

Future Plans

• 三重対角行列の解法しかコーディングされていない

Public Interface

public lapack_dgtsv_init  !初期化
public lapack_dgtsv       !実 3 項行列の連立 1 次方程式(倍精度)

Procedure Interface

Initialize module

LAPACK の DGTSV ルーチンの初期化

subroutine lapack_dgtsv_init(M)

Input

integer, intent(in) :: M  !配列の大きさ

Procedure Interface

Execute Subroutine for the module

実 3 項行列の連立 1 次方程式(倍精度)

subroutine lapack_dgtsv(A, B, C, D)

Dependency

use dc_message, only: MessageNotify

In/Out

real(8), intent(inout)         :: A(N)      !係数行列
real(8), intent(inout)         :: B(N-1)    !係数行列
real(8), intent(inout)         :: C(N-1)    !係数行列
real(8), intent(inout)         :: D(1,N)    !定数/解行列