Williamson, et al (1992) のテストケース 2 を実施するためのクラスを提供するモジュール. [詳細]

データ型
type	TestCase2
	球面浅水モデルの標準テスト(Williamson et al, 1992)の TestCase2 を行うクラス. [詳細]
interface	initialize_TestCase
interface	finalize_TestCase
関数/サブルーチン
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)
	表面高度場の数値解と解析解を比較し, 数値計算の精度を評価する.
変数
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

class_TestCase2.f90 の 421 行で定義されています。

呼出しグラフ:

subroutine class_TestCase2::finalize_TestCase2 ( type(TestCase2),intent(inout) self ) [private]

TestCase2 クラスのオブジェクトを最終化する.

引数:

[in,out] self TestCase2 クラスのオブジェクトの参照.

class_TestCase2.f90 の 257 行で定義されています。

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 クラスのオブジェクトの参照.

class_TestCase2.f90 の 181 行で定義されています。

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

class_TestCase2.f90 の 299 行で定義されています。

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

class_TestCase2.f90 の 356 行で定義されています。

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

class_TestCase2.f90 の 277 行で定義されています。

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
	)