IGModel-SW 1.0
|
Williamson, et al (1992) のテストケース 2 を実施するためのクラスを提供するモジュール. More...
Data Types | |
type | TestCase2 |
球面浅水モデルの標準テスト(Williamson et al, 1992)の TestCase2 を行うクラス. More... | |
interface | initialize_TestCase |
interface | finalize_TestCase |
Functions/Subroutines | |
subroutine | init_TestCase2 (self, icgrid_ref) |
TestCase2 クラスのオブジェクトを初期化する. | |
subroutine | finalize_TestCase2 (self) |
TestCase2 クラスのオブジェクトを最終化する. | |
subroutine, public | set_initial_v (self, init_v) |
初期の速度場を設定する. | |
subroutine, public | set_initial_h (self, init_h) |
初期の表面高度場を設定する. | |
subroutine, public | set_initial_hs (self, init_hs) |
下部境界の地形の高度場を設定する. | |
subroutine, public | timelevel_Updated (self, tstep, dt, v_n, h_n) |
タイムレベルの更新された後の処理を行う. | |
subroutine | eval_numcal_h_solution (t, true_h, h_n) |
表面高度場の数値解と解析解を比較し, 数値計算の精度を評価する. | |
Variables | |
real(DP) | h_0 |
real(DP) | u_0 |
real(DP) | angular_speed |
character(TOKEN) | filename = 'error_norm.dat' |
type(IcGrid_ncWriter), save | writer |
Williamson, et al (1992) のテストケース 2 を実施するためのクラスを提供するモジュール.
subroutine class_TestCase2::eval_numcal_h_solution | ( | real(DP),intent(in) | t, |
type(Field_IcGrid2D),intent(inout) | true_h, | ||
type(Field_IcGrid2D),intent(in) | h_n | ||
) | [private] |
表面高度場の数値解と解析解を比較し, 数値計算の精度を評価する.
[in,out] | true_h | |
[in] | h_n |
Definition at line 421 of file class_TestCase2.f90.
subroutine class_TestCase2::finalize_TestCase2 | ( | type(TestCase2),intent(inout) | self | ) | [private] |
TestCase2 クラスのオブジェクトを最終化する.
[in,out] | self | TestCase2 クラスのオブジェクトの参照. |
Definition at line 257 of file class_TestCase2.f90.
subroutine class_TestCase2::init_TestCase2 | ( | type(TestCase2),intent(inout) | self, |
type(IcGrid2D_FVM),intent(in) | icgrid_ref | ||
) | [private] |
TestCase2 クラスのオブジェクトを初期化する.
[in,out] | self | TestCase2 クラスのオブジェクトの参照. |
[in] | icgrid_ref | IcGrid2D_FVM クラスのオブジェクトの参照. |
Definition at line 181 of file class_TestCase2.f90.
subroutine,public class_TestCase2::set_initial_h | ( | type(TestCase2),intent(inout) | self, |
type(Field_IcGrid2D),intent(inout) | init_h | ||
) |
初期の表面高度場を設定する.
[in,out] | self | TestCase2 クラスのオブジェクトの参照. |
[in,out] | init_h |
Definition at line 299 of file class_TestCase2.f90.
subroutine,public class_TestCase2::set_initial_hs | ( | type(TestCase2),intent(inout) | self, |
type(Field_IcGrid2D),intent(inout) | init_hs | ||
) |
下部境界の地形の高度場を設定する.
[in,out] | self | TestCase2 クラスのオブジェクトの参照. |
[in,out] | init_hs |
Definition at line 356 of file class_TestCase2.f90.
subroutine,public class_TestCase2::set_initial_v | ( | type(TestCase2),intent(inout) | self, |
type(Field_IcGrid2D),intent(inout) | init_v | ||
) |
初期の速度場を設定する.
[in,out] | self | TestCase2 クラスのオブジェクトの参照. |
[in,out] | init_v |
Definition at line 277 of file class_TestCase2.f90.
subroutine,public class_TestCase2::timelevel_Updated | ( | type(TestCase2),intent(inout) | self, |
integer,intent(in) | tstep, | ||
real(DP),intent(in) | dt, | ||
type(Field_IcGrid2D),intent(inout) | v_n, | ||
type(Field_IcGrid2D),intent(inout) | h_n | ||
) |
タイムレベルの更新された後の処理を行う.
時間積分ループにおいて, 物理場管理モジュール(field_manager)の update_timeLevel が呼び出された後に, このサブルーチンは呼び出される.
[in,out] | self | TestCase2 クラスのオブジェクトの参照. |
[in] | tstep | |
[in] | dt | |
[in,out] | v_n | |
[in,out] | h_n |
Definition at line 383 of file class_TestCase2.f90.
real(DP) class_TestCase2::angular_speed |
Definition at line 109 of file class_TestCase2.f90.
character(TOKEN) class_TestCase2::filename = 'error_norm.dat' |
Definition at line 168 of file class_TestCase2.f90.
real(DP) class_TestCase2::h_0 |
Definition at line 101 of file class_TestCase2.f90.
real(DP) class_TestCase2::u_0 |
Definition at line 105 of file class_TestCase2.f90.
type(IcGrid_ncWriter),save class_TestCase2::writer |
Definition at line 171 of file class_TestCase2.f90.