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 5434 – NEMO

Changeset 5434


Ignore:
Timestamp:
2015-06-18T11:05:30+02:00 (9 years ago)
Author:
cetlod
Message:

fix to add undefined subroutines, see ticket #1541

Location:
trunk/NEMOGCM/NEMO/TOP_SRC
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/NEMO/TOP_SRC/C14b/trcice_c14b.F90

    r5385 r5434  
    1616   PRIVATE 
    1717 
    18    PUBLIC   trc_ice_c14b       ! called by trcice.F90 module 
     18   PUBLIC   trc_ice_ini_c14b       ! called by trcice.F90 module 
    1919 
    2020   !!---------------------------------------------------------------------- 
     
    2525CONTAINS 
    2626 
    27    SUBROUTINE trc_ice_c14b 
     27   SUBROUTINE trc_ice_ini_c14b 
    2828      !!---------------------------------------------------------------------- 
    2929      !!                     ***  trc_ice_c14b  *** 
     
    3232      ! 
    3333      ! 
    34    END SUBROUTINE trc_ice_c14b 
     34   END SUBROUTINE trc_ice_ini_c14b 
    3535 
    3636 
     
    4040   !!---------------------------------------------------------------------- 
    4141CONTAINS 
    42    SUBROUTINE trc_ice_c14b             ! Empty routine 
    43    END SUBROUTINE trc_ice_c14b 
     42   SUBROUTINE trc_ice_ini_c14b             ! Empty routine 
     43   END SUBROUTINE trc_ice_ini_c14b 
    4444#endif 
    4545 
  • trunk/NEMOGCM/NEMO/TOP_SRC/CFC/trcice_cfc.F90

    r5385 r5434  
    1919   PRIVATE 
    2020 
    21    PUBLIC   trc_ice_cfc       ! called by trcice.F90 module 
     21   PUBLIC   trc_ice_ini_cfc       ! called by trcice.F90 module 
    2222 
    2323   !!---------------------------------------------------------------------- 
     
    2828CONTAINS 
    2929 
    30    SUBROUTINE trc_ice_cfc 
     30   SUBROUTINE trc_ice_ini_cfc 
    3131      !!---------------------------------------------------------------------- 
    3232      !!                     ***  trc_ice_cfc  *** 
     
    3838      ! 
    3939      ! 
    40    END SUBROUTINE trc_ice_cfc 
     40   END SUBROUTINE trc_ice_ini_cfc 
    4141 
    4242 
     
    4646   !!---------------------------------------------------------------------- 
    4747CONTAINS 
    48    SUBROUTINE trc_ice_cfc             ! Empty routine 
    49    END SUBROUTINE trc_ice_cfc 
     48   SUBROUTINE trc_ice_ini_cfc             ! Empty routine 
     49   END SUBROUTINE trc_ice_ini_cfc 
    5050#endif 
    5151 
  • trunk/NEMOGCM/NEMO/TOP_SRC/MY_TRC/trcice_my_trc.F90

    r5385 r5434  
    1616   PRIVATE 
    1717 
    18    PUBLIC   trc_ice_my_trc       ! called by trcice.F90 module 
     18   PUBLIC   trc_ice_ini_my_trc       ! called by trcice.F90 module 
    1919 
    2020   !!---------------------------------------------------------------------- 
     
    2525CONTAINS 
    2626 
    27    SUBROUTINE trc_ice_my_trc 
     27   SUBROUTINE trc_ice_ini_my_trc 
    2828      !!---------------------------------------------------------------------- 
    2929      !!                     ***  trc_ice_my_trc  *** 
     
    3232      ! 
    3333      ! 
    34    END SUBROUTINE trc_ice_my_trc 
     34   END SUBROUTINE trc_ice_ini_my_trc 
    3535 
    3636#else 
     
    3939   !!---------------------------------------------------------------------- 
    4040CONTAINS 
    41    SUBROUTINE trc_ice_my_trc             ! Empty routine 
    42    END SUBROUTINE trc_ice_my_trc 
     41   SUBROUTINE trc_ice_ini_my_trc             ! Empty routine 
     42   END SUBROUTINE trc_ice_ini_my_trc 
    4343#endif 
    4444 
    4545   !!====================================================================== 
    46 END MODULE trcice_my_trc 
     46END MODULE trcice_ini_my_trc 
Note: See TracChangeset for help on using the changeset viewer.