real function lossfit2(x)

	implicit none
	real x,offset,amp,tau,slope

	common /pawpar/ par(4)


	offset  = par(1)
	amp     = par(2)
	tau     = par(3)
	slope   = par(4)
c	offset  = 0.50
c	amp     = 0.0
c	tau     = .0360
c	slope   = 0.16

	lossfit2 = offset + (amp*exp(-x/tau)) + (slope*x)

	end