MODE_THERMOS Module

  1. mode_thermos.F90
  2. MODE_THERMOS

Uses


Contents

Interfaces

Functions


Interfaces

public interface PSAT

  • public function PSAT_0D(PT) result(PPSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in) :: PT

    Return Value real

  • public function PSAT_1D(PT) result(PPSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), DIMENSION(:):: PT

    Return Value real, DIMENSION(SIZE(PT))

  • public function PSAT_2D(PT, KMASK) result(PPSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), DIMENSION(:,:):: PT
    integer, intent(in), DIMENSION(:):: KMASK

    Return Value real, DIMENSION(SIZE(PT,1),SIZE(PT,2))

public interface DPSAT

  • public function DPSAT_1D(PT) result(PDPSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), DIMENSION(:):: PT

    Return Value real, DIMENSION(SIZE(PT))

public interface QSAT

  • public function QSATW_0D(PT, PP) result(PQSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in) :: PT
    real, intent(in) :: PP

    Return Value real

  • public function QSATW_1D(PT, PP) result(PQSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), DIMENSION(:):: PT
    real, intent(in), DIMENSION(:):: PP

    Return Value real, DIMENSION(SIZE(PT))

  • public function QSATW_2D(PT, PP, KMASK, KL) result(PQSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), DIMENSION(:,:):: PT
    real, intent(in), DIMENSION(:,:):: PP
    integer, intent(in), optional DIMENSION(:):: KMASK
    integer, intent(in), optional :: KL

    Return Value real, DIMENSION(SIZE(PT,1),SIZE(PT,2))

public interface QSAT_SEAWATER

  • public function QSATSEAW_1D(PT, PP) result(PQSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), DIMENSION(:):: PT
    real, intent(in), DIMENSION(:):: PP

    Return Value real, DIMENSION(SIZE(PT))

public interface QSAT_SEAWATER2

  • public function QSATSEAW2_1D(PT, PP, PSSS) result(PQSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), DIMENSION(:):: PT
    real, intent(in), DIMENSION(:):: PP
    real, intent(in), DIMENSION(:):: PSSS

    Return Value real, DIMENSION(SIZE(PT))

public interface DQSAT

  • public function DQSATW_O_DT_1D(PT, PP, PQSAT) result(PDQSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), DIMENSION(:):: PT
    real, intent(in), DIMENSION(:):: PP
    real, intent(in), DIMENSION(:):: PQSAT

    Return Value real, DIMENSION(SIZE(PT))

public interface QSATI

  • public function QSATI_1D(PT, PP) result(PQSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), DIMENSION(:):: PT
    real, intent(in), DIMENSION(:):: PP

    Return Value real, DIMENSION(SIZE(PT))

  • public function QSATI_2D(PT, PP, KMASK, KL) result(PQSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), DIMENSION(:,:):: PT
    real, intent(in), DIMENSION(:,:):: PP
    integer, intent(in), optional DIMENSION(:):: KMASK
    integer, intent(in), optional :: KL

    Return Value real, DIMENSION(SIZE(PT,1),SIZE(PT,2))

public interface DQSATI

  • public function DQSATI_O_DT_1D(PT, PP, PQSAT) result(PDQSAT)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), DIMENSION(:):: PT
    real, intent(in), DIMENSION(:):: PP
    real, intent(in), DIMENSION(:):: PQSAT

    Return Value real, DIMENSION(SIZE(PT))


Functions

public function PSAT_0D(PT) result(PPSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in) :: PT

Return Value real

public function PSAT_1D(PT) result(PPSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in), DIMENSION(:):: PT

Return Value real, DIMENSION(SIZE(PT))

public function PSAT_2D(PT, KMASK) result(PPSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in), DIMENSION(:,:):: PT
integer, intent(in), DIMENSION(:):: KMASK

Return Value real, DIMENSION(SIZE(PT,1),SIZE(PT,2))

public function DPSAT_1D(PT) result(PDPSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in), DIMENSION(:):: PT

Return Value real, DIMENSION(SIZE(PT))

public function QSATW_0D(PT, PP) result(PQSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in) :: PT
real, intent(in) :: PP

Return Value real

public function QSATW_1D(PT, PP) result(PQSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in), DIMENSION(:):: PT
real, intent(in), DIMENSION(:):: PP

Return Value real, DIMENSION(SIZE(PT))

public function QSATW_2D(PT, PP, KMASK, KL) result(PQSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in), DIMENSION(:,:):: PT
real, intent(in), DIMENSION(:,:):: PP
integer, intent(in), optional DIMENSION(:):: KMASK
integer, intent(in), optional :: KL

Return Value real, DIMENSION(SIZE(PT,1),SIZE(PT,2))

public function QSATSEAW_1D(PT, PP) result(PQSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in), DIMENSION(:):: PT
real, intent(in), DIMENSION(:):: PP

Return Value real, DIMENSION(SIZE(PT))

public function QSATSEAW2_1D(PT, PP, PSSS) result(PQSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in), DIMENSION(:):: PT
real, intent(in), DIMENSION(:):: PP
real, intent(in), DIMENSION(:):: PSSS

Return Value real, DIMENSION(SIZE(PT))

public function DQSATW_O_DT_1D(PT, PP, PQSAT) result(PDQSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in), DIMENSION(:):: PT
real, intent(in), DIMENSION(:):: PP
real, intent(in), DIMENSION(:):: PQSAT

Return Value real, DIMENSION(SIZE(PT))

public function DQSATI_O_DT_1D(PT, PP, PQSAT) result(PDQSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in), DIMENSION(:):: PT
real, intent(in), DIMENSION(:):: PP
real, intent(in), DIMENSION(:):: PQSAT

Return Value real, DIMENSION(SIZE(PT))

public function QSATI_1D(PT, PP) result(PQSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in), DIMENSION(:):: PT
real, intent(in), DIMENSION(:):: PP

Return Value real, DIMENSION(SIZE(PT))

public function QSATI_2D(PT, PP, KMASK, KL) result(PQSAT)

Arguments

Type IntentOptional AttributesName
real, intent(in), DIMENSION(:,:):: PT
real, intent(in), DIMENSION(:,:):: PP
integer, intent(in), optional DIMENSION(:):: KMASK
integer, intent(in), optional :: KL

Return Value real, DIMENSION(SIZE(PT,1),SIZE(PT,2))