function()
{
#program uninitialize()
#
#Clears the variables created by initialize(). This is simply
#for convenience of shorter listings from objects() when the
#arrays are not needed.
#
	rm(aa, dd, tt)	#
	rm(ages, durations, times)	#
#
	rm(xf, xm)	#
	rm(yf, ym)	#
	rm(zf, zm)	#
#
	rm(beta.y, beta.z)	#
	rm(sigma.f, sigma.m)	#
	rm(zeta)	#
	rm(mu.f, mu.m)	#
	rm(mu.fb, mu.mb)	#
	rm(upsilon.f, upsilon.m)
	rm(tau.f, tau.m)	#
	rm(phi.f, phi.m, iota.f, iota.m, kappa.f, kappa.m, theta.f, theta.m)	#
	rm(lamda.f, lamda.m)	#
	rm(alpha, alpha.b)	#
#
	rm(xdf, xdm)	#
	rm(xyf, xym)	#
	rm(yxf, yxm)	#
	rm(yzf, yzm)	#
	rm(ydf, ydm)	#
	rm(zdf, zdm)	#
	rm(zaf, zam)	#
#
	rm(ubf, ubm)	#
	rm(ubdf, ubdm)	#
#
	rm(ibf, ibm)	#
	rm(ibdf, ibdm)	#
	rm(ibaf, ibam)	#
#
	write.ascii(uninitialize)
	"All done"
}