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

Functions/Subroutines

subroutine, public wav_setservices (model, rc)
 

Function/Subroutine Documentation

◆ wav_setservices()

subroutine, public esmf_wav_mod::wav_setservices ( type (esmf_gridcomp) model,
integer, intent(out) rc )

Definition at line 42 of file esmf_wav_void.h.

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

Referenced by esmf_esm_mod::esm_setmodelservices().

Here is the caller graph for this function: