Changes between Initial Version and Version 1 of Ticket #748


Ignore:
Timestamp:
10/28/17 20:58:13 (7 years ago)
Author:
arango
Comment:

¥es, thank you. Renumbered the format labels and remove additional opening of the initial NetCDF file.

Legend:

Unmodified
Added
Removed
Modified
  • Ticket #748

    • Property ResolutionFixed
    • Property Status newclosed
  • Ticket #748 – Description

    initial v1  
     1There is a format number error in get_wetdry.F:
    12
     3{{{
     4      IF (INI(ng)%ncid.eq.-1) THEN
     5        CALL netcdf_open (ng, model, ncname, 1, INI(ng)%ncid)
     6        IF (FoundError(exit_flag, NoError, __LINE__,                    &
     7     &                 __FILE__)) THEN
     8          WRITE (stdout,50) TRIM(ncname)
     9          RETURN
     10        END IF
     11      END IF
     12}}}
     13Format label 50 is missing.
    214{{{
    315get_wetdry.f90(62): error #6052: This label has not been defined as a FORMAT label.   [50]