readsh.f File Reference

Functions/Subroutines
subroutine	READSH (lusct0, nsset, nchan, mgvn, stot, gutot, nstat, nscat, nesc, rr, ichl, lvchl, mvchl, evchl, sform0, iprnt0, iwrit0, ifail)

Function/Subroutine Documentation

READSH()

subroutine READSH	(		lusct0,
			nsset,
			nchan,
			mgvn,
		integer	stot,
		integer	gutot,
			nstat,
			nscat,
			nesc,
			rr,
		dimension(nchan)	ichl,
		dimension(nchan)	lvchl,
		dimension(nchan)	mvchl,
		dimension(nchan)	evchl,
		character(len=11)	sform0,
			iprnt0,
			iwrit0,
			ifail )