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

Functions/Subroutines

subroutine, public ice_setservices (model, rc)
 

Function/Subroutine Documentation

◆ ice_setservices()

subroutine, public esmf_ice_mod::ice_setservices ( type (esmf_gridcomp) model,
integer, intent(out) rc )

Definition at line 42 of file esmf_ice_void.h.

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