Changeset 7761 for trunk/NEMOGCM/NEMO/OFF_SRC
- Timestamp:
- 2017-03-06T18:58:35+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OFF_SRC/nemogcm.F90
r7646 r7761 540 540 ! 541 541 ! lfax contains the set of allowed factors. 542 data (ilfax(jl),jl=1,ntest) / 16384, 8192, 4096, 2048, 1024, 512, 256, & 543 & 128, 64, 32, 16, 8, 4, 2 / 544 !!---------------------------------------------------------------------- 542 ilfax(:) = (/(2**jl,jl=ntest,1,-1)/) 545 543 546 544 ! Clear the error flag and initialise output vars
Note: See TracChangeset
for help on using the changeset viewer.