Merge pull request #17 from adeckmyn/develop

Fix wind correction
harphub · Jan 23, 2024 · 9da2345 · 9da2345
2 parents 03ec7d7 + c9b6081
commit 9da2345
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: meteogrid
-Version: 3.9.3.9001
-Date: 2023-05-15
+Version: 3.9.3.9002
+Date: 2024-01-22
 Title: Gridded meteorological data
 Description: A toolbox for working with and viewing gridded (meteorological) data. 
 Author: Alex Deckmyn (Royal Meteorological Institute of Belgium) <[email protected]> 

diff --git a/R/geowind.R b/R/geowind.R
@@ -31,7 +31,7 @@ wind.dirspeed <- function(u, v,
     domain <- attr(u, "domain")
     if (is.null(domain)) stop("rotate_wind requires geodomain information!")
     ww <- geowind.init(domain)
-    wdir <- wdir + ww$angle
+    wdir <- wdir + ww$angle * 180./pi
 #    wspeed <- wspeed * ww$mapfactor
   }