Changeset 8023 for branches/UKMO/dev_r5518_medusa_chg_trc_bio_medusa/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_fin.F90

Timestamp:

2017-05-12T10:21:30+02:00 (7 years ago)

Author:

marc

Message:

Tidying up of headers for several files

File:

• branches/UKMO/dev_r5518_medusa_chg_trc_bio_medusa/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_fin.F90 (modified) (1 diff)

branches/UKMO/dev_r5518_medusa_chg_trc_bio_medusa/NEMOGCM/NEMO/TOP_SRC/MEDUSA/bio_medusa_fin.F90

@@ -34 +34 @@
       USE dom_oce,           ONLY: atfp, atfp1, neuler, rdt
       USE in_out_manager,    ONLY: lwp, numout
+# if defined key_iomput
       USE iom,               ONLY: iom_put, lk_iomput
+# endif
       USE lbclnk,            ONLY: lbc_lnk
       USE par_medusa,        ONLY: jp_medusa_2d, jp_medusa_3d,          &