f_esmf_compgetvmplan Subroutine

recursive subroutine f_esmf_compgetvmplan(comp, vmplan, rc)

Uses

  • proc~~f_esmf_compgetvmplan~~UsesGraph proc~f_esmf_compgetvmplan f_esmf_compgetvmplan module~esmf_basemod ESMF_BaseMod proc~f_esmf_compgetvmplan->module~esmf_basemod module~esmf_compmod ESMF_CompMod proc~f_esmf_compgetvmplan->module~esmf_compmod module~esmf_initmacrosmod ESMF_InitMacrosMod proc~f_esmf_compgetvmplan->module~esmf_initmacrosmod module~esmf_utiltypesmod ESMF_UtilTypesMod proc~f_esmf_compgetvmplan->module~esmf_utiltypesmod module~esmf_vmmod ESMF_VMMod proc~f_esmf_compgetvmplan->module~esmf_vmmod module~esmf_basemod->module~esmf_initmacrosmod module~esmf_basemod->module~esmf_utiltypesmod module~esmf_basemod->module~esmf_vmmod iso_c_binding iso_c_binding module~esmf_basemod->iso_c_binding module~esmf_ioutilmod ESMF_IOUtilMod module~esmf_basemod->module~esmf_ioutilmod module~esmf_logerrmod ESMF_LogErrMod module~esmf_basemod->module~esmf_logerrmod module~esmf_compmod->module~esmf_basemod module~esmf_compmod->module~esmf_initmacrosmod module~esmf_compmod->module~esmf_utiltypesmod module~esmf_compmod->module~esmf_vmmod module~esmf_calendarmod ESMF_CalendarMod module~esmf_compmod->module~esmf_calendarmod module~esmf_clockmod ESMF_ClockMod module~esmf_compmod->module~esmf_clockmod module~esmf_configmod ESMF_ConfigMod module~esmf_compmod->module~esmf_configmod module~esmf_gridmod ESMF_GridMod module~esmf_compmod->module~esmf_gridmod module~esmf_hconfigmod ESMF_HConfigMod module~esmf_compmod->module~esmf_hconfigmod module~esmf_compmod->module~esmf_ioutilmod module~esmf_locstreammod ESMF_LocStreamMod module~esmf_compmod->module~esmf_locstreammod module~esmf_compmod->module~esmf_logerrmod module~esmf_meshmod ESMF_MeshMod module~esmf_compmod->module~esmf_meshmod module~esmf_statemod ESMF_StateMod module~esmf_compmod->module~esmf_statemod module~esmf_statetypesmod ESMF_StateTypesMod module~esmf_compmod->module~esmf_statetypesmod module~esmf_utilmod ESMF_UtilMod module~esmf_compmod->module~esmf_utilmod module~esmf_xgridmod ESMF_XGridMod module~esmf_compmod->module~esmf_xgridmod module~esmf_initmacrosmod->module~esmf_utiltypesmod module~esmf_initmacrosmod->module~esmf_logerrmod module~esmf_utiltypesmod->iso_c_binding module~esmf_vmmod->module~esmf_initmacrosmod module~esmf_vmmod->module~esmf_utiltypesmod module~esmf_vmmod->iso_c_binding module~esmf_f90interfacemod ESMF_F90InterfaceMod module~esmf_vmmod->module~esmf_f90interfacemod module~esmf_vmmod->module~esmf_ioutilmod module~esmf_vmmod->module~esmf_logerrmod

Arguments

Type IntentOptional Attributes Name
type(ESMF_CWrap) :: comp
type(ESMF_VMPlan) :: vmplan
integer :: rc

Calls

proc~~f_esmf_compgetvmplan~~CallsGraph proc~f_esmf_compgetvmplan f_esmf_compgetvmplan proc~esmf_compget ESMF_CompGet proc~f_esmf_compgetvmplan->proc~esmf_compget proc~esmf_vmplangetthis ESMF_VMPlanGetThis proc~f_esmf_compgetvmplan->proc~esmf_vmplangetthis proc~esmf_vmplansetthis ESMF_VMPlanSetThis proc~f_esmf_compgetvmplan->proc~esmf_vmplansetthis c_esmc_compget c_esmc_compget proc~esmf_compget->c_esmc_compget interface~esmf_vmget ESMF_VMGet proc~esmf_compget->interface~esmf_vmget proc~esmf_basegetstatus ESMF_BaseGetStatus proc~esmf_compget->proc~esmf_basegetstatus proc~esmf_compclassgetinit ESMF_CompClassGetInit proc~esmf_compget->proc~esmf_compclassgetinit proc~esmf_configget ESMF_ConfigGet proc~esmf_compget->proc~esmf_configget proc~esmf_getname ESMF_GetName proc~esmf_compget->proc~esmf_getname proc~esmf_imerr ESMF_IMErr proc~esmf_compget->proc~esmf_imerr proc~esmf_logfoundallocerror ESMF_LogFoundAllocError proc~esmf_compget->proc~esmf_logfoundallocerror proc~esmf_logfounderror ESMF_LogFoundError proc~esmf_compget->proc~esmf_logfounderror proc~esmf_logseterror ESMF_LogSetError proc~esmf_compget->proc~esmf_logseterror proc~esmf_vmgetdefault ESMF_VMGetDefault interface~esmf_vmget->proc~esmf_vmgetdefault proc~esmf_vmgetpetspecific ESMF_VMGetPetSpecific interface~esmf_vmget->proc~esmf_vmgetpetspecific proc~esmf_basegetstatus->proc~esmf_logfounderror c_esmc_basegetstatus c_esmc_basegetstatus proc~esmf_basegetstatus->c_esmc_basegetstatus proc~esmf_configget->proc~esmf_imerr proc~esmf_configgetinit ESMF_ConfigGetInit proc~esmf_configget->proc~esmf_configgetinit interface~c_esmc_getname c_ESMC_GetName proc~esmf_getname->interface~c_esmc_getname proc~esmf_imerr->proc~esmf_logfounderror proc~esmf_initcheckdeep ESMF_InitCheckDeep proc~esmf_imerr->proc~esmf_initcheckdeep esmf_breakpoint esmf_breakpoint proc~esmf_logfoundallocerror->esmf_breakpoint proc~esmf_logrc2msg ESMF_LogRc2Msg proc~esmf_logfoundallocerror->proc~esmf_logrc2msg proc~esmf_logwrite ESMF_LogWrite proc~esmf_logfoundallocerror->proc~esmf_logwrite proc~esmf_logfounderror->esmf_breakpoint proc~esmf_logfounderror->proc~esmf_logrc2msg proc~esmf_logfounderror->proc~esmf_logwrite proc~esmf_logseterror->esmf_breakpoint proc~esmf_logseterror->proc~esmf_logrc2msg proc~esmf_logseterror->proc~esmf_logwrite

Source Code

recursive subroutine f_esmf_compgetvmplan(comp, vmplan, rc)
  use ESMF_UtilTypesMod      ! ESMF utility types
  use ESMF_BaseMod           ! ESMF base class
  use ESMF_CompMod
  use ESMF_VMMod
  use ESMF_InitMacrosMod
  
  implicit none

  type(ESMF_CWrap)   :: comp
  type(ESMF_VMPlan)  :: vmplan
  integer            :: rc

  type(ESMF_VMPlan)  :: local_vmplan
  type(ESMF_Pointer) :: this

  ! Initialize return code; assume routine not implemented
  rc = ESMF_RC_NOT_IMPL


  call ESMF_CompGet(compp=comp%compp, vmplan=local_vmplan, rc=rc)

  call ESMF_VMPlanGetThis(local_vmplan, this, rc=rc)  ! Get C++ address
  call ESMF_VMPlanSetThis(vmplan, this, rc=rc)        ! Set C++ address
end subroutine f_esmf_compgetvmplan