class
	TEST1

inherit
	SHARED_ANY

feature

	f is
		do
			print (any_once.twin)
			print ("%N")
		end

end