UnitTest_Define.f90 File Reference

Go to the source code of this file.

Data Types
interface	unittest_define::unittest_isequal
interface	unittest_define::unittest_isequalwithin
interface	unittest_define::get_multiplier
type	unittest_define::unittest_type

Modules
module	unittest_define

Functions/Subroutines
subroutine, public	unittest_define::unittest_init (UnitTest, Verbose)
subroutine, public	unittest_define::unittest_setup (UnitTest, Title, Caller, Verbose)
subroutine, public	unittest_define::unittest_report (UnitTest)
subroutine, public	unittest_define::unittest_summary (UnitTest)
pure integer function, public	unittest_define::unittest_n_passed (UnitTest)
pure integer function, public	unittest_define::unittest_n_failed (UnitTest)
pure logical function, public	unittest_define::unittest_passed (UnitTest)
pure logical function, public	unittest_define::unittest_failed (UnitTest)
subroutine, public	unittest_define::unittest_assert (UnitTest, Test)
subroutine	unittest_define::intbyte_isequal_scalar (UnitTest, Expected, Actual)
subroutine	unittest_define::intbyte_isequal_rank1 (UnitTest, Expected, Actual)
subroutine	unittest_define::intbyte_isequal_rank2 (UnitTest, Expected, Actual)
subroutine	unittest_define::intshort_isequal_scalar (UnitTest, Expected, Actual)
subroutine	unittest_define::intshort_isequal_rank1 (UnitTest, Expected, Actual)
subroutine	unittest_define::intshort_isequal_rank2 (UnitTest, Expected, Actual)
subroutine	unittest_define::intlong_isequal_scalar (UnitTest, Expected, Actual)
subroutine	unittest_define::intlong_isequal_rank1 (UnitTest, Expected, Actual)
subroutine	unittest_define::intlong_isequal_rank2 (UnitTest, Expected, Actual)
subroutine	unittest_define::realsp_isequal_scalar (UnitTest, Expected, Actual)
subroutine	unittest_define::realsp_isequal_rank1 (UnitTest, Expected, Actual)
subroutine	unittest_define::realsp_isequal_rank2 (UnitTest, Expected, Actual)
subroutine	unittest_define::realdp_isequal_scalar (UnitTest, Expected, Actual)
subroutine	unittest_define::realdp_isequal_rank1 (UnitTest, Expected, Actual)
subroutine	unittest_define::realdp_isequal_rank2 (UnitTest, Expected, Actual)
subroutine	unittest_define::complexsp_isequal_scalar (UnitTest, Expected, Actual)
subroutine	unittest_define::complexsp_isequal_rank1 (UnitTest, Expected, Actual)
subroutine	unittest_define::complexsp_isequal_rank2 (UnitTest, Expected, Actual)
subroutine	unittest_define::complexdp_isequal_scalar (UnitTest, Expected, Actual)
subroutine	unittest_define::complexdp_isequal_rank1 (UnitTest, Expected, Actual)
subroutine	unittest_define::complexdp_isequal_rank2 (UnitTest, Expected, Actual)
subroutine	unittest_define::char_isequal_scalar (UnitTest, Expected, Actual)
subroutine	unittest_define::char_isequal_rank1 (UnitTest, Expected, Actual)
subroutine	unittest_define::char_isequal_rank2 (UnitTest, Expected, Actual)
subroutine	unittest_define::realsp_isequalwithin_scalar (UnitTest, Expected, Actual, Tolerance, Epsilon_Scale)
subroutine	unittest_define::realsp_isequalwithin_rank1 (UnitTest, Expected, Actual, Tolerance, Epsilon_Scale)
subroutine	unittest_define::realsp_isequalwithin_rank2 (UnitTest, Expected, Actual, Tolerance, Epsilon_Scale)
subroutine	unittest_define::realdp_isequalwithin_scalar (UnitTest, Expected, Actual, Tolerance, Epsilon_Scale)
subroutine	unittest_define::realdp_isequalwithin_rank1 (UnitTest, Expected, Actual, Tolerance, Epsilon_Scale)
subroutine	unittest_define::realdp_isequalwithin_rank2 (UnitTest, Expected, Actual, Tolerance, Epsilon_Scale)
subroutine	unittest_define::complexsp_isequalwithin_scalar (UnitTest, Expected, Actual, Tolerance, Epsilon_Scale)
subroutine	unittest_define::complexsp_isequalwithin_rank1 (UnitTest, Expected, Actual, Tolerance, Epsilon_Scale)
subroutine	unittest_define::complexsp_isequalwithin_rank2 (UnitTest, Expected, Actual, Tolerance, Epsilon_Scale)
subroutine	unittest_define::complexdp_isequalwithin_scalar (UnitTest, Expected, Actual, Tolerance, Epsilon_Scale)
subroutine	unittest_define::complexdp_isequalwithin_rank1 (UnitTest, Expected, Actual, Tolerance, Epsilon_Scale)
subroutine	unittest_define::complexdp_isequalwithin_rank2 (UnitTest, Expected, Actual, Tolerance, Epsilon_Scale)
subroutine, public	unittest_define::unittest_defineversion (Id)
pure subroutine	unittest_define::set_property (UnitTest, Verbose, Title, Caller, Level, Procedure, Message, Test_Result, n_Tests, n_Passed_Tests, n_Failed_Tests, n_AllTests, n_Passed_AllTests, n_Failed_AllTests)
pure subroutine	unittest_define::get_property (UnitTest, Verbose, Title, Caller, Level, Procedure, Message, Test_Result, n_Tests, n_Passed_Tests, n_Failed_Tests, n_AllTests, n_Passed_AllTests, n_Failed_AllTests)
subroutine	unittest_define::test_passed (UnitTest)
subroutine	unittest_define::test_failed (UnitTest)
subroutine	unittest_define::test_increment (UnitTest)
subroutine	unittest_define::display_message (UnitTest)
subroutine	unittest_define::test_info_string (UnitTest, info)
elemental real(single) function	unittest_define::realsp_get_multiplier (x)
elemental real(double) function	unittest_define::realdp_get_multiplier (x)

Variables
character(*), parameter	unittest_define::module_version_id = '$Id: UnitTest_Define.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
integer, parameter	unittest_define::sl = 512
integer, parameter	unittest_define::cr = 13
integer, parameter	unittest_define::lf = 10
character(2), parameter	unittest_define::crlf = ACHAR(CR)//ACHAR(LF)
character(*), parameter	unittest_define::rfmt = 'es25.18'
character(*), parameter	unittest_define::zfmt = '"(",'//RFMT//',",",'//RFMT//',")"'
logical, parameter	unittest_define::default_verbose = .FALSE.
character(*), parameter	unittest_define::green_colour = ACHAR(27)//'[1;32m'
character(*), parameter	unittest_define::red_colour = ACHAR(27)//'[1;31m'
character(*), parameter	unittest_define::no_colour = ACHAR(27)//'[0m'
integer, parameter	unittest_define::n_message_levels = 6
integer, parameter	unittest_define::init_level = 1
integer, parameter	unittest_define::setup_level = 2
integer, parameter	unittest_define::test_level = 3
integer, parameter	unittest_define::report_level = 4
integer, parameter	unittest_define::summary_level = 5
integer, parameter	unittest_define::internal_fail_level = 6
character(*), dimension(n_message_levels), parameter	unittest_define::message_level = [ 'INIT ', 'SETUP ', 'TEST ', 'REPORT ', 'SUMMARY ', 'INTERNAL FAILURE' ]