accoul.for File Reference

Functions/Subroutines
subroutine	accoul (maxacc, maxown, nr, ownmon, curown, accr, ia, ownmax, iown, nrown1, cursa, actaf, resLoss, iresty1, icx, cresid1)

Function/Subroutine Documentation

accoul()

subroutine accoul	(		maxacc,
			maxown,
			nr,
		dimension(maxown)	ownmon,
		dimension(maxown)	curown,
		dimension(maxacc,maxown)	accr,
			ia,
		dimension(maxown)	ownmax,
			iown,
			nrown1,
			cursa,
			actaf,
			resLoss,
			iresty1,
			icx,
		character	cresid1
	)