/* ** ** The C code is generated by [ATS/Postiats-0-4-1] ** */ /* ** include runtime header files */ #ifndef _ATS_CCOMP_HEADER_NONE_ #include "pats_ccomp_config.h" #include "pats_ccomp_basics.h" #include "pats_ccomp_typedefs.h" #include "pats_ccomp_instrset.h" #include "pats_ccomp_memalloc.h" #ifndef _ATS_CCOMP_EXCEPTION_NONE_ #include "pats_ccomp_memalloca.h" #include "pats_ccomp_exception.h" #endif // end of [_ATS_CCOMP_EXCEPTION_NONE_] #endif /* _ATS_CCOMP_HEADER_NONE_ */ /* ** include prelude cats files */ #ifndef _ATS_CCOMP_PRELUDE_NONE_ // #include "prelude/CATS/basics.cats" #include "prelude/CATS/integer.cats" #include "prelude/CATS/pointer.cats" #include "prelude/CATS/integer_long.cats" #include "prelude/CATS/integer_size.cats" #include "prelude/CATS/integer_short.cats" #include "prelude/CATS/bool.cats" #include "prelude/CATS/char.cats" #include "prelude/CATS/float.cats" #include "prelude/CATS/integer_ptr.cats" #include "prelude/CATS/integer_fixed.cats" #include "prelude/CATS/memory.cats" #include "prelude/CATS/string.cats" #include "prelude/CATS/strptr.cats" // #include "prelude/CATS/fprintf.cats" // #include "prelude/CATS/filebas.cats" // #include "prelude/CATS/list.cats" #include "prelude/CATS/option.cats" #include "prelude/CATS/array.cats" #include "prelude/CATS/arrayptr.cats" #include "prelude/CATS/arrayref.cats" #include "prelude/CATS/matrix.cats" #include "prelude/CATS/matrixptr.cats" // #endif /* _ATS_CCOMP_PRELUDE_NONE_ */ /* ** for user-supplied prelude */ #ifdef _ATS_CCOMP_PRELUDE_USER_ // #include _ATS_CCOMP_PRELUDE_USER_ // #endif /* _ATS_CCOMP_PRELUDE_USER_ */ /* ** for user2-supplied prelude */ #ifdef _ATS_CCOMP_PRELUDE_USER2_ // #include _ATS_CCOMP_PRELUDE_USER2_ // #endif /* _ATS_CCOMP_PRELUDE_USER2_ */ /* staload-prologues(beg) */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/libats/libc/SATS/stdio.sats: 1390(line=36, offs=1) -- 1437(line=39, offs=3) */ #include \ "libats/libc/CATS/stdio.cats" /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/libats/libc/SATS/sys/types.sats: 1390(line=36, offs=1) -- 1441(line=39, offs=3) */ #include \ "libats/libc/CATS/sys/types.cats" /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/libats/libc/SATS/sys/stat.sats: 1390(line=36, offs=1) -- 1440(line=39, offs=3) */ #include \ "libats/libc/CATS/sys/stat.cats" /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/libats/libc/SATS/sys/types.sats: 1390(line=36, offs=1) -- 1441(line=39, offs=3) */ #include \ "libats/libc/CATS/sys/types.cats" /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/libats/libc/SATS/stdio.sats: 1390(line=36, offs=1) -- 1437(line=39, offs=3) */ #include \ "libats/libc/CATS/stdio.cats" /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/libats/libc/SATS/sys/types.sats: 1390(line=36, offs=1) -- 1441(line=39, offs=3) */ #include \ "libats/libc/CATS/sys/types.cats" /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/contrib/atscntrb/atscntrb-hx-libgmp/SATS/gmp.sats: 1178(line=38, offs=1) -- 1236(line=43, offs=3) */ // #include \ "atscntrb-hx-libgmp/CATS/gmp.cats" // /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/contrib/atscntrb/atscntrb-hx-libgmp/SATS/gmp.sats: 1178(line=38, offs=1) -- 1236(line=43, offs=3) */ // #include \ "atscntrb-hx-libgmp/CATS/gmp.cats" // /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/contrib/atscntrb/atscntrb-hx-libgmp/SATS/gmp.sats: 1178(line=38, offs=1) -- 1236(line=43, offs=3) */ // #include \ "atscntrb-hx-libgmp/CATS/gmp.cats" // /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/contrib/atscntrb/atscntrb-hx-libgmp/SATS/gmp.sats: 1178(line=38, offs=1) -- 1236(line=43, offs=3) */ // #include \ "atscntrb-hx-libgmp/CATS/gmp.cats" // /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/libats/libc/SATS/math.sats: 1380(line=35, offs=1) -- 1426(line=38, offs=3) */ #include \ "libats/libc/CATS/math.cats" /* staload-prologues(end) */ /* typedefs-for-tyrecs-and-tysums(beg) */ typedef ATSstruct { atstkind_t0ype(atstype_int) atslab__first ; atstkind_t0ype(atstype_int) atslab__second ; } postiats_tyrec_0 ; typedef ATSstruct { #if(0) int contag ; #endif atstkind_t0ype(atstype_int) atslab__0 ; atstkind_type(atstype_ptrk) atslab__1 ; } postiats_tysum_1 ; typedef ATSstruct { #if(0) int contag ; #endif atstyvar_type(a) atslab__0 ; atstkind_type(atstype_ptrk) atslab__1 ; } postiats_tysum_2 ; /* typedefs-for-tyrecs-and-tysums(end) */ /* dynconlst-declaration(beg) */ /* dynconlst-declaration(end) */ /* dyncstlst-declaration(beg) */ ATSdyncst_mac(atspre_ptr_alloc_tsz) ATSdyncst_mac(atscntrb_gmp_mpz_init) ATSdyncst_mac(atscntrb_gmp_mpz_fib_uint) ATSdyncst_mac(atspre_g1int2int_int_int) ATSdyncst_mac(atspre_g1int_gt_int) ATSdyncst_mac(atspre_g1int_half_int) ATSdyncst_mac(atspre_g0int_mod_int) ATSdyncst_mac(atspre_g0int2int_int_int) ATSdyncst_mac(atspre_g0int_eq_int) ATSdyncst_mac(atspre_g0int_mul_int) ATSdyncst_mac(atspre_g1int_eq_int) ATSdyncst_mac(atscntrb_gmp_mpz_cmp_int) ATSdyncst_mac(atspre_g0int_lt_int) ATSdyncst_mac(atspre_g1int_neg_int) ATSdyncst_mac(atspre_g0int_gt_int) ATSdyncst_mac(atscntrb_gmp_mpz_init_set_mpz) ATSdyncst_mac(atscntrb_gmp_mpz_mul2_mpz) ATSdyncst_mac(atscntrb_gmp_mpz_clear) ATSdyncst_mac(atspre_ptr_free) ATSdyncst_mac(atscntrb_gmp_mpz_init_set_int) ATSdyncst_mac(atspre_g0float2int_double_int) ATSdyncst_mac(atslib_libats_libc_sqrt_double) ATSdyncst_mac(atspre_g0int2float_int_double) ATSdyncst_mac(atspre_g1int_lt_int) ATSdyncst_mac(atspre_g1int_add_int) ATSdyncst_mac(atspre_g1int_div_int) ATSdyncst_mac(atspre_g1int_neq_int) ATSdyncst_extfun(_057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__gcd, (atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)), atstkind_t0ype(atstype_int)) ; ATSdyncst_mac(atspre_g0int_div_int) ATSdyncst_mac(atspre_g1int_gte_int) ATSdyncst_mac(mpz_primorial_ui) ATSdyncst_mac(atspre_g1int_sub_int) ATSdyncst_mac(atspre_g0int_half_int) ATSdyncst_mac(atspre_g1int_mul_int) ATSdyncst_mac(atspre_g0int_neg_int) ATSdyncst_mac(atspre_g0int_add_int) ATSdyncst_extfun(sum_divisors_ats, (atstkind_t0ype(atstype_int)), atstkind_t0ype(atstype_int)) ; ATSdyncst_mac(atspre_g0int_neq_int) ATSdyncst_extfun(_057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__prime_factors, (atstkind_t0ype(atstype_int)), atstkind_type(atstype_ptrk)) ; ATSdyncst_mac(atspre_g0int_sub_int) ATSdyncst_mac(atspre_cloptr_free) ATSdyncst_mac(atscntrb_gmp_mpz_add2_int) /* dyncstlst-declaration(end) */ /* dynvalist-implementation(beg) */ /* dynvalist-implementation(end) */ /* exnconlst-declaration(beg) */ #ifndef _ATS_CCOMP_EXCEPTION_NONE_ ATSextern() atsvoid_t0ype the_atsexncon_initize ( atstype_exnconptr d2c, atstype_string exnmsg ) ; #endif // end of [_ATS_CCOMP_EXCEPTION_NONE_] /* exnconlst-declaration(end) */ /* extypelst-declaration(beg) */ /* extypelst-declaration(end) */ /* assumelst-declaration(beg) */ #ifndef _ATS_CCOMP_ASSUME_CHECK_NONE_ #endif // #ifndef(_ATS_CCOMP_ASSUME_CHECK_NONE_) /* assumelst-declaration(end) */ ATSstatic() atstkind_type(atstype_ptrk) fib_gmp_0(atstkind_t0ype(atstype_uint)) ; #if(0) #if(0) ATSextern() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1() ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__1() ; ATSstatic() atstkind_t0ype(atstype_int) exp_3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_type(atstype_ptrk) big_exp_15(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__16(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__16__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_int) ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__19(atsrefarg0_type(atstkind_type(atstype_ptrk)), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_t0ype(atstype_int) ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__19__1(atsrefarg0_type(atstkind_type(atstype_ptrk)), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g0int_int__21(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g0int_int__21__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g0int_int__25(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g0int_int__25__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__30(atstkind_type(atstype_ptrk)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__30__1(atstkind_type(atstype_ptrk)) ; #if(0) #if(0) ATSextern() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__32(atsrefarg0_type(atstkind_type(atstype_ptrk))) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__32__1(atsrefarg0_type(atstkind_type(atstype_ptrk))) ; ATSstatic() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__2() ; #if(0) #if(0) ATSextern() atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35(atstkind_type(atstype_ptrk)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35__1(atstkind_type(atstype_ptrk)) ; ATSstatic() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__32__2(atsrefarg0_type(atstkind_type(atstype_ptrk))) ; ATSstatic() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__3() ; #if(0) #if(0) ATSextern() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__39(atstkind_type(atstype_ptrk), atsrefarg0_type(atstkind_type(atstype_ptrk))) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__39__1(atstkind_type(atstype_ptrk), atsrefarg0_type(atstkind_type(atstype_ptrk))) ; ATSstatic() atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35__2(atstkind_type(atstype_ptrk)) ; ATSstatic() atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35__3(atstkind_type(atstype_ptrk)) ; #if(0) #if(0) ATSextern() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__43(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__43__1(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__4() ; ATSstatic() atstkind_t0ype(atstype_int) sqrt_int_46(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) is_prime_48(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) loop_49(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__50(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__50__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__16__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) is_semiprime_57(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) loop_58(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__50__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__16__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__6(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) ATSextern() atstkind_t0ype(atstype_bool) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__divides(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__7(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) ATSextern() atstkind_t0ype(atstype_int) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__gcd(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__67(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__67__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) ATSextern() atstkind_t0ype(atstype_int) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__lcm(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #if(0) ATSextern() atstkind_t0ype(atstype_bool) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__coprime(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__8(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) ATSextern() atstkind_type(atstype_ptrk) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__divisors(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] ATSstatic() atstype_boxed __patsfun_75(atstype_bool) ; ATSstatic() atstype_boxed __patsfun_76(atstype_bool) ; ATSstatic() atstkind_type(atstype_ptrk) loop_77(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__78(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__78__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__9(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__67__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstype_boxed __patsfun_83(atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_84(atstkind_type(atstype_ptrk), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_85(atstype_bool) ; ATSstatic() atstype_boxed __patsfun_86(atstkind_t0ype(atstype_int), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_87(atstype_bool) ; ATSstatic() atstype_boxed __patsfun_88(atstype_bool) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__10(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstype_boxed __patsfun_90(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_91(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstype_bool) ; ATSstatic() atstkind_type(atstype_ptrk) primorial_gmp_92(atstkind_t0ype(atstype_ullint)) ; ATSstatic() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__5() ; ATSstatic() atstkind_t0ype(atstype_int) div_gt_zero_94(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) jacobi_95(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) legendre_96(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) exp_mod_prime_97(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__11(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__12(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__13(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) get_multiplicity_105(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) loop_106(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__16__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__14(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) jacobi2_110(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__15(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__16(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__17(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__18(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__19(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) ATSextern() atstkind_t0ype(atstype_int) count_divisors_ats(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] ATSstatic() atstkind_t0ype(atstype_int) loop_119(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__78__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__20(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__67__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__21(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) ATSextern() atstkind_t0ype(atstype_int) sum_divisors_ats(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] ATSstatic() atstkind_t0ype(atstype_int) loop_126(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__78__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__22(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__67__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__23(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) ATSextern() atstkind_t0ype(atstype_bool) is_perfect_ats(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__24(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) rip_133(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g0int_int__134(atstkind_t0ype(atstyvar_type(tk)), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g0int_int__134__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__6(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__50__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) ATSextern() atstkind_type(atstype_ptrk) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__prime_factors(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] ATSstatic() atstkind_type(atstype_ptrk) loop_140(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__78__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstype_boxed __patsfun_142(atstkind_t0ype(atstype_int), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_143(atstype_bool) ; ATSstatic() atstype_boxed __patsfun_144(atstype_bool) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__25(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__7(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstype_boxed __patsfun_147(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_148(atstkind_t0ype(atstype_int), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_149(atstype_bool) ; #if(0) ATSextern() atstkind_t0ype(atstype_int) little_omega_ats(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] ATSstatic() atstkind_t0ype(atstype_int) loop_151(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__78__5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__26(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__8(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) ATSextern() atstkind_t0ype(atstype_int) radical_ats(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] ATSstatic() atstkind_t0ype(atstype_int) product_156(atstkind_type(atstype_ptrk)) ; ATSstatic() atstkind_t0ype(atstype_int) totient_157(atstkind_t0ype(atstype_int)) ; ATSstatic() postiats_tyrec_0 adjust_contents_158(postiats_tyrec_0, atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstyvar_type(res) ATSLIB_056_prelude__stream_vt_foldleft_cloptr__160(atstkind_type(atstype_ptrk), atstyvar_type(res), atstype_cloptr) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] #if(0) ATSstatic() atstyvar_type(res) loop_161__161(atstkind_type(atstype_ptrk), atstyvar_type(res), atstype_cloptr) ; #endif // end of [TEMPLATE] ATSstatic() postiats_tyrec_0 ATSLIB_056_prelude__stream_vt_foldleft_cloptr__160__1(atstkind_type(atstype_ptrk), postiats_tyrec_0, atstype_cloptr) ; ATSstatic() postiats_tyrec_0 loop_161__161__1(atstkind_type(atstype_ptrk), postiats_tyrec_0, atstype_cloptr) ; ATSstatic() postiats_tyrec_0 __patsfun_164(postiats_tyrec_0, atsrefarg1_type(atstkind_t0ype(atstype_int))) ; #if(0) ATSextern() atstkind_type(atstype_ptrk) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__totient_sum(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] ATSstatic() atstkind_type(atstype_ptrk) loop_166(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__50__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__168(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__168__1(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__43__2(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__6() ; #if(0) ATSextern() atstkind_t0ype(atstype_int) totient_ats(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #if(0) ATSextern() atstkind_t0ype(atstype_int) jacobi_ats(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #if(0) ATSextern() atstkind_type(atstype_ptrk) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__primorial(atstkind_t0ype(atstype_ullint)) ; #endif // end of [QUALIFIED] ATSclosurerize_beg(__patsfun_75, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_75__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_75__cfun ( __patsfun_75__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_75(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_75__closureinit ( __patsfun_75__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_75__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_75__closurerize ( // argumentless ) { return __patsfun_75__closureinit(ATS_MALLOC(sizeof(__patsfun_75__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_76, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_76__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_76__cfun ( __patsfun_76__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_76(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_76__closureinit ( __patsfun_76__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_76__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_76__closurerize ( // argumentless ) { return __patsfun_76__closureinit(ATS_MALLOC(sizeof(__patsfun_76__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_83, (atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk)), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_t0ype(atstype_int) env0 ; atstkind_type(atstype_ptrk) env1 ; } __patsfun_83__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_83__cfun ( __patsfun_83__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_83(p_cenv->env0, p_cenv->env1, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_83__closureinit ( __patsfun_83__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0, atstkind_type(atstype_ptrk) env1 ) { p_cenv->env0 = env0 ; p_cenv->env1 = env1 ; p_cenv->cfun = __patsfun_83__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_83__closurerize ( atstkind_t0ype(atstype_int) env0, atstkind_type(atstype_ptrk) env1 ) { return __patsfun_83__closureinit(ATS_MALLOC(sizeof(__patsfun_83__closure_t0ype)), env0, env1) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_84, (atstkind_type(atstype_ptrk)), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_type(atstype_ptrk) env0 ; } __patsfun_84__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_84__cfun ( __patsfun_84__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_84(p_cenv->env0, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_84__closureinit ( __patsfun_84__closure_t0ype *p_cenv, atstkind_type(atstype_ptrk) env0 ) { p_cenv->env0 = env0 ; p_cenv->cfun = __patsfun_84__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_84__closurerize ( atstkind_type(atstype_ptrk) env0 ) { return __patsfun_84__closureinit(ATS_MALLOC(sizeof(__patsfun_84__closure_t0ype)), env0) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_85, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_85__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_85__cfun ( __patsfun_85__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_85(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_85__closureinit ( __patsfun_85__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_85__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_85__closurerize ( // argumentless ) { return __patsfun_85__closureinit(ATS_MALLOC(sizeof(__patsfun_85__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_86, (atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_t0ype(atstype_int) env0 ; } __patsfun_86__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_86__cfun ( __patsfun_86__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_86(p_cenv->env0, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_86__closureinit ( __patsfun_86__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0 ) { p_cenv->env0 = env0 ; p_cenv->cfun = __patsfun_86__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_86__closurerize ( atstkind_t0ype(atstype_int) env0 ) { return __patsfun_86__closureinit(ATS_MALLOC(sizeof(__patsfun_86__closure_t0ype)), env0) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_87, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_87__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_87__cfun ( __patsfun_87__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_87(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_87__closureinit ( __patsfun_87__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_87__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_87__closurerize ( // argumentless ) { return __patsfun_87__closureinit(ATS_MALLOC(sizeof(__patsfun_87__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_88, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_88__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_88__cfun ( __patsfun_88__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_88(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_88__closureinit ( __patsfun_88__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_88__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_88__closurerize ( // argumentless ) { return __patsfun_88__closureinit(ATS_MALLOC(sizeof(__patsfun_88__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_90, (atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk)), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_t0ype(atstype_int) env0 ; atstkind_t0ype(atstype_int) env1 ; atstkind_type(atstype_ptrk) env2 ; } __patsfun_90__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_90__cfun ( __patsfun_90__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_90(p_cenv->env0, p_cenv->env1, p_cenv->env2, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_90__closureinit ( __patsfun_90__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2 ) { p_cenv->env0 = env0 ; p_cenv->env1 = env1 ; p_cenv->env2 = env2 ; p_cenv->cfun = __patsfun_90__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_90__closurerize ( atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2 ) { return __patsfun_90__closureinit(ATS_MALLOC(sizeof(__patsfun_90__closure_t0ype)), env0, env1, env2) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_91, (atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk)), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_t0ype(atstype_int) env0 ; atstkind_t0ype(atstype_int) env1 ; atstkind_type(atstype_ptrk) env2 ; } __patsfun_91__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_91__cfun ( __patsfun_91__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_91(p_cenv->env0, p_cenv->env1, p_cenv->env2, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_91__closureinit ( __patsfun_91__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2 ) { p_cenv->env0 = env0 ; p_cenv->env1 = env1 ; p_cenv->env2 = env2 ; p_cenv->cfun = __patsfun_91__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_91__closurerize ( atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2 ) { return __patsfun_91__closureinit(ATS_MALLOC(sizeof(__patsfun_91__closure_t0ype)), env0, env1, env2) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_142, (atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_t0ype(atstype_int) env0 ; } __patsfun_142__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_142__cfun ( __patsfun_142__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_142(p_cenv->env0, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_142__closureinit ( __patsfun_142__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0 ) { p_cenv->env0 = env0 ; p_cenv->cfun = __patsfun_142__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_142__closurerize ( atstkind_t0ype(atstype_int) env0 ) { return __patsfun_142__closureinit(ATS_MALLOC(sizeof(__patsfun_142__closure_t0ype)), env0) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_143, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_143__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_143__cfun ( __patsfun_143__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_143(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_143__closureinit ( __patsfun_143__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_143__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_143__closurerize ( // argumentless ) { return __patsfun_143__closureinit(ATS_MALLOC(sizeof(__patsfun_143__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_144, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_144__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_144__cfun ( __patsfun_144__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_144(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_144__closureinit ( __patsfun_144__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_144__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_144__closurerize ( // argumentless ) { return __patsfun_144__closureinit(ATS_MALLOC(sizeof(__patsfun_144__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_147, (atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_t0ype(atstype_int) env0 ; atstkind_t0ype(atstype_int) env1 ; } __patsfun_147__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_147__cfun ( __patsfun_147__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_147(p_cenv->env0, p_cenv->env1, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_147__closureinit ( __patsfun_147__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1 ) { p_cenv->env0 = env0 ; p_cenv->env1 = env1 ; p_cenv->cfun = __patsfun_147__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_147__closurerize ( atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1 ) { return __patsfun_147__closureinit(ATS_MALLOC(sizeof(__patsfun_147__closure_t0ype)), env0, env1) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_148, (atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_t0ype(atstype_int) env0 ; } __patsfun_148__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_148__cfun ( __patsfun_148__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_148(p_cenv->env0, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_148__closureinit ( __patsfun_148__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0 ) { p_cenv->env0 = env0 ; p_cenv->cfun = __patsfun_148__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_148__closurerize ( atstkind_t0ype(atstype_int) env0 ) { return __patsfun_148__closureinit(ATS_MALLOC(sizeof(__patsfun_148__closure_t0ype)), env0) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_149, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_149__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_149__cfun ( __patsfun_149__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_149(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_149__closureinit ( __patsfun_149__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_149__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_149__closurerize ( // argumentless ) { return __patsfun_149__closureinit(ATS_MALLOC(sizeof(__patsfun_149__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_164, (), (postiats_tyrec_0, atsrefarg1_type(atstkind_t0ype(atstype_int))), postiats_tyrec_0) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_164__closure_t0ype ; ATSstatic() postiats_tyrec_0 __patsfun_164__cfun ( __patsfun_164__closure_t0ype *p_cenv, postiats_tyrec_0 arg0, atsrefarg1_type(atstkind_t0ype(atstype_int)) arg1 ) { ATSFCreturn(__patsfun_164(arg0, arg1)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_164__closureinit ( __patsfun_164__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_164__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_164__closurerize ( // argumentless ) { return __patsfun_164__closureinit(ATS_MALLOC(sizeof(__patsfun_164__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 414(line=12, offs=4) -- 587(line=19, offs=6) */ /* local: global: fib_gmp_0$0(level=0) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) fib_gmp_0(atstkind_t0ype(atstype_uint) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret0, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmpref1, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp4) ; // ATStmpdec_void(tmp5) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 414(line=12, offs=4) -- 587(line=19, offs=6) */ ATSINSflab(__patsflab_fib_gmp_0): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 451(line=13, offs=3) -- 587(line=19, offs=6) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 463(line=14, offs=9) -- 464(line=14, offs=10) */ /* ATSINStmpdec(tmpref1) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 467(line=14, offs=13) -- 478(line=14, offs=24) */ ATSINSmove(tmpref1, ATSLIB_056_prelude__ptr_alloc__1__1()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 492(line=15, offs=14) -- 513(line=15, offs=35) */ ATSINSmove_void(tmp4, atscntrb_gmp_mpz_init(ATSPMVrefarg1(ATSSELrecsin(tmpref1, atstkind_type(atstype_ptrk), atslab__2)))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 527(line=16, offs=14) -- 555(line=16, offs=42) */ ATSINSmove_void(tmp5, atscntrb_gmp_mpz_fib_uint(ATSPMVrefarg1(ATSSELrecsin(tmpref1, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 565(line=18, offs=5) -- 580(line=18, offs=20) */ ATSINSmove(tmpret0, ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), tmpref1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 451(line=13, offs=3) -- 587(line=19, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret0) ; } /* end of [fib_gmp_0] */ #if(0) /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) */ /* local: global: ptr_alloc$1$0(level=0) local: global: */ ATSextern() /* imparg = a(4746) tmparg = S2Evar(a(4746)) tmpsub = None() */ atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1() { /* tmpvardeclst(beg) */ ATStmpdec(tmpret2, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) */ ATSINSflab(__patsflab_ptr_alloc): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) */ ATSINSmove(tmpret2, atspre_ptr_alloc_tsz(ATSPMVsizeof(atstyvar_type(a)))) ; ATSfunbody_end() ATSreturn(tmpret2) ; } /* end of [ATSLIB_056_prelude__ptr_alloc__1] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) */ /* local: global: ptr_alloc$1$1(level=1) local: global: */ ATSstatic() /* imparg = a(4746) tmparg = S2Evar(a(4746)) tmpsub = Some(a(4746) -> S2EVar(5565)) */ atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__1() { /* tmpvardeclst(beg) */ ATStmpdec(tmpret2__1, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) */ ATSINSflab(__patsflab_ptr_alloc): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) */ ATSINSmove(tmpret2__1, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; ATSfunbody_end() ATSreturn(tmpret2__1) ; } /* end of [ATSLIB_056_prelude__ptr_alloc__1__1] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 764(line=24, offs=5) -- 1203(line=45, offs=10) */ /* local: exp_3$0(level=0) global: exp_3$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) exp_3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret6, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp7, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmpref12, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref13, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp14, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp19, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref20, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp21, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp22, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 764(line=24, offs=5) -- 1203(line=45, offs=10) */ ATSINSflab(__patsflab_exp_3): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 814(line=25, offs=3) -- 1203(line=45, offs=10) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 831(line=26, offs=7) -- 832(line=26, offs=8) */ ATSINSlab(__atstmplab0): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 783(line=24, offs=24) -- 784(line=24, offs=25) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab2) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 832(line=26, offs=8) -- 832(line=26, offs=8) */ ATSINSlab(__atstmplab1): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 836(line=26, offs=12) -- 837(line=26, offs=13) */ ATSINSmove(tmpret6, ATSPMVi0nt(0)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 845(line=27, offs=8) -- 845(line=27, offs=8) */ ATSINSlab(__atstmplab2): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 874(line=29, offs=12) -- 879(line=29, offs=17) */ ATSINSmove(tmp7, ATSLIB_056_prelude__gt_g1int_int__4__1(arg1, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 871(line=29, offs=9) -- 1193(line=44, offs=12) */ ATSif( tmp7 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 895(line=30, offs=11) -- 1168(line=42, offs=14) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 915(line=31, offs=17) -- 917(line=31, offs=19) */ /* ATSINStmpdec(tmpref12) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 920(line=31, offs=22) -- 926(line=31, offs=28) */ ATSINSmove(tmpref12, atspre_g1int_half_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 944(line=32, offs=17) -- 946(line=32, offs=19) */ /* ATSINStmpdec(tmpref13) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 949(line=32, offs=22) -- 954(line=32, offs=27) */ ATSINSmove(tmpref13, atspre_g0int_mod_int(arg1, ATSPMVi0nt(2))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 983(line=34, offs=16) -- 989(line=34, offs=22) */ ATSINSmove(tmp14, ATSLIB_056_prelude__eq_g0int_int__10__1(tmpref13, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 980(line=34, offs=13) -- 1154(line=41, offs=18) */ ATSif( tmp14 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1013(line=35, offs=19) -- 1018(line=35, offs=24) */ ATSINSmove(tmp19, atspre_g0int_mul_int(arg0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1009(line=35, offs=15) -- 1023(line=35, offs=29) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp19) ; ATSINSmove_tlcal(apy1, tmpref12) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_exp_3) ; ATStailcal_end() } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1055(line=37, offs=15) -- 1154(line=41, offs=18) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1079(line=38, offs=21) -- 1080(line=38, offs=22) */ /* ATSINStmpdec(tmpref20) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1091(line=38, offs=33) -- 1096(line=38, offs=38) */ ATSINSmove(tmp22, atspre_g0int_mul_int(arg0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1087(line=38, offs=29) -- 1101(line=38, offs=43) */ ATSINSmove(tmp21, exp_3(tmp22, tmpref12)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1083(line=38, offs=25) -- 1101(line=38, offs=43) */ ATSINSmove(tmpref20, atspre_g0int_mul_int(arg0, tmp21)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1135(line=40, offs=17) -- 1136(line=40, offs=18) */ ATSINSmove(tmpret6, tmpref20) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1055(line=37, offs=15) -- 1154(line=41, offs=18) */ /* INSletpop() */ } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 895(line=30, offs=11) -- 1168(line=42, offs=14) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1192(line=44, offs=11) -- 1193(line=44, offs=12) */ ATSINSmove(tmpret6, ATSPMVi0nt(1)) ; } /* ATSendif */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret6) ; } /* end of [exp_3] */ #if(0) /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$4$0(level=0) local: global: */ ATSextern() /* imparg = tk(4643) tmparg = S2Evar(tk(4643)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret8, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp9, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) */ ATSINSflab(__patsflab_gt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp9, PMVtmpltcst(g1int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret8, PMVtmpltcst(g1int_gt)(arg0, tmp9)) ; ATSfunbody_end() ATSreturn(tmpret8) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__4] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$4$1(level=1) local: global: */ ATSstatic() /* imparg = tk(4643) tmparg = S2Evar(tk(4643)) tmpsub = Some(tk(4643) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret8__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp9__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) */ ATSINSflab(__patsflab_gt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp9__1, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret8__1, atspre_g1int_gt_int(arg0, tmp9__1)) ; ATSfunbody_end() ATSreturn(tmpret8__1) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__4__1] */ #if(0) /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$0(level=0) local: global: */ ATSextern() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16, PMVtmpltcst(g0int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15, PMVtmpltcst(g0int_eq)(arg0, tmp16)) ; ATSfunbody_end() ATSreturn(tmpret15) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$1(level=1) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__1, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__1, atspre_g0int_eq_int(arg0, tmp16__1)) ; ATSfunbody_end() ATSreturn(tmpret15__1) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__1] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1241(line=48, offs=5) -- 1849(line=74, offs=39) */ /* local: big_exp_15$0(level=0) global: big_exp_15$0(level=0) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) big_exp_15(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_type(atstype_ptrk)) ; ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret23, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp24, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp29, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp48, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmpref51, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref52, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp53, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmpref56, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmpref76, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmpref82, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmpref83, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp88) ; // ATStmpdec_void(tmp91) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1241(line=48, offs=5) -- 1849(line=74, offs=39) */ ATSINSflab(__patsflab_big_exp_15): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1304(line=49, offs=6) -- 1328(line=49, offs=30) */ ATSINSmove(tmp29, ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__19__1(ATSPMVrefarg0(arg0), ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1304(line=49, offs=6) -- 1332(line=49, offs=34) */ ATSINSmove(tmp24, ATSLIB_056_prelude__eq_g1int_int__16__1(tmp29, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1301(line=49, offs=3) -- 1849(line=74, offs=39) */ ATSif( tmp24 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1342(line=50, offs=5) -- 1343(line=50, offs=6) */ ATSINSmove(tmpret23, arg0) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1358(line=52, offs=8) -- 1363(line=52, offs=13) */ ATSINSmove(tmp48, ATSLIB_056_prelude__gt_g1int_int__4__2(arg1, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1355(line=52, offs=5) -- 1849(line=74, offs=39) */ ATSif( tmp48 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1375(line=53, offs=7) -- 1801(line=72, offs=10) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1391(line=54, offs=13) -- 1393(line=54, offs=15) */ /* ATSINStmpdec(tmpref51) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1396(line=54, offs=18) -- 1402(line=54, offs=24) */ ATSINSmove(tmpref51, atspre_g1int_half_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1416(line=55, offs=13) -- 1418(line=55, offs=15) */ /* ATSINStmpdec(tmpref52) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1421(line=55, offs=18) -- 1426(line=55, offs=23) */ ATSINSmove(tmpref52, atspre_g0int_mod_int(arg1, ATSPMVi0nt(2))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1447(line=57, offs=12) -- 1453(line=57, offs=18) */ ATSINSmove(tmp53, ATSLIB_056_prelude__eq_g0int_int__10__2(tmpref52, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1444(line=57, offs=9) -- 1791(line=71, offs=14) */ ATSif( tmp53 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1469(line=58, offs=11) -- 1564(line=62, offs=14) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1489(line=59, offs=17) -- 1490(line=59, offs=18) */ /* ATSINStmpdec(tmpref56) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1493(line=59, offs=21) -- 1509(line=59, offs=37) */ ATSINSmove(tmpref56, ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__30__1(arg0)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1536(line=61, offs=13) -- 1550(line=61, offs=27) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmpref56) ; ATSINSmove_tlcal(apy1, tmpref51) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_big_exp_15) ; ATStailcal_end() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1469(line=58, offs=11) -- 1564(line=62, offs=14) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1588(line=64, offs=11) -- 1791(line=71, offs=14) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1608(line=65, offs=17) -- 1610(line=65, offs=19) */ /* ATSINStmpdec(tmpref76) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1613(line=65, offs=22) -- 1629(line=65, offs=38) */ ATSINSmove(tmpref76, ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__32__2(ATSPMVrefarg0(arg0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1647(line=66, offs=17) -- 1649(line=66, offs=19) */ /* ATSINStmpdec(tmpref82) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1652(line=66, offs=22) -- 1667(line=66, offs=37) */ ATSINSmove(tmpref82, big_exp_15(tmpref76, tmpref51)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1684(line=67, offs=17) -- 1685(line=67, offs=18) */ /* ATSINStmpdec(tmpref83) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1688(line=67, offs=21) -- 1714(line=67, offs=47) */ ATSINSmove(tmpref83, ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__39__1(tmpref82, ATSPMVrefarg0(arg0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1736(line=68, offs=22) -- 1749(line=68, offs=35) */ ATSINSmove_void(tmp88, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35__2(arg0)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1776(line=70, offs=13) -- 1777(line=70, offs=14) */ ATSINSmove(tmpret23, tmpref83) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1588(line=64, offs=11) -- 1791(line=71, offs=14) */ /* INSletpop() */ } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1375(line=53, offs=7) -- 1801(line=72, offs=10) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1818(line=74, offs=8) -- 1831(line=74, offs=21) */ ATSINSmove_void(tmp91, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35__3(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1835(line=74, offs=25) -- 1848(line=74, offs=38) */ ATSINSmove(tmpret23, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__43__1(ATSPMVi0nt(1))) ; } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret23) ; } /* end of [big_exp_15] */ #if(0) /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) */ /* local: global: eq_g1int_int$16$0(level=0) local: global: */ ATSextern() /* imparg = tk(4649) tmparg = S2Evar(tk(4649)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__16(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret25, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp26, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12823(line=667, offs=1) -- 12877(line=668, offs=42) */ ATSINSflab(__patsflab_eq_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) */ ATSINSmove(tmp26, PMVtmpltcst(g1int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) */ ATSINSmove(tmpret25, PMVtmpltcst(g1int_eq)(arg0, tmp26)) ; ATSfunbody_end() ATSreturn(tmpret25) ; } /* end of [ATSLIB_056_prelude__eq_g1int_int__16] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) */ /* local: global: eq_g1int_int$16$1(level=1) local: global: */ ATSstatic() /* imparg = tk(4649) tmparg = S2Evar(tk(4649)) tmpsub = Some(tk(4649) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__16__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret25__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp26__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12823(line=667, offs=1) -- 12877(line=668, offs=42) */ ATSINSflab(__patsflab_eq_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) */ ATSINSmove(tmp26__1, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) */ ATSINSmove(tmpret25__1, atspre_g1int_eq_int(arg0, tmp26__1)) ; ATSfunbody_end() ATSreturn(tmpret25__1) ; } /* end of [ATSLIB_056_prelude__eq_g1int_int__16__1] */ #if(0) /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13321(line=768, offs=9) -- 13484(line=775, offs=4) */ /* local: global: compare_intinf_int$19$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atstkind_t0ype(atstype_int) ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__19(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret30, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp31, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp32, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp33, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp34, atstkind_t0ype(atstype_bool)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13294(line=767, offs=1) -- 13484(line=775, offs=4) */ ATSINSflab(__patsflab_compare_intinf_int): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13330(line=768, offs=18) -- 13484(line=775, offs=4) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13347(line=770, offs=11) -- 13375(line=770, offs=39) */ ATSINSmove(tmp31, atscntrb_gmp_mpz_cmp_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13390(line=771, offs=15) -- 13397(line=771, offs=22) */ ATSINSmove(tmp33, PMVtmpltcst(lt_g0int_int)(tmp31, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13387(line=771, offs=12) -- 13437(line=771, offs=62) */ ATSif( tmp33 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13403(line=771, offs=28) -- 13405(line=771, offs=30) */ ATSINSmove(tmp32, PMVtmpltcst(g1int_neg)(ATSPMVi0nt(1))) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13415(line=771, offs=40) -- 13422(line=771, offs=47) */ ATSINSmove(tmp34, PMVtmpltcst(gt_g0int_int)(tmp31, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13412(line=771, offs=37) -- 13436(line=771, offs=61) */ ATSif( tmp34 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13428(line=771, offs=53) -- 13429(line=771, offs=54) */ ATSINSmove(tmp32, ATSPMVi0nt(1)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13435(line=771, offs=60) -- 13436(line=771, offs=61) */ ATSINSmove(tmp32, ATSPMVi0nt(0)) ; } /* ATSendif */ } /* ATSendif */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13452(line=774, offs=3) -- 13479(line=774, offs=30) */ ATSINSmove(tmpret30, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp32)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13330(line=768, offs=18) -- 13484(line=775, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret30) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__19] */ #endif // end of [TEMPLATE] /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13321(line=768, offs=9) -- 13484(line=775, offs=4) */ /* local: global: compare_intinf_int$19$1(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_t0ype(atstype_int) ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__19__1(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret30__1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp31__1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp32__1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp33__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp34__1, atstkind_t0ype(atstype_bool)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13294(line=767, offs=1) -- 13484(line=775, offs=4) */ ATSINSflab(__patsflab_compare_intinf_int): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13330(line=768, offs=18) -- 13484(line=775, offs=4) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13347(line=770, offs=11) -- 13375(line=770, offs=39) */ ATSINSmove(tmp31__1, atscntrb_gmp_mpz_cmp_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13390(line=771, offs=15) -- 13397(line=771, offs=22) */ ATSINSmove(tmp33__1, ATSLIB_056_prelude__lt_g0int_int__21__1(tmp31__1, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13387(line=771, offs=12) -- 13437(line=771, offs=62) */ ATSif( tmp33__1 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13403(line=771, offs=28) -- 13405(line=771, offs=30) */ ATSINSmove(tmp32__1, atspre_g1int_neg_int(ATSPMVi0nt(1))) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13415(line=771, offs=40) -- 13422(line=771, offs=47) */ ATSINSmove(tmp34__1, ATSLIB_056_prelude__gt_g0int_int__25__1(tmp31__1, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13412(line=771, offs=37) -- 13436(line=771, offs=61) */ ATSif( tmp34__1 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13428(line=771, offs=53) -- 13429(line=771, offs=54) */ ATSINSmove(tmp32__1, ATSPMVi0nt(1)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13435(line=771, offs=60) -- 13436(line=771, offs=61) */ ATSINSmove(tmp32__1, ATSPMVi0nt(0)) ; } /* ATSendif */ } /* ATSendif */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13452(line=774, offs=3) -- 13479(line=774, offs=30) */ ATSINSmove(tmpret30__1, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp32__1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13330(line=768, offs=18) -- 13484(line=775, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret30__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__19__1] */ #if(0) /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 11941(line=617, offs=3) -- 11980(line=617, offs=42) */ /* local: global: lt_g0int_int$21$0(level=0) local: global: */ ATSextern() /* imparg = tk(4630) tmparg = S2Evar(tk(4630)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g0int_int__21(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret40, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp41, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 11926(line=616, offs=1) -- 11980(line=617, offs=42) */ ATSINSflab(__patsflab_lt_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 11967(line=617, offs=29) -- 11978(line=617, offs=40) */ ATSINSmove(tmp41, PMVtmpltcst(g0int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 11950(line=617, offs=12) -- 11980(line=617, offs=42) */ ATSINSmove(tmpret40, PMVtmpltcst(g0int_lt)(arg0, tmp41)) ; ATSfunbody_end() ATSreturn(tmpret40) ; } /* end of [ATSLIB_056_prelude__lt_g0int_int__21] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 11941(line=617, offs=3) -- 11980(line=617, offs=42) */ /* local: global: lt_g0int_int$21$1(level=2) local: global: */ ATSstatic() /* imparg = tk(4630) tmparg = S2Evar(tk(4630)) tmpsub = Some(tk(4630) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g0int_int__21__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret40__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp41__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 11926(line=616, offs=1) -- 11980(line=617, offs=42) */ ATSINSflab(__patsflab_lt_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 11967(line=617, offs=29) -- 11978(line=617, offs=40) */ ATSINSmove(tmp41__1, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 11950(line=617, offs=12) -- 11980(line=617, offs=42) */ ATSINSmove(tmpret40__1, atspre_g0int_lt_int(arg0, tmp41__1)) ; ATSfunbody_end() ATSreturn(tmpret40__1) ; } /* end of [ATSLIB_056_prelude__lt_g0int_int__21__1] */ #if(0) /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12100(line=626, offs=3) -- 12139(line=626, offs=42) */ /* local: global: gt_g0int_int$25$0(level=0) local: global: */ ATSextern() /* imparg = tk(4632) tmparg = S2Evar(tk(4632)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g0int_int__25(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret44, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp45, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12085(line=625, offs=1) -- 12139(line=626, offs=42) */ ATSINSflab(__patsflab_gt_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12126(line=626, offs=29) -- 12137(line=626, offs=40) */ ATSINSmove(tmp45, PMVtmpltcst(g0int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12109(line=626, offs=12) -- 12139(line=626, offs=42) */ ATSINSmove(tmpret44, PMVtmpltcst(g0int_gt)(arg0, tmp45)) ; ATSfunbody_end() ATSreturn(tmpret44) ; } /* end of [ATSLIB_056_prelude__gt_g0int_int__25] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12100(line=626, offs=3) -- 12139(line=626, offs=42) */ /* local: global: gt_g0int_int$25$1(level=2) local: global: */ ATSstatic() /* imparg = tk(4632) tmparg = S2Evar(tk(4632)) tmpsub = Some(tk(4632) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g0int_int__25__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret44__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp45__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12085(line=625, offs=1) -- 12139(line=626, offs=42) */ ATSINSflab(__patsflab_gt_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12126(line=626, offs=29) -- 12137(line=626, offs=40) */ ATSINSmove(tmp45__1, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12109(line=626, offs=12) -- 12139(line=626, offs=42) */ ATSINSmove(tmpret44__1, atspre_g0int_gt_int(arg0, tmp45__1)) ; ATSfunbody_end() ATSreturn(tmpret44__1) ; } /* end of [ATSLIB_056_prelude__gt_g0int_int__25__1] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$4$2(level=1) local: global: */ ATSstatic() /* imparg = tk(4643) tmparg = S2Evar(tk(4643)) tmpsub = Some(tk(4643) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret8__2, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp9__2, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) */ ATSINSflab(__patsflab_gt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp9__2, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret8__2, atspre_g1int_gt_int(arg0, tmp9__2)) ; ATSfunbody_end() ATSreturn(tmpret8__2) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__4__2] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$2(level=1) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__2, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__2, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__2, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__2, atspre_g0int_eq_int(arg0, tmp16__2)) ; ATSfunbody_end() ATSreturn(tmpret15__2) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__2] */ #if(0) /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4581(line=236, offs=3) -- 4665(line=240, offs=2) */ /* local: global: square_intinf0$30$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__30(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret57, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp58, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp59) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4564(line=235, offs=1) -- 4665(line=240, offs=2) */ ATSINSflab(__patsflab_square_intinf0): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4587(line=236, offs=9) -- 4665(line=240, offs=2) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4611(line=238, offs=13) -- 4627(line=238, offs=29) */ ATSINSmove(tmp58, PMVtmpltcst(square_intinf1<>)(ATSPMVrefarg0(arg0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4649(line=239, offs=21) -- 4662(line=239, offs=34) */ ATSINSmove_void(tmp59, PMVtmpltcst(intinf_free<>)(arg0)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4587(line=236, offs=9) -- 4590(line=236, offs=12) */ ATSINSmove(tmpret57, tmp58) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4587(line=236, offs=9) -- 4665(line=240, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret57) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__30] */ #endif // end of [TEMPLATE] /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4581(line=236, offs=3) -- 4665(line=240, offs=2) */ /* local: global: square_intinf0$30$1(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__30__1(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret57__1, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp58__1, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp59__1) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4564(line=235, offs=1) -- 4665(line=240, offs=2) */ ATSINSflab(__patsflab_square_intinf0): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4587(line=236, offs=9) -- 4665(line=240, offs=2) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4611(line=238, offs=13) -- 4627(line=238, offs=29) */ ATSINSmove(tmp58__1, ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__32__1(ATSPMVrefarg0(arg0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4649(line=239, offs=21) -- 4662(line=239, offs=34) */ ATSINSmove_void(tmp59__1, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35__1(arg0)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4587(line=236, offs=9) -- 4590(line=236, offs=12) */ ATSINSmove(tmpret57__1, tmp58__1) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4587(line=236, offs=9) -- 4665(line=240, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret57__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__30__1] */ #if(0) /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4755(line=247, offs=3) -- 4900(line=256, offs=2) */ /* local: global: square_intinf1$32$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__32(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret63, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp64, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp65) ; // ATStmpdec_void(tmp66) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4738(line=246, offs=1) -- 4900(line=256, offs=2) */ ATSINSflab(__patsflab_square_intinf1): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4761(line=247, offs=9) -- 4900(line=256, offs=2) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4784(line=250, offs=9) -- 4800(line=250, offs=25) */ ATSINSmove(tmp64, PMVtmpltcst(ptr_alloc)()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4812(line=252, offs=3) -- 4849(line=252, offs=40) */ ATSINSmove_void(tmp65, atscntrb_gmp_mpz_init_set_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp64, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4862(line=254, offs=10) -- 4895(line=254, offs=43) */ ATSINSmove_void(tmp66, atscntrb_gmp_mpz_mul2_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp64, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4762(line=247, offs=10) -- 4763(line=247, offs=11) */ ATSINSmove(tmpret63, tmp64) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4761(line=247, offs=9) -- 4900(line=256, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret63) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__32] */ #endif // end of [TEMPLATE] /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4755(line=247, offs=3) -- 4900(line=256, offs=2) */ /* local: global: square_intinf1$32$1(level=2) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__32__1(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret63__1, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp64__1, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp65__1) ; // ATStmpdec_void(tmp66__1) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4738(line=246, offs=1) -- 4900(line=256, offs=2) */ ATSINSflab(__patsflab_square_intinf1): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4761(line=247, offs=9) -- 4900(line=256, offs=2) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4784(line=250, offs=9) -- 4800(line=250, offs=25) */ ATSINSmove(tmp64__1, ATSLIB_056_prelude__ptr_alloc__1__2()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4812(line=252, offs=3) -- 4849(line=252, offs=40) */ ATSINSmove_void(tmp65__1, atscntrb_gmp_mpz_init_set_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp64__1, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4862(line=254, offs=10) -- 4895(line=254, offs=43) */ ATSINSmove_void(tmp66__1, atscntrb_gmp_mpz_mul2_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp64__1, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4762(line=247, offs=10) -- 4763(line=247, offs=11) */ ATSINSmove(tmpret63__1, tmp64__1) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4761(line=247, offs=9) -- 4900(line=256, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret63__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__32__1] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) */ /* local: global: ptr_alloc$1$2(level=3) local: global: */ ATSstatic() /* imparg = a(4746) tmparg = S2Evar(a(4746)) tmpsub = Some(a(4746) -> S2Ecst(mpz_vt0ype)) */ atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__2() { /* tmpvardeclst(beg) */ ATStmpdec(tmpret2__2, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) */ ATSINSflab(__patsflab_ptr_alloc): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) */ ATSINSmove(tmpret2__2, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; ATSfunbody_end() ATSreturn(tmpret2__2) ; } /* end of [ATSLIB_056_prelude__ptr_alloc__1__2] */ #if(0) /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2888(line=119, offs=12) -- 2987(line=122, offs=4) */ /* local: global: intinf_free$35$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ // ATStmpdec_void(tmpret72) ; // ATStmpdec_void(tmp73) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2877(line=119, offs=1) -- 2987(line=122, offs=4) */ ATSINSflab(__patsflab_intinf_free): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) */ /* letpush(beg) */ /* (*nothing*) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2936(line=121, offs=12) -- 2955(line=121, offs=31) */ ATSINSmove_void(tmp73, atscntrb_gmp_mpz_clear(ATSPMVrefarg1(arg0))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2959(line=121, offs=35) -- 2983(line=121, offs=59) */ ATSINSmove_void(tmpret72, atspre_ptr_free(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn_void(tmpret72) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35] */ #endif // end of [TEMPLATE] /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2888(line=119, offs=12) -- 2987(line=122, offs=4) */ /* local: global: intinf_free$35$1(level=2) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35__1(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ // ATStmpdec_void(tmpret72__1) ; // ATStmpdec_void(tmp73__1) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2877(line=119, offs=1) -- 2987(line=122, offs=4) */ ATSINSflab(__patsflab_intinf_free): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) */ /* letpush(beg) */ /* (*nothing*) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2936(line=121, offs=12) -- 2955(line=121, offs=31) */ ATSINSmove_void(tmp73__1, atscntrb_gmp_mpz_clear(ATSPMVrefarg1(arg0))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2959(line=121, offs=35) -- 2983(line=121, offs=59) */ ATSINSmove_void(tmpret72__1, atspre_ptr_free(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn_void(tmpret72__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35__1] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4755(line=247, offs=3) -- 4900(line=256, offs=2) */ /* local: global: square_intinf1$32$2(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__32__2(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret63__2, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp64__2, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp65__2) ; // ATStmpdec_void(tmp66__2) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4738(line=246, offs=1) -- 4900(line=256, offs=2) */ ATSINSflab(__patsflab_square_intinf1): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4761(line=247, offs=9) -- 4900(line=256, offs=2) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4784(line=250, offs=9) -- 4800(line=250, offs=25) */ ATSINSmove(tmp64__2, ATSLIB_056_prelude__ptr_alloc__1__3()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4812(line=252, offs=3) -- 4849(line=252, offs=40) */ ATSINSmove_void(tmp65__2, atscntrb_gmp_mpz_init_set_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp64__2, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4862(line=254, offs=10) -- 4895(line=254, offs=43) */ ATSINSmove_void(tmp66__2, atscntrb_gmp_mpz_mul2_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp64__2, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4762(line=247, offs=10) -- 4763(line=247, offs=11) */ ATSINSmove(tmpret63__2, tmp64__2) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4761(line=247, offs=9) -- 4900(line=256, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret63__2) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__32__2] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) */ /* local: global: ptr_alloc$1$3(level=2) local: global: */ ATSstatic() /* imparg = a(4746) tmparg = S2Evar(a(4746)) tmpsub = Some(a(4746) -> S2Ecst(mpz_vt0ype)) */ atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__3() { /* tmpvardeclst(beg) */ ATStmpdec(tmpret2__3, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) */ ATSINSflab(__patsflab_ptr_alloc): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) */ ATSINSmove(tmpret2__3, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; ATSfunbody_end() ATSreturn(tmpret2__3) ; } /* end of [ATSLIB_056_prelude__ptr_alloc__1__3] */ #if(0) /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7761(line=437, offs=3) -- 7833(line=442, offs=2) */ /* local: global: mul_intinf0_intinf1$39$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__39(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret84, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp85) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7739(line=436, offs=1) -- 7833(line=442, offs=2) */ ATSINSflab(__patsflab_mul_intinf0_intinf1): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7770(line=437, offs=12) -- 7833(line=442, offs=2) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7794(line=440, offs=10) -- 7828(line=440, offs=44) */ ATSINSmove_void(tmp85, atscntrb_gmp_mpz_mul2_mpz(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg1, atstkind_type(atstype_ptrk), atslab__2)))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7771(line=437, offs=13) -- 7772(line=437, offs=14) */ ATSINSmove(tmpret84, arg0) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7770(line=437, offs=12) -- 7833(line=442, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret84) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__39] */ #endif // end of [TEMPLATE] /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7761(line=437, offs=3) -- 7833(line=442, offs=2) */ /* local: global: mul_intinf0_intinf1$39$1(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__39__1(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret84__1, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp85__1) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7739(line=436, offs=1) -- 7833(line=442, offs=2) */ ATSINSflab(__patsflab_mul_intinf0_intinf1): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7770(line=437, offs=12) -- 7833(line=442, offs=2) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7794(line=440, offs=10) -- 7828(line=440, offs=44) */ ATSINSmove_void(tmp85__1, atscntrb_gmp_mpz_mul2_mpz(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), ATSPMVrefarg1(ATSSELrecsin(arg1, atstkind_type(atstype_ptrk), atslab__2)))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7771(line=437, offs=13) -- 7772(line=437, offs=14) */ ATSINSmove(tmpret84__1, arg0) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7770(line=437, offs=12) -- 7833(line=442, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret84__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__39__1] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2888(line=119, offs=12) -- 2987(line=122, offs=4) */ /* local: global: intinf_free$35$2(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35__2(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ // ATStmpdec_void(tmpret72__2) ; // ATStmpdec_void(tmp73__2) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2877(line=119, offs=1) -- 2987(line=122, offs=4) */ ATSINSflab(__patsflab_intinf_free): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) */ /* letpush(beg) */ /* (*nothing*) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2936(line=121, offs=12) -- 2955(line=121, offs=31) */ ATSINSmove_void(tmp73__2, atscntrb_gmp_mpz_clear(ATSPMVrefarg1(arg0))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2959(line=121, offs=35) -- 2983(line=121, offs=59) */ ATSINSmove_void(tmpret72__2, atspre_ptr_free(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn_void(tmpret72__2) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35__2] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2888(line=119, offs=12) -- 2987(line=122, offs=4) */ /* local: global: intinf_free$35$3(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35__3(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ // ATStmpdec_void(tmpret72__3) ; // ATStmpdec_void(tmp73__3) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2877(line=119, offs=1) -- 2987(line=122, offs=4) */ ATSINSflab(__patsflab_intinf_free): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) */ /* letpush(beg) */ /* (*nothing*) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2936(line=121, offs=12) -- 2955(line=121, offs=31) */ ATSINSmove_void(tmp73__3, atscntrb_gmp_mpz_clear(ATSPMVrefarg1(arg0))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2959(line=121, offs=35) -- 2983(line=121, offs=59) */ ATSINSmove_void(tmpret72__3, atspre_ptr_free(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2894(line=119, offs=18) -- 2987(line=122, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn_void(tmpret72__3) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__35__3] */ #if(0) /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) */ /* local: global: intinf_make_int$43$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__43(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret94, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp95, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp96) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) */ ATSINSflab(__patsflab_intinf_make_int): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) */ ATSINSmove(tmp95, PMVtmpltcst(ptr_alloc)()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) */ ATSINSmove_void(tmp96, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp95, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) */ ATSINSmove(tmpret94, tmp95) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret94) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__43] */ #endif // end of [TEMPLATE] /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) */ /* local: global: intinf_make_int$43$1(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__43__1(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret94__1, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp95__1, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp96__1) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) */ ATSINSflab(__patsflab_intinf_make_int): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) */ ATSINSmove(tmp95__1, ATSLIB_056_prelude__ptr_alloc__1__4()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) */ ATSINSmove_void(tmp96__1, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp95__1, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) */ ATSINSmove(tmpret94__1, tmp95__1) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret94__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__43__1] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) */ /* local: global: ptr_alloc$1$4(level=2) local: global: */ ATSstatic() /* imparg = a(4746) tmparg = S2Evar(a(4746)) tmpsub = Some(a(4746) -> S2Ecst(mpz_vt0ype)) */ atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__4() { /* tmpvardeclst(beg) */ ATStmpdec(tmpret2__4, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) */ ATSINSflab(__patsflab_ptr_alloc): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) */ ATSINSmove(tmpret2__4, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; ATSfunbody_end() ATSreturn(tmpret2__4) ; } /* end of [ATSLIB_056_prelude__ptr_alloc__1__4] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1895(line=77, offs=4) -- 2042(line=82, offs=6) */ /* local: global: sqrt_int_46$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) sqrt_int_46(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret101, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref102, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp103, atstkind_t0ype(atstype_double)) ; ATStmpdec(tmp104, atstkind_t0ype(atstype_double)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1895(line=77, offs=4) -- 2042(line=82, offs=6) */ ATSINSflab(__patsflab_sqrt_int_46): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1941(line=78, offs=3) -- 2042(line=82, offs=6) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1953(line=79, offs=9) -- 1958(line=79, offs=14) */ /* ATSINStmpdec(tmpref102) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1985(line=79, offs=41) -- 2009(line=79, offs=65) */ ATSINSmove(tmp104, atspre_g0int2float_int_double(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1973(line=79, offs=29) -- 2011(line=79, offs=67) */ ATSINSmove(tmp103, atslib_libats_libc_sqrt_double(tmp104)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1961(line=79, offs=17) -- 2012(line=79, offs=68) */ ATSINSmove(tmpref102, atspre_g0float2int_double_int(tmp103)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2022(line=81, offs=5) -- 2035(line=81, offs=18) */ ATSINSmove(tmpret101, ATSPMVcastfn(witness, atstkind_t0ype(atstype_int), tmpref102)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1941(line=78, offs=3) -- 2042(line=82, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret101) ; } /* end of [sqrt_int_46] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2078(line=85, offs=4) -- 2659(line=108, offs=10) */ /* local: sqrt_int_46$0(level=0) global: sqrt_int_46$0(level=0), is_prime_48$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_bool) is_prime_48(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret105, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp124, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2078(line=85, offs=4) -- 2659(line=108, offs=10) */ ATSINSflab(__patsflab_is_prime_48): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2114(line=86, offs=3) -- 2659(line=108, offs=10) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2131(line=87, offs=7) -- 2132(line=87, offs=8) */ ATSINSlab(__atstmplab3): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2087(line=85, offs=13) -- 2088(line=85, offs=14) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab5) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2132(line=87, offs=8) -- 2132(line=87, offs=8) */ ATSINSlab(__atstmplab4): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2136(line=87, offs=12) -- 2141(line=87, offs=17) */ ATSINSmove(tmpret105, ATSPMVbool_false()) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2149(line=88, offs=8) -- 2149(line=88, offs=8) */ ATSINSlab(__atstmplab5): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2174(line=90, offs=9) -- 2649(line=107, offs=12) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2625(line=106, offs=19) -- 2635(line=106, offs=29) */ ATSINSmove(tmp124, sqrt_int_46(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2617(line=106, offs=11) -- 2637(line=106, offs=31) */ ATSINSmove(tmpret105, loop_49(arg0, ATSPMVi0nt(2), tmp124)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2174(line=90, offs=9) -- 2649(line=107, offs=12) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret105) ; } /* end of [is_prime_48] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2192(line=91, offs=15) -- 2595(line=104, offs=21) */ /* local: loop_49$0(level=1) global: loop_49$0(level=1) local: k$5122(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: k$5122(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstkind_t0ype(atstype_bool) loop_49(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret106, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp107, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp112, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp115, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp116, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp117, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp120, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp123, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2192(line=91, offs=15) -- 2595(line=104, offs=21) */ ATSINSflab(__patsflab_loop_49): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2282(line=92, offs=16) -- 2291(line=92, offs=25) */ ATSINSmove(tmp107, ATSLIB_056_prelude__lt_g1int_int__50__1(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2279(line=92, offs=13) -- 2595(line=104, offs=21) */ ATSif( tmp107 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2314(line=93, offs=18) -- 2319(line=93, offs=23) */ ATSINSmove(tmp115, atspre_g0int_mod_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2314(line=93, offs=18) -- 2323(line=93, offs=27) */ ATSINSmove(tmp112, ATSLIB_056_prelude__eq_g0int_int__10__3(tmp115, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2311(line=93, offs=15) -- 2404(line=96, offs=35) */ ATSif( tmp112 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2345(line=94, offs=17) -- 2350(line=94, offs=22) */ ATSINSmove(tmpret106, ATSPMVbool_false()) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2391(line=96, offs=22) -- 2396(line=96, offs=27) */ ATSINSmove(tmp116, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2386(line=96, offs=17) -- 2404(line=96, offs=35) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp116) ; ATSINSmove_tlcal(apy1, arg1) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_49) ; ATStailcal_end() } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2439(line=98, offs=18) -- 2448(line=98, offs=27) */ ATSINSmove(tmp117, ATSLIB_056_prelude__eq_g1int_int__16__2(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2436(line=98, offs=15) -- 2595(line=104, offs=21) */ ATSif( tmp117 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2473(line=99, offs=20) -- 2478(line=99, offs=25) */ ATSINSmove(tmp123, atspre_g0int_mod_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2473(line=99, offs=20) -- 2482(line=99, offs=29) */ ATSINSmove(tmp120, ATSLIB_056_prelude__eq_g0int_int__10__4(tmp123, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2470(line=99, offs=17) -- 2555(line=102, offs=23) */ ATSif( tmp120 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2506(line=100, offs=19) -- 2511(line=100, offs=24) */ ATSINSmove(tmpret106, ATSPMVbool_false()) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2551(line=102, offs=19) -- 2555(line=102, offs=23) */ ATSINSmove(tmpret106, ATSPMVbool_true()) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2591(line=104, offs=17) -- 2595(line=104, offs=21) */ ATSINSmove(tmpret106, ATSPMVbool_true()) ; } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret106) ; } /* end of [loop_49] */ #if(0) /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) */ /* local: global: lt_g1int_int$50$0(level=0) local: global: */ ATSextern() /* imparg = tk(4637) tmparg = S2Evar(tk(4637)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__50(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret108, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp109, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) */ ATSINSflab(__patsflab_lt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) */ ATSINSmove(tmp109, PMVtmpltcst(g1int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) */ ATSINSmove(tmpret108, PMVtmpltcst(g1int_lt)(arg0, tmp109)) ; ATSfunbody_end() ATSreturn(tmpret108) ; } /* end of [ATSLIB_056_prelude__lt_g1int_int__50] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) */ /* local: global: lt_g1int_int$50$1(level=2) local: global: */ ATSstatic() /* imparg = tk(4637) tmparg = S2Evar(tk(4637)) tmpsub = Some(tk(4637) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__50__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret108__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp109__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) */ ATSINSflab(__patsflab_lt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) */ ATSINSmove(tmp109__1, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) */ ATSINSmove(tmpret108__1, atspre_g1int_lt_int(arg0, tmp109__1)) ; ATSfunbody_end() ATSreturn(tmpret108__1) ; } /* end of [ATSLIB_056_prelude__lt_g1int_int__50__1] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$3(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__3, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__3, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__3, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__3, atspre_g0int_eq_int(arg0, tmp16__3)) ; ATSfunbody_end() ATSreturn(tmpret15__3) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__3] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) */ /* local: global: eq_g1int_int$16$2(level=2) local: global: */ ATSstatic() /* imparg = tk(4649) tmparg = S2Evar(tk(4649)) tmpsub = Some(tk(4649) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__16__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret25__2, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp26__2, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12823(line=667, offs=1) -- 12877(line=668, offs=42) */ ATSINSflab(__patsflab_eq_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) */ ATSINSmove(tmp26__2, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) */ ATSINSmove(tmpret25__2, atspre_g1int_eq_int(arg0, tmp26__2)) ; ATSfunbody_end() ATSreturn(tmpret25__2) ; } /* end of [ATSLIB_056_prelude__eq_g1int_int__16__2] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$4(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__4, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__4, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__4, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__4, atspre_g0int_eq_int(arg0, tmp16__4)) ; ATSfunbody_end() ATSreturn(tmpret15__4) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__4] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2664(line=110, offs=4) -- 3475(line=139, offs=10) */ /* local: sqrt_int_46$0(level=0), is_prime_48$0(level=0) global: sqrt_int_46$0(level=0), is_prime_48$0(level=0), is_semiprime_57$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_bool) is_semiprime_57(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret125, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp146, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2664(line=110, offs=4) -- 3475(line=139, offs=10) */ ATSINSflab(__patsflab_is_semiprime_57): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2704(line=111, offs=3) -- 3475(line=139, offs=10) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2721(line=112, offs=7) -- 2722(line=112, offs=8) */ ATSINSlab(__atstmplab6): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2677(line=110, offs=17) -- 2678(line=110, offs=18) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab8) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2722(line=112, offs=8) -- 2722(line=112, offs=8) */ ATSINSlab(__atstmplab7): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2726(line=112, offs=12) -- 2731(line=112, offs=17) */ ATSINSmove(tmpret125, ATSPMVbool_false()) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2739(line=113, offs=8) -- 2739(line=113, offs=8) */ ATSINSlab(__atstmplab8): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2764(line=115, offs=9) -- 3465(line=138, offs=12) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3441(line=137, offs=19) -- 3451(line=137, offs=29) */ ATSINSmove(tmp146, sqrt_int_46(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3433(line=137, offs=11) -- 3453(line=137, offs=31) */ ATSINSmove(tmpret125, loop_58(arg0, ATSPMVi0nt(2), tmp146)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2764(line=115, offs=9) -- 3465(line=138, offs=12) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret125) ; } /* end of [is_semiprime_57] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2782(line=116, offs=15) -- 3411(line=135, offs=22) */ /* local: is_prime_48$0(level=0), loop_58$0(level=1) global: is_prime_48$0(level=0), loop_58$0(level=1) local: k$5128(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: k$5128(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstkind_t0ype(atstype_bool) loop_58(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret126, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp127, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp130, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp133, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp134, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp135, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp136, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp137, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp140, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp143, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp144, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp145, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2782(line=116, offs=15) -- 3411(line=135, offs=22) */ ATSINSflab(__patsflab_loop_58): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2884(line=117, offs=16) -- 2893(line=117, offs=25) */ ATSINSmove(tmp127, ATSLIB_056_prelude__lt_g1int_int__50__2(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2881(line=117, offs=13) -- 3411(line=135, offs=22) */ ATSif( tmp127 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2916(line=118, offs=18) -- 2921(line=118, offs=23) */ ATSINSmove(tmp133, atspre_g0int_mod_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2916(line=118, offs=18) -- 2925(line=118, offs=27) */ ATSINSmove(tmp130, ATSLIB_056_prelude__eq_g0int_int__10__5(tmp133, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2913(line=118, offs=15) -- 3109(line=124, offs=35) */ ATSif( tmp130 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2950(line=119, offs=20) -- 2960(line=119, offs=30) */ ATSINSmove(tmp134, is_prime_48(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2947(line=119, offs=17) -- 3055(line=122, offs=24) */ ATSif( tmp134 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3003(line=120, offs=37) -- 3008(line=120, offs=42) */ ATSINSmove(tmp135, atspre_g1int_div_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2985(line=120, offs=19) -- 3010(line=120, offs=44) */ ATSINSmove(tmpret126, is_prime_48(ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp135))) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3050(line=122, offs=19) -- 3055(line=122, offs=24) */ ATSINSmove(tmpret126, ATSPMVbool_false()) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3096(line=124, offs=22) -- 3101(line=124, offs=27) */ ATSINSmove(tmp136, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3091(line=124, offs=17) -- 3109(line=124, offs=35) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp136) ; ATSINSmove_tlcal(apy1, arg1) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_58) ; ATStailcal_end() } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3144(line=126, offs=18) -- 3153(line=126, offs=27) */ ATSINSmove(tmp137, ATSLIB_056_prelude__eq_g1int_int__16__3(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3141(line=126, offs=15) -- 3411(line=135, offs=22) */ ATSif( tmp137 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3178(line=127, offs=20) -- 3183(line=127, offs=25) */ ATSINSmove(tmp143, atspre_g0int_mod_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3178(line=127, offs=20) -- 3187(line=127, offs=29) */ ATSINSmove(tmp140, ATSLIB_056_prelude__eq_g0int_int__10__6(tmp143, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3175(line=127, offs=17) -- 3370(line=133, offs=24) */ ATSif( tmp140 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3214(line=128, offs=22) -- 3224(line=128, offs=32) */ ATSINSmove(tmp144, is_prime_48(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3211(line=128, offs=19) -- 3325(line=131, offs=26) */ ATSif( tmp144 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3269(line=129, offs=39) -- 3274(line=129, offs=44) */ ATSINSmove(tmp145, atspre_g1int_div_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3251(line=129, offs=21) -- 3276(line=129, offs=46) */ ATSINSmove(tmpret126, is_prime_48(ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp145))) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3320(line=131, offs=21) -- 3325(line=131, offs=26) */ ATSINSmove(tmpret126, ATSPMVbool_false()) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3365(line=133, offs=19) -- 3370(line=133, offs=24) */ ATSINSmove(tmpret126, ATSPMVbool_false()) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3406(line=135, offs=17) -- 3411(line=135, offs=22) */ ATSINSmove(tmpret126, ATSPMVbool_false()) ; } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret126) ; } /* end of [loop_58] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) */ /* local: global: lt_g1int_int$50$2(level=2) local: global: */ ATSstatic() /* imparg = tk(4637) tmparg = S2Evar(tk(4637)) tmpsub = Some(tk(4637) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__50__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret108__2, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp109__2, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) */ ATSINSflab(__patsflab_lt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) */ ATSINSmove(tmp109__2, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) */ ATSINSmove(tmpret108__2, atspre_g1int_lt_int(arg0, tmp109__2)) ; ATSfunbody_end() ATSreturn(tmpret108__2) ; } /* end of [ATSLIB_056_prelude__lt_g1int_int__50__2] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$5(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__5(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__5, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__5, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__5, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__5, atspre_g0int_eq_int(arg0, tmp16__5)) ; ATSfunbody_end() ATSreturn(tmpret15__5) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__5] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) */ /* local: global: eq_g1int_int$16$3(level=2) local: global: */ ATSstatic() /* imparg = tk(4649) tmparg = S2Evar(tk(4649)) tmpsub = Some(tk(4649) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__16__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret25__3, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp26__3, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12823(line=667, offs=1) -- 12877(line=668, offs=42) */ ATSINSflab(__patsflab_eq_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) */ ATSINSmove(tmp26__3, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) */ ATSINSmove(tmpret25__3, atspre_g1int_eq_int(arg0, tmp26__3)) ; ATSfunbody_end() ATSreturn(tmpret25__3) ; } /* end of [ATSLIB_056_prelude__eq_g1int_int__16__3] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$6(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__6(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__6, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__6, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__6, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__6, atspre_g0int_eq_int(arg0, tmp16__6)) ; ATSfunbody_end() ATSreturn(tmpret15__6) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__6] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 451(line=14, offs=19) -- 471(line=15, offs=12) */ /* local: global: divides$64$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_bool) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__divides(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret147, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp150, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 443(line=14, offs=11) -- 471(line=15, offs=12) */ ATSINSflab(__patsflab_divides): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 462(line=15, offs=3) -- 467(line=15, offs=8) */ ATSINSmove(tmp150, atspre_g0int_mod_int(arg1, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 462(line=15, offs=3) -- 471(line=15, offs=12) */ ATSINSmove(tmpret147, ATSLIB_056_prelude__eq_g0int_int__10__7(tmp150, ATSPMVi0nt(0))) ; ATSfunbody_end() ATSreturn(tmpret147) ; } /* end of [_057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__divides] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$7(level=1) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__7(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__7, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__7, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__7, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__7, atspre_g0int_eq_int(arg0, tmp16__7)) ; ATSfunbody_end() ATSreturn(tmpret15__7) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__7] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 487(line=17, offs=15) -- 552(line=21, offs=6) */ /* local: global: gcd$66$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_int) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__gcd(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret151, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp152, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp157, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 483(line=17, offs=11) -- 552(line=21, offs=6) */ ATSINSflab(__patsflab_gcd): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 501(line=18, offs=6) -- 507(line=18, offs=12) */ ATSINSmove(tmp152, ATSLIB_056_prelude__neq_g1int_int__67__1(arg1, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 498(line=18, offs=3) -- 552(line=21, offs=6) */ ATSif( tmp152 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 532(line=19, offs=20) -- 537(line=19, offs=25) */ ATSINSmove(tmp157, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 517(line=19, offs=5) -- 539(line=19, offs=27) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, arg1) ; ATSINSmove_tlcal(apy1, ATSPMVcastfn(witness, atstkind_t0ype(atstype_int), tmp157)) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_gcd) ; ATStailcal_end() } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 551(line=21, offs=5) -- 552(line=21, offs=6) */ ATSINSmove(tmpret151, arg0) ; } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret151) ; } /* end of [_057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__gcd] */ #if(0) /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12916(line=672, offs=3) -- 12956(line=672, offs=43) */ /* local: global: neq_g1int_int$67$0(level=0) local: global: */ ATSextern() /* imparg = tk(4652) tmparg = S2Evar(tk(4652)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__67(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret153, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp154, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12900(line=671, offs=1) -- 12956(line=672, offs=43) */ ATSINSflab(__patsflab_neq_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12943(line=672, offs=30) -- 12954(line=672, offs=41) */ ATSINSmove(tmp154, PMVtmpltcst(g1int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12925(line=672, offs=12) -- 12956(line=672, offs=43) */ ATSINSmove(tmpret153, PMVtmpltcst(g1int_neq)(arg0, tmp154)) ; ATSfunbody_end() ATSreturn(tmpret153) ; } /* end of [ATSLIB_056_prelude__neq_g1int_int__67] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12916(line=672, offs=3) -- 12956(line=672, offs=43) */ /* local: global: neq_g1int_int$67$1(level=1) local: global: */ ATSstatic() /* imparg = tk(4652) tmparg = S2Evar(tk(4652)) tmpsub = Some(tk(4652) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__67__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret153__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp154__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12900(line=671, offs=1) -- 12956(line=672, offs=43) */ ATSINSflab(__patsflab_neq_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12943(line=672, offs=30) -- 12954(line=672, offs=41) */ ATSINSmove(tmp154__1, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12925(line=672, offs=12) -- 12956(line=672, offs=43) */ ATSINSmove(tmpret153__1, atspre_g1int_neq_int(arg0, tmp154__1)) ; ATSfunbody_end() ATSreturn(tmpret153__1) ; } /* end of [ATSLIB_056_prelude__neq_g1int_int__67__1] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 568(line=23, offs=15) -- 598(line=24, offs=22) */ /* local: global: lcm$70$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_int) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__lcm(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret158, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp159, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp160, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 564(line=23, offs=11) -- 598(line=24, offs=22) */ ATSINSflab(__patsflab_lcm): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 584(line=24, offs=8) -- 593(line=24, offs=17) */ ATSINSmove(tmp160, _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__gcd(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 580(line=24, offs=4) -- 593(line=24, offs=17) */ ATSINSmove(tmp159, atspre_g0int_div_int(arg0, tmp160)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 579(line=24, offs=3) -- 598(line=24, offs=22) */ ATSINSmove(tmpret158, atspre_g0int_mul_int(tmp159, arg1)) ; ATSfunbody_end() ATSreturn(tmpret158) ; } /* end of [_057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__lcm] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 618(line=26, offs=19) -- 642(line=27, offs=16) */ /* local: global: coprime$72$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_bool) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__coprime(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret161, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp164, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 610(line=26, offs=11) -- 642(line=27, offs=16) */ ATSINSflab(__patsflab_coprime): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 629(line=27, offs=3) -- 638(line=27, offs=12) */ ATSINSmove(tmp164, _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__gcd(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 629(line=27, offs=3) -- 642(line=27, offs=16) */ ATSINSmove(tmpret161, ATSLIB_056_prelude__eq_g0int_int__10__8(tmp164, ATSPMVi0nt(1))) ; ATSfunbody_end() ATSreturn(tmpret161) ; } /* end of [_057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__coprime] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$8(level=1) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__8(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__8, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__8, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__8, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__8, atspre_g0int_eq_int(arg0, tmp16__8)) ; ATSfunbody_end() ATSreturn(tmpret15__8) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__8] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 663(line=29, offs=20) -- 1642(line=61, offs=8) */ /* local: sqrt_int_46$0(level=0) global: sqrt_int_46$0(level=0), divisors$74$0(level=0) local: global: */ ATSextern() atstkind_type(atstype_ptrk) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__divisors(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret165, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 654(line=29, offs=11) -- 1642(line=61, offs=8) */ ATSINSflab(__patsflab_divisors): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 671(line=30, offs=3) -- 1642(line=61, offs=8) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 688(line=31, offs=7) -- 689(line=31, offs=8) */ ATSINSlab(__atstmplab9): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 664(line=29, offs=21) -- 665(line=29, offs=22) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab11) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 689(line=31, offs=8) -- 689(line=31, offs=8) */ ATSINSlab(__atstmplab10): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 693(line=31, offs=12) -- 743(line=31, offs=62) */ ATSINSmove_ldelay(tmpret165, atstype_boxed, ATSPMVcfunlab(1, __patsfun_75, ())) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 751(line=32, offs=8) -- 751(line=32, offs=8) */ ATSINSlab(__atstmplab11): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 755(line=32, offs=12) -- 1642(line=61, offs=8) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1624(line=60, offs=7) -- 1634(line=60, offs=17) */ ATSINSmove(tmpret165, loop_77(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 755(line=32, offs=12) -- 1642(line=61, offs=8) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret165) ; } /* end of [_057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__divisors] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 693(line=31, offs=12) -- 743(line=31, offs=62) */ /* local: global: __patsfun_75$0(level=1) local: global: */ ATSstatic() atstype_boxed __patsfun_75(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret166, atstype_boxed) ; ATStmpdec(tmp167, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 693(line=31, offs=12) -- 743(line=31, offs=62) */ ATSINSflab(__patsflab___patsfun_75): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 693(line=31, offs=12) -- 743(line=31, offs=62) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 719(line=31, offs=38) -- 741(line=31, offs=60) */ ATSINSmove_ldelay(tmp167, atstype_boxed, ATSPMVcfunlab(1, __patsfun_76, ())) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 701(line=31, offs=20) -- 742(line=31, offs=61) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret166, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret166, 1) ; #endif ATSINSstore_con1_ofs(tmpret166, postiats_tysum_1, atslab__0, ATSPMVi0nt(1)) ; ATSINSstore_con1_ofs(tmpret166, postiats_tysum_1, atslab__1, tmp167) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret166) ; } /* end of [__patsfun_75] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 719(line=31, offs=38) -- 741(line=31, offs=60) */ /* local: global: __patsfun_76$0(level=2) local: global: */ ATSstatic() atstype_boxed __patsfun_76(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret168, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 719(line=31, offs=38) -- 741(line=31, offs=60) */ ATSINSflab(__patsflab___patsfun_76): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 719(line=31, offs=38) -- 741(line=31, offs=60) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 727(line=31, offs=46) -- 740(line=31, offs=59) */ ATSINSmove_nil(tmpret168) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret168) ; } /* end of [__patsfun_76] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 769(line=33, offs=11) -- 1610(line=58, offs=29) */ /* local: sqrt_int_46$0(level=0), loop_77$0(level=1) global: sqrt_int_46$0(level=0), loop_77$0(level=1) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) loop_77(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret169, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp170, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp175, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp176, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp179, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp180, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp183, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref184, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp194, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp197, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref198, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp204, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 769(line=33, offs=11) -- 1610(line=58, offs=29) */ ATSINSflab(__patsflab_loop_77): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 876(line=34, offs=19) -- 886(line=34, offs=29) */ ATSINSmove(tmp175, sqrt_int_46(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 869(line=34, offs=12) -- 886(line=34, offs=29) */ ATSINSmove(tmp170, ATSLIB_056_prelude__gte_g1int_int__78__1(arg1, tmp175)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 866(line=34, offs=9) -- 1610(line=58, offs=29) */ ATSif( tmp170 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 906(line=35, offs=14) -- 913(line=35, offs=21) */ ATSINSmove(tmp179, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 906(line=35, offs=14) -- 917(line=35, offs=25) */ ATSINSmove(tmp176, ATSLIB_056_prelude__eq_g0int_int__10__9(tmp179, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 903(line=35, offs=11) -- 1350(line=49, offs=35) */ ATSif( tmp176 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 938(line=36, offs=16) -- 945(line=36, offs=23) */ ATSINSmove(tmp183, atspre_g1int_div_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 938(line=36, offs=16) -- 952(line=36, offs=30) */ ATSINSmove(tmp180, ATSLIB_056_prelude__neq_g1int_int__67__2(tmp183, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 935(line=36, offs=13) -- 1300(line=47, offs=18) */ ATSif( tmp180 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 972(line=37, offs=15) -- 1144(line=41, offs=18) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 996(line=38, offs=21) -- 997(line=38, offs=22) */ /* ATSINStmpdec(tmpref184) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1005(line=38, offs=30) -- 1012(line=38, offs=37) */ ATSINSmove(tmpref184, atspre_g1int_div_int(arg0, arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1046(line=40, offs=17) -- 1126(line=40, offs=97) */ ATSINSmove_ldelay(tmpret169, atstype_boxed, ATSPMVcfunlab(1, __patsfun_83, (arg1, ATSPMVptrof(tmpref184)))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 972(line=37, offs=15) -- 1144(line=41, offs=18) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1230(line=46, offs=17) -- 1282(line=46, offs=69) */ ATSINSmove_ldelay(tmpret169, atstype_boxed, ATSPMVcfunlab(1, __patsfun_86, (arg1))) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1328(line=49, offs=13) -- 1350(line=49, offs=35) */ ATSINSmove_ldelay(tmpret169, atstype_boxed, ATSPMVcfunlab(1, __patsfun_88, ())) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1377(line=51, offs=14) -- 1384(line=51, offs=21) */ ATSINSmove(tmp197, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1377(line=51, offs=14) -- 1388(line=51, offs=25) */ ATSINSmove(tmp194, ATSLIB_056_prelude__eq_g0int_int__10__10(tmp197, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1374(line=51, offs=11) -- 1610(line=58, offs=29) */ ATSif( tmp194 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1406(line=52, offs=13) -- 1566(line=56, offs=16) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1428(line=53, offs=19) -- 1429(line=53, offs=20) */ /* ATSINStmpdec(tmpref198) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1437(line=53, offs=28) -- 1444(line=53, offs=35) */ ATSINSmove(tmpref198, atspre_g1int_div_int(arg0, arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1474(line=55, offs=15) -- 1550(line=55, offs=91) */ ATSINSmove_ldelay(tmpret169, atstype_boxed, ATSPMVcfunlab(1, __patsfun_90, (arg0, arg1, ATSPMVptrof(tmpref198)))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1406(line=52, offs=13) -- 1566(line=56, offs=16) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1602(line=58, offs=21) -- 1609(line=58, offs=28) */ ATSINSmove(tmp204, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1594(line=58, offs=13) -- 1610(line=58, offs=29) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, arg0) ; ATSINSmove_tlcal(apy1, tmp204) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_77) ; ATStailcal_end() } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret169) ; } /* end of [loop_77] */ #if(0) /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) */ /* local: global: gte_g1int_int$78$0(level=0) local: global: */ ATSextern() /* imparg = tk(4646) tmparg = S2Evar(tk(4646)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__78(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret171, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp172, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12741(line=662, offs=1) -- 12797(line=663, offs=43) */ ATSINSflab(__patsflab_gte_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) */ ATSINSmove(tmp172, PMVtmpltcst(g1int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) */ ATSINSmove(tmpret171, PMVtmpltcst(g1int_gte)(arg0, tmp172)) ; ATSfunbody_end() ATSreturn(tmpret171) ; } /* end of [ATSLIB_056_prelude__gte_g1int_int__78] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) */ /* local: global: gte_g1int_int$78$1(level=2) local: global: */ ATSstatic() /* imparg = tk(4646) tmparg = S2Evar(tk(4646)) tmpsub = Some(tk(4646) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__78__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret171__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp172__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12741(line=662, offs=1) -- 12797(line=663, offs=43) */ ATSINSflab(__patsflab_gte_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) */ ATSINSmove(tmp172__1, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) */ ATSINSmove(tmpret171__1, atspre_g1int_gte_int(arg0, tmp172__1)) ; ATSfunbody_end() ATSreturn(tmpret171__1) ; } /* end of [ATSLIB_056_prelude__gte_g1int_int__78__1] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$9(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__9(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__9, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__9, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__9, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__9, atspre_g0int_eq_int(arg0, tmp16__9)) ; ATSfunbody_end() ATSreturn(tmpret15__9) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__9] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12916(line=672, offs=3) -- 12956(line=672, offs=43) */ /* local: global: neq_g1int_int$67$2(level=2) local: global: */ ATSstatic() /* imparg = tk(4652) tmparg = S2Evar(tk(4652)) tmpsub = Some(tk(4652) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__67__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret153__2, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp154__2, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12900(line=671, offs=1) -- 12956(line=672, offs=43) */ ATSINSflab(__patsflab_neq_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12943(line=672, offs=30) -- 12954(line=672, offs=41) */ ATSINSmove(tmp154__2, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12925(line=672, offs=12) -- 12956(line=672, offs=43) */ ATSINSmove(tmpret153__2, atspre_g1int_neq_int(arg0, tmp154__2)) ; ATSfunbody_end() ATSreturn(tmpret153__2) ; } /* end of [ATSLIB_056_prelude__neq_g1int_int__67__2] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1046(line=40, offs=17) -- 1126(line=40, offs=97) */ /* local: global: __patsfun_83$0(level=2) local: acc$5143(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5144(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) global: acc$5143(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5144(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) */ ATSstatic() atstype_boxed __patsfun_83(atstkind_t0ype(atstype_int) env0, atstkind_type(atstype_ptrk) env1, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret185, atstype_boxed) ; ATStmpdec(tmp186, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1046(line=40, offs=17) -- 1126(line=40, offs=97) */ ATSINSflab(__patsflab___patsfun_83): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1046(line=40, offs=17) -- 1126(line=40, offs=97) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1074(line=40, offs=45) -- 1124(line=40, offs=95) */ ATSINSmove_ldelay(tmp186, atstype_boxed, ATSPMVcfunlab(1, __patsfun_84, (env1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1054(line=40, offs=25) -- 1125(line=40, offs=96) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret185, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret185, 1) ; #endif ATSINSstore_con1_ofs(tmpret185, postiats_tysum_1, atslab__0, env0) ; ATSINSstore_con1_ofs(tmpret185, postiats_tysum_1, atslab__1, tmp186) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret185) ; } /* end of [__patsfun_83] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1074(line=40, offs=45) -- 1124(line=40, offs=95) */ /* local: global: __patsfun_84$0(level=3) local: x$5144(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) global: x$5144(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) */ ATSstatic() atstype_boxed __patsfun_84(atstkind_type(atstype_ptrk) env0, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret187, atstype_boxed) ; ATStmpdec(tmp188, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1074(line=40, offs=45) -- 1124(line=40, offs=95) */ ATSINSflab(__patsflab___patsfun_84): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1074(line=40, offs=45) -- 1124(line=40, offs=95) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1100(line=40, offs=71) -- 1122(line=40, offs=93) */ ATSINSmove_ldelay(tmp188, atstype_boxed, ATSPMVcfunlab(1, __patsfun_85, ())) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1082(line=40, offs=53) -- 1123(line=40, offs=94) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret187, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret187, 1) ; #endif ATSINSstore_con1_ofs(tmpret187, postiats_tysum_1, atslab__0, ATSderef(env0, atstkind_t0ype(atstype_int))) ; ATSINSstore_con1_ofs(tmpret187, postiats_tysum_1, atslab__1, tmp188) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret187) ; } /* end of [__patsfun_84] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1100(line=40, offs=71) -- 1122(line=40, offs=93) */ /* local: global: __patsfun_85$0(level=4) local: global: */ ATSstatic() atstype_boxed __patsfun_85(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret189, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1100(line=40, offs=71) -- 1122(line=40, offs=93) */ ATSINSflab(__patsflab___patsfun_85): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1100(line=40, offs=71) -- 1122(line=40, offs=93) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1108(line=40, offs=79) -- 1121(line=40, offs=92) */ ATSINSmove_nil(tmpret189) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret189) ; } /* end of [__patsfun_85] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1230(line=46, offs=17) -- 1282(line=46, offs=69) */ /* local: global: __patsfun_86$0(level=2) local: acc$5143(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: acc$5143(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstype_boxed __patsfun_86(atstkind_t0ype(atstype_int) env0, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret190, atstype_boxed) ; ATStmpdec(tmp191, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1230(line=46, offs=17) -- 1282(line=46, offs=69) */ ATSINSflab(__patsflab___patsfun_86): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1230(line=46, offs=17) -- 1282(line=46, offs=69) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1258(line=46, offs=45) -- 1280(line=46, offs=67) */ ATSINSmove_ldelay(tmp191, atstype_boxed, ATSPMVcfunlab(1, __patsfun_87, ())) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1238(line=46, offs=25) -- 1281(line=46, offs=68) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret190, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret190, 1) ; #endif ATSINSstore_con1_ofs(tmpret190, postiats_tysum_1, atslab__0, env0) ; ATSINSstore_con1_ofs(tmpret190, postiats_tysum_1, atslab__1, tmp191) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret190) ; } /* end of [__patsfun_86] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1258(line=46, offs=45) -- 1280(line=46, offs=67) */ /* local: global: __patsfun_87$0(level=3) local: global: */ ATSstatic() atstype_boxed __patsfun_87(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret192, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1258(line=46, offs=45) -- 1280(line=46, offs=67) */ ATSINSflab(__patsflab___patsfun_87): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1258(line=46, offs=45) -- 1280(line=46, offs=67) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1266(line=46, offs=53) -- 1279(line=46, offs=66) */ ATSINSmove_nil(tmpret192) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret192) ; } /* end of [__patsfun_87] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1328(line=49, offs=13) -- 1350(line=49, offs=35) */ /* local: global: __patsfun_88$0(level=2) local: global: */ ATSstatic() atstype_boxed __patsfun_88(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret193, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1328(line=49, offs=13) -- 1350(line=49, offs=35) */ ATSINSflab(__patsflab___patsfun_88): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1328(line=49, offs=13) -- 1350(line=49, offs=35) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1336(line=49, offs=21) -- 1349(line=49, offs=34) */ ATSINSmove_nil(tmpret193) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret193) ; } /* end of [__patsfun_88] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$10(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__10(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__10, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__10, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__10, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__10, atspre_g0int_eq_int(arg0, tmp16__10)) ; ATSfunbody_end() ATSreturn(tmpret15__10) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__10] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1474(line=55, offs=15) -- 1550(line=55, offs=91) */ /* local: loop_77$0(level=1) global: loop_77$0(level=1), __patsfun_90$0(level=2) local: n$5142(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5143(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5145(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) global: n$5142(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5143(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5145(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) */ ATSstatic() atstype_boxed __patsfun_90(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret199, atstype_boxed) ; ATStmpdec(tmp200, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1474(line=55, offs=15) -- 1550(line=55, offs=91) */ ATSINSflab(__patsflab___patsfun_90): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1474(line=55, offs=15) -- 1550(line=55, offs=91) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1502(line=55, offs=43) -- 1548(line=55, offs=89) */ ATSINSmove_ldelay(tmp200, atstype_boxed, ATSPMVcfunlab(1, __patsfun_91, (env0, env1, env2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1482(line=55, offs=23) -- 1549(line=55, offs=90) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret199, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret199, 1) ; #endif ATSINSstore_con1_ofs(tmpret199, postiats_tysum_1, atslab__0, env1) ; ATSINSstore_con1_ofs(tmpret199, postiats_tysum_1, atslab__1, tmp200) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret199) ; } /* end of [__patsfun_90] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1502(line=55, offs=43) -- 1548(line=55, offs=89) */ /* local: loop_77$0(level=1) global: loop_77$0(level=1), __patsfun_91$0(level=3) local: n$5142(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5143(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5145(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) global: n$5142(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5143(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5145(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) */ ATSstatic() atstype_boxed __patsfun_91(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret201, atstype_boxed) ; ATStmpdec(tmp202, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp203, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1502(line=55, offs=43) -- 1548(line=55, offs=89) */ ATSINSflab(__patsflab___patsfun_91): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1502(line=55, offs=43) -- 1548(line=55, offs=89) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1537(line=55, offs=78) -- 1544(line=55, offs=85) */ ATSINSmove(tmp203, atspre_g1int_add_int(env1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1529(line=55, offs=70) -- 1545(line=55, offs=86) */ ATSINSmove(tmp202, loop_77(env0, tmp203)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1510(line=55, offs=51) -- 1547(line=55, offs=88) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret201, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret201, 1) ; #endif ATSINSstore_con1_ofs(tmpret201, postiats_tysum_1, atslab__0, ATSderef(env2, atstkind_t0ype(atstype_int))) ; ATSINSstore_con1_ofs(tmpret201, postiats_tysum_1, atslab__1, tmp202) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret201) ; } /* end of [__patsfun_91] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1725(line=67, offs=4) -- 1923(line=74, offs=6) */ /* local: global: primorial_gmp_92$0(level=0) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) primorial_gmp_92(atstkind_t0ype(atstype_ullint) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret205, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmpref206, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp208) ; // ATStmpdec_void(tmp209) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1725(line=67, offs=4) -- 1923(line=74, offs=6) */ ATSINSflab(__patsflab_primorial_gmp_92): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1788(line=68, offs=3) -- 1923(line=74, offs=6) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1800(line=69, offs=9) -- 1801(line=69, offs=10) */ /* ATSINStmpdec(tmpref206) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1804(line=69, offs=13) -- 1815(line=69, offs=24) */ ATSINSmove(tmpref206, ATSLIB_056_prelude__ptr_alloc__1__5()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1829(line=70, offs=14) -- 1850(line=70, offs=35) */ ATSINSmove_void(tmp208, atscntrb_gmp_mpz_init(ATSPMVrefarg1(ATSSELrecsin(tmpref206, atstkind_type(atstype_ptrk), atslab__2)))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1864(line=71, offs=14) -- 1891(line=71, offs=41) */ ATSINSmove_void(tmp209, mpz_primorial_ui(ATSPMVrefarg1(ATSSELrecsin(tmpref206, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1901(line=73, offs=5) -- 1916(line=73, offs=20) */ ATSINSmove(tmpret205, ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), tmpref206)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1788(line=68, offs=3) -- 1923(line=74, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret205) ; } /* end of [primorial_gmp_92] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) */ /* local: global: ptr_alloc$1$5(level=1) local: global: */ ATSstatic() /* imparg = a(4746) tmparg = S2Evar(a(4746)) tmpsub = Some(a(4746) -> S2EVar(5715)) */ atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__5() { /* tmpvardeclst(beg) */ ATStmpdec(tmpret2__5, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) */ ATSINSflab(__patsflab_ptr_alloc): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) */ ATSINSmove(tmpret2__5, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; ATSfunbody_end() ATSreturn(tmpret2__5) ; } /* end of [ATSLIB_056_prelude__ptr_alloc__1__5] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1963(line=77, offs=4) -- 2035(line=78, offs=18) */ /* local: global: div_gt_zero_94$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) div_gt_zero_94(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret210, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp211, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 1963(line=77, offs=4) -- 2035(line=78, offs=18) */ ATSINSflab(__patsflab_div_gt_zero_94): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2029(line=78, offs=12) -- 2034(line=78, offs=17) */ ATSINSmove(tmp211, atspre_g1int_div_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2020(line=78, offs=3) -- 2035(line=78, offs=18) */ ATSINSmove(tmpret210, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp211)) ; ATSfunbody_end() ATSreturn(tmpret210) ; } /* end of [div_gt_zero_94] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2154(line=82, offs=5) -- 4082(line=145, offs=6) */ /* local: exp_3$0(level=0), is_prime_48$0(level=0), div_gt_zero_94$0(level=0) global: exp_3$0(level=0), sqrt_int_46$0(level=0), is_prime_48$0(level=0), div_gt_zero_94$0(level=0), jacobi_95$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) jacobi_95(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret212, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2154(line=82, offs=5) -- 4082(line=145, offs=6) */ ATSINSflab(__patsflab_jacobi_95): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2195(line=83, offs=3) -- 4082(line=145, offs=6) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4069(line=144, offs=5) -- 4076(line=144, offs=12) */ ATSINSmove(tmpret212, loop_106(arg0, arg1, ATSPMVi0nt(2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2195(line=83, offs=3) -- 4082(line=145, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret212) ; } /* end of [jacobi_95] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2248(line=85, offs=9) -- 3576(line=125, offs=12) */ /* local: global: legendre_96$0(level=1) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) legendre_96(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret213, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp214, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref233, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp234, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp235, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp236, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp237, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp240, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp241, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp242, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp245, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2248(line=85, offs=9) -- 3576(line=125, offs=12) */ ATSINSflab(__patsflab_legendre_96): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2336(line=86, offs=13) -- 2341(line=86, offs=18) */ ATSINSmove(tmp214, atspre_g0int_mod_int(arg1, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2330(line=86, offs=7) -- 3576(line=125, offs=12) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2355(line=87, offs=11) -- 2356(line=87, offs=12) */ ATSINSlab(__atstmplab12): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2336(line=86, offs=13) -- 2341(line=86, offs=18) */ ATSifnthen(ATSCKpat_int(tmp214, ATSPMVint(0))) { ATSINSgoto(__atstmplab14) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2356(line=87, offs=12) -- 2356(line=87, offs=12) */ ATSINSlab(__atstmplab13): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2360(line=87, offs=16) -- 2361(line=87, offs=17) */ ATSINSmove(tmpret213, ATSPMVi0nt(0)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2373(line=88, offs=12) -- 2373(line=88, offs=12) */ ATSINSlab(__atstmplab14): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2377(line=88, offs=16) -- 3576(line=125, offs=12) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3396(line=119, offs=15) -- 3397(line=119, offs=16) */ /* ATSINStmpdec(tmpref233) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3418(line=119, offs=37) -- 3423(line=119, offs=42) */ ATSINSmove(tmp235, atspre_g1int_sub_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3417(line=119, offs=36) -- 3428(line=119, offs=47) */ ATSINSmove(tmp234, atspre_g1int_div_int(tmp235, ATSPMVi0nt(2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3400(line=119, offs=19) -- 3432(line=119, offs=51) */ ATSINSmove(tmpref233, exp_mod_prime_97(arg0, tmp234, arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3460(line=121, offs=17) -- 3461(line=121, offs=18) */ ATSINSmove(tmp236, tmpref233) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3454(line=121, offs=11) -- 3564(line=124, offs=21) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3480(line=122, offs=16) -- 3480(line=122, offs=16) */ ATSINSlab(__atstmplab18): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-guard: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3491(line=122, offs=27) -- 3496(line=122, offs=32) */ ATSINSmove(tmp241, atspre_g1int_sub_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3486(line=122, offs=22) -- 3497(line=122, offs=33) */ ATSINSmove(tmp240, atspre_g0int_mod_int(tmp236, tmp241)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3486(line=122, offs=22) -- 3501(line=122, offs=37) */ ATSINSmove(tmp237, ATSLIB_056_prelude__eq_g0int_int__10__12(tmp240, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3486(line=122, offs=22) -- 3501(line=122, offs=37) */ ATSifnthen(ATSCKpat_bool(tmp237, ATSPMVbool_true())) { ATSINSgoto(__atstmplab19) ; } ; /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3505(line=122, offs=41) -- 3507(line=122, offs=43) */ ATSINSmove(tmpret213, atspre_g1int_neg_int(ATSPMVi0nt(1))) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3523(line=123, offs=16) -- 3523(line=123, offs=16) */ ATSINSlab(__atstmplab19): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-guard: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3529(line=123, offs=22) -- 3534(line=123, offs=27) */ ATSINSmove(tmp245, atspre_g0int_mod_int(tmp236, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3529(line=123, offs=22) -- 3538(line=123, offs=31) */ ATSINSmove(tmp242, ATSLIB_056_prelude__eq_g0int_int__10__13(tmp245, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3529(line=123, offs=22) -- 3538(line=123, offs=31) */ ATSifnthen(ATSCKpat_bool(tmp242, ATSPMVbool_true())) { ATSINSgoto(__atstmplab20) ; } ; /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3542(line=123, offs=35) -- 3543(line=123, offs=36) */ ATSINSmove(tmpret213, ATSPMVi0nt(0)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3559(line=124, offs=16) -- 3559(line=124, offs=16) */ ATSINSlab(__atstmplab20): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3563(line=124, offs=20) -- 3564(line=124, offs=21) */ ATSINSmove(tmpret213, ATSPMVi0nt(1)) ; ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2377(line=88, offs=16) -- 3576(line=125, offs=12) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret213) ; } /* end of [legendre_96] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2437(line=90, offs=15) -- 3370(line=117, offs=16) */ /* local: exp_mod_prime_97$0(level=2) global: exp_mod_prime_97$0(level=2) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) exp_mod_prime_97(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1, atstkind_t0ype(atstype_int) arg2) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; ATStmpdec(apy2, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret215, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref216, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref217, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp218, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp219, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmpref222, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp223, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref224, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref225, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp226, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp227, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp228, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmpref231, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp232, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2437(line=90, offs=15) -- 3370(line=117, offs=16) */ ATSINSflab(__patsflab_exp_mod_prime_97): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2515(line=91, offs=13) -- 3370(line=117, offs=16) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2537(line=92, offs=19) -- 2539(line=92, offs=21) */ /* ATSINStmpdec(tmpref216) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2542(line=92, offs=24) -- 2547(line=92, offs=29) */ ATSINSmove(tmpref216, atspre_g0int_mod_int(arg0, arg2)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2566(line=93, offs=19) -- 2568(line=93, offs=21) */ /* ATSINStmpdec(tmpref217) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2576(line=93, offs=29) -- 2581(line=93, offs=34) */ ATSINSmove(tmp218, atspre_g1int_sub_int(arg2, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2571(line=93, offs=24) -- 2582(line=93, offs=35) */ ATSINSmove(tmpref217, atspre_g0int_mod_int(arg1, tmp218)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2612(line=95, offs=15) -- 3354(line=116, offs=22) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2641(line=96, offs=19) -- 2642(line=96, offs=20) */ ATSINSlab(__atstmplab15): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2451(line=90, offs=29) -- 2452(line=90, offs=30) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab17) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2642(line=96, offs=20) -- 2642(line=96, offs=20) */ ATSINSlab(__atstmplab16): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2646(line=96, offs=24) -- 2647(line=96, offs=25) */ ATSINSmove(tmpret215, ATSPMVi0nt(0)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2667(line=97, offs=20) -- 2667(line=97, offs=20) */ ATSINSlab(__atstmplab17): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2720(line=99, offs=24) -- 2725(line=99, offs=29) */ ATSINSmove(tmp219, ATSLIB_056_prelude__gt_g1int_int__4__3(arg1, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2717(line=99, offs=21) -- 3332(line=115, offs=24) */ ATSif( tmp219 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2753(line=100, offs=23) -- 3283(line=113, offs=26) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2785(line=101, offs=29) -- 2787(line=101, offs=31) */ /* ATSINStmpdec(tmpref222) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2810(line=101, offs=54) -- 2817(line=101, offs=61) */ ATSINSmove(tmp223, atspre_g0int_half_int(tmpref217)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2801(line=101, offs=45) -- 2819(line=101, offs=63) */ ATSINSmove(tmpref222, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp223)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2848(line=102, offs=29) -- 2850(line=102, offs=31) */ /* ATSINStmpdec(tmpref224) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2853(line=102, offs=34) -- 2859(line=102, offs=40) */ ATSINSmove(tmpref224, atspre_g0int_mod_int(tmpref217, ATSPMVi0nt(2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2888(line=103, offs=29) -- 2892(line=103, offs=33) */ /* ATSINStmpdec(tmpref225) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2915(line=103, offs=56) -- 2920(line=103, offs=61) */ ATSINSmove(tmp227, atspre_g1int_mul_int(arg0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2915(line=103, offs=56) -- 2924(line=103, offs=65) */ ATSINSmove(tmp226, atspre_g0int_mod_int(tmp227, arg2)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2906(line=103, offs=47) -- 2925(line=103, offs=66) */ ATSINSmove(tmpref225, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp226)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2978(line=105, offs=28) -- 2984(line=105, offs=34) */ ATSINSmove(tmp228, ATSLIB_056_prelude__eq_g0int_int__10__11(tmpref224, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2975(line=105, offs=25) -- 3257(line=112, offs=30) */ ATSif( tmp228 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3016(line=106, offs=27) -- 3042(line=106, offs=53) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmpref225) ; ATSINSmove_tlcal(apy1, tmpref222) ; ATSINSmove_tlcal(apy2, arg2) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSargmove_tlcal(arg2, apy2) ; ATSINSfgoto(__patsflab_exp_mod_prime_97) ; ATStailcal_end() } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3098(line=108, offs=27) -- 3257(line=112, offs=30) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3134(line=109, offs=33) -- 3135(line=109, offs=34) */ /* ATSINStmpdec(tmpref231) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3142(line=109, offs=41) -- 3168(line=109, offs=67) */ ATSINSmove(tmp232, exp_mod_prime_97(tmpref225, tmpref222, arg2)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3138(line=109, offs=37) -- 3168(line=109, offs=67) */ ATSINSmove(tmpref231, atspre_g0int_mul_int(arg0, tmp232)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3226(line=111, offs=29) -- 3227(line=111, offs=30) */ ATSINSmove(tmpret215, tmpref231) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3098(line=108, offs=27) -- 3257(line=112, offs=30) */ /* INSletpop() */ } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2753(line=100, offs=23) -- 3283(line=113, offs=26) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3331(line=115, offs=23) -- 3332(line=115, offs=24) */ ATSINSmove(tmpret215, ATSPMVi0nt(1)) ; } /* ATSendif */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 2515(line=91, offs=13) -- 3370(line=117, offs=16) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret215) ; } /* end of [exp_mod_prime_97] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$4$3(level=3) local: global: */ ATSstatic() /* imparg = tk(4643) tmparg = S2Evar(tk(4643)) tmpsub = Some(tk(4643) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret8__3, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp9__3, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) */ ATSINSflab(__patsflab_gt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp9__3, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret8__3, atspre_g1int_gt_int(arg0, tmp9__3)) ; ATSfunbody_end() ATSreturn(tmpret8__3) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__4__3] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$11(level=3) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__11(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__11, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__11, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__11, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__11, atspre_g0int_eq_int(arg0, tmp16__11)) ; ATSfunbody_end() ATSreturn(tmpret15__11) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__11] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$12(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__12(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__12, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__12, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__12, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__12, atspre_g0int_eq_int(arg0, tmp16__12)) ; ATSfunbody_end() ATSreturn(tmpret15__12) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__12] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$13(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__13(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__13, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__13, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__13, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__13, atspre_g0int_eq_int(arg0, tmp16__13)) ; ATSfunbody_end() ATSreturn(tmpret15__13) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__13] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3590(line=127, offs=9) -- 3745(line=130, offs=17) */ /* local: div_gt_zero_94$0(level=0), get_multiplicity_105$0(level=1) global: div_gt_zero_94$0(level=0), get_multiplicity_105$0(level=1) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) get_multiplicity_105(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret246, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp247, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp248, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp249, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3590(line=127, offs=9) -- 3745(line=130, offs=17) */ ATSINSflab(__patsflab_get_multiplicity_105): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3662(line=128, offs=13) -- 3667(line=128, offs=18) */ ATSINSmove(tmp247, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3656(line=128, offs=7) -- 3745(line=130, offs=17) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3681(line=129, offs=11) -- 3682(line=129, offs=12) */ ATSINSlab(__atstmplab21): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3662(line=128, offs=13) -- 3667(line=128, offs=18) */ ATSifnthen(ATSCKpat_int(tmp247, ATSPMVint(0))) { ATSINSgoto(__atstmplab23) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3682(line=129, offs=12) -- 3682(line=129, offs=12) */ ATSINSlab(__atstmplab22): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3707(line=129, offs=37) -- 3724(line=129, offs=54) */ ATSINSmove(tmp249, div_gt_zero_94(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3690(line=129, offs=20) -- 3728(line=129, offs=58) */ ATSINSmove(tmp248, get_multiplicity_105(tmp249, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3686(line=129, offs=16) -- 3728(line=129, offs=58) */ ATSINSmove(tmpret246, atspre_g1int_add_int(ATSPMVi0nt(1), tmp248)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3740(line=130, offs=12) -- 3740(line=130, offs=12) */ ATSINSlab(__atstmplab23): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3744(line=130, offs=16) -- 3745(line=130, offs=17) */ ATSINSmove(tmpret246, ATSPMVi0nt(0)) ; ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret246) ; } /* end of [get_multiplicity_105] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3759(line=132, offs=9) -- 4059(line=142, offs=26) */ /* local: exp_3$0(level=0), is_prime_48$0(level=0), legendre_96$0(level=1), get_multiplicity_105$0(level=1), loop_106$0(level=1) global: exp_3$0(level=0), is_prime_48$0(level=0), div_gt_zero_94$0(level=0), legendre_96$0(level=1), get_multiplicity_105$0(level=1), loop_106$0(level=1) local: a$5153(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), n$5154(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: a$5153(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), n$5154(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstkind_t0ype(atstype_int) loop_106(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret250, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp251, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp254, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp257, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp258, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp261, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp262, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp263, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp264, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp265, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp266, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp267, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3759(line=132, offs=9) -- 4059(line=142, offs=26) */ ATSINSflab(__patsflab_loop_106): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3815(line=133, offs=10) -- 3822(line=133, offs=17) */ ATSINSmove(tmp251, ATSLIB_056_prelude__gt_g1int_int__4__4(arg0, env1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3812(line=133, offs=7) -- 4059(line=142, offs=26) */ ATSif( tmp251 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3836(line=134, offs=9) -- 3837(line=134, offs=10) */ ATSINSmove(tmpret250, ATSPMVi0nt(1)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3860(line=136, offs=12) -- 3865(line=136, offs=17) */ ATSINSmove(tmp254, ATSLIB_056_prelude__eq_g1int_int__16__4(env0, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3857(line=136, offs=9) -- 4059(line=142, offs=26) */ ATSif( tmp254 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3881(line=137, offs=11) -- 3882(line=137, offs=12) */ ATSINSmove(tmpret250, ATSPMVi0nt(0)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3909(line=139, offs=14) -- 3936(line=139, offs=41) */ ATSINSmove(tmp261, atspre_g0int_mod_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3909(line=139, offs=14) -- 3936(line=139, offs=41) */ ATSINSmove(tmp258, ATSLIB_056_prelude__eq_g0int_int__10__14(tmp261, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3909(line=139, offs=14) -- 3936(line=139, offs=41) */ ATSif( tmp258 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3909(line=139, offs=14) -- 3936(line=139, offs=41) */ ATSINSmove(tmp257, is_prime_48(arg0)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3909(line=139, offs=14) -- 3936(line=139, offs=41) */ ATSINSmove(tmp257, ATSPMVbool_false()) ; } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3906(line=139, offs=11) -- 4059(line=142, offs=26) */ ATSif( tmp257 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3960(line=140, offs=18) -- 3967(line=140, offs=25) */ ATSINSmove(tmp263, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3955(line=140, offs=13) -- 3968(line=140, offs=26) */ ATSINSmove(tmp262, loop_106(env0, env1, tmp263)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3975(line=140, offs=33) -- 3991(line=140, offs=49) */ ATSINSmove(tmp265, legendre_96(arg0, env1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3993(line=140, offs=51) -- 4017(line=140, offs=75) */ ATSINSmove(tmp266, get_multiplicity_105(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3971(line=140, offs=29) -- 4018(line=140, offs=76) */ ATSINSmove(tmp264, exp_3(tmp265, tmp266)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 3955(line=140, offs=13) -- 4018(line=140, offs=76) */ ATSINSmove(tmpret250, atspre_g0int_mul_int(tmp262, tmp264)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4051(line=142, offs=18) -- 4058(line=142, offs=25) */ ATSINSmove(tmp267, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4046(line=142, offs=13) -- 4059(line=142, offs=26) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp267) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSfgoto(__patsflab_loop_106) ; ATStailcal_end() } /* ATSendif */ } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret250) ; } /* end of [loop_106] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$4$4(level=2) local: global: */ ATSstatic() /* imparg = tk(4643) tmparg = S2Evar(tk(4643)) tmpsub = Some(tk(4643) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret8__4, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp9__4, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) */ ATSINSflab(__patsflab_gt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp9__4, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret8__4, atspre_g1int_gt_int(arg0, tmp9__4)) ; ATSfunbody_end() ATSreturn(tmpret8__4) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__4__4] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) */ /* local: global: eq_g1int_int$16$4(level=2) local: global: */ ATSstatic() /* imparg = tk(4649) tmparg = S2Evar(tk(4649)) tmpsub = Some(tk(4649) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__16__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret25__4, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp26__4, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12823(line=667, offs=1) -- 12877(line=668, offs=42) */ ATSINSflab(__patsflab_eq_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) */ ATSINSmove(tmp26__4, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) */ ATSINSmove(tmpret25__4, atspre_g1int_eq_int(arg0, tmp26__4)) ; ATSfunbody_end() ATSreturn(tmpret25__4) ; } /* end of [ATSLIB_056_prelude__eq_g1int_int__16__4] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$14(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__14(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__14, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__14, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__14, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__14, atspre_g0int_eq_int(arg0, tmp16__14)) ; ATSfunbody_end() ATSreturn(tmpret15__14) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__14] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4157(line=148, offs=5) -- 4495(line=158, offs=26) */ /* local: jacobi2_110$0(level=0) global: jacobi2_110$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) jacobi2_110(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret268, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp269, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp272, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp273, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp276, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp277, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp278, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp281, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp284, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp285, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp286, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp287, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp288, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp289, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp290, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp293, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp296, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp297, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4157(line=148, offs=5) -- 4495(line=158, offs=26) */ ATSINSflab(__patsflab_jacobi2_110): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4214(line=149, offs=3) -- 4495(line=158, offs=26) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4231(line=150, offs=7) -- 4232(line=150, offs=8) */ ATSINSlab(__atstmplab24): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4180(line=148, offs=28) -- 4181(line=148, offs=29) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab26) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4232(line=150, offs=8) -- 4232(line=150, offs=8) */ ATSINSlab(__atstmplab25): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4236(line=150, offs=12) -- 4237(line=150, offs=13) */ ATSINSmove(tmpret268, ATSPMVi0nt(0)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4244(line=151, offs=7) -- 4245(line=151, offs=8) */ ATSINSlab(__atstmplab26): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4180(line=148, offs=28) -- 4181(line=148, offs=29) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab28) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4245(line=151, offs=8) -- 4245(line=151, offs=8) */ ATSINSlab(__atstmplab27): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4249(line=151, offs=12) -- 4250(line=151, offs=13) */ ATSINSmove(tmpret268, ATSPMVi0nt(1)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4258(line=152, offs=8) -- 4258(line=152, offs=8) */ ATSINSlab(__atstmplab28): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-guard: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4264(line=152, offs=14) -- 4269(line=152, offs=19) */ ATSINSmove(tmp269, ATSLIB_056_prelude__gt_g1int_int__4__5(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4264(line=152, offs=14) -- 4269(line=152, offs=19) */ ATSifnthen(ATSCKpat_bool(tmp269, ATSPMVbool_true())) { ATSINSgoto(__atstmplab29) ; } ; /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4290(line=152, offs=40) -- 4295(line=152, offs=45) */ ATSINSmove(tmp272, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4273(line=152, offs=23) -- 4300(line=152, offs=50) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp272)) ; ATSINSmove_tlcal(apy1, arg1) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_jacobi2_110) ; ATStailcal_end() ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4308(line=153, offs=8) -- 4308(line=153, offs=8) */ ATSINSlab(__atstmplab29): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-guard: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4314(line=153, offs=14) -- 4319(line=153, offs=19) */ ATSINSmove(tmp276, atspre_g0int_mod_int(arg0, ATSPMVi0nt(2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4314(line=153, offs=14) -- 4323(line=153, offs=23) */ ATSINSmove(tmp273, ATSLIB_056_prelude__eq_g0int_int__10__15(tmp276, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4314(line=153, offs=14) -- 4323(line=153, offs=23) */ ATSifnthen(ATSCKpat_bool(tmp273, ATSPMVbool_true())) { ATSINSgoto(__atstmplab30) ; } ; /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4330(line=153, offs=30) -- 4353(line=153, offs=53) */ ATSINSmove(tmp281, atspre_g0int_mod_int(arg1, ATSPMVi0nt(8))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4330(line=153, offs=30) -- 4353(line=153, offs=53) */ ATSINSmove(tmp278, ATSLIB_056_prelude__eq_g0int_int__10__16(tmp281, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4330(line=153, offs=30) -- 4353(line=153, offs=53) */ ATSif( tmp278 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4330(line=153, offs=30) -- 4353(line=153, offs=53) */ ATSINSmove(tmp277, ATSPMVbool_true()) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4330(line=153, offs=30) -- 4353(line=153, offs=53) */ ATSINSmove(tmp284, atspre_g0int_mod_int(arg1, ATSPMVi0nt(8))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4330(line=153, offs=30) -- 4353(line=153, offs=53) */ ATSINSmove(tmp285, atspre_g1int_neg_int(ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4330(line=153, offs=30) -- 4353(line=153, offs=53) */ ATSINSmove(tmp277, ATSLIB_056_prelude__eq_g0int_int__10__17(tmp284, tmp285)) ; } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4327(line=153, offs=27) -- 4416(line=156, offs=25) */ ATSif( tmp277 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4373(line=154, offs=15) -- 4378(line=154, offs=20) */ ATSINSmove(tmp286, atspre_g1int_div_int(arg0, ATSPMVi0nt(2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4365(line=154, offs=7) -- 4382(line=154, offs=24) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp286) ; ATSINSmove_tlcal(apy1, arg1) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_jacobi2_110) ; ATStailcal_end() } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4407(line=156, offs=16) -- 4412(line=156, offs=21) */ ATSINSmove(tmp288, atspre_g1int_div_int(arg0, ATSPMVi0nt(2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4399(line=156, offs=8) -- 4416(line=156, offs=25) */ ATSINSmove(tmp287, jacobi2_110(tmp288, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4398(line=156, offs=7) -- 4416(line=156, offs=25) */ ATSINSmove(tmpret268, atspre_g0int_neg_int(tmp287)) ; } /* ATSendif */ ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4424(line=157, offs=8) -- 4424(line=157, offs=8) */ ATSINSlab(__atstmplab30): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-guard: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4430(line=157, offs=14) -- 4452(line=157, offs=36) */ ATSINSmove(tmp293, atspre_g0int_mod_int(arg0, ATSPMVi0nt(4))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4430(line=157, offs=14) -- 4452(line=157, offs=36) */ ATSINSmove(tmp290, ATSLIB_056_prelude__eq_g0int_int__10__18(tmp293, ATSPMVi0nt(3))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4430(line=157, offs=14) -- 4452(line=157, offs=36) */ ATSif( tmp290 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4430(line=157, offs=14) -- 4452(line=157, offs=36) */ ATSINSmove(tmp296, atspre_g0int_mod_int(arg1, ATSPMVi0nt(4))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4430(line=157, offs=14) -- 4452(line=157, offs=36) */ ATSINSmove(tmp289, ATSLIB_056_prelude__eq_g0int_int__10__19(tmp296, ATSPMVi0nt(3))) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4430(line=157, offs=14) -- 4452(line=157, offs=36) */ ATSINSmove(tmp289, ATSPMVbool_false()) ; } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4430(line=157, offs=14) -- 4452(line=157, offs=36) */ ATSifnthen(ATSCKpat_bool(tmp289, ATSPMVbool_true())) { ATSINSgoto(__atstmplab31) ; } ; /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4456(line=157, offs=40) -- 4469(line=157, offs=53) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, arg1) ; ATSINSmove_tlcal(apy1, arg0) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_jacobi2_110) ; ATStailcal_end() ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4477(line=158, offs=8) -- 4477(line=158, offs=8) */ ATSINSlab(__atstmplab31): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4482(line=158, offs=13) -- 4495(line=158, offs=26) */ ATSINSmove(tmp297, jacobi2_110(arg1, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4481(line=158, offs=12) -- 4495(line=158, offs=26) */ ATSINSmove(tmpret268, atspre_g0int_neg_int(tmp297)) ; ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret268) ; } /* end of [jacobi2_110] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$4$5(level=1) local: global: */ ATSstatic() /* imparg = tk(4643) tmparg = S2Evar(tk(4643)) tmpsub = Some(tk(4643) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__5(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret8__5, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp9__5, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) */ ATSINSflab(__patsflab_gt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp9__5, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret8__5, atspre_g1int_gt_int(arg0, tmp9__5)) ; ATSfunbody_end() ATSreturn(tmpret8__5) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__4__5] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$15(level=1) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__15(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__15, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__15, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__15, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__15, atspre_g0int_eq_int(arg0, tmp16__15)) ; ATSfunbody_end() ATSreturn(tmpret15__15) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__15] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$16(level=1) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__16(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__16, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__16, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__16, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__16, atspre_g0int_eq_int(arg0, tmp16__16)) ; ATSfunbody_end() ATSreturn(tmpret15__16) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__16] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$17(level=1) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__17(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__17, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__17, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__17, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__17, atspre_g0int_eq_int(arg0, tmp16__17)) ; ATSfunbody_end() ATSreturn(tmpret15__17) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__17] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$18(level=1) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__18(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__18, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__18, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__18, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__18, atspre_g0int_eq_int(arg0, tmp16__18)) ; ATSfunbody_end() ATSreturn(tmpret15__18) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__18] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$19(level=1) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__19(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__19, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__19, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__19, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__19, atspre_g0int_eq_int(arg0, tmp16__19)) ; ATSfunbody_end() ATSreturn(tmpret15__19) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__19] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4526(line=160, offs=30) -- 4865(line=178, offs=6) */ /* local: sqrt_int_46$0(level=0) global: sqrt_int_46$0(level=0), count_divisors_ats$118$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_int) count_divisors_ats(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret298, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4507(line=160, offs=11) -- 4865(line=178, offs=6) */ ATSINSflab(__patsflab_count_divisors_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4534(line=161, offs=3) -- 4865(line=178, offs=6) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4852(line=177, offs=5) -- 4859(line=177, offs=12) */ ATSINSmove(tmpret298, loop_119(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4534(line=161, offs=3) -- 4865(line=178, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret298) ; } /* end of [count_divisors_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4546(line=162, offs=9) -- 4842(line=175, offs=22) */ /* local: sqrt_int_46$0(level=0), loop_119$0(level=1) global: sqrt_int_46$0(level=0), loop_119$0(level=1) local: n$5180(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: n$5180(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstkind_t0ype(atstype_int) loop_119(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret299, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp300, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp303, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp304, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp307, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp308, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp311, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp312, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp315, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp316, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp317, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp318, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4546(line=162, offs=9) -- 4842(line=175, offs=22) */ ATSINSflab(__patsflab_loop_119): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4605(line=163, offs=15) -- 4615(line=163, offs=25) */ ATSINSmove(tmp303, sqrt_int_46(env0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4600(line=163, offs=10) -- 4615(line=163, offs=25) */ ATSINSmove(tmp300, ATSLIB_056_prelude__gte_g1int_int__78__2(arg0, tmp303)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4597(line=163, offs=7) -- 4842(line=175, offs=22) */ ATSif( tmp300 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4633(line=164, offs=12) -- 4638(line=164, offs=17) */ ATSINSmove(tmp307, atspre_g0int_mod_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4633(line=164, offs=12) -- 4642(line=164, offs=21) */ ATSINSmove(tmp304, ATSLIB_056_prelude__eq_g0int_int__10__20(tmp307, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4630(line=164, offs=9) -- 4744(line=170, offs=12) */ ATSif( tmp304 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4661(line=165, offs=14) -- 4666(line=165, offs=19) */ ATSINSmove(tmp311, atspre_g1int_div_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4661(line=165, offs=14) -- 4671(line=165, offs=24) */ ATSINSmove(tmp308, ATSLIB_056_prelude__neq_g1int_int__67__3(tmp311, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4658(line=165, offs=11) -- 4719(line=168, offs=14) */ ATSif( tmp308 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4689(line=166, offs=13) -- 4690(line=166, offs=14) */ ATSINSmove(tmpret299, ATSPMVi0nt(2)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4718(line=168, offs=13) -- 4719(line=168, offs=14) */ ATSINSmove(tmpret299, ATSPMVi0nt(1)) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4743(line=170, offs=11) -- 4744(line=170, offs=12) */ ATSINSmove(tmpret299, ATSPMVi0nt(0)) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4767(line=172, offs=12) -- 4772(line=172, offs=17) */ ATSINSmove(tmp315, atspre_g0int_mod_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4767(line=172, offs=12) -- 4776(line=172, offs=21) */ ATSINSmove(tmp312, ATSLIB_056_prelude__eq_g0int_int__10__21(tmp315, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4764(line=172, offs=9) -- 4842(line=175, offs=22) */ ATSif( tmp312 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4801(line=173, offs=20) -- 4806(line=173, offs=25) */ ATSINSmove(tmp317, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4796(line=173, offs=15) -- 4807(line=173, offs=26) */ ATSINSmove(tmp316, loop_119(env0, tmp317)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4792(line=173, offs=11) -- 4807(line=173, offs=26) */ ATSINSmove(tmpret299, atspre_g0int_add_int(ATSPMVi0nt(2), tmp316)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4836(line=175, offs=16) -- 4841(line=175, offs=21) */ ATSINSmove(tmp318, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4831(line=175, offs=11) -- 4842(line=175, offs=22) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp318) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSfgoto(__patsflab_loop_119) ; ATStailcal_end() } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret299) ; } /* end of [loop_119] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) */ /* local: global: gte_g1int_int$78$2(level=2) local: global: */ ATSstatic() /* imparg = tk(4646) tmparg = S2Evar(tk(4646)) tmpsub = Some(tk(4646) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__78__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret171__2, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp172__2, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12741(line=662, offs=1) -- 12797(line=663, offs=43) */ ATSINSflab(__patsflab_gte_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) */ ATSINSmove(tmp172__2, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) */ ATSINSmove(tmpret171__2, atspre_g1int_gte_int(arg0, tmp172__2)) ; ATSfunbody_end() ATSreturn(tmpret171__2) ; } /* end of [ATSLIB_056_prelude__gte_g1int_int__78__2] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$20(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__20(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__20, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__20, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__20, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__20, atspre_g0int_eq_int(arg0, tmp16__20)) ; ATSfunbody_end() ATSreturn(tmpret15__20) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__20] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12916(line=672, offs=3) -- 12956(line=672, offs=43) */ /* local: global: neq_g1int_int$67$3(level=2) local: global: */ ATSstatic() /* imparg = tk(4652) tmparg = S2Evar(tk(4652)) tmpsub = Some(tk(4652) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__67__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret153__3, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp154__3, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12900(line=671, offs=1) -- 12956(line=672, offs=43) */ ATSINSflab(__patsflab_neq_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12943(line=672, offs=30) -- 12954(line=672, offs=41) */ ATSINSmove(tmp154__3, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12925(line=672, offs=12) -- 12956(line=672, offs=43) */ ATSINSmove(tmpret153__3, atspre_g1int_neq_int(arg0, tmp154__3)) ; ATSfunbody_end() ATSreturn(tmpret153__3) ; } /* end of [ATSLIB_056_prelude__neq_g1int_int__67__3] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$21(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__21(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__21, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__21, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__21, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__21, atspre_g0int_eq_int(arg0, tmp16__21)) ; ATSfunbody_end() ATSreturn(tmpret15__21) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__21] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4894(line=180, offs=28) -- 5463(line=206, offs=6) */ /* local: sqrt_int_46$0(level=0) global: sqrt_int_46$0(level=0), sum_divisors_ats$125$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_int) sum_divisors_ats(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret319, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4877(line=180, offs=11) -- 5463(line=206, offs=6) */ ATSINSflab(__patsflab_sum_divisors_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4902(line=181, offs=3) -- 5463(line=206, offs=6) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5447(line=205, offs=5) -- 5457(line=205, offs=15) */ ATSINSmove(tmpret319, loop_126(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4902(line=181, offs=3) -- 5463(line=206, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret319) ; } /* end of [sum_divisors_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4914(line=182, offs=9) -- 5437(line=203, offs=27) */ /* local: sqrt_int_46$0(level=0), loop_126$0(level=1) global: sqrt_int_46$0(level=0), loop_126$0(level=1) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) loop_126(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret320, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp321, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp324, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp325, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp328, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp329, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp332, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref333, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp334, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp337, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref338, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp339, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp340, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp341, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp342, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4914(line=182, offs=9) -- 5437(line=203, offs=27) */ ATSINSflab(__patsflab_loop_126): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5008(line=183, offs=17) -- 5018(line=183, offs=27) */ ATSINSmove(tmp324, sqrt_int_46(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5001(line=183, offs=10) -- 5018(line=183, offs=27) */ ATSINSmove(tmp321, ATSLIB_056_prelude__gte_g1int_int__78__3(arg1, tmp324)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 4998(line=183, offs=7) -- 5437(line=203, offs=27) */ ATSif( tmp321 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5036(line=184, offs=12) -- 5043(line=184, offs=19) */ ATSINSmove(tmp328, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5036(line=184, offs=12) -- 5047(line=184, offs=23) */ ATSINSmove(tmp325, ATSLIB_056_prelude__eq_g0int_int__10__22(tmp328, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5033(line=184, offs=9) -- 5245(line=194, offs=12) */ ATSif( tmp325 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5066(line=185, offs=14) -- 5073(line=185, offs=21) */ ATSINSmove(tmp332, atspre_g1int_div_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5066(line=185, offs=14) -- 5080(line=185, offs=28) */ ATSINSmove(tmp329, ATSLIB_056_prelude__neq_g1int_int__67__4(tmp332, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5063(line=185, offs=11) -- 5220(line=192, offs=16) */ ATSif( tmp329 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5098(line=186, offs=13) -- 5189(line=190, offs=16) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5120(line=187, offs=19) -- 5121(line=187, offs=20) */ /* ATSINStmpdec(tmpref333) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5129(line=187, offs=28) -- 5136(line=187, offs=35) */ ATSINSmove(tmpref333, atspre_g1int_div_int(arg0, arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5166(line=189, offs=15) -- 5173(line=189, offs=22) */ ATSINSmove(tmpret320, atspre_g1int_add_int(arg1, tmpref333)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5098(line=186, offs=13) -- 5189(line=190, offs=16) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5217(line=192, offs=13) -- 5220(line=192, offs=16) */ ATSINSmove(tmpret320, arg1) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5244(line=194, offs=11) -- 5245(line=194, offs=12) */ ATSINSmove(tmpret320, ATSPMVi0nt(0)) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5268(line=196, offs=12) -- 5275(line=196, offs=19) */ ATSINSmove(tmp337, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5268(line=196, offs=12) -- 5279(line=196, offs=23) */ ATSINSmove(tmp334, ATSLIB_056_prelude__eq_g0int_int__10__23(tmp337, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5265(line=196, offs=9) -- 5437(line=203, offs=27) */ ATSif( tmp334 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5295(line=197, offs=11) -- 5397(line=201, offs=14) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5315(line=198, offs=17) -- 5316(line=198, offs=18) */ /* ATSINStmpdec(tmpref338) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5324(line=198, offs=26) -- 5331(line=198, offs=33) */ ATSINSmove(tmpref338, atspre_g1int_div_int(arg0, arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5357(line=200, offs=13) -- 5364(line=200, offs=20) */ ATSINSmove(tmp339, atspre_g1int_add_int(arg1, tmpref338)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5375(line=200, offs=31) -- 5382(line=200, offs=38) */ ATSINSmove(tmp341, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5367(line=200, offs=23) -- 5383(line=200, offs=39) */ ATSINSmove(tmp340, loop_126(arg0, tmp341)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5357(line=200, offs=13) -- 5383(line=200, offs=39) */ ATSINSmove(tmpret320, atspre_g0int_add_int(tmp339, tmp340)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5295(line=197, offs=11) -- 5397(line=201, offs=14) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5429(line=203, offs=19) -- 5436(line=203, offs=26) */ ATSINSmove(tmp342, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5421(line=203, offs=11) -- 5437(line=203, offs=27) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, arg0) ; ATSINSmove_tlcal(apy1, tmp342) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_126) ; ATStailcal_end() } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret320) ; } /* end of [loop_126] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) */ /* local: global: gte_g1int_int$78$3(level=2) local: global: */ ATSstatic() /* imparg = tk(4646) tmparg = S2Evar(tk(4646)) tmpsub = Some(tk(4646) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__78__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret171__3, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp172__3, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12741(line=662, offs=1) -- 12797(line=663, offs=43) */ ATSINSflab(__patsflab_gte_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) */ ATSINSmove(tmp172__3, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) */ ATSINSmove(tmpret171__3, atspre_g1int_gte_int(arg0, tmp172__3)) ; ATSfunbody_end() ATSreturn(tmpret171__3) ; } /* end of [ATSLIB_056_prelude__gte_g1int_int__78__3] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$22(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__22(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__22, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__22, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__22, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__22, atspre_g0int_eq_int(arg0, tmp16__22)) ; ATSfunbody_end() ATSreturn(tmpret15__22) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__22] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12916(line=672, offs=3) -- 12956(line=672, offs=43) */ /* local: global: neq_g1int_int$67$4(level=2) local: global: */ ATSstatic() /* imparg = tk(4652) tmparg = S2Evar(tk(4652)) tmpsub = Some(tk(4652) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__67__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret153__4, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp154__4, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12900(line=671, offs=1) -- 12956(line=672, offs=43) */ ATSINSflab(__patsflab_neq_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12943(line=672, offs=30) -- 12954(line=672, offs=41) */ ATSINSmove(tmp154__4, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12925(line=672, offs=12) -- 12956(line=672, offs=43) */ ATSINSmove(tmpret153__4, atspre_g1int_neq_int(arg0, tmp154__4)) ; ATSfunbody_end() ATSreturn(tmpret153__4) ; } /* end of [ATSLIB_056_prelude__neq_g1int_int__67__4] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$23(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__23(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__23, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__23, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__23, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__23, atspre_g0int_eq_int(arg0, tmp16__23)) ; ATSfunbody_end() ATSreturn(tmpret15__23) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__23] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5490(line=208, offs=26) -- 5521(line=209, offs=26) */ /* local: global: is_perfect_ats$131$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_bool) is_perfect_ats(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret343, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp346, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5475(line=208, offs=11) -- 5521(line=209, offs=26) */ ATSINSflab(__patsflab_is_perfect_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5498(line=209, offs=3) -- 5516(line=209, offs=21) */ ATSINSmove(tmp346, sum_divisors_ats(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5498(line=209, offs=3) -- 5521(line=209, offs=26) */ ATSINSmove(tmpret343, ATSLIB_056_prelude__eq_g0int_int__10__24(tmp346, arg0)) ; ATSfunbody_end() ATSreturn(tmpret343) ; } /* end of [is_perfect_ats] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$24(level=1) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__24(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__24, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__24, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__24, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__24, atspre_g0int_eq_int(arg0, tmp16__24)) ; ATSfunbody_end() ATSreturn(tmpret15__24) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__24] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5527(line=211, offs=5) -- 5837(line=225, offs=8) */ /* local: rip_133$0(level=0) global: rip_133$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) rip_133(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret347, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp348, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp353, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp354, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp357, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref358, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp359, atstkind_t0ype(atstype_bool)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5527(line=211, offs=5) -- 5837(line=225, offs=8) */ ATSINSflab(__patsflab_rip_133): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5649(line=212, offs=6) -- 5654(line=212, offs=11) */ ATSINSmove(tmp353, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5649(line=212, offs=6) -- 5659(line=212, offs=16) */ ATSINSmove(tmp348, ATSLIB_056_prelude__neq_g0int_int__134__1(tmp353, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5646(line=212, offs=3) -- 5837(line=225, offs=8) */ ATSif( tmp348 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5669(line=213, offs=5) -- 5670(line=213, offs=6) */ ATSINSmove(tmpret347, arg0) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5685(line=215, offs=8) -- 5690(line=215, offs=13) */ ATSINSmove(tmp357, atspre_g1int_div_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5685(line=215, offs=8) -- 5694(line=215, offs=17) */ ATSINSmove(tmp354, ATSLIB_056_prelude__gt_g1int_int__4__6(tmp357, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5682(line=215, offs=5) -- 5837(line=225, offs=8) */ ATSif( tmp354 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5706(line=216, offs=7) -- 5820(line=223, offs=10) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5722(line=217, offs=13) -- 5724(line=217, offs=15) */ /* ATSINStmpdec(tmpref358) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5727(line=217, offs=18) -- 5732(line=217, offs=23) */ ATSINSmove(tmpref358, atspre_g1int_div_int(arg0, arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5753(line=219, offs=12) -- 5759(line=219, offs=18) */ ATSINSmove(tmp359, ATSLIB_056_prelude__lt_g1int_int__50__3(tmpref358, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5750(line=219, offs=9) -- 5810(line=222, offs=12) */ ATSif( tmp359 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5775(line=220, offs=11) -- 5785(line=220, offs=21) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmpref358) ; ATSINSmove_tlcal(apy1, arg1) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_rip_133) ; ATStailcal_end() } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5809(line=222, offs=11) -- 5810(line=222, offs=12) */ ATSINSmove(tmpret347, ATSPMVi0nt(1)) ; } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5706(line=216, offs=7) -- 5820(line=223, offs=10) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5836(line=225, offs=7) -- 5837(line=225, offs=8) */ ATSINSmove(tmpret347, ATSPMVi0nt(1)) ; } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret347) ; } /* end of [rip_133] */ #if(0) /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12337(line=639, offs=3) -- 12377(line=639, offs=43) */ /* local: global: neq_g0int_int$134$0(level=0) local: global: */ ATSextern() /* imparg = tk(4635) tmparg = S2Evar(tk(4635)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g0int_int__134(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret349, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp350, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12321(line=638, offs=1) -- 12377(line=639, offs=43) */ ATSINSflab(__patsflab_neq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12364(line=639, offs=30) -- 12375(line=639, offs=41) */ ATSINSmove(tmp350, PMVtmpltcst(g0int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12346(line=639, offs=12) -- 12377(line=639, offs=43) */ ATSINSmove(tmpret349, PMVtmpltcst(g0int_neq)(arg0, tmp350)) ; ATSfunbody_end() ATSreturn(tmpret349) ; } /* end of [ATSLIB_056_prelude__neq_g0int_int__134] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12337(line=639, offs=3) -- 12377(line=639, offs=43) */ /* local: global: neq_g0int_int$134$1(level=1) local: global: */ ATSstatic() /* imparg = tk(4635) tmparg = S2Evar(tk(4635)) tmpsub = Some(tk(4635) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g0int_int__134__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret349__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp350__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12321(line=638, offs=1) -- 12377(line=639, offs=43) */ ATSINSflab(__patsflab_neq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12364(line=639, offs=30) -- 12375(line=639, offs=41) */ ATSINSmove(tmp350__1, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12346(line=639, offs=12) -- 12377(line=639, offs=43) */ ATSINSmove(tmpret349__1, atspre_g0int_neq_int(arg0, tmp350__1)) ; ATSfunbody_end() ATSreturn(tmpret349__1) ; } /* end of [ATSLIB_056_prelude__neq_g0int_int__134__1] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$4$6(level=1) local: global: */ ATSstatic() /* imparg = tk(4643) tmparg = S2Evar(tk(4643)) tmpsub = Some(tk(4643) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__6(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret8__6, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp9__6, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) */ ATSINSflab(__patsflab_gt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp9__6, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret8__6, atspre_g1int_gt_int(arg0, tmp9__6)) ; ATSfunbody_end() ATSreturn(tmpret8__6) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__4__6] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) */ /* local: global: lt_g1int_int$50$3(level=1) local: global: */ ATSstatic() /* imparg = tk(4637) tmparg = S2Evar(tk(4637)) tmpsub = Some(tk(4637) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__50__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret108__3, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp109__3, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) */ ATSINSflab(__patsflab_lt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) */ ATSINSmove(tmp109__3, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) */ ATSINSmove(tmpret108__3, atspre_g1int_lt_int(arg0, tmp109__3)) ; ATSfunbody_end() ATSreturn(tmpret108__3) ; } /* end of [ATSLIB_056_prelude__lt_g1int_int__50__3] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5863(line=227, offs=25) -- 6424(line=245, offs=6) */ /* local: is_prime_48$0(level=0), rip_133$0(level=0) global: sqrt_int_46$0(level=0), is_prime_48$0(level=0), rip_133$0(level=0), prime_factors$139$0(level=0) local: global: */ ATSextern() atstkind_type(atstype_ptrk) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__prime_factors(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret362, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5849(line=227, offs=11) -- 6424(line=245, offs=6) */ ATSINSflab(__patsflab_prime_factors): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5871(line=228, offs=3) -- 6424(line=245, offs=6) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6408(line=244, offs=5) -- 6418(line=244, offs=15) */ ATSINSmove(tmpret362, loop_140(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5871(line=228, offs=3) -- 6424(line=245, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret362) ; } /* end of [_057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__prime_factors] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5883(line=229, offs=9) -- 6398(line=242, offs=27) */ /* local: is_prime_48$0(level=0), rip_133$0(level=0), loop_140$0(level=1) global: is_prime_48$0(level=0), rip_133$0(level=0), loop_140$0(level=1) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) loop_140(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret363, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp364, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp367, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp372, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp373, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp376, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp377, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp380, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp387, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5883(line=229, offs=9) -- 6398(line=242, offs=27) */ ATSINSflab(__patsflab_loop_140): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5981(line=230, offs=10) -- 5989(line=230, offs=18) */ ATSINSmove(tmp364, ATSLIB_056_prelude__gte_g1int_int__78__4(arg1, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 5978(line=230, offs=7) -- 6398(line=242, offs=27) */ ATSif( tmp364 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6006(line=231, offs=12) -- 6016(line=231, offs=22) */ ATSINSmove(tmp367, is_prime_48(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6003(line=231, offs=9) -- 6129(line=234, offs=33) */ ATSif( tmp367 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6033(line=232, offs=11) -- 6083(line=232, offs=61) */ ATSINSmove_ldelay(tmpret363, atstype_boxed, ATSPMVcfunlab(1, __patsfun_142, (arg0))) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6107(line=234, offs=11) -- 6129(line=234, offs=33) */ ATSINSmove_ldelay(tmpret363, atstype_boxed, ATSPMVcfunlab(1, __patsfun_144, ())) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6152(line=236, offs=12) -- 6179(line=236, offs=39) */ ATSINSmove(tmp376, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6152(line=236, offs=12) -- 6179(line=236, offs=39) */ ATSINSmove(tmp373, ATSLIB_056_prelude__eq_g0int_int__10__25(tmp376, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6152(line=236, offs=12) -- 6179(line=236, offs=39) */ ATSif( tmp373 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6152(line=236, offs=12) -- 6179(line=236, offs=39) */ ATSINSmove(tmp372, is_prime_48(arg1)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6152(line=236, offs=12) -- 6179(line=236, offs=39) */ ATSINSmove(tmp372, ATSPMVbool_false()) ; } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6149(line=236, offs=9) -- 6398(line=242, offs=27) */ ATSif( tmp372 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6199(line=237, offs=14) -- 6206(line=237, offs=21) */ ATSINSmove(tmp380, atspre_g1int_div_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6199(line=237, offs=14) -- 6210(line=237, offs=25) */ ATSINSmove(tmp377, ATSLIB_056_prelude__gt_g1int_int__4__7(tmp380, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6196(line=237, offs=11) -- 6358(line=240, offs=65) */ ATSif( tmp377 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6228(line=238, offs=13) -- 6278(line=238, offs=63) */ ATSINSmove_ldelay(tmpret363, atstype_boxed, ATSPMVcfunlab(1, __patsfun_147, (arg0, arg1))) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6306(line=240, offs=13) -- 6358(line=240, offs=65) */ ATSINSmove_ldelay(tmpret363, atstype_boxed, ATSPMVcfunlab(1, __patsfun_148, (arg1))) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6390(line=242, offs=19) -- 6397(line=242, offs=26) */ ATSINSmove(tmp387, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6382(line=242, offs=11) -- 6398(line=242, offs=27) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, arg0) ; ATSINSmove_tlcal(apy1, tmp387) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_140) ; ATStailcal_end() } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret363) ; } /* end of [loop_140] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) */ /* local: global: gte_g1int_int$78$4(level=2) local: global: */ ATSstatic() /* imparg = tk(4646) tmparg = S2Evar(tk(4646)) tmpsub = Some(tk(4646) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__78__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret171__4, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp172__4, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12741(line=662, offs=1) -- 12797(line=663, offs=43) */ ATSINSflab(__patsflab_gte_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) */ ATSINSmove(tmp172__4, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) */ ATSINSmove(tmpret171__4, atspre_g1int_gte_int(arg0, tmp172__4)) ; ATSfunbody_end() ATSreturn(tmpret171__4) ; } /* end of [ATSLIB_056_prelude__gte_g1int_int__78__4] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6033(line=232, offs=11) -- 6083(line=232, offs=61) */ /* local: global: __patsfun_142$0(level=2) local: n$5196(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: n$5196(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstype_boxed __patsfun_142(atstkind_t0ype(atstype_int) env0, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret368, atstype_boxed) ; ATStmpdec(tmp369, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6033(line=232, offs=11) -- 6083(line=232, offs=61) */ ATSINSflab(__patsflab___patsfun_142): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6033(line=232, offs=11) -- 6083(line=232, offs=61) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6059(line=232, offs=37) -- 6081(line=232, offs=59) */ ATSINSmove_ldelay(tmp369, atstype_boxed, ATSPMVcfunlab(1, __patsfun_143, ())) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6041(line=232, offs=19) -- 6082(line=232, offs=60) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret368, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret368, 1) ; #endif ATSINSstore_con1_ofs(tmpret368, postiats_tysum_1, atslab__0, env0) ; ATSINSstore_con1_ofs(tmpret368, postiats_tysum_1, atslab__1, tmp369) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret368) ; } /* end of [__patsfun_142] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6059(line=232, offs=37) -- 6081(line=232, offs=59) */ /* local: global: __patsfun_143$0(level=3) local: global: */ ATSstatic() atstype_boxed __patsfun_143(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret370, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6059(line=232, offs=37) -- 6081(line=232, offs=59) */ ATSINSflab(__patsflab___patsfun_143): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6059(line=232, offs=37) -- 6081(line=232, offs=59) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6067(line=232, offs=45) -- 6080(line=232, offs=58) */ ATSINSmove_nil(tmpret370) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret370) ; } /* end of [__patsfun_143] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6107(line=234, offs=11) -- 6129(line=234, offs=33) */ /* local: global: __patsfun_144$0(level=2) local: global: */ ATSstatic() atstype_boxed __patsfun_144(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret371, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6107(line=234, offs=11) -- 6129(line=234, offs=33) */ ATSINSflab(__patsflab___patsfun_144): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6107(line=234, offs=11) -- 6129(line=234, offs=33) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6115(line=234, offs=19) -- 6128(line=234, offs=32) */ ATSINSmove_nil(tmpret371) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret371) ; } /* end of [__patsfun_144] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$25(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__25(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__25, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__25, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__25, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__25, atspre_g0int_eq_int(arg0, tmp16__25)) ; ATSfunbody_end() ATSreturn(tmpret15__25) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__25] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$4$7(level=2) local: global: */ ATSstatic() /* imparg = tk(4643) tmparg = S2Evar(tk(4643)) tmpsub = Some(tk(4643) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__7(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret8__7, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp9__7, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) */ ATSINSflab(__patsflab_gt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp9__7, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret8__7, atspre_g1int_gt_int(arg0, tmp9__7)) ; ATSfunbody_end() ATSreturn(tmpret8__7) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__4__7] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6228(line=238, offs=13) -- 6278(line=238, offs=63) */ /* local: rip_133$0(level=0), loop_140$0(level=1) global: rip_133$0(level=0), loop_140$0(level=1), __patsfun_147$0(level=2) local: n$5196(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5197(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: n$5196(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5197(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstype_boxed __patsfun_147(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret381, atstype_boxed) ; ATStmpdec(tmp382, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp383, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6228(line=238, offs=13) -- 6278(line=238, offs=63) */ ATSINSflab(__patsflab___patsfun_147): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6228(line=238, offs=13) -- 6278(line=238, offs=63) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6261(line=238, offs=46) -- 6272(line=238, offs=57) */ ATSINSmove(tmp383, rip_133(env0, env1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6256(line=238, offs=41) -- 6276(line=238, offs=61) */ ATSINSmove(tmp382, loop_140(tmp383, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6236(line=238, offs=21) -- 6277(line=238, offs=62) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret381, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret381, 1) ; #endif ATSINSstore_con1_ofs(tmpret381, postiats_tysum_1, atslab__0, env1) ; ATSINSstore_con1_ofs(tmpret381, postiats_tysum_1, atslab__1, tmp382) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret381) ; } /* end of [__patsfun_147] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6306(line=240, offs=13) -- 6358(line=240, offs=65) */ /* local: global: __patsfun_148$0(level=2) local: acc$5197(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: acc$5197(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstype_boxed __patsfun_148(atstkind_t0ype(atstype_int) env0, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret384, atstype_boxed) ; ATStmpdec(tmp385, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6306(line=240, offs=13) -- 6358(line=240, offs=65) */ ATSINSflab(__patsflab___patsfun_148): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6306(line=240, offs=13) -- 6358(line=240, offs=65) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6334(line=240, offs=41) -- 6356(line=240, offs=63) */ ATSINSmove_ldelay(tmp385, atstype_boxed, ATSPMVcfunlab(1, __patsfun_149, ())) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6314(line=240, offs=21) -- 6357(line=240, offs=64) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret384, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret384, 1) ; #endif ATSINSstore_con1_ofs(tmpret384, postiats_tysum_1, atslab__0, env0) ; ATSINSstore_con1_ofs(tmpret384, postiats_tysum_1, atslab__1, tmp385) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret384) ; } /* end of [__patsfun_148] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6334(line=240, offs=41) -- 6356(line=240, offs=63) */ /* local: global: __patsfun_149$0(level=3) local: global: */ ATSstatic() atstype_boxed __patsfun_149(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret386, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6334(line=240, offs=41) -- 6356(line=240, offs=63) */ ATSINSflab(__patsflab___patsfun_149): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6334(line=240, offs=41) -- 6356(line=240, offs=63) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6342(line=240, offs=49) -- 6355(line=240, offs=62) */ ATSINSmove_nil(tmpret386) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret386) ; } /* end of [__patsfun_149] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6453(line=247, offs=28) -- 6862(line=265, offs=6) */ /* local: is_prime_48$0(level=0), rip_133$0(level=0) global: sqrt_int_46$0(level=0), is_prime_48$0(level=0), rip_133$0(level=0), little_omega_ats$150$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_int) little_omega_ats(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret388, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6436(line=247, offs=11) -- 6862(line=265, offs=6) */ ATSINSflab(__patsflab_little_omega_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6461(line=248, offs=3) -- 6862(line=265, offs=6) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6846(line=264, offs=5) -- 6856(line=264, offs=15) */ ATSINSmove(tmpret388, loop_151(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6461(line=248, offs=3) -- 6862(line=265, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret388) ; } /* end of [little_omega_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6473(line=249, offs=9) -- 6836(line=262, offs=27) */ /* local: is_prime_48$0(level=0), rip_133$0(level=0), loop_151$0(level=1) global: is_prime_48$0(level=0), rip_133$0(level=0), loop_151$0(level=1) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) loop_151(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(apy1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret389, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp390, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp393, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp394, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp395, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp398, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp399, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp402, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp403, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp404, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp405, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6473(line=249, offs=9) -- 6836(line=262, offs=27) */ ATSINSflab(__patsflab_loop_151): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6566(line=250, offs=10) -- 6574(line=250, offs=18) */ ATSINSmove(tmp390, ATSLIB_056_prelude__gte_g1int_int__78__5(arg1, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6563(line=250, offs=7) -- 6836(line=262, offs=27) */ ATSif( tmp390 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6591(line=251, offs=12) -- 6601(line=251, offs=22) */ ATSINSmove(tmp393, is_prime_48(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6588(line=251, offs=9) -- 6644(line=254, offs=12) */ ATSif( tmp393 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6618(line=252, offs=11) -- 6619(line=252, offs=12) */ ATSINSmove(tmpret389, ATSPMVi0nt(1)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6643(line=254, offs=11) -- 6644(line=254, offs=12) */ ATSINSmove(tmpret389, ATSPMVi0nt(0)) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6667(line=256, offs=12) -- 6694(line=256, offs=39) */ ATSINSmove(tmp398, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6667(line=256, offs=12) -- 6694(line=256, offs=39) */ ATSINSmove(tmp395, ATSLIB_056_prelude__eq_g0int_int__10__26(tmp398, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6667(line=256, offs=12) -- 6694(line=256, offs=39) */ ATSif( tmp395 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6667(line=256, offs=12) -- 6694(line=256, offs=39) */ ATSINSmove(tmp394, is_prime_48(arg1)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6667(line=256, offs=12) -- 6694(line=256, offs=39) */ ATSINSmove(tmp394, ATSPMVbool_false()) ; } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6664(line=256, offs=9) -- 6836(line=262, offs=27) */ ATSif( tmp394 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6714(line=257, offs=14) -- 6721(line=257, offs=21) */ ATSINSmove(tmp402, atspre_g1int_div_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6714(line=257, offs=14) -- 6725(line=257, offs=25) */ ATSINSmove(tmp399, ATSLIB_056_prelude__gt_g1int_int__4__8(tmp402, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6711(line=257, offs=11) -- 6796(line=260, offs=14) */ ATSif( tmp399 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6752(line=258, offs=22) -- 6763(line=258, offs=33) */ ATSINSmove(tmp404, rip_133(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6747(line=258, offs=17) -- 6767(line=258, offs=37) */ ATSINSmove(tmp403, loop_151(tmp404, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6743(line=258, offs=13) -- 6767(line=258, offs=37) */ ATSINSmove(tmpret389, atspre_g0int_add_int(ATSPMVi0nt(1), tmp403)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6795(line=260, offs=13) -- 6796(line=260, offs=14) */ ATSINSmove(tmpret389, ATSPMVi0nt(1)) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6828(line=262, offs=19) -- 6835(line=262, offs=26) */ ATSINSmove(tmp405, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6820(line=262, offs=11) -- 6836(line=262, offs=27) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, arg0) ; ATSINSmove_tlcal(apy1, tmp405) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_151) ; ATStailcal_end() } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret389) ; } /* end of [loop_151] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) */ /* local: global: gte_g1int_int$78$5(level=2) local: global: */ ATSstatic() /* imparg = tk(4646) tmparg = S2Evar(tk(4646)) tmpsub = Some(tk(4646) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__78__5(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret171__5, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp172__5, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12741(line=662, offs=1) -- 12797(line=663, offs=43) */ ATSINSflab(__patsflab_gte_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) */ ATSINSmove(tmp172__5, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) */ ATSINSmove(tmpret171__5, atspre_g1int_gte_int(arg0, tmp172__5)) ; ATSfunbody_end() ATSreturn(tmpret171__5) ; } /* end of [ATSLIB_056_prelude__gte_g1int_int__78__5] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$10$26(level=2) local: global: */ ATSstatic() /* imparg = tk(4634) tmparg = S2Evar(tk(4634)) tmpsub = Some(tk(4634) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__10__26(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret15__26, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp16__26, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12244(line=634, offs=1) -- 12298(line=635, offs=42) */ ATSINSflab(__patsflab_eq_g0int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp16__26, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret15__26, atspre_g0int_eq_int(arg0, tmp16__26)) ; ATSfunbody_end() ATSreturn(tmpret15__26) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__10__26] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$4$8(level=2) local: global: */ ATSstatic() /* imparg = tk(4643) tmparg = S2Evar(tk(4643)) tmpsub = Some(tk(4643) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__4__8(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret8__8, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp9__8, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12664(line=658, offs=1) -- 12718(line=659, offs=42) */ ATSINSflab(__patsflab_gt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp9__8, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret8__8, atspre_g1int_gt_int(arg0, tmp9__8)) ; ATSfunbody_end() ATSreturn(tmpret8__8) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__4__8] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6886(line=267, offs=23) -- 7176(line=279, offs=8) */ /* local: global: radical_ats$155$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_int) radical_ats(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret406, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref407, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6874(line=267, offs=11) -- 7176(line=279, offs=8) */ ATSINSflab(__patsflab_radical_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6894(line=268, offs=3) -- 7176(line=279, offs=8) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6911(line=269, offs=7) -- 6912(line=269, offs=8) */ ATSINSlab(__atstmplab32): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6887(line=267, offs=24) -- 6888(line=267, offs=25) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab34) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6912(line=269, offs=8) -- 6912(line=269, offs=8) */ ATSINSlab(__atstmplab33): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6916(line=269, offs=12) -- 6917(line=269, offs=13) */ ATSINSmove(tmpret406, ATSPMVi0nt(1)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6925(line=270, offs=8) -- 6925(line=270, offs=8) */ ATSINSlab(__atstmplab34): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6930(line=270, offs=13) -- 7176(line=279, offs=8) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6944(line=271, offs=11) -- 6945(line=271, offs=12) */ /* ATSINStmpdec(tmpref407) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6964(line=271, offs=31) -- 6979(line=271, offs=46) */ ATSINSmove(tmpref407, _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__prime_factors(arg0)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7158(line=278, offs=7) -- 7167(line=278, offs=16) */ ATSINSmove(tmpret406, product_156(tmpref407)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6930(line=270, offs=13) -- 7176(line=279, offs=8) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret406) ; } /* end of [radical_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6998(line=273, offs=11) -- 7144(line=276, offs=34) */ /* local: product_156$0(level=1) global: product_156$0(level=1) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) product_156(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret408, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp409, atstype_boxed) ; ATStmpdec(tmp410, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp411, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp412, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 6998(line=273, offs=11) -- 7144(line=276, offs=34) */ ATSINSflab(__patsflab_product_156): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7049(line=274, offs=15) -- 7052(line=274, offs=18) */ ATSINSmove_llazyeval(tmp409, atstype_boxed, arg0) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7043(line=274, offs=9) -- 7144(line=276, offs=34) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7068(line=275, offs=13) -- 7091(line=275, offs=36) */ ATSINSlab(__atstmplab35): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7049(line=274, offs=15) -- 7052(line=274, offs=18) */ ATSifthen(ATSCKptrisnull(tmp409)) { ATSINSgoto(__atstmplab38) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7091(line=275, offs=36) -- 7091(line=275, offs=36) */ ATSINSlab(__atstmplab36): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7085(line=275, offs=30) -- 7086(line=275, offs=31) */ ATSINSmove(tmp410, ATSSELcon(tmp409, postiats_tysum_1, atslab__0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7088(line=275, offs=33) -- 7090(line=275, offs=35) */ ATSINSmove(tmp411, ATSSELcon(tmp409, postiats_tysum_1, atslab__1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7068(line=275, offs=13) -- 7110(line=275, offs=55) */ ATSINSfreecon(tmp409) ; /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7099(line=275, offs=44) -- 7109(line=275, offs=54) */ ATSINSmove(tmp412, product_156(tmp411)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7095(line=275, offs=40) -- 7109(line=275, offs=54) */ ATSINSmove(tmpret408, atspre_g0int_mul_int(tmp410, tmp412)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7123(line=276, offs=13) -- 7139(line=276, offs=29) */ ATSINSlab(__atstmplab37): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7049(line=274, offs=15) -- 7052(line=274, offs=18) */ #if(0) ATSifthen(ATSCKptriscons(tmp409)) { ATSINSdeadcode_fail() ; } ; #endif /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7139(line=276, offs=29) -- 7139(line=276, offs=29) */ ATSINSlab(__atstmplab38): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7143(line=276, offs=33) -- 7144(line=276, offs=34) */ ATSINSmove(tmpret408, ATSPMVi0nt(1)) ; ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret408) ; } /* end of [product_156] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7181(line=281, offs=4) -- 7730(line=295, offs=8) */ /* local: global: totient_157$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) totient_157(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret413, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref418, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmpref419, postiats_tyrec_0) ; ATStmpdec(tmpref420, postiats_tyrec_0) ; ATStmpdec(tmp438, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7181(line=281, offs=4) -- 7730(line=295, offs=8) */ ATSINSflab(__patsflab_totient_157): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7214(line=282, offs=3) -- 7730(line=295, offs=8) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7231(line=283, offs=7) -- 7232(line=283, offs=8) */ ATSINSlab(__atstmplab39): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7189(line=281, offs=12) -- 7190(line=281, offs=13) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab41) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7232(line=283, offs=8) -- 7232(line=283, offs=8) */ ATSINSlab(__atstmplab40): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7236(line=283, offs=12) -- 7237(line=283, offs=13) */ ATSINSmove(tmpret413, ATSPMVi0nt(1)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7245(line=284, offs=8) -- 7245(line=284, offs=8) */ ATSINSlab(__atstmplab41): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7250(line=284, offs=13) -- 7730(line=295, offs=8) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7464(line=290, offs=11) -- 7465(line=290, offs=12) */ /* ATSINStmpdec(tmpref418) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7484(line=290, offs=31) -- 7499(line=290, offs=46) */ ATSINSmove(tmpref418, _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__prime_factors(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7511(line=291, offs=11) -- 7521(line=291, offs=21) */ /* ATSINStmpdec(tmpref419) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7524(line=291, offs=24) -- 7550(line=291, offs=50) */ ATSINSmove_fltrec_beg() ATSINSstore_fltrec_ofs(tmpref419, postiats_tyrec_0, atslab__first, ATSPMVi0nt(1)) ; ATSINSstore_fltrec_ofs(tmpref419, postiats_tyrec_0, atslab__second, ATSPMVi0nt(1)) ; ATSINSmove_fltrec_end() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7568(line=292, offs=11) -- 7569(line=292, offs=12) */ /* ATSINStmpdec(tmpref420) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7572(line=292, offs=15) -- 7659(line=292, offs=102) */ ATSINSmove(tmpref420, ATSLIB_056_prelude__stream_vt_foldleft_cloptr__160__1(tmpref418, tmpref419, ATSPMVcfunlab(1, __patsfun_164, ()))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7690(line=294, offs=17) -- 7711(line=294, offs=38) */ ATSINSmove(tmp438, atspre_g0int_mul_int(arg0, ATSSELfltrec(tmpref420, postiats_tyrec_0, atslab__first))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7680(line=294, offs=7) -- 7722(line=294, offs=49) */ ATSINSmove(tmpret413, atspre_g0int_div_int(tmp438, ATSSELfltrec(tmpref420, postiats_tyrec_0, atslab__second))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7250(line=284, offs=13) -- 7730(line=295, offs=8) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret413) ; } /* end of [totient_157] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7323(line=287, offs=10) -- 7446(line=288, offs=80) */ /* local: global: adjust_contents_158$0(level=1) local: global: */ ATSstatic() postiats_tyrec_0 adjust_contents_158(postiats_tyrec_0 arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret414, postiats_tyrec_0) ; ATStmpdec(tmp415, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp416, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp417, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7323(line=287, offs=10) -- 7446(line=288, offs=80) */ ATSINSflab(__patsflab_adjust_contents_158): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7405(line=288, offs=39) -- 7410(line=288, offs=44) */ ATSINSmove(tmp416, atspre_g0int_sub_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7386(line=288, offs=20) -- 7411(line=288, offs=45) */ ATSINSmove(tmp415, atspre_g0int_mul_int(ATSSELfltrec(arg0, postiats_tyrec_0, atslab__first), tmp416)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7422(line=288, offs=56) -- 7444(line=288, offs=78) */ ATSINSmove(tmp417, atspre_g0int_mul_int(ATSSELfltrec(arg0, postiats_tyrec_0, atslab__second), arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7375(line=288, offs=9) -- 7446(line=288, offs=80) */ ATSINSmove_fltrec_beg() ATSINSstore_fltrec_ofs(tmpret414, postiats_tyrec_0, atslab__first, tmp415) ; ATSINSstore_fltrec_ofs(tmpret414, postiats_tyrec_0, atslab__second, tmp417) ; ATSINSmove_fltrec_end() ATSfunbody_end() ATSreturn(tmpret414) ; } /* end of [adjust_contents_158] */ #if(0) /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats: 29943(line=1864, offs=3) -- 30423(line=1895, offs=2) */ /* local: global: stream_vt_foldleft_cloptr$160$0(level=0) local: global: */ ATSextern() /* imparg = res(8358), a(8359) tmparg = S2Evar(res(8358)); S2Evar(a(8359)) tmpsub = None() */ atstyvar_type(res) ATSLIB_056_prelude__stream_vt_foldleft_cloptr__160(atstkind_type(atstype_ptrk) arg0, atstyvar_type(res) arg1, atstype_cloptr arg2) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret421, atstyvar_type(res)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 29915(line=1863, offs=1) -- 30423(line=1895, offs=2) */ ATSINSflab(__patsflab_stream_vt_foldleft_cloptr): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 29964(line=1865, offs=3) -- 30423(line=1895, offs=2) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 29964(line=1865, offs=3) -- 29984(line=1865, offs=23) */ ATSINSmove(tmpret421, ATSfunclo_fun(PMVd2vfunlab(d2v=loop$4504(1), flab=loop_161$0(level=1)), (atstkind_type(atstype_ptrk), atstyvar_type(res), atstype_cloptr), atstyvar_type(res))(arg0, arg1, arg2)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 29964(line=1865, offs=3) -- 30423(line=1895, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret421) ; } /* end of [ATSLIB_056_prelude__stream_vt_foldleft_cloptr__160] */ #endif // end of [TEMPLATE] #if(0) /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats: 30000(line=1869, offs=1) -- 30401(line=1893, offs=4) */ /* local: loop_161$0(level=1) global: loop_161$0(level=1) local: global: */ ATSstatic() atstyvar_type(res) loop_161__161(atstkind_type(atstype_ptrk) arg0, atstyvar_type(res) arg1, atstype_cloptr arg2) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_type(atstype_ptrk)) ; ATStmpdec(apy1, atstyvar_type(res)) ; ATStmpdec(apy2, atstype_cloptr) ; ATStmpdec(tmpret422, atstyvar_type(res)) ; ATStmpdec(tmpref423, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp424, atstype_boxed) ; // ATStmpdec_void(tmp427) ; ATStmpdec(tmp428, atstyvar_type(res)) ; ATStmpdec(tmp429, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30000(line=1869, offs=1) -- 30401(line=1893, offs=4) */ ATSINSflab(__patsflab_loop_161): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30078(line=1875, offs=6) -- 30401(line=1893, offs=4) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30088(line=1876, offs=7) -- 30094(line=1876, offs=13) */ /* ATSINStmpdec(tmpref423) ; */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30097(line=1876, offs=16) -- 30100(line=1876, offs=19) */ ATSINSmove_llazyeval(tmpref423, atstype_boxed, arg0) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30113(line=1880, offs=1) -- 30119(line=1880, offs=7) */ ATSINSmove(tmp424, tmpref423) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30107(line=1879, offs=1) -- 30367(line=1891, offs=6) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30134(line=1882, offs=3) -- 30155(line=1883, offs=7) */ ATSINSlab(__atstmplab42): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30113(line=1880, offs=1) -- 30119(line=1880, offs=7) */ ATSifthen(ATSCKptriscons(tmp424)) { ATSINSgoto(__atstmplab45) ; } ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30155(line=1883, offs=7) -- 30155(line=1883, offs=7) */ ATSINSlab(__atstmplab43): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30167(line=1885, offs=5) -- 30199(line=1885, offs=37) */ ATSINSmove_void(tmp427, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), arg2))) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30201(line=1885, offs=39) -- 30204(line=1885, offs=42) */ ATSINSmove(tmpret422, arg1) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30240(line=1887, offs=3) -- 30269(line=1888, offs=14) */ ATSINSlab(__atstmplab44): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30113(line=1880, offs=1) -- 30119(line=1880, offs=7) */ #if(0) ATSifthen(ATSCKptrisnull(tmp424)) { ATSINSdeadcode_fail() ; } ; #endif /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30269(line=1888, offs=14) -- 30269(line=1888, offs=14) */ ATSINSlab(__atstmplab45): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30273(line=1888, offs=18) -- 30367(line=1891, offs=6) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30291(line=1889, offs=15) -- 30304(line=1889, offs=28) */ ATSINSmove(tmp428, ATSfunclo_clo(ATSPMVrefarg0(arg2), (atstype_cloptr, atstyvar_type(res), atsrefarg1_type(atstyvar_type(a))), atstyvar_type(res))(ATSPMVrefarg0(arg2), arg1, ATSPMVrefarg1(ATSPMVptrof(ATSSELcon(tmp424, postiats_tysum_2, atslab__0))))) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30319(line=1890, offs=15) -- 30322(line=1890, offs=18) */ ATSINSmove(tmp429, ATSSELcon(tmp424, postiats_tysum_2, atslab__1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30326(line=1890, offs=22) -- 30338(line=1890, offs=34) */ ATSINSfreecon(tmpref423) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30341(line=1890, offs=37) -- 30361(line=1890, offs=57) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp429) ; ATSINSmove_tlcal(apy1, tmp428) ; ATSINSmove_tlcal(apy2, arg2) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSargmove_tlcal(arg2, apy2) ; ATSINSfgoto(__patsflab_loop_161) ; ATStailcal_end() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30273(line=1888, offs=18) -- 30367(line=1891, offs=6) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30078(line=1875, offs=6) -- 30401(line=1893, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret422) ; } /* end of [loop_161__161] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats: 29943(line=1864, offs=3) -- 30423(line=1895, offs=2) */ /* local: global: stream_vt_foldleft_cloptr$160$1(level=1) local: global: */ ATSstatic() /* imparg = res(8358), a(8359) tmparg = S2Evar(res(8358)); S2Evar(a(8359)) tmpsub = Some(res(8358) -> S2EVar(5984); a(8359) -> S2Eapp(S2Ecst(g0int_t0ype); S2Eextkind(atstype_int))) */ postiats_tyrec_0 ATSLIB_056_prelude__stream_vt_foldleft_cloptr__160__1(atstkind_type(atstype_ptrk) arg0, postiats_tyrec_0 arg1, atstype_cloptr arg2) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret421__1, postiats_tyrec_0) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 29915(line=1863, offs=1) -- 30423(line=1895, offs=2) */ ATSINSflab(__patsflab_stream_vt_foldleft_cloptr): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 29964(line=1865, offs=3) -- 30423(line=1895, offs=2) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 29964(line=1865, offs=3) -- 29984(line=1865, offs=23) */ ATSINSmove(tmpret421__1, loop_161__161__1(arg0, arg1, arg2)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 29964(line=1865, offs=3) -- 30423(line=1895, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret421__1) ; } /* end of [ATSLIB_056_prelude__stream_vt_foldleft_cloptr__160__1] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats: 30000(line=1869, offs=1) -- 30401(line=1893, offs=4) */ /* local: loop_161$1(level=2) global: loop_161$1(level=2) local: global: */ ATSstatic() postiats_tyrec_0 loop_161__161__1(atstkind_type(atstype_ptrk) arg0, postiats_tyrec_0 arg1, atstype_cloptr arg2) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_type(atstype_ptrk)) ; ATStmpdec(apy1, postiats_tyrec_0) ; ATStmpdec(apy2, atstype_cloptr) ; ATStmpdec(tmpret422__1, postiats_tyrec_0) ; ATStmpdec(tmpref423__1, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp424__1, atstype_boxed) ; // ATStmpdec_void(tmp427__1) ; ATStmpdec(tmp428__1, postiats_tyrec_0) ; ATStmpdec(tmp429__1, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30000(line=1869, offs=1) -- 30401(line=1893, offs=4) */ ATSINSflab(__patsflab_loop_161): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30078(line=1875, offs=6) -- 30401(line=1893, offs=4) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30088(line=1876, offs=7) -- 30094(line=1876, offs=13) */ /* ATSINStmpdec(tmpref423) ; */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30097(line=1876, offs=16) -- 30100(line=1876, offs=19) */ ATSINSmove_llazyeval(tmpref423__1, atstype_boxed, arg0) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30113(line=1880, offs=1) -- 30119(line=1880, offs=7) */ ATSINSmove(tmp424__1, tmpref423__1) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30107(line=1879, offs=1) -- 30367(line=1891, offs=6) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30134(line=1882, offs=3) -- 30155(line=1883, offs=7) */ ATSINSlab(__atstmplab42): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30113(line=1880, offs=1) -- 30119(line=1880, offs=7) */ ATSifthen(ATSCKptriscons(tmp424__1)) { ATSINSgoto(__atstmplab45) ; } ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30155(line=1883, offs=7) -- 30155(line=1883, offs=7) */ ATSINSlab(__atstmplab43): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30167(line=1885, offs=5) -- 30199(line=1885, offs=37) */ ATSINSmove_void(tmp427__1, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), arg2))) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30201(line=1885, offs=39) -- 30204(line=1885, offs=42) */ ATSINSmove(tmpret422__1, arg1) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30240(line=1887, offs=3) -- 30269(line=1888, offs=14) */ ATSINSlab(__atstmplab44): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30113(line=1880, offs=1) -- 30119(line=1880, offs=7) */ #if(0) ATSifthen(ATSCKptrisnull(tmp424__1)) { ATSINSdeadcode_fail() ; } ; #endif /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30269(line=1888, offs=14) -- 30269(line=1888, offs=14) */ ATSINSlab(__atstmplab45): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30273(line=1888, offs=18) -- 30367(line=1891, offs=6) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30291(line=1889, offs=15) -- 30304(line=1889, offs=28) */ ATSINSmove(tmp428__1, ATSfunclo_clo(ATSPMVrefarg0(arg2), (atstype_cloptr, postiats_tyrec_0, atsrefarg1_type(atstkind_t0ype(atstype_int))), postiats_tyrec_0)(ATSPMVrefarg0(arg2), arg1, ATSPMVrefarg1(ATSPMVptrof(ATSSELcon(tmp424__1, postiats_tysum_1, atslab__0))))) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30319(line=1890, offs=15) -- 30322(line=1890, offs=18) */ ATSINSmove(tmp429__1, ATSSELcon(tmp424__1, postiats_tysum_1, atslab__1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30326(line=1890, offs=22) -- 30338(line=1890, offs=34) */ ATSINSfreecon(tmpref423__1) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30341(line=1890, offs=37) -- 30361(line=1890, offs=57) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp429__1) ; ATSINSmove_tlcal(apy1, tmp428__1) ; ATSINSmove_tlcal(apy2, arg2) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSargmove_tlcal(arg2, apy2) ; ATSINSfgoto(__patsflab_loop_161) ; ATStailcal_end() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30273(line=1888, offs=18) -- 30367(line=1891, offs=6) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30078(line=1875, offs=6) -- 30401(line=1893, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret422__1) ; } /* end of [loop_161__161__1] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7613(line=292, offs=56) -- 7658(line=292, offs=101) */ /* local: adjust_contents_158$0(level=1) global: adjust_contents_158$0(level=1), __patsfun_164$0(level=1) local: global: */ ATSstatic() postiats_tyrec_0 __patsfun_164(postiats_tyrec_0 arg0, atsrefarg1_type(atstkind_t0ype(atstype_int)) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret437, postiats_tyrec_0) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7613(line=292, offs=56) -- 7658(line=292, offs=101) */ ATSINSflab(__patsflab___patsfun_164): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7632(line=292, offs=75) -- 7658(line=292, offs=101) */ ATSINSmove(tmpret437, adjust_contents_158(arg0, ATSderef(arg1, atstkind_t0ype(atstype_int)))) ; ATSfunbody_end() ATSreturn(tmpret437) ; } /* end of [__patsfun_164] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7754(line=297, offs=23) -- 8110(line=311, offs=6) */ /* local: totient_157$0(level=0) global: totient_157$0(level=0), totient_sum$165$0(level=0) local: global: */ ATSextern() atstkind_type(atstype_ptrk) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__totient_sum(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret439, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7742(line=297, offs=11) -- 8110(line=311, offs=6) */ ATSINSflab(__patsflab_totient_sum): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7762(line=298, offs=3) -- 8110(line=311, offs=6) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8094(line=310, offs=5) -- 8104(line=310, offs=15) */ ATSINSmove(tmpret439, loop_166(ATSPMVi0nt(1), arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7762(line=298, offs=3) -- 8110(line=311, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret439) ; } /* end of [_057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__totient_sum] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7774(line=299, offs=9) -- 8084(line=308, offs=40) */ /* local: totient_157$0(level=0), loop_166$0(level=1) global: totient_157$0(level=0), loop_166$0(level=1) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) loop_166(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret440, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp441, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmpref444, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp445, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref446, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp451, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp456, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7774(line=299, offs=9) -- 8084(line=308, offs=40) */ ATSINSflab(__patsflab_loop_166): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7877(line=300, offs=10) -- 7886(line=300, offs=19) */ ATSINSmove(tmp441, ATSLIB_056_prelude__lt_g1int_int__50__4(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7874(line=300, offs=7) -- 8084(line=308, offs=40) */ ATSif( tmp441 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7900(line=301, offs=9) -- 8033(line=306, offs=12) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7918(line=302, offs=15) -- 7919(line=302, offs=16) */ /* ATSINStmpdec(tmpref444) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7927(line=302, offs=24) -- 7932(line=302, offs=29) */ ATSINSmove(tmp445, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7922(line=302, offs=19) -- 7940(line=302, offs=37) */ ATSINSmove(tmpref444, loop_166(tmp445, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7955(line=303, offs=15) -- 7956(line=303, offs=16) */ /* ATSINStmpdec(tmpref446) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7986(line=303, offs=46) -- 7995(line=303, offs=55) */ ATSINSmove(tmp451, totient_157(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7959(line=303, offs=19) -- 7998(line=303, offs=58) */ ATSINSmove(tmpref446, ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__168__1(tmpref444, ATSPMVcastfn(witness, atstkind_t0ype(atstype_int), tmp451))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8020(line=305, offs=11) -- 8021(line=305, offs=12) */ ATSINSmove(tmpret440, tmpref446) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 7900(line=301, offs=9) -- 8033(line=306, offs=12) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8053(line=308, offs=9) -- 8084(line=308, offs=40) */ ATSINSmove(tmp456, totient_157(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8053(line=308, offs=9) -- 8084(line=308, offs=40) */ ATSINSmove(tmpret440, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__43__2(ATSPMVcastfn(witness, atstkind_t0ype(atstype_int), tmp456))) ; } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret440) ; } /* end of [loop_166] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) */ /* local: global: lt_g1int_int$50$4(level=2) local: global: */ ATSstatic() /* imparg = tk(4637) tmparg = S2Evar(tk(4637)) tmpsub = Some(tk(4637) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__50__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret108__4, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp109__4, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12505(line=649, offs=1) -- 12559(line=650, offs=42) */ ATSINSflab(__patsflab_lt_g1int_int): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) */ ATSINSmove(tmp109__4, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) */ ATSINSmove(tmpret108__4, atspre_g1int_lt_int(arg0, tmp109__4)) ; ATSfunbody_end() ATSreturn(tmpret108__4) ; } /* end of [ATSLIB_056_prelude__lt_g1int_int__50__4] */ #if(0) /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5151(line=274, offs=3) -- 5217(line=279, offs=2) */ /* local: global: add_intinf0_int$168$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__168(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret447, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp448) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5133(line=273, offs=1) -- 5217(line=279, offs=2) */ ATSINSflab(__patsflab_add_intinf0_int): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5160(line=274, offs=12) -- 5217(line=279, offs=2) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5184(line=277, offs=10) -- 5212(line=277, offs=38) */ ATSINSmove_void(tmp448, atscntrb_gmp_mpz_add2_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5161(line=274, offs=13) -- 5162(line=274, offs=14) */ ATSINSmove(tmpret447, arg0) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5160(line=274, offs=12) -- 5217(line=279, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret447) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__168] */ #endif // end of [TEMPLATE] /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5151(line=274, offs=3) -- 5217(line=279, offs=2) */ /* local: global: add_intinf0_int$168$1(level=2) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__168__1(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret447__1, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp448__1) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5133(line=273, offs=1) -- 5217(line=279, offs=2) */ ATSINSflab(__patsflab_add_intinf0_int): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5160(line=274, offs=12) -- 5217(line=279, offs=2) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5184(line=277, offs=10) -- 5212(line=277, offs=38) */ ATSINSmove_void(tmp448__1, atscntrb_gmp_mpz_add2_int(ATSPMVrefarg1(ATSSELrecsin(arg0, atstkind_type(atstype_ptrk), atslab__2)), arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5161(line=274, offs=13) -- 5162(line=274, offs=14) */ ATSINSmove(tmpret447__1, arg0) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 5160(line=274, offs=12) -- 5217(line=279, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret447__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__168__1] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2209(line=74, offs=3) -- 2301(line=80, offs=2) */ /* local: global: intinf_make_int$43$2(level=2) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__43__2(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret94__2, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp95__2, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp96__2) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2191(line=73, offs=1) -- 2301(line=80, offs=2) */ ATSINSflab(__patsflab_intinf_make_int): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2238(line=77, offs=9) -- 2254(line=77, offs=25) */ ATSINSmove(tmp95__2, ATSLIB_056_prelude__ptr_alloc__1__6()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) */ ATSINSmove_void(tmp96__2, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp95__2, atstkind_type(atstype_ptrk), atslab__2)), arg0)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2216(line=74, offs=10) -- 2217(line=74, offs=11) */ ATSINSmove(tmpret94__2, tmp95__2) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2215(line=74, offs=9) -- 2301(line=80, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret94__2) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__43__2] */ /* /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) */ /* local: global: ptr_alloc$1$6(level=3) local: global: */ ATSstatic() /* imparg = a(4746) tmparg = S2Evar(a(4746)) tmpsub = Some(a(4746) -> S2Ecst(mpz_vt0ype)) */ atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__6() { /* tmpvardeclst(beg) */ ATStmpdec(tmpret2__6, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3708(line=184, offs=1) -- 3749(line=184, offs=42) */ ATSINSflab(__patsflab_ptr_alloc): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.4.2/ATS2-Postiats-gmp-0.4.2/lib/ats2-postiats-0.4.2/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) */ ATSINSmove(tmpret2__6, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; ATSfunbody_end() ATSreturn(tmpret2__6) ; } /* end of [ATSLIB_056_prelude__ptr_alloc__1__6] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8134(line=313, offs=23) -- 8151(line=314, offs=12) */ /* local: totient_157$0(level=0) global: totient_157$0(level=0), totient_ats$172$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_int) totient_ats(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret457, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8122(line=313, offs=11) -- 8152(line=314, offs=13) */ ATSINSflab(__patsflab_totient_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8142(line=314, offs=3) -- 8151(line=314, offs=12) */ ATSINSmove(tmpret457, totient_157(arg0)) ; ATSfunbody_end() ATSreturn(tmpret457) ; } /* end of [totient_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8175(line=316, offs=22) -- 8208(line=317, offs=25) */ /* local: jacobi_95$0(level=0) global: exp_3$0(level=0), sqrt_int_46$0(level=0), is_prime_48$0(level=0), div_gt_zero_94$0(level=0), jacobi_95$0(level=0), jacobi_ats$173$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_int) jacobi_ats(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret458, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8164(line=316, offs=11) -- 8208(line=317, offs=25) */ ATSINSflab(__patsflab_jacobi_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8186(line=317, offs=3) -- 8208(line=317, offs=25) */ ATSINSmove(tmpret458, jacobi_95(arg0, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), arg1))) ; ATSfunbody_end() ATSreturn(tmpret458) ; } /* end of [jacobi_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8230(line=319, offs=21) -- 8253(line=320, offs=18) */ /* local: primorial_gmp_92$0(level=0) global: primorial_gmp_92$0(level=0), primorial$174$0(level=0) local: global: */ ATSextern() atstkind_type(atstype_ptrk) _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__primorial(atstkind_t0ype(atstype_ullint) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret459, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8220(line=319, offs=11) -- 8254(line=320, offs=19) */ ATSINSflab(__patsflab_primorial): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 8238(line=320, offs=3) -- 8253(line=320, offs=18) */ ATSINSmove(tmpret459, primorial_gmp_92(arg0)) ; ATSfunbody_end() ATSreturn(tmpret459) ; } /* end of [_057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_sats__primorial] */ /* ** for initialization(dynloading) */ ATSdynloadflag_minit(_057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_dats__dynloadflag) ; ATSextern() atsvoid_t0ype _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_dats__dynload() { ATSfunbody_beg() ATSdynload(/*void*/) ATSdynloadflag_sta( _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_dats__dynloadflag ) ; ATSif( ATSCKiseqz( _057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_dats__dynloadflag ) ) ATSthen() { ATSdynloadset(_057_home_057_vanessa_057_programming_057_haskell_057_done_057_hs_055_ats_057_fast_055_arithmetic_057_ats_055_src_057_number_055_theory_056_dats__dynloadflag) ; /* dynexnlst-initize(beg) */ /* dynexnlst-initize(end) */ /* local */ /* in of [local] */ /* local */ /* in of [local] */ /* end of [local] */ /* local */ /* in of [local] */ /* end of [local] */ /* end of [local] */ } /* ATSendif */ ATSfunbody_end() ATSreturn_void(tmpret_void) ; } /* end of [*_dynload] */ /* ****** ****** */ /* end-of-compilation-unit */