Changeset 248 for trunk/SRC/Computation


Ignore:
Timestamp:
05/29/07 10:59:39 (17 years ago)
Author:
smasson
Message:

minor bugbix

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/SRC/Computation/curl.pro

    r242 r248  
    215215; 
    216216      tabf = (fmask())[indice2d+jpi*jpj*firstzt]/(e1f[indice2d]*e2f[indice2d]) 
    217       tabf = temporary(tabf[*])#replicate(1., jpt) 
     217      tabf = reform(temporary(tabf[*])#replicate(1., jpt), nx, ny, jpt, /overwrite) 
    218218      landf = where(tabf EQ 0) 
    219219; 
Note: See TracChangeset for help on using the changeset viewer.