IMPORTANT: More robust logic in check_multifile.F

[arango]

Changed the logic in check_multifile.F to compute local variable Tfinal from:

!
!  Get final time string for simulation.
!
      IF (model.eq.iADM) THEN
        Tfinal=dstart*day2sec
      ELSE
        Tfinal=dstart*day2sec+ntimes(ng)*dt(ng)
      END IF
      CALL time_string (tfinal, F_code)

to

!
!  Get final time string for simulation.
!
      IF (model.eq.iADM) THEN
        Tfinal=time(ng)-ntimes(ng)*dt(ng)
      ELSE
        Tfinal=time(ng)+ntimes(ng)*dt(ng)
      END IF
      CALL time_string (tfinal, F_code)

The latest is more robust because it doesn't depend on the user manipulation of DSTART in ocean.in. Under certain conditions the checking of input files may fail in check_multifile.F.

Also, I added precise error reporting in the routine inquiry.F.

Many thanks to Julia Levin for bringing this to my attention.