added global to locations

SCRIPTS/1a_doDownloadSeas15.R

-rm(list=ls())
+# rm(list=ls())
 library(fields) # e.g: using the fields library
 library(abind)
 library(ncdf4)
 library(ecomsUDG.Raccess)
+library(rJava)
+library(loadeR.ECOMS)
 source(file = "./functions/infoGeneral.R")
 source(file = "./functions/functionsGeneral.R")
 source(file = "./functions/functionR2Netcdf.R")
@@ -28,10 +30,12 @@ if (submitscript) {
   targetYears  <-c(2009:2011)
   targetYears  <-c(1981:1982)
   leadMonths  <-c(0:1)
-  locName<-"GHA"
+  locName<-"Global"
+  # locName<-"GHA"
   # locName<-"EU"
   outPath <- "./testData/noBC/"
   outPath<-"./testData/newDownload"
+  outPath<-"./testData/newDownload2"
 }
 
 variables<-names(variableInfo)

SCRIPTS/functions/infoGeneral.R

 locationInfo <- list(
   res0.75 = list(
     GHA = list(lonmin = 27.75, lonmax = 49.50, latmin =-12.00, latmax = 18.00, longName = "Greater Horn of Africa"),
-    EU  = list(lonmin =-24.75, lonmax = 39.75, latmin = 33.00, latmax = 72.00, longName = "Europe")
+    EU  = list(lonmin =-24.75, lonmax = 39.75, latmin = 33.00, latmax = 72.00, longName = "Europe"),
+    WORLD = list(lonmin =-179.75, lonmax = 179.75, latmin = -89.75, latmax = 89.75, longName = "World")
   ),
   res0.50 = list(
     GHA = list(lonmin = 28.25, lonmax = 49.25, latmin =-11.75, latmax = 17.75, longName = "Greater Horn of Africa"),
-    EU  = list(lonmin =-24.25, lonmax = 39.75, latmin = 33.25, latmax = 71.75, longName = "Europe")
+    EU  = list(lonmin =-24.25, lonmax = 39.75, latmin = 33.25, latmax = 71.75, longName = "Europe"),
+    WORLD = list(lonmin =-179.75, lonmax = 179.75, latmin = -89.75, latmax = 89.75, longName = "World")
   )
 )