test_mt Program

program~~test_mt~4~~UsesGraph program~test_mt~4 test_mt module~tester tester module~tester->program~test_mt~4
Help


Source Code


Variables

Type AttributesNameInitial
type(tester_t) :: test

Source Code

program test_mt
  use tester
  implicit none

  type(tester_t) :: test

  call test%init()

  call test%assert_equal(.true., 1>2)

  call test%print()

end program test_mt