ROMS
Loading...
Searching...
No Matches
esmf_atm_mod Module Reference

Functions/Subroutines

subroutine, public atm_setservices (model, rc)
 

Function/Subroutine Documentation

◆ atm_setservices()

subroutine, public esmf_atm_mod::atm_setservices ( type (esmf_gridcomp) model,
integer, intent(out) rc )

Definition at line 45 of file esmf_atm_void.h.

46!
47!=======================================================================
48! !
49! Sets ATM a void atmosphere model component shared-object entry !
50! points for "initialize", "run", and "finalize" by using NUOPC !
51! generic methods. !
52! !
53!=======================================================================
54!
55! Imported variable declarations.
56!
57 integer, intent(out) :: rc
58!
59 TYPE (ESMF_GridComp) :: model
60!
61! Local variable declarations.
62!
63 character (len=*), parameter :: MyFile = &
64 & __FILE__//", ATM_SetServices"
65!
66!-----------------------------------------------------------------------
67! Initialize return code flag to success state (no error).
68!-----------------------------------------------------------------------
69!
70 rc=esmf_success
71!
72!-----------------------------------------------------------------------
73! Register NUOPC generic routines. It is empty to for testing
74!-----------------------------------------------------------------------
75!
76 RETURN