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