Changeset 4423


Ignore:
Timestamp:
2014-02-04T13:13:37+01:00 (7 years ago)
Author:
trackstand2
Message:

Remove unused vars from nemogcm

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2011/DEV_r2739_STFC_dCSE/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90

    r4409 r4423  
    629629      ! Local vars 
    630630      INTEGER :: ierr                          ! Error flag 
    631       INTEGER :: inum                          ! temporary logical unit 
    632       INTEGER :: ii,jj,iproc                   ! Loop index 
     631      INTEGER :: ii,jj                         ! Loop index 
    633632      CHARACTER(LEN=8) :: lstr                 ! Local string for reading env. var. 
    634633      INTEGER          :: lztrim               ! Local int for      "      "    " 
     
    897896      INTEGER, DIMENSION(jpiglo,jpjglo), INTENT(inout) :: imask 
    898897      ! Locals 
    899       INTEGER :: ii, jj 
     898      INTEGER :: jj 
    900899      INTEGER :: icentre, jcentre 
    901900      INTEGER :: iwidth, iheight 
Note: See TracChangeset for help on using the changeset viewer.