Changeset 38


Ignore:
Timestamp:
07/27/12 16:34:49 (12 years ago)
Author:
ymipsl
Message:

bug correction for compilation

ym

File:
1 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/trunk/src/wind.f90

    r36 r38  
    197197  IMPLICIT NONE 
    198198  REAL(rstd) :: uc(iim*jjm,3,llm) 
    199   REAL(rstd) :: ulon(iim*jjm,3,llm) 
    200   REAL(rstd) :: ulat(iim*jjm,3,llm) 
     199  REAL(rstd) :: ulon(iim*jjm,llm) 
     200  REAL(rstd) :: ulat(iim*jjm,llm) 
    201201 
    202202  INTEGER :: i,j,ij,l      
Note: See TracChangeset for help on using the changeset viewer.