'$psi0_decl'/5:

	switch_on_term(0, $20, 'fail', 'fail', 'fail', 'fail', $19)

$19:
	switch_on_constant(0, 64, ['$default':'fail', 0:$1, 1:$2, 2:$3, 3:$4, 4:$5, 5:$6, 6:$7, 7:$8, 8:$9, 9:$10, 10:$11, 11:$12, 12:$13, 13:$14, 14:$15, 15:$16, 16:$17, 17:$18])

$20:
	try(5, $1)
	retry($2)
	retry($3)
	retry($4)
	retry($5)
	retry($6)
	retry($7)
	retry($8)
	retry($9)
	retry($10)
	retry($11)
	retry($12)
	retry($13)
	retry($14)
	retry($15)
	retry($16)
	retry($17)
	trust($18)

$1:
	get_integer(0, 0)
	get_constant('$failpt_to_catch', 1)
	get_constant('psi_failpt_to_catch', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('$failpt_to_catch')
	unify_constant('[]')
	proceed

$2:
	get_integer(1, 0)
	get_constant('$catch_to_failpt', 1)
	get_constant('psi_catch_to_failpt', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('$catch_to_failpt')
	unify_constant('[]')
	proceed

$3:
	get_integer(2, 0)
	get_constant('$clear_all_signals', 1)
	get_constant('psi_clear_all_signals', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('$clear_all_signals')
	unify_constant('[]')
	proceed

$4:
	get_integer(3, 0)
	get_constant('$psidelay_resume', 1)
	get_constant('psi_psidelay_resume', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('$psidelay_resume')
	unify_constant('[]')
	proceed

$5:
	get_integer(4, 0)
	get_constant('$compress_var_delays', 1)
	get_constant('psi_compress_var_delays', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('$compress_var_delays')
	unify_constant('[]')
	proceed

$6:
	get_integer(5, 0)
	get_constant('$retry_nfi_obvars', 1)
	get_constant('psi_retry_ov_delays', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('$retry_nfi_obvars')
	unify_constant('[]')
	proceed

$7:
	get_integer(6, 0)
	get_constant('fast_retry_delays', 1)
	get_constant('psi_retry_ov_eq_delays', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('fast_retry_delays')
	unify_constant('[]')
	proceed

$8:
	get_integer(7, 0)
	get_constant('thread_yield', 1)
	get_constant('psi_thread_yield', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('thread_yield')
	unify_constant('[]')
	proceed

$9:
	get_integer(8, 0)
	get_constant('thread_exit', 1)
	get_constant('psi_thread_exit', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('thread_exit')
	unify_constant('[]')
	proceed

$10:
	get_integer(9, 0)
	get_constant('thread_is_initial_thread', 1)
	get_constant('psi_thread_is_initial_thread', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('thread_is_initial_thread')
	unify_constant('[]')
	proceed

$11:
	get_integer(10, 0)
	get_constant('$signal_thread_exit', 1)
	get_constant('psi_signal_thread_exit', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('$signal_thread_exit')
	unify_constant('[]')
	proceed

$12:
	get_integer(11, 0)
	get_constant('gc', 1)
	get_constant('psi_gc', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('gc')
	unify_constant('[]')
	proceed

$13:
	get_integer(12, 0)
	get_constant('pedro_deregister', 1)
	get_constant('psi_pedro_deregister', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('pedro_deregister')
	unify_constant('[]')
	proceed

$14:
	get_integer(13, 0)
	get_constant('pedro_is_connected', 1)
	get_constant('psi_pedro_is_connected', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('pedro_is_connected')
	unify_constant('[]')
	proceed

$15:
	get_integer(14, 0)
	get_constant('pedro_is_registered', 1)
	get_constant('psi_pedro_is_registered', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('pedro_is_registered')
	unify_constant('[]')
	proceed

$16:
	get_integer(15, 0)
	get_constant('pedro_disconnect', 1)
	get_constant('psi_pedro_disconnect', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('pedro_disconnect')
	unify_constant('[]')
	proceed

$17:
	get_integer(16, 0)
	get_constant('$suspend_gc', 1)
	get_constant('psi_suspend_gc', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('$suspend_gc')
	unify_constant('[]')
	proceed

$18:
	get_integer(17, 0)
	get_constant('$unsuspend_gc', 1)
	get_constant('psi_unsuspend_gc', 2)
	get_constant('[]', 3)
	get_list(4)
	unify_constant('$unsuspend_gc')
	unify_constant('[]')
	proceed
end('$psi0_decl'/5):



'$psi1_decl'/6:

	switch_on_term(0, $120, 'fail', 'fail', 'fail', 'fail', $119)

$119:
	switch_on_constant(0, 256, ['$default':'fail', 0:$1, 1:$2, 2:$3, 3:$4, 4:$5, 5:$6, 6:$7, 7:$8, 8:$9, 9:$10, 10:$11, 11:$12, 12:$13, 13:$14, 14:$15, 15:$16, 16:$17, 17:$18, 18:$19, 19:$20, 20:$21, 21:$22, 22:$23, 23:$24, 24:$25, 25:$26, 26:$27, 27:$28, 28:$29, 29:$30, 30:$31, 31:$32, 32:$33, 33:$34, 34:$35, 35:$36, 36:$37, 37:$38, 38:$39, 39:$40, 40:$41, 41:$42, 42:$43, 43:$44, 44:$45, 45:$46, 46:$47, 47:$48, 48:$49, 49:$50, 50:$51, 51:$52, 52:$53, 53:$54, 54:$55, 55:$56, 56:$57, 57:$58, 58:$59, 59:$60, 60:$61, 61:$62, 62:$63, 63:$64, 64:$65, 65:$66, 66:$67, 67:$68, 68:$69, 69:$70, 70:$71, 71:$72, 72:$73, 73:$74, 74:$75, 75:$76, 76:$77, 77:$78, 78:$79, 79:$80, 80:$81, 81:$82, 82:$83, 83:$84, 84:$85, 85:$86, 86:$87, 87:$88, 88:$89, 89:$90, 90:$91, 91:$92, 92:$93, 93:$94, 94:$95, 95:$96, 96:$97, 97:$98, 98:$99, 99:$100, 100:$101, 101:$102, 102:$103, 103:$104, 104:$105, 105:$106, 106:$107, 107:$108, 108:$109, 109:$110, 110:$111, 111:$112, 112:$113, 113:$114, 114:$115, 115:$116, 116:$117, 117:$118])

$120:
	try(6, $1)
	retry($2)
	retry($3)
	retry($4)
	retry($5)
	retry($6)
	retry($7)
	retry($8)
	retry($9)
	retry($10)
	retry($11)
	retry($12)
	retry($13)
	retry($14)
	retry($15)
	retry($16)
	retry($17)
	retry($18)
	retry($19)
	retry($20)
	retry($21)
	retry($22)
	retry($23)
	retry($24)
	retry($25)
	retry($26)
	retry($27)
	retry($28)
	retry($29)
	retry($30)
	retry($31)
	retry($32)
	retry($33)
	retry($34)
	retry($35)
	retry($36)
	retry($37)
	retry($38)
	retry($39)
	retry($40)
	retry($41)
	retry($42)
	retry($43)
	retry($44)
	retry($45)
	retry($46)
	retry($47)
	retry($48)
	retry($49)
	retry($50)
	retry($51)
	retry($52)
	retry($53)
	retry($54)
	retry($55)
	retry($56)
	retry($57)
	retry($58)
	retry($59)
	retry($60)
	retry($61)
	retry($62)
	retry($63)
	retry($64)
	retry($65)
	retry($66)
	retry($67)
	retry($68)
	retry($69)
	retry($70)
	retry($71)
	retry($72)
	retry($73)
	retry($74)
	retry($75)
	retry($76)
	retry($77)
	retry($78)
	retry($79)
	retry($80)
	retry($81)
	retry($82)
	retry($83)
	retry($84)
	retry($85)
	retry($86)
	retry($87)
	retry($88)
	retry($89)
	retry($90)
	retry($91)
	retry($92)
	retry($93)
	retry($94)
	retry($95)
	retry($96)
	retry($97)
	retry($98)
	retry($99)
	retry($100)
	retry($101)
	retry($102)
	retry($103)
	retry($104)
	retry($105)
	retry($106)
	retry($107)
	retry($108)
	retry($109)
	retry($110)
	retry($111)
	retry($112)
	retry($113)
	retry($114)
	retry($115)
	retry($116)
	retry($117)
	trust($118)

$1:
	get_integer(0, 0)
	get_constant('psi_compound', 3)
	get_structure('compound', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('compound', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$2:
	get_integer(1, 0)
	get_constant('psi_var', 3)
	get_structure('var', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('var', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$3:
	get_integer(2, 0)
	get_constant('psi_atom', 3)
	get_structure('atom', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('atom', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$4:
	get_integer(3, 0)
	get_constant('psi_integer', 3)
	get_structure('integer', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('integer', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$5:
	get_integer(4, 0)
	get_constant('psi_object_variable', 3)
	get_structure('obvar', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('obvar', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$6:
	get_integer(5, 0)
	get_constant('psi_quant', 3)
	get_structure('quant', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('quant', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$7:
	get_integer(6, 0)
	get_constant('psi_sub', 3)
	get_structure('sub', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('sub', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$8:
	get_integer(7, 0)
	get_constant('psi_get_level', 3)
	get_structure('$get_level', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_level', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$9:
	get_integer(8, 0)
	get_constant('psi_delayneckcut', 3)
	get_structure('$delayneckcut', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$delayneckcut', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('integer')
	proceed

$10:
	get_integer(9, 0)
	get_constant('psi_cut', 3)
	get_structure('$cut', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$cut', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('integer')
	proceed

$11:
	get_integer(10, 0)
	get_constant('psi_get_qplibpath', 3)
	get_structure('$get_qplibpath', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_qplibpath', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('atom')
	proceed

$12:
	get_integer(11, 0)
	get_constant('psi_get_args', 3)
	get_structure('get_args', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('get_args', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('atom')
	proceed

$13:
	get_integer(12, 0)
	get_constant('psi_retract', 3)
	get_structure('$psi_retract', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$psi_retract', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('integer')
	proceed

$14:
	get_integer(13, 0)
	get_constant('psi_save', 3)
	get_structure('$save', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$save', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('atom')
	proceed

$15:
	get_integer(14, 0)
	get_constant('psi_restore', 3)
	get_structure('$restore', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$restore', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('atom')
	proceed

$16:
	get_integer(15, 0)
	get_constant('psi_cputime', 3)
	get_structure('$cputime', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$cputime', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$17:
	get_integer(16, 0)
	get_constant('psi_stat_memory', 3)
	get_structure('$stat_memory', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_memory', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$18:
	get_integer(17, 0)
	get_constant('psi_stat_program', 3)
	get_structure('$stat_program', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_program', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$19:
	get_integer(18, 0)
	get_constant('psi_empty_sub', 3)
	get_structure('$empty_sub', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('empty_sub', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('term')
	proceed

$20:
	get_integer(19, 0)
	get_constant('psi_call_predicate0', 3)
	get_structure('$call_predicate0', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$call_predicate0', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('nonvar')
	proceed

$21:
	get_integer(20, 0)
	get_constant('psi_code_top', 3)
	get_structure('$code_top', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$code_top', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$22:
	get_integer(21, 0)
	get_constant('psi_get_catch', 3)
	get_structure('$get_catch', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_catch', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('goal')
	proceed

$23:
	get_integer(22, 0)
	get_constant('psi_set_catch', 3)
	get_structure('$set_catch', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$set_catch', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('goal')
	proceed

$24:
	get_integer(23, 0)
	get_constant('psi_psi_resume', 3)
	get_structure('$psi_resume', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$psi_resume', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('state')
	proceed

$25:
	get_integer(24, 0)
	get_constant('psi_random_int', 3)
	get_structure('irandom', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('irandom', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$26:
	get_integer(25, 0)
	get_constant('psi_clear_signal', 3)
	get_structure('$clear_signal', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$clear_signal', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('integer')
	proceed

$27:
	get_integer(26, 0)
	get_constant('psi_default_signal_handler', 3)
	get_structure('$default_signal_handler', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$default_signal_handler', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('integer')
	proceed

$28:
	get_integer(27, 0)
	get_constant('psi_current_input', 3)
	get_structure('current_input', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('current_input', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('stream')
	proceed

$29:
	get_integer(28, 0)
	get_constant('psi_current_output', 3)
	get_structure('current_output', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('current_output', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('stream')
	proceed

$30:
	get_integer(29, 0)
	get_constant('psi_set_input', 3)
	get_structure('$set_input', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('set_input', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('stream')
	proceed

$31:
	get_integer(30, 0)
	get_constant('psi_set_output', 3)
	get_structure('$set_output', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('set_output', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('stream')
	proceed

$32:
	get_integer(31, 0)
	get_constant('psi_flush_output', 3)
	get_structure('flush_output', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('flush_output', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('stream')
	proceed

$33:
	get_integer(32, 0)
	get_constant('psi_at_end_of_stream', 3)
	get_structure('at_end_of_stream', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('at_end_of_stream', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('stream')
	proceed

$34:
	get_integer(33, 0)
	get_constant('psi_past_end_of_stream', 3)
	get_structure('past_end_of_stream', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('past_end_of_stream', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('stream')
	proceed

$35:
	get_integer(34, 0)
	get_constant('psi_reset_stream', 3)
	get_structure('$reset_stream', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$reset_stream', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('stream')
	proceed

$36:
	get_integer(35, 0)
	get_constant('psi_local_object_variable', 3)
	get_structure('$local_obvar', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$local_obvar', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('term')
	proceed

$37:
	get_integer(36, 0)
	get_constant('psi_new_object_variable', 3)
	get_structure('$new_obvar', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$new_obvar', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('term')
	proceed

$38:
	get_integer(37, 0)
	get_constant('psi_valid_object_variable_prefix', 3)
	get_structure('$valid_obvar_prefix', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$valid_obvar_prefix', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('atom')
	proceed

$39:
	get_integer(38, 0)
	get_constant('psi_set_trace_level', 3)
	get_structure('$set_trace_level', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$set_trace_level', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('integer')
	proceed

$40:
	get_integer(39, 0)
	get_constant('psi_freeze_var', 3)
	get_structure('freeze_var', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('freeze_var', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('term')
	proceed

$41:
	get_integer(40, 0)
	get_constant('psi_thaw_var', 3)
	get_structure('thaw_var', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thaw_var', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('term')
	proceed

$42:
	get_integer(41, 0)
	get_constant('psi_frozen_var', 3)
	get_structure('frozen_var', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('frozen_var', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$43:
	get_integer(42, 0)
	get_constant('psi_thawed_var', 3)
	get_structure('thawed_var', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thawed_var', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$44:
	get_integer(43, 0)
	get_constant('psi_atomic', 3)
	get_structure('atomic', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('atomic', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$45:
	get_integer(44, 0)
	get_constant('psi_any_variable', 3)
	get_structure('any_variable', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('any_variable', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$46:
	get_integer(45, 0)
	get_constant('psi_simple', 3)
	get_structure('simple', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('simple', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$47:
	get_integer(46, 0)
	get_constant('psi_nonvar', 3)
	get_structure('nonvar', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('nonvar', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$48:
	get_integer(47, 0)
	get_constant('psi_std_var', 3)
	get_structure('std_var', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('std_var', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$49:
	get_integer(48, 0)
	get_constant('psi_std_nonvar', 3)
	get_structure('std_nonvar', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('std_nonvar', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$50:
	get_integer(49, 0)
	get_constant('psi_std_compound', 3)
	get_structure('std_compound', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('std_compound', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$51:
	get_integer(50, 0)
	get_constant('psi_list', 3)
	get_structure('list', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('list', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$52:
	get_integer(51, 0)
	get_constant('psi_freeze_term', 3)
	get_structure('freeze_term', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('freeze_term', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('term')
	proceed

$53:
	get_integer(52, 0)
	get_constant('psi_thaw_term', 3)
	get_structure('thaw_term', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thaw_term', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('term')
	proceed

$54:
	get_integer(53, 0)
	get_constant('psi_name_vars', 3)
	get_structure('name_vars', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('name_vars', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('term')
	proceed

$55:
	get_integer(54, 0)
	get_constant('psi_ip_array_clear', 3)
	get_structure('ip_array_clear', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('ip_array_clear', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('atom')
	proceed

$56:
	get_integer(55, 0)
	get_constant('psi_ipc_commit', 3)
	get_structure('$ipc_commit', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$ipc_commit', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('ipc_ref')
	proceed

$57:
	get_integer(56, 0)
	get_constant('psi_tcp_listen', 3)
	get_structure('tcp_listen', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_listen', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('stream')
	proceed

$58:
	get_integer(57, 0)
	get_constant('psi_tcp_checkconn', 3)
	get_structure('tcp_checkconn', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_checkconn', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('stream')
	proceed

$59:
	get_integer(58, 0)
	get_constant('psi_tcp_close', 3)
	get_structure('tcp_close', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_close', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('stream')
	proceed

$60:
	get_integer(59, 0)
	get_constant('psi_realtime', 3)
	get_structure('realtime', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('realtime', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$61:
	get_integer(60, 0)
	get_constant('psi_single_sub', 3)
	get_structure('$single_sub', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$single_sub', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('term')
	proceed

$62:
	get_integer(61, 0)
	get_constant('psi_tcp_is_socket', 3)
	get_structure('tcp_is_socket', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_is_socket', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('stream')
	proceed

$63:
	get_integer(62, 0)
	get_constant('psi_process_pid', 3)
	get_structure('process_pid', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('process_pid', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$64:
	get_integer(63, 0)
	get_constant('psi_thread_set_symbol', 3)
	get_structure('thread_set_symbol', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_set_symbol', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('atom')
	proceed

$65:
	get_integer(64, 0)
	get_constant('psi_thread_goal', 3)
	get_structure('thread_goal', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_goal', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('goal')
	proceed

$66:
	get_integer(65, 0)
	get_constant('psi_thread_is_thread', 3)
	get_structure('thread_is_thread', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_is_thread', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('thread_id')
	proceed

$67:
	get_integer(66, 0)
	get_constant('psi_thread_is_runnable', 3)
	get_structure('thread_is_runnable', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_is_runnable', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('thread_id')
	proceed

$68:
	get_integer(67, 0)
	get_constant('psi_thread_is_suspended', 3)
	get_structure('thread_is_suspended', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_is_suspended', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('thread_id')
	proceed

$69:
	get_integer(68, 0)
	get_constant('psi_thread_tid', 3)
	get_structure('$thread_tid', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$thread_tid', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$70:
	get_integer(69, 0)
	get_constant('psi_thread_suspend', 3)
	get_structure('thread_suspend', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_suspend', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('thread_id')
	proceed

$71:
	get_integer(70, 0)
	get_constant('psi_thread_resume', 3)
	get_structure('thread_resume', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_resume', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('thread_id')
	proceed

$72:
	get_integer(71, 0)
	get_constant('psi_thread_wait_timeout', 3)
	get_structure('$thread_wait_timeout', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$thread_wait_timeout', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('number')
	proceed

$73:
	get_integer(72, 0)
	get_constant('psi_thread_defaults', 3)
	get_structure('$thread_defaults', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_defaults', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('thread_defaults')
	proceed

$74:
	get_integer(73, 0)
	get_constant('psi_thread_set_defaults', 3)
	get_structure('$thread_set_defaults', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_set_defaults', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('thread_defaults')
	proceed

$75:
	get_integer(74, 0)
	get_constant('psi_chdir', 3)
	get_structure('chdir', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('chdir', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('atom')
	proceed

$76:
	get_integer(75, 0)
	get_constant('psi_getcwd', 3)
	get_structure('getcwd', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('getcwd', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('atom')
	proceed

$77:
	get_integer(76, 0)
	get_constant('psi_nsig', 3)
	get_structure('nsig', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('nsig', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$78:
	get_integer(77, 0)
	get_constant('psi_thread_errno', 3)
	get_structure('thread_errno', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_errno', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$79:
	get_integer(78, 0)
	get_constant('psi_set_trace_flag', 3)
	get_structure('set_trace_flag', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('set_trace_flag', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('trace_flag')
	proceed

$80:
	get_integer(79, 0)
	get_constant('psi_clear_trace_flag', 3)
	get_structure('clear_trace_flag', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('clear_trace_flag', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('trace_flag')
	proceed

$81:
	get_integer(80, 0)
	get_constant('psi_test_trace_flag', 3)
	get_structure('test_trace_flag', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('test_trace_flag', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('trace_flag')
	proceed

$82:
	get_integer(81, 0)
	get_constant('psi_tcp_connect2', 3)
	get_structure('$tcp_connect2', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$tcp_connect2', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('socket')
	proceed

$83:
	get_integer(82, 0)
	get_constant('psi_stdin', 3)
	get_structure('stdin', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('stdin', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('stream')
	proceed

$84:
	get_integer(83, 0)
	get_constant('psi_stdout', 3)
	get_structure('stdout', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('stdout', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('stream')
	proceed

$85:
	get_integer(84, 0)
	get_constant('psi_stderr', 3)
	get_structure('stderr', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('stderr', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('stream')
	proceed

$86:
	get_integer(85, 0)
	get_constant('psi_float', 3)
	get_structure('float', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('float', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$87:
	get_integer(86, 0)
	get_constant('psi_srandom', 3)
	get_structure('srandom', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('srandom', 1, 0)
	unify_x_ref(0)
	get_structure('?', 1, 0)
	unify_constant('integer')
	proceed

$88:
	get_integer(87, 0)
	get_constant('psi_pedro_notify', 3)
	get_structure('$pedro_notify', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$pedro_notify', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$89:
	get_integer(88, 0)
	get_constant('psi_process_symbol', 3)
	get_structure('process_symbol', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('process_symbol', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('atom')
	proceed

$90:
	get_integer(89, 0)
	get_constant('psi_pedro_register', 3)
	get_structure('$pedro_register', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('pedro_register', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('atom')
	proceed

$91:
	get_integer(90, 0)
	get_constant('psi_thread_handle', 3)
	get_structure('thread_handle', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_handle', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('handle')
	proceed

$92:
	get_integer(91, 0)
	get_constant('psi_alloc_buffer', 3)
	get_structure('$alloc_buffer', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$alloc_buffer', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$93:
	get_integer(92, 0)
	get_constant('psi_dealloc_buffer', 3)
	get_structure('$dealloc_buffer', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$dealloc_buffer', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('integer')
	proceed

$94:
	get_integer(93, 0)
	get_constant('psi_debug_write', 3)
	get_structure('$debug_write', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$debug_write', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$95:
	get_integer(94, 0)
	get_constant('psi_addExtraInfoToVars', 3)
	get_structure('$addExtraInfoToVars', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$addExtraInfoToVars', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$96:
	get_integer(95, 0)
	get_constant('psi_reset_std_stream', 3)
	get_structure('$reset_std_stream', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('reset_std_stream', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('integer')
	proceed

$97:
	get_integer(96, 0)
	get_constant('psi_current_threads', 3)
	get_structure('current_threads', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('current_threads', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('integer')
	proceed

$98:
	get_integer(97, 0)
	get_constant('psi_thread_exit', 3)
	get_structure('thread_exit', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_exit', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('atom')
	proceed

$99:
	get_integer(98, 0)
	get_constant('psi_pedro_address', 3)
	get_structure('pedro_address', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('pedro_address', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('atom')
	proceed

$100:
	get_integer(99, 0)
	get_constant('psi_pedro_port', 3)
	get_structure('pedro_port', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('pedro_port', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('integer')
	proceed

$101:
	get_integer(100, 0)
	get_constant('psi_bound', 3)
	get_structure('bound', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('bound', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$102:
	get_integer(101, 0)
	get_constant('psi_make_iterator', 3)
	get_structure('$psi_make_iterator', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$psi_make_iterator', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('ipc_ref')
	proceed

$103:
	get_integer(102, 0)
	get_constant('psi_set_autoflush', 3)
	get_structure('set_autoflush', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('set_autoflush', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('stream')
	proceed

$104:
	get_integer(103, 0)
	get_constant('psi_get_open_streams', 3)
	get_structure('get_open_streams', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('get_open_streams', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('stream')
	proceed

$105:
	get_integer(104, 0)
	get_constant('psi_broadcast', 3)
	get_structure('$broadcast', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('broadcast', 1, 0)
	unify_x_ref(0)
	get_structure('+', 1, 0)
	unify_constant('term')
	proceed

$106:
	get_integer(105, 0)
	get_constant('psi_random_float', 3)
	get_structure('random', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('random', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('double')
	proceed

$107:
	get_integer(106, 0)
	get_constant('psi_initial_goal', 3)
	get_structure('$initial_goal', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$initial_goal', 1, 0)
	unify_x_ref(0)
	get_structure('?', 1, 0)
	unify_constant('string')
	proceed

$108:
	get_integer(107, 0)
	get_constant('psi_make_cleanup_cp', 3)
	get_structure('$make_cleanup_cp', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$make_cleanup_cp', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('number')
	proceed

$109:
	get_integer(108, 0)
	get_constant('psi_string', 3)
	get_structure('string', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('string', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$110:
	get_integer(109, 0)
	get_constant('psi_thread_wait_free_ptr', 3)
	get_structure('$thread_wait_free_ptr', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$thread_wait_free_ptr', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$111:
	get_integer(110, 0)
	get_constant('psi_thread_wait_ptr', 3)
	get_structure('$thread_wait_ptr', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$thread_wait_ptr', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$112:
	get_integer(111, 0)
	get_constant('psi_thread_wait_update', 3)
	get_structure('$thread_wait_update', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$thread_wait_update', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('term')
	proceed

$113:
	get_integer(112, 0)
	get_constant('psi_delete_timer', 3)
	get_structure('delete_timer', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('delete_timer', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('int')
	proceed

$114:
	get_integer(113, 0)
	get_constant('psi_gettimeofday', 3)
	get_structure('gettimeofday', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('gettimeofday', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('double')
	proceed

$115:
	get_integer(114, 0)
	get_constant('psi_schedule_threads_now', 3)
	get_structure('$schedule_threads_now', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('schedule_threads_now', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('atom')
	proceed

$116:
	get_integer(115, 0)
	get_constant('psi_set_default_message_thread', 3)
	get_structure('set_default_message_thread', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('set_default_message_thread', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('atom')
	proceed

$117:
	get_integer(116, 0)
	get_constant('psi_default_message_thread', 3)
	get_structure('default_message_thread', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('out')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('default_message_thread', 1, 0)
	unify_x_ref(0)
	get_structure('-', 1, 0)
	unify_constant('atom')
	proceed

$118:
	get_integer(117, 0)
	get_constant('psi_is_ready', 3)
	get_structure('$is_ready', 1, 1)
	unify_x_variable(0)
	get_x_value(0, 2)
	get_list(4)
	unify_constant('in')
	unify_constant('[]')
	get_list(5)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$is_ready', 1, 0)
	unify_x_ref(0)
	get_structure('@', 1, 0)
	unify_constant('steam')
	proceed
end('$psi1_decl'/6):



'$psi2_decl'/7:

	switch_on_term(0, $141, 'fail', 'fail', 'fail', 'fail', $140)

$140:
	switch_on_constant(0, 512, ['$default':'fail', 0:$1, 1:$2, 2:$3, 3:$4, 4:$5, 5:$6, 6:$7, 7:$8, 8:$9, 9:$10, 10:$11, 11:$12, 12:$13, 13:$14, 14:$15, 15:$16, 16:$17, 17:$18, 18:$19, 19:$20, 20:$21, 21:$22, 22:$23, 23:$24, 24:$25, 25:$26, 26:$27, 27:$28, 28:$29, 29:$30, 30:$31, 31:$32, 32:$33, 33:$34, 34:$35, 35:$36, 36:$37, 37:$38, 38:$39, 39:$40, 40:$41, 41:$42, 42:$43, 43:$44, 44:$45, 45:$46, 46:$47, 47:$48, 48:$49, 49:$50, 50:$51, 51:$52, 52:$53, 53:$54, 54:$55, 55:$56, 56:$57, 57:$58, 58:$59, 59:$60, 60:$61, 61:$62, 62:$63, 63:$64, 64:$65, 65:$66, 66:$67, 67:$68, 68:$69, 69:$70, 70:$71, 71:$72, 72:$73, 73:$74, 74:$75, 75:$76, 76:$77, 77:$78, 78:$79, 79:$80, 80:$81, 81:$82, 82:$83, 83:$84, 84:$85, 85:$86, 86:$87, 87:$88, 88:$89, 89:$90, 90:$91, 91:$92, 92:$93, 93:$94, 94:$95, 95:$96, 96:$97, 97:$98, 98:$99, 99:$100, 100:$101, 101:$102, 102:$103, 103:$104, 104:$105, 105:$106, 106:$107, 107:$108, 108:$109, 109:$110, 110:$111, 111:$112, 112:$113, 113:$114, 114:$115, 115:$116, 116:$117, 117:$118, 118:$119, 119:$120, 120:$121, 121:$122, 122:$123, 123:$124, 124:$125, 125:$126, 126:$127, 127:$128, 128:$129, 129:$130, 130:$131, 131:$132, 132:$133, 133:$134, 134:$135, 135:$136, 136:$137, 137:$138, 138:$139])

$141:
	try(7, $1)
	retry($2)
	retry($3)
	retry($4)
	retry($5)
	retry($6)
	retry($7)
	retry($8)
	retry($9)
	retry($10)
	retry($11)
	retry($12)
	retry($13)
	retry($14)
	retry($15)
	retry($16)
	retry($17)
	retry($18)
	retry($19)
	retry($20)
	retry($21)
	retry($22)
	retry($23)
	retry($24)
	retry($25)
	retry($26)
	retry($27)
	retry($28)
	retry($29)
	retry($30)
	retry($31)
	retry($32)
	retry($33)
	retry($34)
	retry($35)
	retry($36)
	retry($37)
	retry($38)
	retry($39)
	retry($40)
	retry($41)
	retry($42)
	retry($43)
	retry($44)
	retry($45)
	retry($46)
	retry($47)
	retry($48)
	retry($49)
	retry($50)
	retry($51)
	retry($52)
	retry($53)
	retry($54)
	retry($55)
	retry($56)
	retry($57)
	retry($58)
	retry($59)
	retry($60)
	retry($61)
	retry($62)
	retry($63)
	retry($64)
	retry($65)
	retry($66)
	retry($67)
	retry($68)
	retry($69)
	retry($70)
	retry($71)
	retry($72)
	retry($73)
	retry($74)
	retry($75)
	retry($76)
	retry($77)
	retry($78)
	retry($79)
	retry($80)
	retry($81)
	retry($82)
	retry($83)
	retry($84)
	retry($85)
	retry($86)
	retry($87)
	retry($88)
	retry($89)
	retry($90)
	retry($91)
	retry($92)
	retry($93)
	retry($94)
	retry($95)
	retry($96)
	retry($97)
	retry($98)
	retry($99)
	retry($100)
	retry($101)
	retry($102)
	retry($103)
	retry($104)
	retry($105)
	retry($106)
	retry($107)
	retry($108)
	retry($109)
	retry($110)
	retry($111)
	retry($112)
	retry($113)
	retry($114)
	retry($115)
	retry($116)
	retry($117)
	retry($118)
	retry($119)
	retry($120)
	retry($121)
	retry($122)
	retry($123)
	retry($124)
	retry($125)
	retry($126)
	retry($127)
	retry($128)
	retry($129)
	retry($130)
	retry($131)
	retry($132)
	retry($133)
	retry($134)
	retry($135)
	retry($136)
	retry($137)
	retry($138)
	trust($139)

$1:
	get_integer(0, 0)
	get_constant('psi_is', 4)
	get_structure('is', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('is', 2, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	get_structure('?', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 2)
	unify_constant('gcomp')
	get_list(1)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('is', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('?', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 1)
	unify_constant('integer')
	proceed

$2:
	get_integer(1, 0)
	get_constant('psi_less', 4)
	get_structure('<', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('<', 2, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('gcomp')
	get_structure('@', 1, 2)
	unify_constant('gcomp')
	get_list(1)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('<', 2, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 2)
	unify_constant('gcomp')
	get_list(1)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('<', 2, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('gcomp')
	get_structure('@', 1, 2)
	unify_constant('integer')
	get_list(1)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('<', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 1)
	unify_constant('integer')
	proceed

$3:
	get_integer(2, 0)
	get_constant('psi_lesseq', 4)
	get_structure('=<', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('=<', 2, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('gcomp')
	get_structure('@', 1, 2)
	unify_constant('gcomp')
	get_list(1)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('=<', 2, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 2)
	unify_constant('integer')
	get_list(1)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('=<', 2, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('gcomp')
	get_structure('@', 1, 2)
	unify_constant('integer')
	get_list(1)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('=<', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 1)
	unify_constant('integer')
	proceed

$4:
	get_integer(3, 0)
	get_constant('psi_ip_set', 4)
	get_structure('ip_set', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('ip_set', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('term')
	proceed

$5:
	get_integer(4, 0)
	get_constant('psi_ip_lookup', 4)
	get_structure('ip_lookup', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('ip_lookup', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$6:
	get_integer(5, 0)
	get_constant('psi_get_char', 4)
	get_structure('$get_char', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('get_char', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_constant('atomic')
	proceed

$7:
	get_integer(6, 0)
	get_constant('psi_put_char', 4)
	get_structure('$put_char', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('put_char', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('+', 1, 1)
	unify_constant('atomic')
	proceed

$8:
	get_integer(7, 0)
	get_constant('psi_get_code', 4)
	get_structure('$get_code', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('get_code', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$9:
	get_integer(8, 0)
	get_constant('psi_put_code', 4)
	get_structure('$put_code', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('put_code', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('+', 1, 1)
	unify_constant('integer')
	proceed

$10:
	get_integer(9, 0)
	get_constant('psi_compare_pointers', 4)
	get_structure('$compare_pointers', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$compare_pointers', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$11:
	get_integer(10, 0)
	get_constant('psi_set_flag', 4)
	get_structure('$set_flag', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$set_flag', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 1)
	unify_constant('integer')
	proceed

$12:
	get_integer(11, 0)
	get_constant('psi_get_flag', 4)
	get_structure('$get_flag', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_flag', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$13:
	get_integer(12, 0)
	get_constant('psi_copy_term_from_buffer', 4)
	get_structure('$copy_term_from_buffer', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$copy_term_from_buffer', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$14:
	get_integer(13, 0)
	get_constant('psi_stat_atom', 4)
	get_structure('$stat_atom', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_atom', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('-', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$15:
	get_integer(14, 0)
	get_constant('psi_stat_predicate', 4)
	get_structure('$stat_predicate', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_predicate', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('-', 1, 0)
	unify_constant('integet')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$16:
	get_integer(15, 0)
	get_constant('psi_stat_name', 4)
	get_structure('$stat_name', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_name', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('thread')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$17:
	get_integer(16, 0)
	get_constant('psi_write_atom', 4)
	get_structure('$psi_write_atom', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('write_atom', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 1)
	unify_constant('atom')
	proceed

$18:
	get_integer(17, 0)
	get_constant('psi_writeq_atom', 4)
	get_structure('$psi_writeq_atom', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('writeq_atom', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 1)
	unify_constant('atom')
	proceed

$19:
	get_integer(18, 0)
	get_constant('psi_write_integer', 4)
	get_structure('$write_integer', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('write_integer', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 1)
	unify_constant('integer')
	proceed

$20:
	get_integer(19, 0)
	get_constant('psi_write_var', 4)
	get_structure('$write_var', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$write_var', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$21:
	get_integer(20, 0)
	get_constant('psi_writeR_var', 4)
	get_structure('$writeR_var', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$writeR_var', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$22:
	get_integer(21, 0)
	get_constant('psi_write_object_variable', 4)
	get_structure('$write_obvar', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$writeR_obvar', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$23:
	get_integer(22, 0)
	get_constant('psi_writeR_object_variable', 4)
	get_structure('$writeR_obvar', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$writeR_obvar', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$24:
	get_integer(23, 0)
	get_constant('psi_writeq_object_variable', 4)
	get_structure('$writeq_obvar', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$writeq_obvar', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$25:
	get_integer(24, 0)
	get_constant('psi_get_substitution', 4)
	get_structure('$get_substitution', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_substitution', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$26:
	get_integer(25, 0)
	get_constant('psi_sub_term', 4)
	get_structure('sub_term', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('sub_term', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$27:
	get_integer(26, 0)
	get_constant('psi_next_sub', 4)
	get_structure('$next_sub', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$next_sub', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$28:
	get_integer(27, 0)
	get_constant('psi_sub_table_size', 4)
	get_structure('$sub_table_size', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$sub_table_size', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$29:
	get_integer(28, 0)
	get_constant('psi_compress_sub_object_variable', 4)
	get_structure('$compress_sub_object_variable', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$compress_sub_object_variable', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$30:
	get_integer(29, 0)
	get_constant('psi_reset_entry', 4)
	get_structure('$reset_entry', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$reset_entry', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('integer')
	proceed

$31:
	get_integer(30, 0)
	get_constant('psi_atom_length', 4)
	get_structure('atom_length', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('atom_length', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$32:
	get_integer(31, 0)
	get_constant('psi_concat_atom', 4)
	get_structure('concat_atom', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('concat_atom', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed

$33:
	get_integer(32, 0)
	get_constant('psi_atom_codes', 4)
	get_structure('$atom_codes', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('atom_codes', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('integer')
	proceed

$34:
	get_integer(33, 0)
	get_constant('psi_codes_atom', 4)
	get_structure('$codes_atom', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('codes_atom', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed

$35:
	get_integer(34, 0)
	get_constant('psi_char_code', 4)
	get_structure('$char_code', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('char_code', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$36:
	get_integer(35, 0)
	get_constant('psi_code_char', 4)
	get_structure('$code_char', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('code_char', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed

$37:
	get_integer(36, 0)
	get_constant('psi_hash_double', 4)
	get_structure('$hash_double', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$hash_double', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('float')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$38:
	get_integer(37, 0)
	get_constant('psi_user_ht_remove', 4)
	get_structure('hash_table_remove', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('hash_table_remove', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('@', 1, 1)
	unify_constant('atomic')
	proceed

$39:
	get_integer(38, 0)
	get_constant('psi_number_codes', 4)
	get_structure('$number_codes', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$number_codes', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('?', 1, 0)
	unify_constant('number')
	get_structure('?', 1, 1)
	unify_constant('list')
	proceed

$40:
	get_integer(39, 0)
	get_constant('psi_codes_number', 4)
	get_structure('$codes_number', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$codes_number', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('?', 1, 0)
	unify_constant('list')
	get_structure('?', 1, 1)
	unify_constant('number')
	proceed

$41:
	get_integer(40, 0)
	get_constant('psi_close', 4)
	get_structure('$close', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('close', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('stream')
	get_structure('+', 1, 1)
	unify_constant('integer')
	proceed

$42:
	get_integer(41, 0)
	get_constant('psi_stream_position', 4)
	get_structure('$stream_position', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stream_position', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$43:
	get_integer(42, 0)
	get_constant('psi_set_stream_position', 4)
	get_structure('$set_stream_position', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$set_stream_position', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('stream')
	get_structure('+', 1, 1)
	unify_constant('integer')
	proceed

$44:
	get_integer(43, 0)
	get_constant('psi_line_number', 4)
	get_structure('$line_number', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$line_number', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$45:
	get_integer(44, 0)
	get_constant('psi_stream_to_chars', 4)
	get_structure('$stream_to_chars', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('stream_to_chars', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('atom')
	proceed

$46:
	get_integer(45, 0)
	get_constant('psi_stream_to_atom', 4)
	get_structure('$stream_to_atom', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('stream_to_atom', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed

$47:
	get_integer(46, 0)
	get_constant('psi_system', 4)
	get_structure('$system', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$system', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$48:
	get_integer(47, 0)
	get_constant('psi_mktemp', 4)
	get_structure('$mktemp', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$mktemp', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('atom')
	proceed

$49:
	get_integer(48, 0)
	get_constant('psi_delay', 4)
	get_structure('$delay', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('delay', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('+', 1, 1)
	unify_constant('term')
	proceed

$50:
	get_integer(49, 0)
	get_constant('psi_delayed_problems_for_var', 4)
	get_structure('$delayed_problems_for_var', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$delayed_problems_for_var', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('term')
	proceed

$51:
	get_integer(50, 0)
	get_constant('psi_get_bound_structure', 4)
	get_structure('$get_bound_structure', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_bound_structure', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$52:
	get_integer(51, 0)
	get_constant('psi_not_free_in', 4)
	get_structure('not_free_in', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('not_free_in', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('obvar')
	get_structure('+', 1, 1)
	unify_constant('term')
	proceed

$53:
	get_integer(52, 0)
	get_constant('psi_not_free_in_var_simplify', 4)
	get_structure('$not_free_in_var_simplify', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$not_free_in_var_simplify', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('+', 1, 1)
	unify_constant('term')
	proceed

$54:
	get_integer(53, 0)
	get_constant('psi_is_distinct', 4)
	get_structure('is_distinct', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('is_distinct', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('+', 1, 1)
	unify_constant('term')
	proceed

$55:
	get_integer(54, 0)
	get_constant('psi_get_distinct', 4)
	get_structure('get_distinct', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('get_distinct', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$56:
	get_integer(55, 0)
	get_constant('psi_object_variable_name_to_prefix', 4)
	get_structure('$object_variable_name_to_prefix', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$object_variable_name_to_prefix', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed

$57:
	get_integer(56, 0)
	get_constant('psi_readR_var', 4)
	get_structure('$readR_var', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$readR_var', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$58:
	get_integer(57, 0)
	get_constant('psi_readR_object_variable', 4)
	get_structure('$readR_obvar', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$readR_obvar', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$59:
	get_integer(58, 0)
	get_constant('psi_quantifier', 4)
	get_structure('quantifier', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('quantifier', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$60:
	get_integer(59, 0)
	get_constant('psi_bound_var', 4)
	get_structure('bound_var', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('bound_var', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$61:
	get_integer(60, 0)
	get_constant('psi_body', 4)
	get_structure('body', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('body', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$62:
	get_integer(61, 0)
	get_constant('psi_check_binder', 4)
	get_structure('check_binder', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('check_binder', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('+', 1, 1)
	unify_constant('term')
	proceed

$63:
	get_integer(62, 0)
	get_constant('psi_get_var_name', 4)
	get_structure('get_var_name', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('get_var_name', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed

$64:
	get_integer(63, 0)
	get_constant('psi_set_var_name', 4)
	get_structure('set_var_name', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('set_var_name', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('+', 1, 1)
	unify_constant('atom')
	proceed

$65:
	get_integer(64, 0)
	get_constant('psi_set_object_variable_name', 4)
	get_structure('set_obvar_name', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('set_obvar_name', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('+', 1, 1)
	unify_constant('atom')
	proceed

$66:
	get_integer(65, 0)
	get_constant('psi_freeze_term', 4)
	get_structure('freeze_term', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('freeze_term', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$67:
	get_integer(66, 0)
	get_constant('psi_thaw_term', 4)
	get_structure('thaw_term', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thaw_term', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$68:
	get_integer(67, 0)
	get_constant('psi_collect_vars', 4)
	get_structure('collect_vars', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('collect_vars', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('term')
	proceed

$69:
	get_integer(68, 0)
	get_constant('psi_call_predicate1', 4)
	get_structure('$call_predicate1', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$call_predicate1', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('functor')
	get_structure('+', 1, 1)
	unify_constant('term')
	proceed

$70:
	get_integer(69, 0)
	get_constant('psi_increment', 4)
	get_structure('$increment', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$increment', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$71:
	get_integer(70, 0)
	get_constant('psi_decrement', 4)
	get_structure('$decrement', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$decrement', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$72:
	get_integer(71, 0)
	get_constant('psi_name_vars', 4)
	get_structure('name_vars', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('name_vars', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$73:
	get_integer(72, 0)
	get_constant('psi_get_unnamed_vars', 4)
	get_structure('get_unnamed_vars', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('get_unnamed_vars', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('term')
	proceed

$74:
	get_integer(73, 0)
	get_constant('psi_global_state_lookup', 4)
	get_structure('global_state_lookup', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('global_state_lookup', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$75:
	get_integer(74, 0)
	get_constant('psi_global_state_set', 4)
	get_structure('global_state_set', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('global_state_set', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('term')
	proceed

$76:
	get_integer(75, 0)
	get_constant('psi_global_state_increment', 4)
	get_structure('global_state_increment', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('global_state_increment', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$77:
	get_integer(76, 0)
	get_constant('psi_global_state_decrement', 4)
	get_structure('global_state_decrement', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('global_state_decrement', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$78:
	get_integer(77, 0)
	get_constant('psi_get_dynamic_chain', 4)
	get_structure('$get_dynamic_chain', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_dynamic_chain', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$79:
	get_integer(78, 0)
	get_constant('psi_threadID_goal', 4)
	get_structure('$thread_goal', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_goal', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('goal')
	proceed

$80:
	get_integer(79, 0)
	get_constant('psi_tcp_host_to_ip_address', 4)
	get_structure('tcp_host_to_ip_address', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_host_to_ip_address', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atomic')
	get_structure('-', 1, 1)
	unify_constant('ip_address')
	proceed

$81:
	get_integer(80, 0)
	get_constant('psi_tcp_host_from_ip_address', 4)
	get_structure('tcp_host_from_ip_address', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_host_from_ip_address', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('-', 1, 0)
	unify_constant('atomic')
	get_structure('+', 1, 1)
	unify_constant('ip_address')
	proceed

$82:
	get_integer(81, 0)
	get_constant('psi_local_p2p', 4)
	get_structure('$local_p2p', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$local_p2p', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('@', 1, 1)
	unify_constant('compound')
	proceed

$83:
	get_integer(82, 0)
	get_constant('psi_thread_symbol', 4)
	get_structure('$thread_symbol', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$thread_symbol', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('thread_id')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed

$84:
	get_integer(83, 0)
	get_constant('psi_load', 4)
	get_structure('$load', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$load', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('?', 1, 1)
	unify_constant('atom')
	proceed

$85:
	get_integer(84, 0)
	get_constant('psi_is_free_in', 4)
	get_structure('is_free_in', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('is_free_in', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('obvar')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$86:
	get_integer(85, 0)
	get_constant('psi_pipe', 4)
	get_structure('pipe', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('pipe', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('-', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_constant('stream')
	proceed

$87:
	get_integer(86, 0)
	get_constant('psi_env_getenv', 4)
	get_structure('getenv', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('getenv', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed

$88:
	get_integer(87, 0)
	get_constant('psi_env_putenv', 4)
	get_structure('putenv', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('putenv', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('atom')
	proceed

$89:
	get_integer(88, 0)
	get_constant('psi_signal_to_atom', 4)
	get_structure('signal_to_atom', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('signal_to_atom', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed

$90:
	get_integer(89, 0)
	get_constant('psi_strerror', 4)
	get_structure('strerror', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('strerror', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed

$91:
	get_integer(90, 0)
	get_constant('psi_socket_fd', 4)
	get_structure('$psi_socket_fd', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$psi_socket_fd', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$92:
	get_integer(91, 0)
	get_constant('psi_pedro_unsubscribe', 4)
	get_structure('$pedro_unsubscribe', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$pedro_unsubscribe', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$93:
	get_integer(92, 0)
	get_constant('psi_uncurry', 4)
	get_structure('uncurry', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('uncurry', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('gcomp')
	get_structure('-', 1, 1)
	unify_constant('gcomp')
	proceed

$94:
	get_integer(93, 0)
	get_constant('psi_get_line', 4)
	get_structure('$get_line', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_line', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_constant('string')
	proceed

$95:
	get_integer(94, 0)
	get_constant('psi_ip_array_init', 4)
	get_structure('ip_array_init', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('ip_array_init', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('@', 1, 1)
	unify_constant('integer')
	proceed

$96:
	get_integer(95, 0)
	get_constant('psi_copy_term', 4)
	get_structure('copy_term', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('copy_term', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$97:
	get_integer(96, 0)
	get_constant('psi_buffer_set_domains_apart', 4)
	get_structure('$buffer_set_domains_apart', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$buffer_set_domains_apart', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('obvar')
	proceed

$98:
	get_integer(97, 0)
	get_constant('psi_copy_substitution', 4)
	get_structure('$copy_substitution', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$copy_substitution', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$99:
	get_integer(98, 0)
	get_constant('psi_copy_obvar_to_buffer_tail', 4)
	get_structure('$copy_obvar_to_buffer_tail', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$copy_obvar_to_buffer_tail', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('@', 1, 1)
	unify_constant('obvar')
	proceed

$100:
	get_integer(99, 0)
	get_constant('psi_stat_ip_table', 4)
	get_structure('$stat_ip_table', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_ip_table', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('thread')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$101:
	get_integer(100, 0)
	get_constant('psi_set_stream_properties', 4)
	get_structure('$set_stream_properties', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$set_stream_properties', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('gcomp')
	proceed

$102:
	get_integer(101, 0)
	get_constant('psi_get_stream_properties', 4)
	get_structure('$get_stream_properties', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_stream_properties', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('gcomp')
	proceed

$103:
	get_integer(102, 0)
	get_constant('psi_set_std_stream', 4)
	get_structure('set_std_stream', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('set_std_stream', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 1)
	unify_constant('integer')
	proceed

$104:
	get_integer(103, 0)
	get_constant('psi_thread_push_goal', 4)
	get_structure('thread_push_goal', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('thread_push_goal', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('thread')
	get_structure('@', 1, 1)
	unify_constant('goal')
	proceed

$105:
	get_integer(104, 0)
	get_constant('structuralUnifyTerm', 4)
	get_structure('structural_unify', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('structural_unify', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('?', 1, 0)
	unify_constant('term')
	get_structure('?', 1, 1)
	unify_constant('term')
	proceed

$106:
	get_integer(105, 0)
	get_constant('psi_not_free_in_nfi_simp', 4)
	get_structure('$not_free_in_nfi_simp', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$not_free_in_nfi_simp', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('obvar')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$107:
	get_integer(106, 0)
	get_constant('psi_require_nfi_simp', 4)
	get_structure('$require_nfi_simp', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$require_nfi_simp', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('obvar')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$108:
	get_integer(107, 0)
	get_constant('psi_fast_simplify', 4)
	get_structure('$fast_simplify', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$fast_simplify', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$109:
	get_integer(108, 0)
	get_constant('psi_gmtime', 4)
	get_structure('gmtime', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('gmtime', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('?', 1, 0)
	unify_constant('integer')
	get_structure('?', 1, 1)
	unify_constant('term')
	proceed

$110:
	get_integer(109, 0)
	get_constant('psi_localtime', 4)
	get_structure('localtime', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('localtime', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('?', 1, 0)
	unify_constant('integer')
	get_structure('?', 1, 1)
	unify_constant('term')
	proceed

$111:
	get_integer(110, 0)
	get_constant('psi_equal_equal', 4)
	get_structure('==', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('==', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$112:
	get_integer(111, 0)
	get_constant('psi_simplify_term', 4)
	get_structure('simplify_term', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('simplify_term', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('?', 1, 1)
	unify_constant('term')
	proceed

$113:
	get_integer(112, 0)
	get_constant('psi_is_not_free_in', 4)
	get_structure('is_not_free_in', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('is_not_free_in', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('obvar')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$114:
	get_integer(113, 0)
	get_constant('psi_put_line', 4)
	get_structure('$put_line', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('$put_line', 2, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 2)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('integer')
	get_list(1)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$put_line', 2, 0)
	unify_x_ref(0)
	unify_constant('string')
	get_structure('@', 1, 0)
	unify_constant('stream')
	proceed

$115:
	get_integer(114, 0)
	get_constant('psi_ip_get_array_entries', 4)
	get_structure('ip_array_get_entries', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('ip_get_array_entries', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('atomic')
	proceed

$116:
	get_integer(115, 0)
	get_constant('psi_write_float', 4)
	get_structure('$write_float', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('write_float', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 1)
	unify_constant('float')
	proceed

$117:
	get_integer(116, 0)
	get_constant('psi_select', 4)
	get_structure('select', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('select', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('sockets')
	get_structure('-', 1, 1)
	unify_constant('sockets')
	proceed

$118:
	get_integer(117, 0)
	get_constant('psi_write_string', 4)
	get_structure('$write_string', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('write_string', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 1)
	unify_constant('string')
	proceed

$119:
	get_integer(118, 0)
	get_constant('psi_writeq_string', 4)
	get_structure('$writeq_string', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('writeq_string', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 1)
	unify_constant('string')
	proceed

$120:
	get_integer(119, 0)
	get_constant('psi_string_length', 4)
	get_structure('string_length', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('string_length', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('string')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$121:
	get_integer(120, 0)
	get_constant('psi_stream_to_string', 4)
	get_structure('$stream_to_string', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('stream_to_string', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_constant('string')
	proceed

$122:
	get_integer(121, 0)
	get_constant('psi_list_to_string', 4)
	get_structure('$list_to_string', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('string_to_list', 2, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('string')
	get_structure('?', 1, 2)
	unify_constant('list')
	get_list(1)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('string_to_list', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('?', 1, 0)
	unify_constant('string')
	get_structure('@', 1, 1)
	unify_constant('list')
	proceed

$123:
	get_integer(122, 0)
	get_constant('psi_string_to_atom', 4)
	get_structure('$string_to_atom', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('string_to_atom', 2, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('string')
	get_structure('?', 1, 2)
	unify_constant('atom')
	get_list(1)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('string_to_atom', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('?', 1, 0)
	unify_constant('string')
	get_structure('@', 1, 1)
	unify_constant('atom')
	proceed

$124:
	get_integer(123, 0)
	get_constant('psi_atom_to_string', 4)
	get_structure('$atom_to_string', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('string_to_atom', 2, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('string')
	get_structure('?', 1, 2)
	unify_constant('atom')
	get_list(1)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('string_to_atom', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('?', 1, 0)
	unify_constant('string')
	get_structure('@', 1, 1)
	unify_constant('atom')
	proceed

$125:
	get_integer(124, 0)
	get_constant('psi_pedro_connect', 4)
	get_structure('$pedro_connect', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$pedro_connect', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 1)
	unify_constant('atom')
	proceed

$126:
	get_integer(125, 0)
	get_constant('psi_pedro_subscribe', 4)
	get_structure('$pedro_subscribe', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('pedro_subscribe', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('?', 1, 1)
	unify_constant('integer')
	proceed

$127:
	get_integer(126, 0)
	get_constant('psi_hash_variable', 4)
	get_structure('hash_variable', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('hash_variable', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('?', 1, 1)
	unify_constant('integer')
	proceed

$128:
	get_integer(127, 0)
	get_constant('psi_stat', 4)
	get_structure('stat', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('stat', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('?', 1, 1)
	unify_constant('integer')
	proceed

$129:
	get_integer(128, 0)
	get_constant('psi_thread_wait_extract_preds', 4)
	get_structure('$thread_wait_extract_preds', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$thread_wait_extract_preds', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('int')
	get_structure('-', 1, 1)
	unify_constant('term')
	proceed

$130:
	get_integer(129, 0)
	get_constant('psi_absolute_path', 4)
	get_structure('absolute_file_name', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('absolute_file_name', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed

$131:
	get_integer(130, 0)
	get_constant('psi_term_less_than', 4)
	get_structure('@<', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('@<', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$132:
	get_integer(131, 0)
	get_constant('psi_term_at_equal', 4)
	get_structure('@=', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('@=', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$133:
	get_integer(132, 0)
	get_constant('psi_term_greater_than', 4)
	get_structure('@>', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('@>', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$134:
	get_integer(133, 0)
	get_constant('psi_not_equal', 4)
	get_structure('\\=', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('\\=', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('@', 1, 1)
	unify_constant('term')
	proceed

$135:
	get_integer(134, 0)
	get_constant('psi_string_to_list', 4)
	get_structure('$string_to_list', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('string_to_list', 2, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('string')
	get_structure('?', 1, 2)
	unify_constant('list')
	get_list(1)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('string_to_list', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('?', 1, 0)
	unify_constant('string')
	get_structure('@', 1, 1)
	unify_constant('list')
	proceed

$136:
	get_integer(135, 0)
	get_constant('psi_peek', 4)
	get_structure('$peek', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('peek', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$137:
	get_integer(136, 0)
	get_constant('psi_hash_string', 4)
	get_structure('$hash_string', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$hash_string', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('string')
	get_structure('-', 1, 1)
	unify_constant('integer')
	proceed

$138:
	get_integer(137, 0)
	get_constant('psi_file_directory_name', 4)
	get_structure('file_directory_name', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('file_directory_name', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed

$139:
	get_integer(138, 0)
	get_constant('psi_file_base_name', 4)
	get_structure('file_base_name', 2, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_list(5)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(6)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('file_base_name', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('atom')
	proceed
end('$psi2_decl'/7):



'$psi3_decl'/8:

	switch_on_term(0, $72, 'fail', 'fail', 'fail', 'fail', $71)

$71:
	switch_on_constant(0, 256, ['$default':'fail', 0:$1, 1:$2, 2:$3, 3:$4, 4:$5, 5:$6, 6:$7, 7:$8, 8:$9, 9:$10, 10:$11, 11:$12, 12:$13, 13:$14, 14:$15, 15:$16, 16:$17, 17:$18, 18:$19, 19:$20, 20:$21, 21:$22, 22:$23, 23:$24, 24:$25, 25:$26, 26:$27, 27:$28, 28:$29, 29:$30, 30:$31, 31:$32, 32:$33, 33:$34, 34:$35, 35:$36, 36:$37, 37:$38, 38:$39, 39:$40, 40:$41, 41:$42, 42:$43, 43:$44, 44:$45, 45:$46, 46:$47, 47:$48, 48:$49, 49:$50, 50:$51, 51:$52, 52:$53, 53:$54, 54:$55, 55:$56, 56:$57, 57:$58, 58:$59, 59:$60, 60:$61, 61:$62, 62:$63, 63:$64, 64:$65, 65:$66, 66:$67, 67:$68, 68:$69, 69:$70])

$72:
	try(8, $1)
	retry($2)
	retry($3)
	retry($4)
	retry($5)
	retry($6)
	retry($7)
	retry($8)
	retry($9)
	retry($10)
	retry($11)
	retry($12)
	retry($13)
	retry($14)
	retry($15)
	retry($16)
	retry($17)
	retry($18)
	retry($19)
	retry($20)
	retry($21)
	retry($22)
	retry($23)
	retry($24)
	retry($25)
	retry($26)
	retry($27)
	retry($28)
	retry($29)
	retry($30)
	retry($31)
	retry($32)
	retry($33)
	retry($34)
	retry($35)
	retry($36)
	retry($37)
	retry($38)
	retry($39)
	retry($40)
	retry($41)
	retry($42)
	retry($43)
	retry($44)
	retry($45)
	retry($46)
	retry($47)
	retry($48)
	retry($49)
	retry($50)
	retry($51)
	retry($52)
	retry($53)
	retry($54)
	retry($55)
	retry($56)
	retry($57)
	retry($58)
	retry($59)
	retry($60)
	retry($61)
	retry($62)
	retry($63)
	retry($64)
	retry($65)
	retry($66)
	retry($67)
	retry($68)
	retry($69)
	trust($70)

$1:
	get_integer(0, 0)
	get_constant('psi_functor', 5)
	get_structure('functor', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('functor', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('?', 1, 0)
	unify_constant('term')
	get_structure('?', 1, 1)
	unify_constant('term')
	get_structure('?', 1, 2)
	unify_constant('integer')
	proceed

$2:
	get_integer(1, 0)
	get_constant('psi_arg', 5)
	get_structure('arg', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('arg', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('-', 1, 2)
	unify_constant('term')
	proceed

$3:
	get_integer(2, 0)
	get_constant('psi_add', 5)
	get_structure('$add', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$add', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$4:
	get_integer(3, 0)
	get_constant('psi_subtract', 5)
	get_structure('$subtract', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$subtract', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$5:
	get_integer(4, 0)
	get_constant('psi_compare_var', 5)
	get_structure('$compare_var', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$compare_var', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('variable')
	get_structure('+', 1, 1)
	unify_constant('variable')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$6:
	get_integer(5, 0)
	get_constant('psi_compare_atom', 5)
	get_structure('$compare_atom', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$compare_atom', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('atom')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$7:
	get_integer(6, 0)
	get_constant('psi_fast_equal', 5)
	get_structure('$fast_equal', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$fast_equal', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('-', 1, 2)
	unify_constant('atom')
	proceed

$8:
	get_integer(7, 0)
	get_constant('psi_stat_choice', 5)
	get_structure('$stat_choice', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_choice', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('thread')
	get_structure('-', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('atom')
	proceed

$9:
	get_integer(8, 0)
	get_constant('psi_stat_global', 5)
	get_structure('$stat_global', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_global', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('thread')
	get_structure('-', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('atom')
	proceed

$10:
	get_integer(9, 0)
	get_constant('psi_stat_local', 5)
	get_structure('$stat_local', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_local', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('thread')
	get_structure('-', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('atom')
	proceed

$11:
	get_integer(10, 0)
	get_constant('psi_stat_binding_trail', 5)
	get_structure('$stat_binding_trail', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_binding_trail', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('thread')
	get_structure('-', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('atom')
	proceed

$12:
	get_integer(11, 0)
	get_constant('psi_stat_code', 5)
	get_structure('$stat_code', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_code', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$13:
	get_integer(12, 0)
	get_constant('psi_stat_string', 5)
	get_structure('$stat_string', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_string', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('integer')
	get_structure('-', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$14:
	get_integer(13, 0)
	get_constant('psi_random_range', 5)
	get_structure('random', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('random', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$15:
	get_integer(14, 0)
	get_constant('psi_string_concat', 5)
	get_structure('$string_concat', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('string_concat', 3, 0)
	unify_x_ref(0)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('string')
	get_structure('@', 1, 2)
	unify_constant('string')
	get_structure('?', 1, 3)
	unify_constant('string')
	get_list(1)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('string_concat', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('?', 1, 0)
	unify_constant('string')
	get_structure('?', 1, 1)
	unify_constant('string')
	get_structure('@', 1, 2)
	unify_constant('string')
	proceed

$16:
	get_integer(15, 0)
	get_constant('psi_set_domain', 5)
	get_structure('$set_domain', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$set_domain', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('+', 1, 2)
	unify_constant('term')
	proceed

$17:
	get_integer(16, 0)
	get_constant('psi_set_range', 5)
	get_structure('$set_range', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$set_range', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('+', 1, 2)
	unify_constant('term')
	proceed

$18:
	get_integer(17, 0)
	get_constant('psi_get_domain', 5)
	get_structure('$get_domain', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_domain', 2, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('-', 2, 1)
	unify_x_ref(0)
	unify_constant('term')
	get_structure('+', 1, 0)
	unify_constant('term')
	proceed

$19:
	get_integer(18, 0)
	get_constant('psi_get_range', 5)
	get_structure('$get_range', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_range', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('-', 1, 2)
	unify_constant('term')
	proceed

$20:
	get_integer(19, 0)
	get_constant('psi_build_sub_term', 5)
	get_structure('$build_sub_term', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$build_sub_term', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('-', 1, 2)
	unify_constant('term')
	proceed

$21:
	get_integer(20, 0)
	get_constant('psi_get_opcode', 5)
	get_structure('$get_opcode', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_opcode', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('code_ref')
	get_structure('+', 1, 2)
	unify_constant('integer')
	proceed

$22:
	get_integer(21, 0)
	get_constant('psi_get_const', 5)
	get_structure('$get_const', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_const', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('atomic')
	get_structure('+', 1, 1)
	unify_constant('code_ref')
	get_structure('+', 1, 2)
	unify_constant('integer')
	proceed

$23:
	get_integer(22, 0)
	get_constant('psi_get_number', 5)
	get_structure('$get_number', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_number', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('code_ref')
	get_structure('+', 1, 2)
	unify_constant('integer')
	proceed

$24:
	get_integer(23, 0)
	get_constant('psi_get_address', 5)
	get_structure('$get_address', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_address', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('code_ref')
	get_structure('+', 1, 1)
	unify_constant('code_ref')
	get_structure('+', 1, 2)
	unify_constant('integer')
	proceed

$25:
	get_integer(24, 0)
	get_constant('psi_get_offset', 5)
	get_structure('$get_offset', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_offset', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('code_ref')
	get_structure('+', 1, 2)
	unify_constant('integer')
	proceed

$26:
	get_integer(25, 0)
	get_constant('psi_get_pred', 5)
	get_structure('$get_pred', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_pred', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('code_ref')
	get_structure('+', 1, 2)
	unify_constant('integer')
	proceed

$27:
	get_integer(26, 0)
	get_constant('psi_get_entry', 5)
	get_structure('$get_entry', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_entry', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('code_ref')
	get_structure('+', 1, 1)
	unify_constant('code_ref')
	get_structure('+', 1, 2)
	unify_constant('integer')
	proceed

$28:
	get_integer(27, 0)
	get_constant('psi_copy_to_buffer_tail', 5)
	get_structure('$copy_to_buffer_tail', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$copy_to_buffer_tail', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('@', 1, 2)
	unify_constant('atom')
	proceed

$29:
	get_integer(28, 0)
	get_constant('psi_concat_atom3', 5)
	get_structure('concat_atom', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('concat_atom', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('atom')
	get_structure('-', 1, 2)
	unify_constant('atom')
	proceed

$30:
	get_integer(29, 0)
	get_constant('psi_user_ht_lookup', 5)
	get_structure('hash_table_lookup', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('hash_table_lookup', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('@', 1, 1)
	unify_constant('atomic')
	get_structure('@', 1, 2)
	unify_constant('term')
	proceed

$31:
	get_integer(30, 0)
	get_constant('psi_user_ht_search', 5)
	get_structure('$hash_table_search', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('hash_table_search', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('?', 1, 0)
	unify_constant('atom')
	get_structure('?', 1, 1)
	unify_constant('atomic')
	get_structure('?', 1, 2)
	unify_constant('term')
	proceed

$32:
	get_integer(31, 0)
	get_constant('psi_open', 5)
	get_structure('$open', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('open', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('io_mode')
	get_structure('-', 1, 2)
	unify_constant('stream')
	proceed

$33:
	get_integer(32, 0)
	get_constant('psi_get_atom_from_atom_table', 5)
	get_structure('$get_atom_from_atom_table', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_atom_from_atom_table', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('atom_table_ref')
	get_structure('-', 1, 1)
	unify_constant('atom')
	get_structure('-', 1, 2)
	unify_constant('atom_table_ref')
	proceed

$34:
	get_integer(33, 0)
	get_constant('psi_symtype', 5)
	get_structure('$symtype', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$symtype', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$35:
	get_integer(34, 0)
	get_constant('psi_access', 5)
	get_structure('$access', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('access', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('mode')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$36:
	get_integer(35, 0)
	get_constant('psi_read_next_token', 5)
	get_structure('$read_next_token', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$read_next_token', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('stream')
	get_structure('-', 1, 1)
	unify_constant('atom')
	get_structure('?', 1, 2)
	unify_constant('term')
	proceed

$37:
	get_integer(36, 0)
	get_constant('psi_encoded_write', 5)
	get_structure('$encoded_write', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('encoded_write', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('stream')
	get_structure('@', 1, 1)
	unify_constant('term')
	get_structure('+', 1, 2)
	unify_constant('atom')
	proceed

$38:
	get_integer(37, 0)
	get_constant('psi_call_predicate2', 5)
	get_structure('$call_predicate2', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$call_predicate2', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('+', 1, 2)
	unify_constant('term')
	proceed

$39:
	get_integer(38, 0)
	get_constant('psi_put_structure', 5)
	get_structure('$put_structure', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$put_structure', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('+', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('term')
	proceed

$40:
	get_integer(39, 0)
	get_constant('psi_set_argument', 5)
	get_structure('$set_argument', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$set_argument', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('+', 1, 1)
	unify_constant('integer')
	get_structure('+', 1, 2)
	unify_constant('term')
	proceed

$41:
	get_integer(40, 0)
	get_constant('psi_ip_setA', 5)
	get_structure('ip_set', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('ip_set', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('atomic')
	get_structure('+', 1, 2)
	unify_constant('term')
	proceed

$42:
	get_integer(41, 0)
	get_constant('psi_ip_lookupA', 5)
	get_structure('ip_lookup', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('ip_lookup', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('atomic')
	get_structure('-', 1, 2)
	unify_constant('term')
	proceed

$43:
	get_integer(42, 0)
	get_constant('psi_ipc_next', 5)
	get_structure('$ipc_next', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('ipc_next', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('ipc_ref')
	get_structure('-', 1, 1)
	unify_constant('ipc_ref')
	get_structure('+', 1, 2)
	unify_constant('timeout')
	proceed

$44:
	get_integer(43, 0)
	get_constant('psi_tcp_socket', 5)
	get_structure('tcp_socket', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_socket', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('socket')
	get_structure('+', 1, 1)
	unify_constant('tcp_type')
	get_structure('+', 1, 2)
	unify_constant('tcp_protocol')
	proceed

$45:
	get_integer(44, 0)
	get_constant('psi_tcp_setsockopt', 5)
	get_structure('tcp_setsockopt', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_setsockopt', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('socket')
	get_structure('+', 1, 1)
	unify_constant('atom')
	get_structure('+', 1, 2)
	unify_constant('intege')
	proceed

$46:
	get_integer(45, 0)
	get_constant('psi_tcp_getsockopt', 5)
	get_structure('tcp_getsockopt', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_getsockopt', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('socket')
	get_structure('+', 1, 1)
	unify_constant('atom')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$47:
	get_integer(46, 0)
	get_constant('psi_tcp_bind', 5)
	get_structure('tcp_bind', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_bind', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('socket')
	get_structure('+', 1, 1)
	unify_constant('tcp_port')
	get_structure('+', 1, 2)
	unify_constant('ip_address')
	proceed

$48:
	get_integer(47, 0)
	get_constant('psi_tcp_connect1', 5)
	get_structure('$tcp_connect1', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$tcp_connect1', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('socket')
	get_structure('+', 1, 1)
	unify_constant('tcp_port')
	get_structure('+', 1, 2)
	unify_constant('ip_address')
	proceed

$49:
	get_integer(48, 0)
	get_constant('psi_open_socket_stream', 5)
	get_structure('$open_socket_stream', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('open_socket_stream', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$50:
	get_integer(49, 0)
	get_constant('psi_open_msgstream', 5)
	get_structure('$open_msgstream', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('open_msgstream', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('handle')
	get_structure('@', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$51:
	get_integer(50, 0)
	get_constant('psi_tcp_getsockname', 5)
	get_structure('tcp_getsockname', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_getsockname', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('socket')
	get_structure('-', 1, 1)
	unify_constant('tcp_port')
	get_structure('-', 1, 2)
	unify_constant('ip_address')
	proceed

$52:
	get_integer(51, 0)
	get_constant('psi_tcp_getpeername', 5)
	get_structure('tcp_getpeername', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_getpeername', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('socket')
	get_structure('-', 1, 1)
	unify_constant('tcp_port')
	get_structure('-', 1, 2)
	unify_constant('ip_address')
	proceed

$53:
	get_integer(52, 0)
	get_constant('psi_tcp_service_to_proto_port', 5)
	get_structure('$tcp_service_to_proto_port', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$tcp_service_to_proto_port', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('tcp_proto')
	get_structure('-', 1, 2)
	unify_constant('tcp_port')
	proceed

$54:
	get_integer(53, 0)
	get_constant('psi_tcp_service_proto_to_port', 5)
	get_structure('$tcp_service_proto_to_port', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$tcp_service_proto_to_port', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('tcp_proto')
	get_structure('-', 1, 2)
	unify_constant('tcp_port')
	proceed

$55:
	get_integer(54, 0)
	get_constant('psi_tcp_service_from_proto_port', 5)
	get_structure('$tcp_service_from_proto_port', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$tcp_service_from_proto_port', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('tcp_proto')
	get_structure('+', 1, 2)
	unify_constant('tcp_port')
	proceed

$56:
	get_integer(55, 0)
	get_constant('psi_tcp_service_proto_from_port', 5)
	get_structure('$tcp_service_proto_from_port', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$tcp_service_proto_from_port', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('tcp_proto')
	get_structure('+', 1, 2)
	unify_constant('tcp_port')
	proceed

$57:
	get_integer(56, 0)
	get_constant('psi_ip_lookup_default', 5)
	get_structure('ip_lookup_default', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('ip_lookup_default', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('-', 1, 1)
	unify_constant('term')
	get_structure('@', 1, 2)
	unify_constant('term')
	proceed

$58:
	get_integer(57, 0)
	get_constant('psi_decompile', 5)
	get_structure('$psi_decompile', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$psi_decompile', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('codeptr')
	get_structure('+', 1, 1)
	unify_constant('clausehead')
	get_structure('@', 1, 2)
	unify_constant('instrlist')
	proceed

$59:
	get_integer(58, 0)
	get_constant('psi_make_sub_from_buffer', 5)
	get_structure('$make_sub_from_buffer', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$make_sub_from_buffer', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('-', 1, 2)
	unify_constant('term')
	proceed

$60:
	get_integer(59, 0)
	get_constant('psi_stat_other_trail', 5)
	get_structure('$stat_other_trail', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_other_trail', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('thread')
	get_structure('-', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('atom')
	proceed

$61:
	get_integer(60, 0)
	get_constant('psi_simplify_term3', 5)
	get_structure('simplify_term', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('simplify_term', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('?', 1, 1)
	unify_constant('term')
	get_structure('?', 1, 2)
	unify_constant('atom')
	proceed

$62:
	get_integer(61, 0)
	get_constant('psi_get_double', 5)
	get_structure('$get_double', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_double', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('double')
	get_structure('+', 1, 1)
	unify_constant('code_ref')
	get_structure('+', 1, 2)
	unify_constant('integer')
	proceed

$63:
	get_integer(62, 0)
	get_constant('psi_stat_scratchpad', 5)
	get_structure('$stat_scratchpad', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$stat_scratchpad', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('thread')
	get_structure('-', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('atom')
	proceed

$64:
	get_integer(63, 0)
	get_constant('psi_get_delays', 5)
	get_structure('$get_delays$', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_delays$', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('?', 1, 0)
	unify_constant('term')
	get_structure('@', 1, 1)
	unify_constant('term')
	get_structure('@', 1, 2)
	unify_constant('term')
	proceed

$65:
	get_integer(64, 0)
	get_constant('psi_atom_concat2', 5)
	get_structure('atom_concat2', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('atom_concat2', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('@', 1, 1)
	unify_constant('atom')
	get_structure('?', 1, 2)
	unify_constant('atom')
	proceed

$66:
	get_integer(65, 0)
	get_constant('psi_user_ht_insert', 5)
	get_structure('hash_table_insert', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('hash_table_insert', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('@', 1, 1)
	unify_constant('atomic')
	get_structure('@', 1, 2)
	unify_constant('term')
	proceed

$67:
	get_integer(66, 0)
	get_constant('psi_predicate_stamp', 5)
	get_structure('$predicate_stamp', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$predicate_stamp', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('integer')
	proceed

$68:
	get_integer(67, 0)
	get_constant('psi_get_integer', 5)
	get_structure('$get_integer', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_integer', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('code_ref')
	get_structure('+', 1, 2)
	unify_constant('integer')
	proceed

$69:
	get_integer(68, 0)
	get_constant('psi_ipc_first', 5)
	get_structure('$ipc_first', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('ipc_first', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('-', 1, 0)
	unify_constant('ipc_ref')
	get_structure('+', 1, 1)
	unify_constant('timeout')
	get_structure('+', 1, 2)
	unify_constant('ipc_ref')
	proceed

$70:
	get_integer(69, 0)
	get_constant('psi_setarg', 5)
	get_structure('setarg', 3, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(5)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(5, 4)
	get_list(6)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(7)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('setarg', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('compound')
	get_structure('@', 1, 2)
	unify_constant('term')
	proceed
end('$psi3_decl'/8):



'$psi4_decl'/9:

	switch_on_term(0, $25, 'fail', 'fail', 'fail', 'fail', $24)

$24:
	switch_on_constant(0, 64, ['$default':'fail', 0:$1, 1:$2, 2:$3, 3:$4, 4:$5, 5:$6, 6:$7, 7:$8, 8:$9, 9:$10, 10:$11, 11:$12, 12:$13, 13:$14, 14:$15, 15:$16, 16:$17, 17:$18, 18:$19, 19:$20, 20:$21, 21:$22, 22:$23])

$25:
	try(9, $1)
	retry($2)
	retry($3)
	retry($4)
	retry($5)
	retry($6)
	retry($7)
	retry($8)
	retry($9)
	retry($10)
	retry($11)
	retry($12)
	retry($13)
	retry($14)
	retry($15)
	retry($16)
	retry($17)
	retry($18)
	retry($19)
	retry($20)
	retry($21)
	retry($22)
	trust($23)

$1:
	get_integer(0, 0)
	get_constant('psi_dynamic', 6)
	get_structure('$psi_dynamic', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$psi_dynamic', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('@', 1, 1)
	unify_constant('integer')
	get_structure('@', 1, 2)
	unify_constant('integer')
	get_structure('@', 1, 3)
	unify_constant('integer')
	proceed

$2:
	get_integer(1, 0)
	get_constant('psi_atom_search', 6)
	get_structure('atom_search', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('atom_search', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('@', 1, 1)
	unify_constant('integer')
	get_structure('@', 1, 2)
	unify_constant('atom')
	get_structure('?', 1, 3)
	unify_constant('integer')
	proceed

$3:
	get_integer(2, 0)
	get_constant('psi_sub_atom', 6)
	get_structure('$sub_atom', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('sub_atom', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('atom')
	get_structure('@', 1, 1)
	unify_constant('integer')
	get_structure('@', 1, 2)
	unify_constant('integer')
	get_structure('?', 1, 3)
	unify_constant('atom')
	proceed

$4:
	get_integer(3, 0)
	get_constant('psi_load_foreign', 6)
	get_structure('$load_foreign', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('load_foreign', 3, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	get_structure('@', 1, 0)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('atom')
	get_structure('@', 1, 1)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('gcomp')
	get_structure('@', 1, 2)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('atom')
	proceed

$5:
	get_integer(4, 0)
	get_constant('psi_open_string', 6)
	get_structure('$open_string', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('open_string', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('read')
	get_structure('@', 1, 1)
	unify_constant('io_mode')
	get_structure('@', 1, 2)
	unify_constant('type')
	get_structure('-', 1, 3)
	unify_constant('stream')
	proceed

$6:
	get_integer(5, 0)
	get_constant('psi_get_pred_from_pred_table', 6)
	get_structure('$get_pred_from_pred_table', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_pred_from_pred_table', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('pred_loc')
	get_structure('@', 1, 1)
	unify_constant('pred_name')
	get_structure('@', 1, 2)
	unify_constant('arity')
	get_structure('?', 1, 3)
	unify_constant('pred_loc')
	proceed

$7:
	get_integer(6, 0)
	get_constant('psi_encoded_read', 6)
	get_structure('$encoded_read', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('encoded_read', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('stream')
	get_structure('?', 1, 1)
	unify_constant('gcomp')
	get_structure('?', 1, 2)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('var')
	get_structure('@', 1, 3)
	unify_constant('atom')
	proceed

$8:
	get_integer(7, 0)
	get_constant('psi_quantify', 6)
	get_structure('quantify', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('quantify', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('gcomp')
	get_structure('@', 1, 1)
	unify_constant('gcomp')
	get_structure('@', 1, 2)
	unify_x_ref(0)
	get_structure('list', 1, 0)
	unify_constant('obvar')
	get_structure('@', 1, 3)
	unify_constant('gcomp')
	proceed

$9:
	get_integer(8, 0)
	get_constant('psi_call_predicate3', 6)
	get_structure('$call_predicate3', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$call_predicate3', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 1)
	unify_constant('gcomp')
	get_structure('@', 1, 2)
	unify_constant('gcomp')
	get_structure('@', 1, 3)
	unify_constant('gcomp')
	proceed

$10:
	get_integer(9, 0)
	get_constant('psi_tcp_accept', 6)
	get_structure('tcp_accept', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('tcp_accept', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('socket')
	get_structure('-', 1, 1)
	unify_constant('socket')
	get_structure('-', 1, 2)
	unify_constant('port')
	get_structure('-', 1, 3)
	unify_constant('ip_address')
	proceed

$11:
	get_integer(10, 0)
	get_constant('psi_next_instr', 6)
	get_structure('$psi_next_instr', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$psi_next_instr', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('codeptr')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('-', 1, 2)
	unify_constant('codeptr')
	get_structure('-', 1, 3)
	unify_constant('codeptr')
	proceed

$12:
	get_integer(11, 0)
	get_constant('psi_assert', 6)
	get_structure('$psi_assert', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$psi_assert', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('codeptr')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('-', 1, 2)
	unify_constant('codeptr')
	get_structure('-', 1, 3)
	unify_constant('codeptr')
	proceed

$13:
	get_integer(12, 0)
	get_constant('psi_ccompile', 6)
	get_structure('$ccompile', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$ccompile', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('+', 1, 2)
	unify_constant('term')
	get_structure('-', 1, 3)
	unify_constant('term')
	proceed

$14:
	get_integer(13, 0)
	get_constant('psi_set_domains_apart', 6)
	get_structure('$set_domains_apart', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$set_domains_apart', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('+', 1, 0)
	unify_constant('term')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('+', 1, 2)
	unify_constant('term')
	get_structure('+', 1, 3)
	unify_constant('term')
	proceed

$15:
	get_integer(14, 0)
	get_constant('psi_new_sub', 6)
	get_structure('$new_sub', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$new_sub', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('+', 1, 0)
	unify_constant('integer')
	get_structure('+', 1, 1)
	unify_constant('term')
	get_structure('+', 1, 2)
	unify_constant('term')
	get_structure('-', 1, 3)
	unify_constant('term')
	proceed

$16:
	get_integer(15, 0)
	get_constant('psi_get_first_clause', 6)
	get_structure('$get_first_clause', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_first_clause', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('integer')
	get_structure('-', 1, 3)
	unify_constant('atom')
	proceed

$17:
	get_integer(16, 0)
	get_constant('psi_get_next_clause', 6)
	get_structure('$get_next_clause', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$get_next_clause', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('@', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('integer')
	get_structure('-', 1, 3)
	unify_constant('atom')
	proceed

$18:
	get_integer(17, 0)
	get_constant('psi_split_string', 6)
	get_structure('$split_string', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$split_string', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('string')
	get_structure('@', 1, 1)
	unify_constant('integer')
	get_structure('-', 1, 2)
	unify_constant('string')
	get_structure('-', 1, 3)
	unify_constant('string')
	proceed

$19:
	get_integer(18, 0)
	get_constant('psi_ipc_get_message', 6)
	get_structure('$ipc_get_message', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$ipc_get_message', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('-', 1, 0)
	unify_constant('message')
	get_structure('@', 1, 1)
	unify_constant('reference')
	get_structure('-', 1, 2)
	unify_constant('address')
	get_structure('@', 1, 3)
	unify_constant('atom')
	proceed

$20:
	get_integer(19, 0)
	get_constant('psi_ip_lookupA_default', 6)
	get_structure('ip_lookup_default', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('ip_lookup', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('+', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('atomic')
	get_structure('-', 1, 2)
	unify_constant('term')
	get_structure('@', 1, 3)
	unify_constant('term')
	proceed

$21:
	get_integer(20, 0)
	get_constant('psi_thread_fork', 6)
	get_structure('$thread_fork', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$thread_fork', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('?', 1, 0)
	unify_constant('atom')
	get_structure('+', 1, 1)
	unify_constant('goal')
	get_structure('@', 1, 2)
	unify_constant('atom')
	get_structure('@', 1, 3)
	unify_constant('thread_sizes')
	proceed

$22:
	get_integer(21, 0)
	get_constant('psi_thread_setup_wait', 6)
	get_structure('$thread_setup_wait', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$thread_setup_wait', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('@', 1, 1)
	unify_constant('term')
	get_structure('@', 1, 2)
	unify_constant('term')
	get_structure('-', 1, 3)
	unify_constant('int')
	proceed

$23:
	get_integer(22, 0)
	get_constant('psi_create_timer', 6)
	get_structure('create_timer', 4, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(6)
	unify_x_variable(9)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(6, 4)
	get_x_value(9, 5)
	get_list(7)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_constant('[]')
	get_list(8)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('create_timer', 4, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	get_structure('@', 1, 0)
	unify_constant('term')
	get_structure('@', 1, 1)
	unify_constant('double')
	get_structure('@', 1, 2)
	unify_constant('atom')
	get_structure('-', 1, 3)
	unify_constant('int')
	proceed
end('$psi4_decl'/9):



'$psi5_decl'/10:

	switch_on_term(0, $4, 'fail', 'fail', 'fail', 'fail', $3)

$3:
	switch_on_constant(0, 4, ['$default':'fail', 0:$1, 1:$2])

$4:
	try(10, $1)
	trust($2)

$1:
	get_integer(0, 0)
	get_constant('psi_call_predicate4', 7)
	get_structure('$call_predicate4', 5, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(7)
	unify_x_variable(10)
	unify_x_variable(11)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(7, 4)
	get_x_value(10, 5)
	get_x_value(11, 6)
	get_list(8)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(9)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$call_predicate4', 5, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	unify_x_ref(4)
	get_structure('@', 1, 0)
	unify_constant('integer')
	get_structure('?', 1, 1)
	unify_constant('term')
	get_structure('?', 1, 2)
	unify_constant('term')
	get_structure('?', 1, 3)
	unify_constant('term')
	get_structure('?', 1, 4)
	unify_constant('term')
	proceed

$2:
	get_integer(1, 0)
	get_constant('psi_re_match', 7)
	get_structure('$re_match', 5, 1)
	unify_x_variable(0)
	unify_x_variable(1)
	unify_x_variable(7)
	unify_x_variable(10)
	unify_x_variable(11)
	get_x_value(0, 2)
	get_x_value(1, 3)
	get_x_value(7, 4)
	get_x_value(10, 5)
	get_x_value(11, 6)
	get_list(8)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('out')
	unify_x_ref(0)
	get_list(0)
	unify_constant('in')
	unify_constant('[]')
	get_list(9)
	unify_x_ref(0)
	unify_constant('[]')
	get_structure('$re_match', 5, 0)
	unify_x_ref(0)
	unify_x_ref(1)
	unify_x_ref(2)
	unify_x_ref(3)
	unify_x_ref(4)
	get_structure('@', 1, 0)
	unify_constant('string')
	get_structure('@', 1, 1)
	unify_constant('string')
	get_structure('-', 1, 2)
	unify_constant('string')
	get_structure('-', 1, 3)
	unify_constant('list')
	get_structure('@', 1, 4)
	unify_constant('integer')
	proceed
end('$psi5_decl'/10):



'$query_pseudo_instr1684026315_399/0$0'/0:


$1:
	allocate(1)
	get_y_level(0)
	put_integer(200, 0)
	put_constant('fy', 1)
	put_constant('@', 2)
	call_predicate('op', 3, 1)
	cut(0)
	deallocate
	proceed
end('$query_pseudo_instr1684026315_399/0$0'/0):



'$query_pseudo_instr1684026315_399/0$1'/0:


$1:
	allocate(1)
	get_y_level(0)
	put_integer(500, 0)
	put_constant('fy', 1)
	put_constant('?', 2)
	call_predicate('op', 3, 1)
	cut(0)
	deallocate
	proceed
end('$query_pseudo_instr1684026315_399/0$1'/0):



'$query_pseudo_instr1684026315_399'/0:

	try(0, $1)
	retry($2)
	trust($3)

$1:
	allocate(0)
	call_predicate('$query_pseudo_instr1684026315_399/0$0', 0, 0)
	fail

$2:
	allocate(0)
	call_predicate('$query_pseudo_instr1684026315_399/0$1', 0, 0)
	fail

$3:
	proceed
end('$query_pseudo_instr1684026315_399'/0):



'$query'/0:


$1:
	execute_predicate('$query_pseudo_instr1684026315_399', 0)
end('$query'/0):



