VERY IMPORTANT: missing argument to regrid call in nf_fread2d.F

[arango]

• The update made on ​src:ticket:803 missed the extra argument in routine nf_fread2d.F for state variables at U-points. We need to have instead:

           CASE (u2dvar, u3dvar)
             CALL regrid (ng, model, ncname, ncid, ncvname, ncvarid,     &
      &                   MyType, InterpFlag,                            &
      &                   Ilen, Jlen, wrk, Amin, Amax,                   &
      &                   LBi, UBi, LBj, UBj,                            &
      &                   Imin, Imax, Jmin, Jmax,                        &
      &                   GRID(ng) % MyLon,                              &
      &                   GRID(ng) % lonu,                               &
      &                   GRID(ng) % latu,                               &
      &                   A)
  

• Corrected typo in sediment_inp.h. We need to have Qout instead of Hout:

             CASE ('Qout(iMmass)')
               Npts=load_l(Nval, Cval, NCS, Ngrids, Lmud)
               DO ng=1,Ngrids
                 DO itrc=1,NCS
                   i=idBmas(itrc)
                   Qout(i,ng)=Lmud(itrc,ng)
                 END DO
               END DO
  

  Many thanks to Catherine Drinkorn for bringing this to our ​attention.

• Make sure that DIURNAL_SRFLUX is only available when SOLVE3D is activated in analytical.F.