mpimos_macro_expander:
	module		mpimos_macro_expander
	entry		create,1,create_1_0
	module_entry		mpimos_macro_expander
	predicate		create,1
create_1_0:
	execute		1,do_1_0
create_1_1:
	suspend		create_1_0
	module_entry		mpimos_macro_expander
	predicate		do,1
do_1_0:
	try_me_else		do_1_1
	jump_on_non_list_var_var		1,do_1_3,7,2
	wait_vector		7,5
	read_element		7,0,3
	wait_atom		3,expand
	read_elements_inc		7,1,3,4
	collect_list		1
	collect_vector		7
	create_goal		1
	set_value		1,2
	enqueue_goal		1,do_1_0
	create_goal		4
	set_variable		1,2
	set_values_dec		2,5,2
	set_value		4,6
	enqueue_goal		4,expand_goal_4_0
	put_value		1,3
	execute		2,convert_macro_arg_2_0
do_1_3:
	check_nil		1,do_1_1
	proceed
do_1_1:
	suspend		do_1_0
	module_entry		mpimos_macro_expander
	predicate		expand_goal,4
expand_goal_4_0:
	try_me_else		expand_goal_4_1
	vector		1
	jump_on_arity		1,4,expand_goal_4_1
	table_entry		expand_goal_4_1
	table_entry		expand_goal_4_1
	table_entry		expand_goal_4_3
	table_entry		expand_goal_4_4
expand_goal_4_3:
	read_element		1,0,5
	wait_atom		5,stat
	read_element		1,1,5
	put_reused_func		1,1,stat
	write_element_variable		1,1,6
	get_vector_value		2,1
	put_values_inc		1,5,2
	execute		4,expand_goal_4_0
expand_goal_4_4:
	read_element		1,0,5
	atom		5
	hash_on_atom		5,6,expand_goal_4_1
	bucket_entry_a		$:=,expand_goal_4_6
	bucket_entry_a		',',expand_goal_4_7
	bucket_entry_a		:=,expand_goal_4_8
	bucket_entry_a		;,expand_goal_4_9
	bucket_entry_a		=,expand_goal_4_10
	bucket_entry_a		'|',expand_goal_4_11
expand_goal_4_6:
	read_elements_inc		1,1,6,2
	put_value		8,2
	put_value		5,3
	put_value		9,4
	put_reused_func		2,1,unify
	write_element_value		2,1,6
	write_element_variable		2,2,4
	put_value		1,7
	put_value		3,8
	put_value		6,9
	execute		6,expand_float_expression_6_0
expand_goal_4_7:
	read_elements_inc		1,1,6,2
	put_reused_func		5,1,','
	write_element_variable		5,1,8
	write_element_variable		5,2,1
	get_vector_value		2,5
	create_goal		4
	set_value		1,7
	set_value		2,1
	set_variable		3,5
	set_value		4,4
	enqueue_goal		4,expand_goal_4_0
	put_value		1,6
	put_value		2,8
	put_value		4,5
	execute		4,expand_goal_4_0
expand_goal_4_8:
	read_elements_inc		1,1,6,2
	put_value		8,2
	put_value		5,3
	put_value		9,4
	put_reused_func		2,1,unify
	write_element_value		2,1,6
	write_element_variable		2,2,4
	put_value		1,7
	put_value		3,8
	put_value		6,9
	execute		6,expand_expression_6_0
expand_goal_4_9:
	read_elements_inc		1,1,6,2
	put_reused_func		5,1,;
	write_element_variable		5,1,8
	write_element_variable		5,2,1
	get_vector_value		2,5
	create_goal		4
	set_value		1,7
	set_value		2,1
	set_variable		3,5
	set_value		4,4
	enqueue_goal		4,expand_goal_4_0
	put_value		1,6
	put_value		2,8
	put_value		4,5
	execute		4,expand_goal_4_0
expand_goal_4_10:
	read_elements_inc		1,1,6,2
	put_reused_func		1,1,unify
	write_elements_inc		1,1,6,2
	get_vector_value		2,1
	get_value		4,3
	proceed
expand_goal_4_11:
	read_elements_inc		1,1,6,2
	try_me_else		expand_goal_4_12
	wait_atom		7,all
	put_reused_func		1,1,display_value
	write_element_variable		1,1,7
	write_element_marked_variable		1,2,5
	put_func		9,3,;
	write_element_variable		9,1,8
	write_element_value		9,2,1
	get_vector_value		2,9
	create_goal		4
	set_marked_value		1,6
	set_value		2,8
	set_values_inc		3,3,2
	enqueue_goal		4,expand_goal_4_0
	create_goal		2
	set_value		1,5
	set_value		2,7
	enqueue_goal		2,get_variable_name_2_0
	put_values_dec		1,6,2
	execute		2,get_all_variables_2_0
expand_goal_4_12:
	try_me_else		expand_goal_4_1
	put_atom		8,all
	g_diff		7,8
	put_reused_func		1,1,display_value
	write_element_variable		1,1,8
	write_element_marked_variable		1,2,5
	put_func		10,3,;
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		2,10
	create_goal		4
	set_value		1,6
	set_value		2,9
	set_values_inc		3,3,2
	enqueue_goal		4,expand_goal_4_0
	create_goal		2
	set_value		1,5
	set_value		2,8
	enqueue_goal		2,get_variable_name_2_0
	put_value		1,7
	put_value		2,5
	execute		2,term_to_list_2_0
expand_goal_4_1:
	otherwise		expand_goal_4_0
	get_value		2,1
	get_value		4,3
	proceed
expand_goal_4_21:
	suspend		expand_goal_4_0
	module_entry		mpimos_macro_expander
	predicate		expand_expression,6
expand_expression_6_0:
	try_me_else		expand_expression_6_1
	jump_on_non_integer		1,expand_expression_6_3
	get_value		4,1
	get_value		3,2
	get_value		6,5
	proceed
expand_expression_6_3:
	is_vector		1,expand_expression_6_1
	jump_on_arity		1,4,expand_expression_6_1
	table_entry		expand_expression_6_1
	table_entry		expand_expression_6_1
	table_entry		expand_expression_6_4
	table_entry		expand_expression_6_5
expand_expression_6_4:
	read_element		1,0,7
	atom		7
	hash_on_atom		7,4,expand_expression_6_1
	bucket_entry_a		-,expand_expression_6_7
	bucket_entry_a		\,expand_expression_6_8
	bucket_entry_a		abs,expand_expression_6_9
	bucket_entry_a		int,expand_expression_6_10
expand_expression_6_7:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,minus
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_8:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,complement
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_9:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,abs
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_10:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_to_integer
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_5:
	read_element		1,0,7
	atom		7
	hash_on_atom		7,13,expand_expression_6_1
	bucket_entry_a		'$VAR',expand_expression_6_12
	bucket_entry_a		*,expand_expression_6_13
	bucket_entry_a		+,expand_expression_6_14
	bucket_entry_a		-,expand_expression_6_15
	bucket_entry_a		/,expand_expression_6_16
	bucket_entry_a		/\,expand_expression_6_17
	bucket_entry_a		<<,expand_expression_6_18
	bucket_entry_a		>>,expand_expression_6_19
	bucket_entry_a		\/,expand_expression_6_20
	bucket_entry_a		max,expand_expression_6_21
	bucket_entry_a		min,expand_expression_6_22
	bucket_entry_a		mod,expand_expression_6_23
	bucket_entry_a		xor,expand_expression_6_24
expand_expression_6_12:
	read_elements_inc		1,1,8,2
	put_reused_func		1,1,'$VAR'
	write_elements_inc		1,1,8,2
	get_vector_value		4,1
	get_value		3,2
	get_value		6,5
	proceed
expand_expression_6_13:
	read_elements_inc		1,1,8,2
	put_func		7,4,multiply
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_14:
	read_elements_inc		1,1,8,2
	put_func		7,4,add
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_15:
	read_elements_inc		1,1,8,2
	put_func		7,4,subtract
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_16:
	read_elements_inc		1,1,8,2
	put_func		7,4,divide
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_17:
	read_elements_inc		1,1,8,2
	put_func		7,4,and
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_18:
	read_elements_inc		1,1,8,2
	put_func		7,4,shift_left
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_19:
	read_elements_inc		1,1,8,2
	put_func		7,4,shift_right
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_20:
	read_elements_inc		1,1,8,2
	put_func		7,4,or
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_21:
	read_elements_inc		1,1,8,2
	put_func		7,4,max
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_22:
	read_elements_inc		1,1,8,2
	put_func		7,4,min
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_23:
	read_elements_inc		1,1,8,2
	put_func		7,4,modulo
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_24:
	read_elements_inc		1,1,8,2
	put_func		7,4,exclusive_or
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_expression_6_1:
	otherwise		expand_expression_6_0
	get_value		4,1
	get_value		3,2
	get_value		6,5
	proceed
expand_expression_6_32:
	suspend		expand_expression_6_0
	module_entry		mpimos_macro_expander
	predicate		expand_float_expression,6
expand_float_expression_6_0:
	try_me_else		expand_float_expression_6_1
	jump_on_non_integer		1,expand_float_expression_6_3
	get_value		4,1
	get_value		3,2
	get_value		6,5
	proceed
expand_float_expression_6_3:
	is_vector		1,expand_float_expression_6_1
	jump_on_arity		1,4,expand_float_expression_6_1
	table_entry		expand_float_expression_6_1
	table_entry		expand_float_expression_6_1
	table_entry		expand_float_expression_6_4
	table_entry		expand_float_expression_6_5
expand_float_expression_6_4:
	read_element		1,0,7
	atom		7
	hash_on_atom		7,17,expand_float_expression_6_1
	bucket_entry_a		-,expand_float_expression_6_7
	bucket_entry_a		abs,expand_float_expression_6_8
	bucket_entry_a		acos,expand_float_expression_6_9
	bucket_entry_a		asin,expand_float_expression_6_10
	bucket_entry_a		atan,expand_float_expression_6_11
	bucket_entry_a		cos,expand_float_expression_6_12
	bucket_entry_a		cosh,expand_float_expression_6_13
	bucket_entry_a		exp,expand_float_expression_6_14
	bucket_entry_a		float,expand_float_expression_6_15
	bucket_entry_a		floor,expand_float_expression_6_16
	bucket_entry_a		ln,expand_float_expression_6_17
	bucket_entry_a		log,expand_float_expression_6_18
	bucket_entry_a		sin,expand_float_expression_6_19
	bucket_entry_a		sinh,expand_float_expression_6_20
	bucket_entry_a		sqrt,expand_float_expression_6_21
	bucket_entry_a		tan,expand_float_expression_6_22
	bucket_entry_a		tanh,expand_float_expression_6_23
expand_float_expression_6_7:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_minus
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_8:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_abs
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_9:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_acos
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_10:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_asin
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_11:
	read_element		1,1,11
	wait_vector		11,3
	read_element		11,0,8
	wait_atom		8,/
	read_elements_inc		11,1,8,2
	collect_vector		1
	put_func		1,4,floating_point_atan
	write_element_variable		1,1,7
	write_element_variable		1,2,10
	write_element_marked_value		1,3,4
	put_reused_func		12,11,','
	write_element_variable		12,1,11
	write_element_value		12,2,1
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_values_dec		3,11,2
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,7
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_12:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_cos
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_13:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_cosh
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_14:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_exp
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_15:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,integer_to_floating_point
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_16:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_floor
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_17:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_ln
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_18:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_log
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_19:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_sin
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_20:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_sinh
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_21:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_sqrt
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_22:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_tan
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_23:
	read_element		1,1,8
	collect_vector		1
	put_func		1,3,floating_point_tanh
	write_element_variable		1,1,7
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,8
	set_value		2,2
	set_value		3,9
	set_value		4,7
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_5:
	read_element		1,0,7
	atom		7
	hash_on_atom		7,8,expand_float_expression_6_1
	bucket_entry_a		'$VAR',expand_float_expression_6_25
	bucket_entry_a		*,expand_float_expression_6_26
	bucket_entry_a		**,expand_float_expression_6_27
	bucket_entry_a		+,expand_float_expression_6_28
	bucket_entry_a		-,expand_float_expression_6_29
	bucket_entry_a		/,expand_float_expression_6_30
	bucket_entry_a		max,expand_float_expression_6_31
	bucket_entry_a		min,expand_float_expression_6_32
expand_float_expression_6_25:
	read_elements_inc		1,1,8,2
	put_reused_func		1,1,'$VAR'
	write_elements_inc		1,1,8,2
	get_vector_value		4,1
	get_value		3,2
	get_value		6,5
	proceed
expand_float_expression_6_26:
	read_elements_inc		1,1,8,2
	put_func		7,4,floating_point_multiply
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_27:
	read_elements_inc		1,1,8,2
	put_func		7,4,floating_point_pow
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_28:
	read_elements_inc		1,1,8,2
	put_func		7,4,floating_point_add
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_29:
	read_elements_inc		1,1,8,2
	put_func		7,4,floating_point_subtract
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_30:
	read_elements_inc		1,1,8,2
	put_func		7,4,floating_point_divide
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_31:
	read_elements_inc		1,1,8,2
	put_func		7,4,floating_point_max
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_32:
	read_elements_inc		1,1,8,2
	put_func		7,4,floating_point_min
	write_element_variable		7,1,10
	write_element_variable		7,2,11
	write_element_marked_value		7,3,4
	put_reused_func		12,1,','
	write_element_variable		12,1,1
	write_element_value		12,2,7
	get_vector_value		3,12
	create_goal		6
	set_value		1,9
	set_variable		2,3
	set_value		3,1
	set_value		4,11
	set_variable		5,1
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	create_goal		6
	set_value		1,8
	set_values_inc		2,2,2
	set_value		4,10
	set_variable		5,3
	set_value		6,1
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_1:
	otherwise		expand_float_expression_6_0
	try_me_else		expand_float_expression_6_40
	wait_vector		1,2
	read_element		1,0,7
	wait_atom		7,atan
	read_element		1,1,7
	collect_vector		1
	put_func		1,3,floating_point_atan
	write_element_variable		1,1,8
	write_element_marked_value		1,2,4
	put_func		10,3,','
	write_element_variable		10,1,9
	write_element_value		10,2,1
	get_vector_value		3,10
	create_goal		6
	set_value		1,7
	set_value		2,2
	set_values_dec		3,9,2
	set_variable		5,3
	set_value		6,6
	enqueue_goal		6,expand_float_expression_6_0
	put_values_dec		1,5,2
	execute		3,new_variable_3_0
expand_float_expression_6_40:
	otherwise		expand_float_expression_6_0
	get_value		4,1
	get_value		3,2
	get_value		6,5
	proceed
expand_float_expression_6_45:
	suspend		expand_float_expression_6_0
	module_entry		mpimos_macro_expander
	predicate		convert_macro_arg,2
convert_macro_arg_2_0:
	try_me_else		convert_macro_arg_2_1
	wait		1
	switch_on_type		1,convert_macro_arg_2_2,convert_macro_arg_2_3,convert_macro_arg_2_4,convert_macro_arg_2_5,convert_macro_arg_2_6,convert_macro_arg_2_7
convert_macro_arg_2_4:
	read_car		1,3
	read_cdr		1,4
	put_reused_list		6,1
	write_car_variable		6,5
	write_cdr_variable		6,1
	get_list_value		2,6
	create_goal		2
	set_value		1,4
	set_value		2,1
	enqueue_goal		2,convert_macro_arg_2_0
	put_value		1,3
	put_value		2,5
	execute		2,convert_macro_arg_2_0
convert_macro_arg_2_2:
	get_value		2,1
	proceed
convert_macro_arg_2_3:
	get_value		2,1
	proceed
convert_macro_arg_2_5:
	jump_on_arity		1,4,convert_macro_arg_2_1
	table_entry		convert_macro_arg_2_1
	table_entry		convert_macro_arg_2_1
	table_entry		convert_macro_arg_2_8
	table_entry		convert_macro_arg_2_9
convert_macro_arg_2_8:
	read_element		1,0,3
	wait_atom		3,#
	read_element		1,1,5
	collect_vector		1
	create_goal		2
	set_variable		1,6
	set_value		2,2
	enqueue_goal		2,wait_macro_arg_2_0
	put_structured_constant		1,'$SCNST_0'
	put_void		2
	put_integer		3,1
	put_atom		4,none
	execute_external		kl1cmp_macro_arg,macro_arg,6
convert_macro_arg_2_9:
	read_element		1,0,3
	wait_atom		3,#
	read_elements_inc		1,1,4,2
	collect_vector		1
	create_goal		2
	set_variable		1,6
	set_value		2,2
	enqueue_goal		2,wait_macro_arg_2_0
	put_structured_constant		1,'$SCNST_1'
	put_void		2
	put_integer		3,1
	execute_external		kl1cmp_macro_arg,macro_arg,6
convert_macro_arg_2_6:
	get_value		2,1
	proceed
convert_macro_arg_2_7:
	is_float		1,convert_macro_arg_2_1
	get_value		2,1
	proceed
convert_macro_arg_2_1:
	otherwise		convert_macro_arg_2_0
	try_me_else		convert_macro_arg_2_12
	vector		1
	put_value		6,1
	g_vector		6,3
	put_value		5,2
	put_marked_value		1,3
	b_new_vector		4,1
	put_integer		1,0
	put_value		2,3
	put_value		3,6
	execute		5,convert_macro_arg_vect_5_0
convert_macro_arg_2_12:
	otherwise		convert_macro_arg_2_0
	get_value		2,1
	proceed
convert_macro_arg_2_16:
	suspend		convert_macro_arg_2_0
	module_entry		mpimos_macro_expander
	predicate		convert_macro_arg_vect,5
convert_macro_arg_vect_5_0:
	try_me_else		convert_macro_arg_vect_5_1
	integer		1
	integer		2
	g_less_than		1,2
	put_marked_value		6,1
	put_nil		7
	b_set_vector_element		3,6,3,7,6
	put_variable		7,8
	b_set_vector_element		4,1,4,7,7
	b_increment		1,1
	create_goal		5
	set_values_inc		1,1,2
	set_values_inc		3,6,2
	set_value		5,5
	enqueue_goal		5,convert_macro_arg_vect_5_0
	put_value		1,3
	put_value		2,8
	execute		2,convert_macro_arg_2_0
convert_macro_arg_vect_5_1:
	try_me_else		convert_macro_arg_vect_5_3
	wait_value		1,2
	collect_value		3
	collect_value		1
	collect_value		2
	get_value		5,4
	proceed
convert_macro_arg_vect_5_3:
	suspend		convert_macro_arg_vect_5_0
	module_entry		mpimos_macro_expander
	predicate		wait_macro_arg,2
wait_macro_arg_2_0:
	try_me_else		wait_macro_arg_2_1
	wait_vector		1,2
	read_element		1,0,3
	wait_atom		3,'$NOT_FOUND'
	read_element		1,1,3
	collect_vector		1
	get_value		2,3
	proceed
wait_macro_arg_2_1:
	otherwise		wait_macro_arg_2_0
	get_value		2,1
	proceed
wait_macro_arg_2_6:
	suspend		wait_macro_arg_2_0
	module_entry		mpimos_macro_expander
	predicate		get_all_variables,2
get_all_variables_2_0:
	put_value		3,2
	put_nil		2
	execute		3,get_all_variables_3_0
get_all_variables_2_1:
	suspend		get_all_variables_2_0
	module_entry		mpimos_macro_expander
	predicate		get_all_variables,3
get_all_variables_3_0:
	try_me_else		get_all_variables_3_1
	wait		1
	switch_on_type		1,get_all_variables_3_2,get_all_variables_3_3,get_all_variables_3_4,get_all_variables_3_5,get_all_variables_3_6,get_all_variables_3_7
get_all_variables_3_4:
	read_car		1,4
	read_cdr		1,5
	collect_list		1
	create_goal		3
	set_value		1,5
	set_variable		2,5
	set_value		3,3
	enqueue_goal		3,get_all_variables_3_0
	put_value		1,4
	put_value		3,5
	execute		3,get_all_variables_3_0
get_all_variables_3_2:
	get_value		3,2
	proceed
get_all_variables_3_3:
	get_value		3,2
	proceed
get_all_variables_3_5:
	test_arity		1,3,get_all_variables_3_1
	read_element		1,0,4
	wait_atom		4,'$VAR'
	read_elements_inc		1,1,4,2
	integer		4
	put_integer		6,0
	g_not_less_than		4,6
	string		5
	g_string		5,6,7
	wait_integer		7,8
	put_reused_func		1,1,'$VAR'
	write_elements_inc		1,1,4,2
	execute		3,add_to_list_3_0
get_all_variables_3_6:
	get_value		3,2
	proceed
get_all_variables_3_7:
	is_float		1,get_all_variables_3_1
	get_value		3,2
	proceed
get_all_variables_3_1:
	otherwise		get_all_variables_3_0
	try_me_else		get_all_variables_3_11
	vector		1
	put_value		6,1
	g_vector		6,4
	put_value		7,2
	put_value		5,3
	put_integer		1,0
	put_value		2,4
	put_values_inc		3,6,2
	execute		5,get_all_variables1_5_0
get_all_variables_3_11:
	suspend		get_all_variables_3_0
	module_entry		mpimos_macro_expander
	predicate		get_all_variables1,5
get_all_variables1_5_0:
	try_me_else		get_all_variables1_5_1
	integer		1
	integer		2
	g_less_than		1,2
	put_marked_value		6,1
	b_vector_element		3,6,3,6
	b_increment		1,1
	create_goal		5
	set_values_inc		1,1,2
	set_value		3,6
	set_variable		4,6
	set_value		5,5
	enqueue_goal		5,get_all_variables1_5_0
	put_values_inc		1,3,2
	put_value		3,6
	execute		3,get_all_variables_3_0
get_all_variables1_5_1:
	try_me_else		get_all_variables1_5_3
	wait_value		1,2
	collect_value		3
	collect_value		1
	collect_value		2
	get_value		5,4
	proceed
get_all_variables1_5_3:
	suspend		get_all_variables1_5_0
	module_entry		mpimos_macro_expander
	predicate		add_to_list,3
add_to_list_3_0:
	try_me_else		add_to_list_3_1
	wait_vector		1,3
	read_element		1,0,4
	wait_atom		4,'$VAR'
	read_elements_inc		1,1,4,2
	put_structured_constant		6,'$SCNST_2'
	wait		6
	wait_value		5,6
	integer		4
	put_integer		7,0
	g_not_less_than		4,7
	collect_value		5
	collect_value		6
	collect_vector		1
	get_value		3,2
	proceed
add_to_list_3_1:
	otherwise		add_to_list_3_0
	try_me_else		add_to_list_3_6
	jump_on_non_list_var_var		2,add_to_list_3_8,4,5
	try_me_else		add_to_list_3_9
	g_diff		1,4
	get_reused_list_val_var		3,2,2,4,4
	put_values_dec		2,5,2
	execute		3,add_to_list_3_0
add_to_list_3_9:
	try_me_else		add_to_list_3_6
	wait_value		1,4
	collect_value		4
	put_reused_list_val_val		2,2,1,5
	get_list_value		3,2
	proceed
add_to_list_3_8:
	check_nil		2,add_to_list_3_6
	put_list		2
	write_car_value		2,1
	write_cdr_nil		2
	get_list_value		3,2
	proceed
add_to_list_3_6:
	suspend		add_to_list_3_0
	module_entry		mpimos_macro_expander
	predicate		term_to_list,2
term_to_list_2_0:
	put_nil		3
	execute		3,term_to_list_3_0
term_to_list_2_1:
	suspend		term_to_list_2_0
	module_entry		mpimos_macro_expander
	predicate		term_to_list,3
term_to_list_3_0:
	try_me_else		term_to_list_3_1
	wait_vector		1,3
	read_element		1,0,4
	wait_atom		4,','
	read_elements_inc		1,1,4,2
	collect_vector		1
	create_goal		3
	set_value		1,5
	set_value		2,2
	set_variable		3,5
	enqueue_goal		3,term_to_list_3_0
	put_values_dec		1,4,2
	put_value		3,5
	execute		3,add_to_list_3_0
term_to_list_3_1:
	otherwise		term_to_list_3_0
	put_value		4,2
	put_values_inc		2,3,2
	execute		3,add_to_list_3_0
term_to_list_3_6:
	suspend		term_to_list_3_0
	module_entry		mpimos_macro_expander
	predicate		get_variable_name,2
get_variable_name_2_0:
	try_me_else		get_variable_name_2_1
	jump_on_non_list_var_var		1,get_variable_name_2_3,7,3
	wait_vector		7,3
	read_element		7,0,4
	wait_atom		4,'$VAR'
	read_elements_inc		7,1,4,2
	integer		4
	put_integer		6,0
	g_not_less_than		4,6
	string		5
	g_string		5,4,6
	collect_vector		7
	get_reused_list_val_var		2,1,1,5,4
	put_values_inc		1,3,2
	execute		2,get_variable_name_2_0
get_variable_name_2_3:
	check_nil		1,get_variable_name_2_1
	get_nil		2
	proceed
get_variable_name_2_1:
	otherwise		get_variable_name_2_0
	try_me_else		get_variable_name_2_8
	wait_list_var_var		1,3,4
	put_func		5,2,error
	write_element_value		5,1,3
	get_reused_list_val_var		2,1,1,5,3
	put_values_dec		1,4,2
	execute		2,get_variable_name_2_0
get_variable_name_2_8:
	suspend		get_variable_name_2_0
	module_entry		mpimos_macro_expander
	predicate		new_variable,3
new_variable_3_0:
	put_structured_constant		4,'$SCNST_3'
	put_variable		6,5
	b_append_string		4,6,4
	put_func		6,3,'$VAR'
	write_element_marked_value		6,1,1
	write_element_value		6,2,4
	get_vector_value		2,6
	b_increment		1,2
	get_value		3,2
	put_value		2,5
	execute_external		mpimos_utility,integer_to_string,2
new_variable_3_1:
	suspend		new_variable_3_0
	begin_const_section		mpimos_macro_expander
'$SCNST_0_0':
	define_desc		0,1
	define_integer		0
'$SCNST_1':
'$SCNST_0':
	define_vector		'$SCNST_0_0'
'$SCNST_2_0':
	define_desc		27,1
	define_integer		95
'$SCNST_3':
'$SCNST_2':
	define_string		'$SCNST_2_0'
