MAPL_Initialize.F90 Source File


This file depends on

sourcefile~~mapl_initialize.f90~~EfferentGraph sourcefile~mapl_initialize.f90 MAPL_Initialize.F90 sourcefile~mapl_pfunit_throw.f90 MAPL_pFUnit_Throw.F90 sourcefile~mapl_initialize.f90->sourcefile~mapl_pfunit_throw.f90 sourcefile~mapl_throw.f90 MAPL_Throw.F90 sourcefile~mapl_initialize.f90->sourcefile~mapl_throw.f90 sourcefile~pflogger_stub.f90 pflogger_stub.F90 sourcefile~mapl_initialize.f90->sourcefile~pflogger_stub.f90 sourcefile~pfl_keywordenforcer.f90 PFL_KeywordEnforcer.F90 sourcefile~pflogger_stub.f90->sourcefile~pfl_keywordenforcer.f90 sourcefile~wraparray.f90 WrapArray.F90 sourcefile~pflogger_stub.f90->sourcefile~wraparray.f90

Source Code

module MAPL_pFUnit_Initialize
contains
   subroutine Initialize()
      use ESMF
      use MAPL_ThrowMod, only: MAPL_set_throw_method
      use MAPL_pFUnit_ThrowMod
      use pflogger, only: pfl_initialize => initialize
   
      call ESMF_Initialize(logKindFlag=ESMF_LOGKIND_MULTI)
      call MAPL_set_throw_method(throw)
      call pfl_initialize()

   end subroutine Initialize
end module MAPL_pFUnit_Initialize