test_name 	once-creation-procedures-creation-call
test_description Valid call to a once creation procedure as part of a creation call. 


copy_sub 	Ace $TEST Ace
copy_raw 	a.e $CLUSTER a.e
copy_raw 	b.e $CLUSTER b.e
copy_raw 	test.e $CLUSTER test.e

compile_melted
compile_result 	ok