Commit 38f23c70 authored by Sabine's avatar Sabine
Browse files

BUGFIX: indexing for input windfield corrected

parent c56da455
......@@ -343,7 +343,7 @@ subroutine gridcheck_ecmwf
endif
nxmin1=nx-1
nymin1=ny-1
if (xlon0.gt.180.) xlon0=xlon0-360.
if (xlon0.ge.180.) xlon0=xlon0-360.
xauxa=abs(yaux1+90.)
if (xglobal.and.xauxa.lt.0.001) then
sglobal=.true. ! field contains south pole
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment