/* punchvar.h */
#define	LIMPUN	100L

EXTERN struct t_pnunit {

	/* this is the file where we will direct the output */
	FILE*ipPnunit[LIMPUN]; 

	/* number of punch commands eneterd */
	long int npunch;

	/* punarg is set of optional arguments for the punch command */
	float punarg[3][LIMPUN];

	/* lg flag lgPunLstIter for this punch option, */
	/* do we only want to punch on last iteration? */
	int lgPunLstIter[LIMPUN];

	/* option to not close unit after finished - continuum on command line */
	int lgPunContinue[LIMPUN];

	/* option to say whether this is still open, for repeated call with cdGett */
	int lgUnitOpen[LIMPUN];

	/*chPunch - what is it we want to punch? set in GetPunch, used in DoPunch */
	char chPunch[LIMPUN][5];

	/*chConPunEnr - units of continuum in punch output */
	char chConPunEnr[LIMPUN][5];

	/* this is pointer for above */
	long int ipConPunEnr;

	}	pnunit;