関数型 (複数の値)

リスト 50 関数型 (複数の値) の条件の定義例
1<Item name="discharge_and_elev" caption="Discharge and Water Elevation time series">
2  <Definition valueType="functional" >
3    <Parameter name="time" valueType="real" caption="Time" />
4    <Value name="discharge" valueType="real" caption="Discharge" />
5    <Value name="elevation" valueType="real" caption="Water Elevation" />
6  </Definition>
7</Item>
../_images/widget_example_func_multi.png

図 57 関数型 (複数の値) の条件の表示例

リスト 51 関数型 (複数の値) の条件を読み込むための処理の記述例 (計算条件・格子生成条件)
 1integer:: ier, discharge_size
 2double precision, dimension(:), allocatable:: time_value
 3double precision, dimension(:), allocatable:: discharge_value, elevation_value
 4
 5! サイズを調べる
 6call cg_iric_read_functionalsize_f("discharge", discharge_size, ier)
 7! メモリを確保
 8allocate(time_value(discharge_size))
 9allocate(discharge_value(discharge_size), elevation_value(discharge_size))
10! 確保したメモリに値を読み込む
11call cg_iric_read_functionalwithname_f("discharge", "time", time_value)
12call cg_iric_read_functionalwithname_f("discharge", "discharge", discharge_value)
13call cg_iric_read_functionalwithname_f("discharge", "elevation", elevation_value)
リスト 52 関数型 (複数の値) の条件を読み込むための処理の記述例 (境界条件)
 1integer:: ier, discharge_size
 2double precision, dimension(:), allocatable:: time_value
 3double precision, dimension(:), allocatable:: discharge_value, elevation_value
 4
 5! サイズを調べる
 6call cg_iric_read_bc_functionalsize_f("discharge", discharge_size, ier)
 7! メモリを確保
 8allocate(time_value(discharge_size))
 9allocate(discharge_value(discharge_size), elevation_value(discharge_size))
10! 確保したメモリに値を読み込む
11call cg_iric_read_bc_functionalwithname_f("discharge", "time", time_value)
12call cg_iric_read_bc_functionalwithname_f("discharge", "discharge", discharge_value)
13call cg_iric_read_bc_functionalwithname_f("discharge", "elevation", elevation_value)