class
	TEST1

feature

	f is
		do
			print (generating_type)
			print ("%N")
		end

	h (a_str: STRING) is
		do
			g
		end
	
	g is
		do
			print ("TEST1%N")
		end
end