modified prepfns to redirect to correct directories (had changed this in prepfunction.R for obs but not in model fns)