* target.inc * INTEGER JVERT REAL TGTPAR(3), BEAMPAR(4), targIntZ(20) COMMON /TARGET/ JVERT, TGTPAR, BEAMPAR, targIntZ