Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(type_thermal_3phase_2d), | intent(inout) | :: | self | |||
type(type_domain), | intent(inout) | :: | domain | |||
type(type_proereties_manager), | intent(inout) | :: | Property | |||
real(kind=real64), | intent(in) | :: | Porosity(:) | |||
real(kind=real64), | intent(in) | :: | dt | |||
integer(kind=int32), | intent(in) | :: | step | |||
integer(kind=int32), | intent(in) | :: | iter |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(type_input), | intent(inout) | :: | Input | |||
type(type_dp_3d), | intent(inout), | pointer | :: | coordinate | ||
type(type_domain), | intent(inout) | :: | domain |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(abst_thermal), | intent(inout) | :: | self | |||
type(type_domain), | intent(inout) | :: | domain | |||
type(type_proereties_manager), | intent(inout) | :: | Property | |||
real(kind=real64), | intent(in) | :: | Porosity(:) | |||
real(kind=real64), | intent(in) | :: | dt | |||
integer(kind=int32), | intent(in) | :: | step | |||
integer(kind=int32), | intent(in) | :: | iter |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(type_crs), | public | :: | CT_l | ||||
type(type_crs), | public, | allocatable | :: | CT_old(:) | |||
type(type_variable), | public | :: | D_Qice | ||||
real(kind=real64), | public, | allocatable | :: | FT(:) | |||
real(kind=real64), | public, | allocatable | :: | FT_old(:) | |||
type(type_crs), | public | :: | KT_l | ||||
type(type_crs), | public | :: | KT_old | ||||
type(type_crs), | public | :: | KT_star_0 | ||||
real(kind=real64), | public, | allocatable | :: | PHIT(:) | |||
real(kind=real64), | public, | allocatable | :: | PHIT_old(:) |
Solver |
||
type(type_variable), | public | :: | Qice | ||||
type(type_variable), | public | :: | Qw | ||||
type(type_variable), | public | :: | Si | ||||
type(type_variable), | public | :: | T | ||||
integer(kind=int32), | public | :: | order | ||||
class(abst_solver), | public, | allocatable | :: | solver |
procedure(abst_assemble), public, deferred, pass(self) :: assemble |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(type_crs), | public | :: | CT_l | ||||
type(type_crs), | public, | allocatable | :: | CT_old(:) | |||
type(type_variable), | public | :: | D_Qice | ||||
real(kind=real64), | public, | allocatable | :: | FT(:) | |||
real(kind=real64), | public, | allocatable | :: | FT_old(:) | |||
type(type_crs), | public | :: | KT_l | ||||
type(type_crs), | public | :: | KT_old | ||||
type(type_crs), | public | :: | KT_star_0 | ||||
real(kind=real64), | public, | allocatable | :: | PHIT(:) | |||
real(kind=real64), | public, | allocatable | :: | PHIT_old(:) |
Solver |
||
type(type_variable), | public | :: | Qice | ||||
type(type_variable), | public | :: | Qw | ||||
type(type_variable), | public | :: | Si | ||||
type(type_variable), | public | :: | T | ||||
integer(kind=int32), | public | :: | order | ||||
class(abst_solver), | public, | allocatable | :: | solver |
private interface construct_type_thermal_3phase_2d () |
procedure, public :: assemble => assemble_type_thermal_3phase_2d |