test_saturation_mod Module Reference

Functions/Subroutines
subroutine	test_qsaturation_zero
subroutine	test_dqwsatdt_zero
subroutine	test_dqwsatdt_temp_qsa3

Function/Subroutine Documentation

test_dqwsatdt_temp_qsa3()

subroutine test_saturation_mod::test_dqwsatdt_temp_qsa3

(

)

Definition at line 28 of file test_saturation.F90.

    real(kind=DEFAULT_PRECISION) :: res
    real(kind=DEFAULT_PRECISION),parameter :: expected = 0.0_default_precision
    res = dqwsatdt(0.0_default_precision,35.86_default_precision)
    call assert_equals(expected, res, "Result when T=qsa3 should be 0")
    write(*,*)res

Here is the call graph for this function:

Here is the caller graph for this function:

test_dqwsatdt_zero()

subroutine test_saturation_mod::test_dqwsatdt_zero

(

)

Definition at line 20 of file test_saturation.F90.

    real(kind=DEFAULT_PRECISION) :: res
    real(kind=DEFAULT_PRECISION),parameter :: expected = 0.0_default_precision
    res = dqwsatdt(0.0_default_precision, 0.0_default_precision)
    call assert_equals(expected, res, "Result when SAT=0 and T=0 is 0")

Here is the call graph for this function:

Here is the caller graph for this function:

test_qsaturation_zero()

subroutine test_saturation_mod::test_qsaturation_zero

(

)

Definition at line 12 of file test_saturation.F90.

    real(kind=DEFAULT_PRECISION) :: res
    real(kind=DEFAULT_PRECISION),parameter :: expected = -0.62203306596824359_default_precision
    res = qsaturation(0.0_default_precision, 0.0_default_precision)
    call assert_equals(expected, res, "Result when P=0 and T=0")

Here is the call graph for this function:

Here is the caller graph for this function: