ROMS
Loading...
Searching...
No Matches
Functions/Subroutines
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
esmf_ice_mod
Generated by
1.12.0