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 27 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 19 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 11 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: