type_hydraulic_crs Derived Type

type, public, extends(abst_hydraulic) :: type_hydraulic_crs


Inherits

type~~type_hydraulic_crs~~InheritsGraph type~type_hydraulic_crs type_hydraulic_crs type~abst_hydraulic abst_hydraulic type~type_hydraulic_crs->type~abst_hydraulic abst_solver abst_solver type~abst_hydraulic->abst_solver solver type~type_crs type_crs type~abst_hydraulic->type~type_crs KH_star type~type_dp_3d type_dp_3d type~abst_hydraulic->type~type_dp_3d water_flux type~abst_matrix abst_matrix type~type_crs->type~abst_matrix

Components

Type Visibility Attributes Name Initial
real(kind=real64), public, allocatable :: FH(:)
type(type_crs), public :: KH_star
real(kind=real64), public, allocatable :: PHIH(:)

Nonlinear solver
character(len=:), public, allocatable :: algorithm

Solver
procedure(abst_assemble_global_hydraulic), public, nopass, pointer :: assemble_global => null()
integer(kind=int32), public :: order
class(abst_solver), public, allocatable :: solver
type(type_dp_3d), public :: water_flux

Constructor

public interface type_hydraulic_crs


Type-Bound Procedures

procedure, public :: compute => compute_type_hydraulic_crs

procedure, public :: shift => shift_type_hydraulic_crs

  • interface

    private module subroutine shift_type_hydraulic_crs(self)

    Arguments

    Type IntentOptional Attributes Name
    class(type_hydraulic_crs), intent(inout) :: self

procedure, public :: solve => solve_type_hydraulic_crs

procedure, public :: update => update_type_hydraulic_crs

  • interface

    private module subroutine update_type_hydraulic_crs(self, domain, property, pressure, porosity)

    Arguments

    Type IntentOptional Attributes Name
    class(type_hydraulic_crs), intent(inout) :: self
    type(type_domain), intent(inout), target :: domain
    type(type_properties_manager), intent(inout) :: property
    real(kind=real64), intent(in) :: pressure(:)
    real(kind=real64), intent(in) :: porosity(:)

Source Code

    type, extends(abst_hydraulic) :: type_hydraulic_crs
    contains
        procedure :: update => update_type_hydraulic_crs
        procedure :: shift => shift_type_hydraulic_crs
        procedure :: solve => solve_type_hydraulic_crs
        procedure :: compute => compute_type_hydraulic_crs
    end type type_hydraulic_crs