Custom Query (969 matches)
Results (823 - 825 of 969)
Ticket | Owner | Reporter | Resolution | Summary |
---|---|---|---|---|
#63 | Fixed | cpp_clean Temporary Files | ||
Description |
The cpp_clean script may fail to move the temporary files from the source to the build directory. This happens when the source and Build directories are in different disk partitions. Many thanks to John Wilkin and Rich Signell for reporting this problem. |
|||
#64 | Fixed | Invalid Fortran unit numbers in inp_par.F | ||
Description |
In inp_par.F, lines 242 through 292, there is a series of OPEN statements to open biology, sediment, assimilation, float and stations parameters, using Fortran unit numbers 100, 200 ... 500. On a Cray T3E, unit number 100 is not allowed; the error message reads "The unit number (100) in the OPEN statement must be nonnegative and outside the range of 100 through 102." Other compilers have their own restrictions on unit numbers, eg. my Compaq Visual Fortran for Windows manual tells me that the numbers must be in the range 0 through 119. I *think* the Fortran standard restricts unit numbers to the range 1 through 99 (but the standard document costs US$140, so I haven't checked). So I suggest the unit numbers in this part of the code be made smaller. I attach a version of the file in which they are set to 15, 25 ... 55. |
|||
#68 | Done | nf_fread error checking | ||
Description |
In function ROMS/Utility/nf_fread2d, lines 223:237 * status=nf90_noerr IF (InpThread) THEN status=nf90_get_var(ncid, ncvarid, wrk, start, total) IF (status.eq.nf90_noerr) THEN ... END IF END IF ... IF (status.ne.nf90_noerr) RETURN If the file is not read correctly, then "status" will not equal nf90_noerr, and the code will return. But we need to have the value of "nf_fread" set to = the value of status before the return happens. IF the file is read correctly, then at the bottom of nf_fread2d we have: nf_fread2d=status so that is ok. Suggest that we add a line nf_fread2d=status before the return statement. This also needs to be addressed in read 3d, 4d. |