Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(bc_math), | private | :: | conc | ||||
integer, | private | :: | id(5) | ||||
type(bc_math), | private | :: | pos(3) | ||||
type(bc_math), | private | :: | pressure | ||||
type(bc_math), | private | :: | stress(3) | ||||
type(bc_math), | private | :: | temp | ||||
type(bc_math), | private | :: | vel(3) |
Getter
Setter
Getter
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(bc_wall), | intent(in) | :: | bc | |||
type(dimensions), | intent(in) | :: | dim | |||
integer, | intent(out) | :: | id | |||
real(kind=psb_dpk_), | intent(inout) | :: | a(:) | |||
real(kind=psb_dpk_), | intent(inout) | :: | b(:) | |||
real(kind=psb_dpk_), | intent(inout) | :: | c(:) |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(bc_wall), | intent(in) | :: | bc | |||
type(dimensions), | intent(in) | :: | dim | |||
integer, | intent(out) | :: | id | |||
real(kind=psb_dpk_), | intent(inout) | :: | a(:) | |||
real(kind=psb_dpk_), | intent(inout) | :: | b(:) | |||
type(vector), | intent(inout) | :: | c(:) |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(bc_wall), | intent(in) | :: | bc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(bc_wall), | intent(inout) | :: | bc | |||
integer, | intent(in) | :: | i | |||
real(kind=psb_dpk_), | intent(in) | :: | a | |||
real(kind=psb_dpk_), | intent(in) | :: | b | |||
real(kind=psb_dpk_), | intent(in) | :: | c |
TYPE bc_wall
PRIVATE
INTEGER :: id(5)
TYPE(bc_math) :: temp
TYPE(bc_math) :: pressure
TYPE(bc_math) :: conc
TYPE(bc_math) :: vel(3)
TYPE(bc_math) :: pos(3)
TYPE(bc_math) :: stress(3)
CONTAINS
PROCEDURE, PRIVATE :: get_abc_wall_s, get_abc_wall_v
GENERIC, PUBLIC :: get_abc_wall => get_abc_wall_s, get_abc_wall_v !! Getter
PROCEDURE, PRIVATE :: set_bc_wall_map_s, set_bc_wall_map_v
GENERIC, PUBLIC :: set_bc_wall_map => set_bc_wall_map_s, set_bc_wall_map_v !! Setter
PROCEDURE, PRIVATE :: nemo_bc_wall_sizeof
GENERIC, PUBLIC :: nemo_sizeof => nemo_bc_wall_sizeof
END TYPE bc_wall