PROGRAM nemo !!====================================================================== !! *** PROGRAM nemo *** !! !! ** Purpose : encapsulate nemo_gcm so that it can also be called !! together with the linear tangent and adjoint models !!====================================================================== !! History : OPA ! 2001-02 (M. Imbard, A. Weaver) Original code !! NEMO 1.0 ! 2003-10 (G. Madec) F90 !!---------------------------------------------------------------------- USE nemogcm ! NEMO system (nemo_gcm routine) !!---------------------------------------------------------------------- !! NEMO/OCE 4.0 , NEMO Consortium (2018) !! $Id: nemo.f90 10068 2018-08-28 14:09:04Z nicolasmartin $ !! Software governed by the CeCILL license (see ./LICENSE) !!---------------------------------------------------------------------- ! CALL nemo_gcm ! NEMO direct code ! !!====================================================================== END PROGRAM nemo