Bugfix in nested fields: replace nint with int to not get negative weights in interpolation

src/interpol_mod.f90

@@ -136,8 +136,8 @@ subroutine find_grid_indices(xt,yt)
     ! jy=int(ytn)
     ! nix=nint(xtn)
     ! njy=nint(ytn)
-    nix=max(min(nint(xtn),nxn(ngrid)-1),0)
-    njy=max(min(nint(ytn),nyn(ngrid)-1),0)
+    nix=max(min(int(xtn),nxn(ngrid)-1),0)
+    njy=max(min(int(ytn),nyn(ngrid)-1),0)
     ix=nix
     jy=njy
     ixp=ix+1

src/outgrid_mod.f90

@@ -273,8 +273,8 @@ subroutine outgrid_init
           if (ngrid.gt.0) then
             xtn=(xl-xln(ngrid))*xresoln(ngrid)
             ytn=(yl-yln(ngrid))*yresoln(ngrid)
-            ix=max(min(nint(xtn),nxn(ngrid)-1),0)
-            jy=max(min(nint(ytn),nyn(ngrid)-1),0)
+            ix=max(min(int(xtn),nxn(ngrid)-1),0)
+            jy=max(min(int(ytn),nyn(ngrid)-1),0)
             ! ix=int(xtn)
             ! jy=int(ytn)
             ddy=ytn-real(jy)