geant_gep/wsp3.for - view

Return to wsp3.for CVS log

Up to [HallC] / geant_gep

File: [HallC] / geant_gep / wsp3.for (download)
Revision: 1.1, Wed Feb 8 19:31:23 2006 UTC (18 years, 7 months ago) by brash
Branch: MAIN
CVS Tags: HEAD

Add kumac and fortran files for fitting of drift distance spectra.

	function wsp3(x)

	COMMON/PAWPAR/PAR(4)

	wsp3=par(1)/(1.0+exp((x-par(2))/par(3)))+par(4)*x

	end

Analyzer/Replay: Mark Jones, Documents: Stephen Wood