init_tests.F90 Source File


This file depends on

sourcefile~~init_tests.f90~~EfferentGraph sourcefile~init_tests.f90 init_tests.F90 sourcefile~mapl_pfunit_throw.f90 MAPL_pFUnit_Throw.F90 sourcefile~init_tests.f90->sourcefile~mapl_pfunit_throw.f90 sourcefile~mapl_throw.f90 MAPL_Throw.F90 sourcefile~init_tests.f90->sourcefile~mapl_throw.f90

Source Code

subroutine init_tests()
   use MAPL_pFUnit_ThrowMod, only: pFUnit_throw
   use MAPL_ThrowMod
   implicit none

   call MAPL_set_throw_method(pfunit_throw)

end subroutine init_tests