NAME
	object_program - get the program asociated with the object

SYNTAX
	program object_program(object o);

DESCRIPTION
	This function returns the program from which o was cloned.
	If o is not an object, or o was destructed zero is returned.

KEYWORDS
	object

SEE ALSO
	clone
