Ignore:
Timestamp:
2017-09-27T11:11:01+02:00 (3 years ago)
Author:
clem
Message:

change variable names

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/icerst.F90

    r8536 r8564  
    133133         z2d(:,:) = v_s(:,:,jl) 
    134134         CALL iom_rstput( iter, nitrst, numriw, znam , z2d ) ! v_s 
    135          znam = 'smv_i'//'_htc'//zchar 
    136          z2d(:,:) = smv_i(:,:,jl) 
    137          CALL iom_rstput( iter, nitrst, numriw, znam , z2d ) ! smv_i 
     135         znam = 'sv_i'//'_htc'//zchar 
     136         z2d(:,:) = sv_i(:,:,jl) 
     137         CALL iom_rstput( iter, nitrst, numriw, znam , z2d ) ! sv_i 
    138138         znam = 'oa_i'//'_htc'//zchar 
    139139         z2d(:,:) = oa_i(:,:,jl) 
     
    234234         CALL iom_get( numrir, jpdom_autoglo, znam , z2d ) 
    235235         v_s(:,:,jl) = z2d(:,:)  
    236          znam = 'smv_i'//'_htc'//zchar 
    237          CALL iom_get( numrir, jpdom_autoglo, znam , z2d ) 
    238          smv_i(:,:,jl) = z2d(:,:) 
     236         znam = 'sv_i'//'_htc'//zchar 
     237         CALL iom_get( numrir, jpdom_autoglo, znam , z2d ) 
     238         sv_i(:,:,jl) = z2d(:,:) 
    239239         znam = 'oa_i'//'_htc'//zchar 
    240240         CALL iom_get( numrir, jpdom_autoglo, znam , z2d ) 
Note: See TracChangeset for help on using the changeset viewer.