Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

GEFS download fixes #3349

Open
wants to merge 11 commits into
base: develop
Choose a base branch
from
Prev Previous commit
Next Next commit
clarify names
  • Loading branch information
infotroph authored Aug 5, 2024
commit 03fc21308d756a50fa585b642ce9c7a9c8df0e8b
6 changes: 3 additions & 3 deletions modules/data.atmosphere/R/GEFS_helper_functions.R
Original file line number Diff line number Diff line change
Expand Up @@ -193,9 +193,9 @@ process_gridded_noaa_download <- function(lat_list,
dlwrfsfc <- array(NA, dim = c(site_length, length(hours_char)))
dswrfsfc <- array(NA, dim = c(site_length, length(hours_char)))

ens_base <- if (ens_index == 1) { "gec" } else { "gep" }
ens_name <- stringr::str_pad(ens_index - 1, width = 2, pad = "0")
base_filename2 <- paste0(ens_base,ens_name,".t",cycle,"z.pgrb2a.0p50.f")
member_type <- if (ens_index == 1) { "gec" } else { "gep" } # "_c_ontrol", "_p_erturbed"
ens_idxname <- stringr::str_pad(ens_index - 1, width = 2, pad = "0")
base_filename2 <- paste0(member_type,ens_idxname,".t",cycle,"z.pgrb2a.0p50.f")

lats <- round(lat_list/.5)*.5
lons <- round(lon_list/.5)*.5
Comment on lines 200 to 201
Copy link
Member Author

@infotroph infotroph Aug 5, 2024

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Not for this PR, but: GEFS is now also available on a 0.25 degree grid. Would it be of interest to add support for that?

Expand Down
Loading