New URL for NEMO forge! http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.

Changeset 6682 – NEMO

Context Navigation

← Previous Changeset
Next Changeset →

Changeset 6682

Timestamp:

2016-06-10T12:57:15+02:00 (8 years ago)

Author:

frrh

Message:

Remove redundant USE statement now that MEDUSA code has to USE
the main ocean routines (content from oce.F90 specifically)

File:

: 1 edited

branches/UKMO/dev_r5518_GSI7_GSI8_landice_bitcomp_medusa/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90 (modified) (1 diff)

Legend:

: Unmodified
: Added
: Removed

branches/UKMO/dev_r5518_GSI7_GSI8_landice_bitcomp_medusa/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90

-                      r6681
+                      r6682
 #endif
    USE lib_fortran, ONLY: glob_sum
-#if defined key_medusa
-   USE trcbio_medusa, ONLY: f_co2flux2d, dms_surf2d, f_pco2a
-   USE sms_medusa, ONLY: dust
-#endif
    IMPLICIT NONE

Note: See TracChangeset for help on using the changeset viewer.

Download in other formats: