局所 reservoir 流入と種別 kinetic 障壁を実行時契約へ正規化する。
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer(kind=i32), | public, | parameter | :: | external_boundary_ok | = | 0_i32 | |
| integer(kind=i32), | public, | parameter | :: | external_boundary_invalid | = | 1_i32 | |
| integer(kind=i32), | public, | parameter | :: | external_inflow_none | = | 0_i32 | |
| integer(kind=i32), | public, | parameter | :: | external_inflow_scalar_barrier | = | 1_i32 |
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer(kind=i32), | public | :: | inflow_map | = | external_inflow_none | ||
| logical, | public | :: | barrier_override_low(3) | = | .false. | ||
| logical, | public | :: | barrier_override_high(3) | = | .false. | ||
| real(kind=dp), | public | :: | barrier_potential_low_v(3) | = | 0.0_dp | ||
| real(kind=dp), | public | :: | barrier_potential_high_v(3) | = | 0.0_dp | ||
| logical, | public | :: | barrier_redistribute_low(3) | = | .false. | ||
| logical, | public | :: | barrier_redistribute_high(3) | = | .false. |
局所流入補正を解決し、種別 kinetic 障壁を初期化する。
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=*), | intent(in) | :: | reservoir_potential_model | |||
| type(external_boundary_contract_type), | intent(out) | :: | contract | |||
| integer(kind=i32), | intent(out) | :: | status | |||
| character(len=*), | intent(out) | :: | message |