MODE_PSYCHRO Module

Uses

- PARKIND1
- YOMHOOK

Contents

Interfaces

PE_FROM_PQ TD_FROM_TQ RV_FROM_TPTWB TWB_FROM_TPQ ENTH_FN_T_Q Q_FN_T_ENTH

Functions

PE_FROM_PQ_0D PE_FROM_PQ_1D TD_FROM_TQ_0D TD_FROM_TQ_1D RV_FROM_TPTWB_0D RV_FROM_TPTWB_1D TWB_FROM_TPQ_0D TWB_FROM_TPQ_1D ENTH_FN_T_Q Q_FN_T_ENTH

Interfaces

public interface PE_FROM_PQ

public function PE_FROM_PQ_0D(PP, PQ) result(PE)

Arguments

Type Intent Optional Attributes Name

real, intent(in) :: PP

real, intent(in) :: PQ

Return Value real
public function PE_FROM_PQ_1D(PP, PQ) result(PE)

Arguments

Type Intent Optional Attributes Name

real, intent(in), DIMENSION(:) :: PP

real, intent(in), DIMENSION(:) :: PQ

Return Value real, DIMENSION(SIZE(PQ))

public interface TD_FROM_TQ

public function TD_FROM_TQ_0D(PT, PQ, PP) result(PTD)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	PT
real,	intent(in)			::	PQ
real,	intent(in)			::	PP

Return Value real

public function TD_FROM_TQ_1D(PT, PQ, PP) result(PTD)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		DIMENSION(:)	::	PT
real,	intent(in),		DIMENSION(:)	::	PQ
real,	intent(in),		DIMENSION(:)	::	PP

Return Value real, DIMENSION(SIZE(PQ))

public interface RV_FROM_TPTWB

public function RV_FROM_TPTWB_0D(PT, PP, PTWB) result(PRV)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	PT
real,	intent(in)			::	PP
real,	intent(in)			::	PTWB

Return Value real

public function RV_FROM_TPTWB_1D(PT, PP, PTWB) result(PRV)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		DIMENSION(:)	::	PT
real,	intent(in),		DIMENSION(:)	::	PP
real,	intent(in),		DIMENSION(:)	::	PTWB

Return Value real, DIMENSION(SIZE(PT))

public interface TWB_FROM_TPQ

public function TWB_FROM_TPQ_0D(PT, PP, PQ) result(PTWB)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	PT
real,	intent(in)			::	PP
real,	intent(in)			::	PQ

Return Value real

public function TWB_FROM_TPQ_1D(PT, PP, PQ) result(PTWB)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		DIMENSION(:)	::	PT
real,	intent(in),		DIMENSION(:)	::	PP
real,	intent(in),		DIMENSION(:)	::	PQ

Return Value real, DIMENSION(SIZE(PT))

public interface ENTH_FN_T_Q

public interface ENTH_FN_T_Q()

Arguments
None

public interface Q_FN_T_ENTH

public interface Q_FN_T_ENTH()

Arguments
None

Functions

public function PE_FROM_PQ_0D(PP, PQ) result(PE)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	PP
real,	intent(in)			::	PQ

Return Value real

public function PE_FROM_PQ_1D(PP, PQ) result(PE)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		DIMENSION(:)	::	PP
real,	intent(in),		DIMENSION(:)	::	PQ

Return Value real, DIMENSION(SIZE(PQ))

public function TD_FROM_TQ_0D(PT, PQ, PP) result(PTD)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	PT
real,	intent(in)			::	PQ
real,	intent(in)			::	PP

Return Value real

public function TD_FROM_TQ_1D(PT, PQ, PP) result(PTD)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		DIMENSION(:)	::	PT
real,	intent(in),		DIMENSION(:)	::	PQ
real,	intent(in),		DIMENSION(:)	::	PP

Return Value real, DIMENSION(SIZE(PQ))

public function RV_FROM_TPTWB_0D(PT, PP, PTWB) result(PRV)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	PT
real,	intent(in)			::	PP
real,	intent(in)			::	PTWB

Return Value real

public function RV_FROM_TPTWB_1D(PT, PP, PTWB) result(PRV)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		DIMENSION(:)	::	PT
real,	intent(in),		DIMENSION(:)	::	PP
real,	intent(in),		DIMENSION(:)	::	PTWB

Return Value real, DIMENSION(SIZE(PT))

public function TWB_FROM_TPQ_0D(PT, PP, PQ) result(PTWB)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	PT
real,	intent(in)			::	PP
real,	intent(in)			::	PQ

Return Value real

public function TWB_FROM_TPQ_1D(PT, PP, PQ) result(PTWB)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in),		DIMENSION(:)	::	PT
real,	intent(in),		DIMENSION(:)	::	PP
real,	intent(in),		DIMENSION(:)	::	PQ

Return Value real, DIMENSION(SIZE(PT))

public function ENTH_FN_T_Q(PT, PQ) result(PENTH)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	PT
real,	intent(in)			::	PQ

Return Value real

public function Q_FN_T_ENTH(PT, PENTH) result(PQ)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	PT
real,	intent(in)			::	PENTH

Return Value real