Update downloadGeodata.R

begin draft for WELD download