Module SSL2_Linear

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

Overview

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

Error Handling

Known Bugs

Note

Future Plans

エラー処理に gt4f90io を使う

Public Interface

public ssl2_lax_init       !初期化
public ssl2_lax            !実行列の連立 1 次方程式(倍精度)
public ssl2_lsx_init       !初期化
public ssl2_lsx            !正値対称行列の連立 1 次方程式(倍精度)
public ssl2_lsix_init      !初期化
public ssl2_lsix           !実対称行列の連立 1 次方程式(倍精度)
public ssl2_ltx_init       !初期化
public ssl2_ltx            !実 3 項行列の連立 1 次方程式(倍精度)

Procedure Interface

Initialize module

SSL II の LAX ルーチンの初期化

subroutine ssl2_lax_init(M)

Input

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

Procedure Interface

Execute Subroutine for the module

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

subroutine ssl2_lax(A, B, sw)

In/Out

real(8), intent(inout)         :: A(:,:)     !係数行列
real(8), intent(inout)         :: B(:)       !定数/解行列

Output

logical, intent(out), optional :: sw         !非正則を表すスイッチ

Procedure Interface

Initialize module

SSL II の LSX ルーチンの初期化

subroutine ssl2_lsx_init(M)

Input

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

Procedure Interface

Execute Subroutine for the module

正値対称行列の連立 1 次方程式(倍精度)

subroutine ssl2_lsx(A, B, sw)
  real(8), intent(inout)         :: A(:)   !係数行列
  real(8), intent(inout)         :: B(:)   !定数/解行列
  logical, intent(out), optional :: sw     !非正則を表すスイッチ

Procedure Interface

Initialize module

SSL II の LSIX ルーチンの初期化

subroutine ssl2_lsix_init(M)

Input

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

Procedure Interface

Execute Subroutine for the module

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

subroutine ssl2_lsix(A, B, sw)

In/Out

real(8), intent(inout)         :: A(:)   !係数行列
real(8), intent(inout)         :: B(:)   !定数/解行列

Output

logical, intent(out), optional :: sw     !非正則を表すスイッチ

Procedure Interface

Initialize module

SSL II の LTX ルーチンの初期化

subroutine ssl2_ltx_init(M)

Input

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

Procedure Interface

Execute Subroutine for the module

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

subroutine ssl2_ltx(A, B, C, D)

Dependency

use dc_message, only: MessageNotify

Input

real(8), intent(in)            :: A(N)      !係数行列
real(8), intent(in)            :: B(N-1)    !係数行列
real(8), intent(in)            :: C(N-1)    !係数行列

In/Out

real(8), intent(inout)         :: D(N)      !定数/解行列