# range of years
y0 <- 1960
y1 <- 2010

# lat lon frame
lat0 <-  40
lat1 <-  50
lon0 <-  -50
lon1 <-  -140
# tau = minimum days per month to accept data (+1)
#tau <- 72 # 80%
tau <- 20 # 50%

# common file for the station data
stn_da2.txt <- paste("ish-",y0,"-",y1,"-",tau,".txt",sep="")

ishwids=c(6,1,5,1,28,1,8,1,4,3,6,1,7,1,6,4,8,1,8)
ishcols=c("USAF","a","WBAN","b","STATION NAME","c","CCST","f","CALL","g","LAT","h","LON","i","ELEV","j","BEG","k","END")