Nsamp; list(100)
fleets; c(1)
years; list(1938:2012)
cpar; c(2)
