The main tester class. More...

Public Member Functions
generic, public	assert_equal =>assert_equal_i8,assert_equal_i16,assert_equal_i32,assert_equal_i64,assert_equal_r32,assert_equal_r64,assert_equal_c32,assert_equal_c64,assert_equal_l,assert_equal_i8_1,assert_equal_i16_1,assert_equal_i32_1,assert_equal_i64_1,assert_equal_r32_1,assert_equal_r64_1,assert_equal_c32_1,assert_equal_c64_1,assert_equal_l_1
	Check if two values (integer, real, complex or logical) are equal. More...

generic, public	assert_positive =>assert_positive_i8,assert_positive_i16,assert_positive_i32,assert_positive_i64,assert_positive_r32,assert_positive_r64,assert_positive_i8_1,assert_positive_i16_1,assert_positive_i32_1,assert_positive_i64_1,assert_positive_r32_1,assert_positive_r64_1
	Check if a number (integer or real) is positive. More...

generic, public	assert_close =>assert_close_r32,assert_close_r64,assert_close_c32,assert_close_c64,assert_close_r32_1,assert_close_r64_1,assert_close_c32_1,assert_close_c64_1
	Check if two values (real or complex) are close with respect a tolerance. More...

Private Member Functions
procedure	init
	Initialize the tester. More...

procedure	print
	Print tests results. More...

procedure, private	assert_equal_i8
	Check if two integers (8 bits) are equal. More...

procedure, private	assert_equal_i16
	Check if two integers (16 bits) are equal. More...

procedure, private	assert_equal_i32
	Check if two integers (32 bits) are equal. More...

procedure, private	assert_equal_i64
	Check if two integers (64 bits) are equal. More...

procedure, private	assert_equal_r32
	Check if two reals (32 bits) are equal. More...

procedure, private	assert_equal_r64
	Check if two reals (64 bits) are equal. More...

procedure, private	assert_equal_c32
	Check if two complex numbers (32 bits) are equal. More...

procedure, private	assert_equal_c64
	Check if two complex numbers (64 bits) are equal. More...

procedure, private	assert_equal_l
	Check if two logicals are equal. More...

procedure, private	assert_equal_i8_1
	Check if two integer (8 bits) arrays (rank 1) are equal. More...

procedure, private	assert_equal_i16_1
	Check if two integer (16 bits) arrays (rank 1) are equal. More...

procedure, private	assert_equal_i32_1
	Check if two integer (32 bits) arrays (rank 1) are equal. More...

procedure, private	assert_equal_i64_1
	Check if two integer (64 bits) arrays (rank 1) are equal. More...

procedure, private	assert_equal_r32_1
	Check if two real (32 bits) arrays (rank 1) are equal. More...

procedure, private	assert_equal_r64_1
	Check if two real (64 bits) arrays (rank 1) are equal. More...

procedure, private	assert_equal_c32_1
	Check if two complex (32 bits) arrays (rank 1) are equal. More...

procedure, private	assert_equal_c64_1
	Check if two complex (64 bits) arrays (rank 1) are equal. More...

procedure, private	assert_equal_l_1
	Check if two logical arrays (rank 1) are equal. More...

procedure, private	assert_positive_i8
	Check if a integer (8 bits) is positive. More...

procedure, private	assert_positive_i16
	Check if a integer (16 bits) is positive. More...

procedure, private	assert_positive_i32
	Check if a integer (32 bits) is positive. More...

procedure, private	assert_positive_i64
	Check if a integer (64 bits) is positive. More...

procedure, private	assert_positive_r32
	Check if a real (32 bits) is positive. More...

procedure, private	assert_positive_r64
	Check if a real (64 bits) is positive. More...

procedure, private	assert_positive_i8_1
	Check if a integer (8 bits) array (rank 1) is positive. More...

procedure, private	assert_positive_i16_1
	Check if a integer (16 bits) array (rank 1) is positive. More...

procedure, private	assert_positive_i32_1
	Check if a integer (32 bits) array (rank 1) is positive. More...

procedure, private	assert_positive_i64_1
	Check if a integer (64 bits) array (rank 1) is positive. More...

procedure, private	assert_positive_r32_1
	Check if a real (32 bits) array (rank 1) is positive. More...

procedure, private	assert_positive_r64_1
	Check if a real (64 bits) array (rank 1) is positive. More...

procedure, private	assert_close_r32
	Check if two reals (32 bits) are close with respect a tolerance. More...

procedure, private	assert_close_r64
	Check if two reals (64 bits) are close with respect a tolerance. More...

procedure, private	assert_close_c32
	Check if two complex numbers (32 bits) are close with respect a tolerance. More...

procedure, private	assert_close_c64
	Check if two complex numbers (64 bits) are close with respect a tolerance. More...

procedure, private	assert_close_r32_1
	Check if two real (32 bits) arrays (rank 1) are close with respect a tolerance. More...

procedure, private	assert_close_r64_1
	Check if two real (64 bits) arrays (rank 1) are close with respect a tolerance. More...

procedure, private	assert_close_c32_1
	Check if two complex (32 bits) arrays (rank 1) are close with respect a tolerance. More...

procedure, private	assert_close_c64_1
	Check if two complex (64 bits) arrays (rank 1) are close with respect a tolerance. More...

Private Attributes
integer(int32)	n_errors =0_int32
	Number of errors. More...

integer(int32)	n_tests =0_int32
	Number of tests. More...

real(real32)	tolerance32 =2._real32*epsilon(1._real32)
	Real tolerance, 32 bits. More...

real(real64)	tolerance64 =2._real64*epsilon(1._real64)
	Real tolerance, 64 bits. More...

Detailed Description

The main tester class.

Definition at line 19 of file tester.f90.

Member Function/Subroutine Documentation

generic, public tester::tester_t::assert_close ( )

Check if two values (real or complex) are close with respect a tolerance.

Definition at line 89 of file tester.f90.

procedure, private tester::tester_t::assert_close_c32 ( )

private

Check if two complex numbers (32 bits) are close with respect a tolerance.

Definition at line 100 of file tester.f90.

procedure, private tester::tester_t::assert_close_c32_1 ( )

private

Check if two complex (32 bits) arrays (rank 1) are close with respect a tolerance.

Definition at line 104 of file tester.f90.

procedure, private tester::tester_t::assert_close_c64 ( )

private

Check if two complex numbers (64 bits) are close with respect a tolerance.

Definition at line 101 of file tester.f90.

procedure, private tester::tester_t::assert_close_c64_1 ( )

private

Check if two complex (64 bits) arrays (rank 1) are close with respect a tolerance.

Definition at line 105 of file tester.f90.

procedure, private tester::tester_t::assert_close_r32 ( )

private

Check if two reals (32 bits) are close with respect a tolerance.

Definition at line 98 of file tester.f90.

procedure, private tester::tester_t::assert_close_r32_1 ( )

private

Check if two real (32 bits) arrays (rank 1) are close with respect a tolerance.

Definition at line 102 of file tester.f90.

procedure, private tester::tester_t::assert_close_r64 ( )

private

Check if two reals (64 bits) are close with respect a tolerance.

Definition at line 99 of file tester.f90.

procedure, private tester::tester_t::assert_close_r64_1 ( )

private

Check if two real (64 bits) arrays (rank 1) are close with respect a tolerance.

Definition at line 103 of file tester.f90.

generic, public tester::tester_t::assert_equal ( )

Check if two values (integer, real, complex or logical) are equal.

Definition at line 27 of file tester.f90.

procedure, private tester::tester_t::assert_equal_c32 ( )

private

Check if two complex numbers (32 bits) are equal.

Definition at line 52 of file tester.f90.

procedure, private tester::tester_t::assert_equal_c32_1 ( )

private

Check if two complex (32 bits) arrays (rank 1) are equal.

Definition at line 61 of file tester.f90.

procedure, private tester::tester_t::assert_equal_c64 ( )

private

Check if two complex numbers (64 bits) are equal.

Definition at line 53 of file tester.f90.

procedure, private tester::tester_t::assert_equal_c64_1 ( )

private

Check if two complex (64 bits) arrays (rank 1) are equal.

Definition at line 62 of file tester.f90.

procedure, private tester::tester_t::assert_equal_i16 ( )

private

Check if two integers (16 bits) are equal.

Definition at line 47 of file tester.f90.

procedure, private tester::tester_t::assert_equal_i16_1 ( )

private

Check if two integer (16 bits) arrays (rank 1) are equal.

Definition at line 56 of file tester.f90.

procedure, private tester::tester_t::assert_equal_i32 ( )

private

Check if two integers (32 bits) are equal.

Definition at line 48 of file tester.f90.

procedure, private tester::tester_t::assert_equal_i32_1 ( )

private

Check if two integer (32 bits) arrays (rank 1) are equal.

Definition at line 57 of file tester.f90.

procedure, private tester::tester_t::assert_equal_i64 ( )

private

Check if two integers (64 bits) are equal.

Definition at line 49 of file tester.f90.

procedure, private tester::tester_t::assert_equal_i64_1 ( )

private

Check if two integer (64 bits) arrays (rank 1) are equal.

Definition at line 58 of file tester.f90.

procedure, private tester::tester_t::assert_equal_i8 ( )

private

Check if two integers (8 bits) are equal.

Definition at line 46 of file tester.f90.

procedure, private tester::tester_t::assert_equal_i8_1 ( )

private

Check if two integer (8 bits) arrays (rank 1) are equal.

Definition at line 55 of file tester.f90.

procedure, private tester::tester_t::assert_equal_l ( )

private

Check if two logicals are equal.

Definition at line 54 of file tester.f90.

procedure, private tester::tester_t::assert_equal_l_1 ( )

private

Check if two logical arrays (rank 1) are equal.

Definition at line 63 of file tester.f90.

procedure, private tester::tester_t::assert_equal_r32 ( )

private

Check if two reals (32 bits) are equal.

Definition at line 50 of file tester.f90.

procedure, private tester::tester_t::assert_equal_r32_1 ( )

private

Check if two real (32 bits) arrays (rank 1) are equal.

Definition at line 59 of file tester.f90.

procedure, private tester::tester_t::assert_equal_r64 ( )

private

Check if two reals (64 bits) are equal.

Definition at line 51 of file tester.f90.

procedure, private tester::tester_t::assert_equal_r64_1 ( )

private

Check if two real (64 bits) arrays (rank 1) are equal.

Definition at line 60 of file tester.f90.

generic, public tester::tester_t::assert_positive ( )

Check if a number (integer or real) is positive.

Definition at line 64 of file tester.f90.

procedure, private tester::tester_t::assert_positive_i16 ( )

private

Check if a integer (16 bits) is positive.

Definition at line 78 of file tester.f90.

procedure, private tester::tester_t::assert_positive_i16_1 ( )

private

Check if a integer (16 bits) array (rank 1) is positive.

Definition at line 84 of file tester.f90.

procedure, private tester::tester_t::assert_positive_i32 ( )

private

Check if a integer (32 bits) is positive.

Definition at line 79 of file tester.f90.

procedure, private tester::tester_t::assert_positive_i32_1 ( )

private

Check if a integer (32 bits) array (rank 1) is positive.

Definition at line 85 of file tester.f90.

procedure, private tester::tester_t::assert_positive_i64 ( )

private

Check if a integer (64 bits) is positive.

Definition at line 80 of file tester.f90.

procedure, private tester::tester_t::assert_positive_i64_1 ( )

private

Check if a integer (64 bits) array (rank 1) is positive.

Definition at line 86 of file tester.f90.

procedure, private tester::tester_t::assert_positive_i8 ( )

private

Check if a integer (8 bits) is positive.

Definition at line 77 of file tester.f90.

procedure, private tester::tester_t::assert_positive_i8_1 ( )

private

Check if a integer (8 bits) array (rank 1) is positive.

Definition at line 83 of file tester.f90.

procedure, private tester::tester_t::assert_positive_r32 ( )

private

Check if a real (32 bits) is positive.

Definition at line 81 of file tester.f90.

procedure, private tester::tester_t::assert_positive_r32_1 ( )

private

Check if a real (32 bits) array (rank 1) is positive.

Definition at line 87 of file tester.f90.

procedure, private tester::tester_t::assert_positive_r64 ( )

private

Check if a real (64 bits) is positive.

Definition at line 82 of file tester.f90.

procedure, private tester::tester_t::assert_positive_r64_1 ( )

private

Check if a real (64 bits) array (rank 1) is positive.

Definition at line 88 of file tester.f90.

procedure tester::tester_t::init ( )

private

Initialize the tester.

Definition at line 25 of file tester.f90.

procedure tester::tester_t::print ( )

private

Print tests results.

Definition at line 26 of file tester.f90.

Member Data Documentation

integer(int32) tester::tester_t::n_errors =0_int32

private

Number of errors.

Definition at line 20 of file tester.f90.

integer(int32) tester::tester_t::n_tests =0_int32

private

Number of tests.

Definition at line 21 of file tester.f90.

real(real32) tester::tester_t::tolerance32 =2._real32*epsilon(1._real32)

private

Real tolerance, 32 bits.

Definition at line 22 of file tester.f90.

real(real64) tester::tester_t::tolerance64 =2._real64*epsilon(1._real64)

private

Real tolerance, 64 bits.

Definition at line 23 of file tester.f90.

The documentation for this type was generated from the following file:

src/tester.f90

Public Member Functions

Private Member Functions

Private Attributes

Detailed Description

Member Function/Subroutine Documentation

Member Data Documentation