Changeset 436 for branches/GRISLIv3/SOURCES
- Timestamp:
- 06/22/23 18:04:24 (13 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/GRISLIv3/SOURCES/Ant40_files/output_anta40_mod-0.4.f90
r435 r436 249 249 dist_lonlat_new = 1.e6 ! initialisation 250 250 ! on part du centre de la grille 251 ! jj=int(ny/2)252 ! ii=int(nx/2)253 jj=6254 ii=6251 ! iic(k)=int(nx/2) 252 ! jic(k)=int(ny/2) 253 iic(k)=6 254 jic(k)=6 255 255 nloop=0 256 256 do while (dist_lonlat_new .LT. dist_lonlat .AND. nloop .LT. 10000)
Note: See TracChangeset
for help on using the changeset viewer.