Changeset 3848

Timestamp:

2013-03-22T13:48:21+01:00 (11 years ago)

Author:

agn

Message:

Return correct whitespace at start of ldfslp.F90

File:

• trunk/NEMOGCM/NEMO/OPA_SRC/LDF/ldfslp.F90 (modified) (1 diff)

trunk/NEMOGCM/NEMO/OPA_SRC/LDF/ldfslp.F90

@@ -21 +21 @@
    !!   ldf_slp_init  : initialization of the slopes computation
    !!----------------------------------------------------------------------
-   USE oce             ! ocean dynamics and tracers
-   USE dom_oce         ! ocean space and time domain
-   USE ldftra_oce      ! lateral diffusion: traceur
-   USE ldfdyn_oce      ! lateral diffusion: dynamics
-   USE phycst          ! physical constants
-   USE zdfmxl          ! mixed layer depth
-   USE eosbn2          ! equation of states
-   USE lbclnk          ! ocean lateral boundary conditions (or mpp link)
-   USE in_out_manager  ! I/O manager
-   USE prtctl          ! Print control
-   USE wrk_nemo        ! work arrays
-   USE timing          ! Timing
-   USE lib_fortran     ! Fortran utilities (allows no signed zero when 'key_nosignedzero' defined)
+   USE oce            ! ocean dynamics and tracers
+   USE dom_oce        ! ocean space and time domain
+   USE ldftra_oce     ! lateral diffusion: traceur
+   USE ldfdyn_oce     ! lateral diffusion: dynamics
+   USE phycst         ! physical constants
+   USE zdfmxl         ! mixed layer depth
+   USE eosbn2         ! equation of states
+   USE lbclnk         ! ocean lateral boundary conditions (or mpp link)
+   USE in_out_manager ! I/O manager
+   USE prtctl         ! Print control
+   USE wrk_nemo       ! work arrays
+   USE timing         ! Timing
+   USE lib_fortran    ! Fortran utilities (allows no signed zero when 'key_nosignedzero' defined)
 
    IMPLICIT NONE