- Timestamp:
- 2014-03-26T09:40:54+01:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2012/dev_v3_4_STABLE_2012/NEMOGCM/NEMO/OPATAM_SRC/DYN/dynldf_tam.F90
r3611 r4576 315 315 CHARACTER(LEN=14) :: cl_name 316 316 317 INTEGER :: ildf !: store the nldf flag 318 317 319 ! Allocate memory 318 320 … … 336 338 & ) 337 339 340 ildf = nldf 341 338 342 DO jt = 1, 2 339 343 … … 463 467 END DO 464 468 469 nldf = ildf ! restore nldf 470 465 471 DEALLOCATE( & 466 472 & zua_tlin, &
Note: See TracChangeset
for help on using the changeset viewer.