SSL2 線形計算のためのパッケージ型モジュール
エラー処理に gt4f90io を使う
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 次方程式(倍精度)
SSL II の LAX ルーチンの初期化
subroutine ssl2_lax_init(M)
integer, intent(in) :: M !配列の大きさ
実行列の連立 1 次方程式(倍精度)
subroutine ssl2_lax(A, B, sw)
real(8), intent(inout) :: A(:,:) !係数行列 real(8), intent(inout) :: B(:) !定数/解行列
logical, intent(out), optional :: sw !非正則を表すスイッチ
SSL II の LSX ルーチンの初期化
subroutine ssl2_lsx_init(M)
integer, intent(in) :: M !配列の大きさ
正値対称行列の連立 1 次方程式(倍精度)
subroutine ssl2_lsx(A, B, sw) real(8), intent(inout) :: A(:) !係数行列 real(8), intent(inout) :: B(:) !定数/解行列 logical, intent(out), optional :: sw !非正則を表すスイッチ
SSL II の LSIX ルーチンの初期化
subroutine ssl2_lsix_init(M)
integer, intent(in) :: M !配列の大きさ
実対称行列の連立 1 次方程式(倍精度)
subroutine ssl2_lsix(A, B, sw)
real(8), intent(inout) :: A(:) !係数行列 real(8), intent(inout) :: B(:) !定数/解行列
logical, intent(out), optional :: sw !非正則を表すスイッチ
SSL II の LTX ルーチンの初期化
subroutine ssl2_ltx_init(M)
integer, intent(in) :: M !配列の大きさ
実 3 項行列の連立 1 次方程式(倍精度)
subroutine ssl2_ltx(A, B, C, D, sw)
real(8), intent(in) :: A(:) !係数行列 real(8), intent(in) :: B(:) !係数行列 real(8), intent(in) :: C(:) !係数行列
real(8), intent(inout) :: D(:) !定数/解行列
logical, intent(out), optional :: sw !非正則を表すスイッチ