ar_interface Module


Uses


Variables

Type Visibility Attributes Name Initial
procedure(Ares), public, pointer :: ar_fun
procedure(initial_volume), public, pointer :: vinit

Abstract Interfaces

abstract interface

  • public subroutine Ares(z, v, t, Ar, ArV, ArTV, ArV2, Arn, ArVn, ArTn, Arn2)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=pr), intent(in) :: z(:)
    real(kind=pr), intent(in) :: v
    real(kind=pr), intent(in) :: t
    real(kind=pr), intent(out) :: Ar
    real(kind=pr), intent(out) :: ArV
    real(kind=pr), intent(out) :: ArTV
    real(kind=pr), intent(out) :: ArV2
    real(kind=pr), intent(out), dimension(size(z)) :: Arn
    real(kind=pr), intent(out), dimension(size(z)) :: ArVn
    real(kind=pr), intent(out), dimension(size(z)) :: ArTn
    real(kind=pr), intent(out) :: Arn2(size(z),size(z))

abstract interface

  • public function initial_volume(z, p, t)

    Arguments

    Type IntentOptional Attributes Name
    real(kind=pr) :: z(:)
    real(kind=pr) :: p
    real(kind=pr) :: t

    Return Value real(kind=pr)