/******************************************************************************
/*** PROGRAM MAKE.PUMPAGE.CPL ***
/*****************************************************************************
/*COMO zlog.[DATE -FTAG]
DATE
TIME
/* Initial setup of files
&IF [EXISTS make.pumpage.check] &THEN DELETE make.pumpage.check
COPY wrdanskin>empty make.pumpage.check
&IF [EXISTS pumpage.array.lay1.1963-88wy] &THEN DELETE pumpage.array.lay1.1963-88wy
COPY wrdanskin>empty pumpage.array.lay1.1963-88wy
&IF [EXISTS pumpage.array.lay2.1963-88wy] &THEN DELETE pumpage.array.lay2.1963-88wy
COPY wrdanskin>empty pumpage.array.lay2.1963-88wy
&IF [EXISTS pumpage.array.lay1.1963wy] &THEN DELETE pumpage.array.lay1.1963wy
COPY wrdanskin>empty pumpage.array.lay1.1963wy
&IF [EXISTS pumpage.array.lay2.1963wy] &THEN DELETE pumpage.array.lay2.1963wy
COPY wrdanskin>empty pumpage.array.lay2.1963wy
&IF [EXISTS pumpage.array.lay1.1984wy] &THEN DELETE pumpage.array.lay1.1984wy
COPY wrdanskin>empty pumpage.array.lay1.1984wy
&IF [EXISTS pumpage.array.lay2.1984wy] &THEN DELETE pumpage.array.lay2.1984wy
COPY wrdanskin>empty pumpage.array.lay2.1984wy
&IF [EXISTS pumpage.array.lay1.1985wy] &THEN DELETE pumpage.array.lay1.1985wy
COPY wrdanskin>empty pumpage.array.lay1.1985wy
&IF [EXISTS pumpage.array.lay2.1985wy] &THEN DELETE pumpage.array.lay2.1985wy
COPY wrdanskin>empty pumpage.array.lay2.1985wy
&IF [EXISTS make.pumpage.totals] &THEN DELETE make.pumpage.totals
COPY wrdanskin>empty make.pumpage.totals
&IF [EXISTS make.pumpage.errors] &THEN DELETE make.pumpage.errors
COPY wrdanskin>empty make.pumpage.errors
FOPEN make.pumpage.in 5 1
FOPEN make.pumpage.check 6 2
FOPEN wrdanskin>owens>valleywide>model>transient.basic.pack 29 1
FOPEN pumpage.array.lay1.1963-88wy 30 2
FOPEN pumpage.array.lay2.1963-88wy 31 2
FOPEN pumpage.array.lay1.1963wy 32 2
FOPEN pumpage.array.lay2.1963wy 33 2
FOPEN pumpage.array.lay1.1984wy 34 2
FOPEN pumpage.array.lay2.1984wy 35 2
FOPEN pumpage.array.lay1.1985wy 36 2
FOPEN pumpage.array.lay2.1985wy 37 2
FOPEN master.pumpage.acft 40 1
/*FOPEN master.pumpage.sens.1963 40 1
/*FOPEN master.pumpage.pred 40 1
/*FOPEN master.pumpage.pred.10000 40 1
/*FOPEN master.pumpage.pred.max 40 1
/*FOPEN master.pumpage.pred.noe/m 40 1
/*FOPEN master.pumpage.pred.125 40 1
/*FOPEN master.pumpage.pred.75 40 1
/*FOPEN master.pumpage.pred.50 40 1
/*FOPEN master.pumpage.pred.25 40 1
/*FOPEN master.pumpage.pred.0 40 1
FOPEN make.pumpage.rates 41 1
FOPEN wrdanskin>owens>valleywide>model>model.ibound.lay1 51 1
FOPEN wrdanskin>owens>valleywide>model>model.ibound.lay2 52 1
FOPEN make.pumpage.totals 90 2
FOPEN make.pumpage.errors 95 2
/* Execute program
RESUME wrdanskin>owens>data>pumpage>make.pumpage
/* Close all files, delete some
CLOSE make.pumpage.in
CLOSE make.pumpage.check
DELETE make.pumpage.check
CLOSE wrdanskin>owens>valleywide>model>transient.basic.pack
CLOSE pumpage.array.lay1.1963-88wy
CLOSE pumpage.array.lay2.1963-88wy
CLOSE pumpage.array.lay1.1963wy
DELETE pumpage.array.lay1.1963wy
CLOSE pumpage.array.lay2.1963wy
DELETE pumpage.array.lay2.1963wy
CLOSE pumpage.array.lay1.1984wy
DELETE pumpage.array.lay1.1984wy
CLOSE pumpage.array.lay2.1984wy
DELETE pumpage.array.lay2.1984wy
CLOSE pumpage.array.lay1.1985wy
DELETE pumpage.array.lay1.1985wy
CLOSE pumpage.array.lay2.1985wy
DELETE pumpage.array.lay2.1985wy
CLOSE master.pumpage.acft
CLOSE master.pumpage.pred
CLOSE master.pumpage.pred.10000
CLOSE master.pumpage.pred.max
CLOSE master.pumpage.pred.noe/m
CLOSE master.pumpage.pred.125
CLOSE master.pumpage.pred.75
CLOSE master.pumpage.pred.50
CLOSE master.pumpage.pred.25
CLOSE master.pumpage.pred.0
CLOSE make.pumpage.rates
CLOSE wrdanskin>owens>valleywide>model>model.ibound.lay1
CLOSE wrdanskin>owens>valleywide>model>model.ibound.lay2
CLOSE make.pumpage.totals
CLOSE make.pumpage.errors
/* List errors
TYPE The following errors were found
SLIST make.pumpage.errors
/* Type finished message
TYPE Finished with make.pumpage
DATE
TIME
/*COMO -END
&RETURN