/* ipdr.h */
EXTERN struct t_ipdr {
	/* these control punching choice of dr - this is not really a punch cmnd
	 * ipDRout is io unit, lgDROn says punching dr logic has been set,
	 * and lgDRPLst says to punch the last iteration */
	FILE * ipDRout;
	int lgDROn, 
	  lgDRPLst;
	}	ipdr;