fast-arithmetic-0.6.7.0: cbits/number-theory.c
/*
**
** 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(atscntrb_gmp_mpz_init_set_int)
ATSdyncst_mac(atspre_g1int_add_int)
ATSdyncst_mac(atspre_g1int_sub_int)
ATSdyncst_mac(atscntrb_gmp_mpz_mul2_int)
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(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_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_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()
atsvoid_t0ype
rising_fac_ref_3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atsrefarg1_type(atstkind_type(atstype_ptrk))) ;
#if(0)
#if(0)
ATSextern()
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4(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__4__1(atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_type(atstype_ptrk)
ATSLIB_056_prelude__ptr_alloc__1__2() ;
ATSstatic()
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__2(atstkind_t0ype(atstype_int)) ;
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_int__11(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__mul_intinf0_int__11__1(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_type(atstype_ptrk)
rising_fac_13(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_int)
exp_14(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
#if(0)
#if(0)
ATSextern()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gt_g1int_int__15(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__15__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
#if(0)
#if(0)
ATSextern()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_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__eq_g0int_int__21__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_type(atstype_ptrk)
big_exp_26(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ;
#if(0)
#if(0)
ATSextern()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g1int_int__27(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__27__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__30(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__30__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__32(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__32__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
#if(0)
#if(0)
ATSextern()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gt_g0int_int__36(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__36__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gt_g1int_int__15__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__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__41(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__41__1(atstkind_type(atstype_ptrk)) ;
#if(0)
#if(0)
ATSextern()
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__43(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__43__1(atsrefarg0_type(atstkind_type(atstype_ptrk))) ;
ATSstatic()
atstkind_type(atstype_ptrk)
ATSLIB_056_prelude__ptr_alloc__1__4() ;
#if(0)
#if(0)
ATSextern()
atsvoid_t0ype
ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46(atstkind_type(atstype_ptrk)) ;
#endif // end of [QUALIFIED]
#endif // end of [TEMPLATE]
ATSstatic()
atsvoid_t0ype
ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46__1(atstkind_type(atstype_ptrk)) ;
ATSstatic()
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__43__2(atsrefarg0_type(atstkind_type(atstype_ptrk))) ;
ATSstatic()
atstkind_type(atstype_ptrk)
ATSLIB_056_prelude__ptr_alloc__1__5() ;
#if(0)
#if(0)
ATSextern()
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__50(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__50__1(atstkind_type(atstype_ptrk), atsrefarg0_type(atstkind_type(atstype_ptrk))) ;
ATSstatic()
atsvoid_t0ype
ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46__2(atstkind_type(atstype_ptrk)) ;
ATSstatic()
atsvoid_t0ype
ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46__3(atstkind_type(atstype_ptrk)) ;
ATSstatic()
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__3(atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_type(atstype_ptrk)
ATSLIB_056_prelude__ptr_alloc__1__6() ;
ATSstatic()
atstkind_t0ype(atstype_int)
sqrt_int_56(atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
is_prime_58(atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
loop_59(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__60(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__60__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g1int_int__27__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
is_semiprime_66(atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
loop_67(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__lt_g1int_int__60__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g1int_int__27__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__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__21__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__76(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__76__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__21__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_84(atstype_bool) ;
ATSstatic()
atstype_boxed
__patsfun_85(atstype_bool) ;
ATSstatic()
atstkind_type(atstype_ptrk)
loop_86(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
#if(0)
#if(0)
ATSextern()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gte_g1int_int__87(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__87__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__9(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__neq_g1int_int__76__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstype_boxed
__patsfun_92(atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstype_bool) ;
ATSstatic()
atstype_boxed
__patsfun_93(atstkind_type(atstype_ptrk), atstype_bool) ;
ATSstatic()
atstype_boxed
__patsfun_94(atstype_bool) ;
ATSstatic()
atstype_boxed
__patsfun_95(atstkind_t0ype(atstype_int), atstype_bool) ;
ATSstatic()
atstype_boxed
__patsfun_96(atstype_bool) ;
ATSstatic()
atstype_boxed
__patsfun_97(atstype_bool) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__10(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstype_boxed
__patsfun_99(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstype_bool) ;
ATSstatic()
atstype_boxed
__patsfun_100(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstype_bool) ;
ATSstatic()
atstkind_type(atstype_ptrk)
primorial_gmp_101(atstkind_t0ype(atstype_ullint)) ;
ATSstatic()
atstkind_type(atstype_ptrk)
ATSLIB_056_prelude__ptr_alloc__1__7() ;
ATSstatic()
atstkind_t0ype(atstype_int)
div_gt_zero_103(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_int)
jacobi_104(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_int)
legendre_105(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_int)
exp_mod_prime_106(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gt_g1int_int__15__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__11(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__12(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__13(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_int)
get_multiplicity_113(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_int)
loop_114(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gt_g1int_int__15__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g1int_int__27__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__14(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_int)
jacobi2_118(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gt_g1int_int__15__5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__15(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__16(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__17(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__18(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__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_127(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gte_g1int_int__87__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__20(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__neq_g1int_int__76__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__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_134(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gte_g1int_int__87__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__22(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__neq_g1int_int__76__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__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__21__24(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_int)
rip_141(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
#if(0)
#if(0)
ATSextern()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__neq_g0int_int__142(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__142__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gt_g1int_int__15__6(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__lt_g1int_int__60__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_148(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gte_g1int_int__87__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstype_boxed
__patsfun_150(atstkind_t0ype(atstype_int), atstype_bool) ;
ATSstatic()
atstype_boxed
__patsfun_151(atstype_bool) ;
ATSstatic()
atstype_boxed
__patsfun_152(atstype_bool) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__25(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gt_g1int_int__15__7(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstype_boxed
__patsfun_155(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstype_bool) ;
ATSstatic()
atstype_boxed
__patsfun_156(atstkind_t0ype(atstype_int), atstype_bool) ;
ATSstatic()
atstype_boxed
__patsfun_157(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_159(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gte_g1int_int__87__5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__eq_g0int_int__21__26(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__gt_g1int_int__15__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_164(atstkind_type(atstype_ptrk)) ;
ATSstatic()
atstkind_t0ype(atstype_int)
totient_165(atstkind_t0ype(atstype_int)) ;
ATSstatic()
postiats_tyrec_0
adjust_contents_166(postiats_tyrec_0, atstkind_t0ype(atstype_int)) ;
#if(0)
#if(0)
ATSextern()
atstyvar_type(res)
ATSLIB_056_prelude__stream_vt_foldleft_cloptr__168(atstkind_type(atstype_ptrk), atstyvar_type(res), atstype_cloptr) ;
#endif // end of [QUALIFIED]
#endif // end of [TEMPLATE]
#if(0)
ATSstatic()
atstyvar_type(res)
loop_169__169(atstkind_type(atstype_ptrk), atstyvar_type(res), atstype_cloptr) ;
#endif // end of [TEMPLATE]
ATSstatic()
postiats_tyrec_0
ATSLIB_056_prelude__stream_vt_foldleft_cloptr__168__1(atstkind_type(atstype_ptrk), postiats_tyrec_0, atstype_cloptr) ;
ATSstatic()
postiats_tyrec_0
loop_169__169__1(atstkind_type(atstype_ptrk), postiats_tyrec_0, atstype_cloptr) ;
ATSstatic()
postiats_tyrec_0
__patsfun_172(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_174(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_t0ype(atstype_bool)
ATSLIB_056_prelude__lt_g1int_int__60__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__176(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__176__1(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__4(atstkind_t0ype(atstype_int)) ;
ATSstatic()
atstkind_type(atstype_ptrk)
ATSLIB_056_prelude__ptr_alloc__1__8() ;
#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_84, (), (atstype_bool), atstype_boxed)
typedef
ATSstruct {
atstype_funptr cfun ;
} __patsfun_84__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_84__cfun
(
__patsfun_84__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_84(arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_84__closureinit
(
__patsfun_84__closure_t0ype *p_cenv
)
{
p_cenv->cfun = __patsfun_84__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_84__closurerize
(
// argumentless
)
{
return __patsfun_84__closureinit(ATS_MALLOC(sizeof(__patsfun_84__closure_t0ype))) ;
} /* 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_92, (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_92__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_92__cfun
(
__patsfun_92__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_92(p_cenv->env0, p_cenv->env1, arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_92__closureinit
(
__patsfun_92__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_92__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_92__closurerize
(
atstkind_t0ype(atstype_int) env0, atstkind_type(atstype_ptrk) env1
)
{
return __patsfun_92__closureinit(ATS_MALLOC(sizeof(__patsfun_92__closure_t0ype)), env0, env1) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_93, (atstkind_type(atstype_ptrk)), (atstype_bool), atstype_boxed)
typedef
ATSstruct {
atstype_funptr cfun ;
atstkind_type(atstype_ptrk) env0 ;
} __patsfun_93__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_93__cfun
(
__patsfun_93__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_93(p_cenv->env0, arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_93__closureinit
(
__patsfun_93__closure_t0ype *p_cenv, atstkind_type(atstype_ptrk) env0
)
{
p_cenv->env0 = env0 ;
p_cenv->cfun = __patsfun_93__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_93__closurerize
(
atstkind_type(atstype_ptrk) env0
)
{
return __patsfun_93__closureinit(ATS_MALLOC(sizeof(__patsfun_93__closure_t0ype)), env0) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_94, (), (atstype_bool), atstype_boxed)
typedef
ATSstruct {
atstype_funptr cfun ;
} __patsfun_94__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_94__cfun
(
__patsfun_94__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_94(arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_94__closureinit
(
__patsfun_94__closure_t0ype *p_cenv
)
{
p_cenv->cfun = __patsfun_94__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_94__closurerize
(
// argumentless
)
{
return __patsfun_94__closureinit(ATS_MALLOC(sizeof(__patsfun_94__closure_t0ype))) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_95, (atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed)
typedef
ATSstruct {
atstype_funptr cfun ;
atstkind_t0ype(atstype_int) env0 ;
} __patsfun_95__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_95__cfun
(
__patsfun_95__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_95(p_cenv->env0, arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_95__closureinit
(
__patsfun_95__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0
)
{
p_cenv->env0 = env0 ;
p_cenv->cfun = __patsfun_95__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_95__closurerize
(
atstkind_t0ype(atstype_int) env0
)
{
return __patsfun_95__closureinit(ATS_MALLOC(sizeof(__patsfun_95__closure_t0ype)), env0) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_96, (), (atstype_bool), atstype_boxed)
typedef
ATSstruct {
atstype_funptr cfun ;
} __patsfun_96__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_96__cfun
(
__patsfun_96__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_96(arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_96__closureinit
(
__patsfun_96__closure_t0ype *p_cenv
)
{
p_cenv->cfun = __patsfun_96__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_96__closurerize
(
// argumentless
)
{
return __patsfun_96__closureinit(ATS_MALLOC(sizeof(__patsfun_96__closure_t0ype))) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_97, (), (atstype_bool), atstype_boxed)
typedef
ATSstruct {
atstype_funptr cfun ;
} __patsfun_97__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_97__cfun
(
__patsfun_97__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_97(arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_97__closureinit
(
__patsfun_97__closure_t0ype *p_cenv
)
{
p_cenv->cfun = __patsfun_97__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_97__closurerize
(
// argumentless
)
{
return __patsfun_97__closureinit(ATS_MALLOC(sizeof(__patsfun_97__closure_t0ype))) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_99, (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_99__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_99__cfun
(
__patsfun_99__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_99(p_cenv->env0, p_cenv->env1, p_cenv->env2, arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_99__closureinit
(
__patsfun_99__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_99__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_99__closurerize
(
atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2
)
{
return __patsfun_99__closureinit(ATS_MALLOC(sizeof(__patsfun_99__closure_t0ype)), env0, env1, env2) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_100, (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_100__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_100__cfun
(
__patsfun_100__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_100(p_cenv->env0, p_cenv->env1, p_cenv->env2, arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_100__closureinit
(
__patsfun_100__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_100__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_100__closurerize
(
atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2
)
{
return __patsfun_100__closureinit(ATS_MALLOC(sizeof(__patsfun_100__closure_t0ype)), env0, env1, env2) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_150, (atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed)
typedef
ATSstruct {
atstype_funptr cfun ;
atstkind_t0ype(atstype_int) env0 ;
} __patsfun_150__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_150__cfun
(
__patsfun_150__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_150(p_cenv->env0, arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_150__closureinit
(
__patsfun_150__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0
)
{
p_cenv->env0 = env0 ;
p_cenv->cfun = __patsfun_150__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_150__closurerize
(
atstkind_t0ype(atstype_int) env0
)
{
return __patsfun_150__closureinit(ATS_MALLOC(sizeof(__patsfun_150__closure_t0ype)), env0) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_151, (), (atstype_bool), atstype_boxed)
typedef
ATSstruct {
atstype_funptr cfun ;
} __patsfun_151__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_151__cfun
(
__patsfun_151__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_151(arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_151__closureinit
(
__patsfun_151__closure_t0ype *p_cenv
)
{
p_cenv->cfun = __patsfun_151__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_151__closurerize
(
// argumentless
)
{
return __patsfun_151__closureinit(ATS_MALLOC(sizeof(__patsfun_151__closure_t0ype))) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_152, (), (atstype_bool), atstype_boxed)
typedef
ATSstruct {
atstype_funptr cfun ;
} __patsfun_152__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_152__cfun
(
__patsfun_152__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_152(arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_152__closureinit
(
__patsfun_152__closure_t0ype *p_cenv
)
{
p_cenv->cfun = __patsfun_152__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_152__closurerize
(
// argumentless
)
{
return __patsfun_152__closureinit(ATS_MALLOC(sizeof(__patsfun_152__closure_t0ype))) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_155, (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_155__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_155__cfun
(
__patsfun_155__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_155(p_cenv->env0, p_cenv->env1, arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_155__closureinit
(
__patsfun_155__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_155__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_155__closurerize
(
atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1
)
{
return __patsfun_155__closureinit(ATS_MALLOC(sizeof(__patsfun_155__closure_t0ype)), env0, env1) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_156, (atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed)
typedef
ATSstruct {
atstype_funptr cfun ;
atstkind_t0ype(atstype_int) env0 ;
} __patsfun_156__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_156__cfun
(
__patsfun_156__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_156(p_cenv->env0, arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_156__closureinit
(
__patsfun_156__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0
)
{
p_cenv->env0 = env0 ;
p_cenv->cfun = __patsfun_156__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_156__closurerize
(
atstkind_t0ype(atstype_int) env0
)
{
return __patsfun_156__closureinit(ATS_MALLOC(sizeof(__patsfun_156__closure_t0ype)), env0) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_157, (), (atstype_bool), atstype_boxed)
typedef
ATSstruct {
atstype_funptr cfun ;
} __patsfun_157__closure_t0ype ;
ATSstatic()
atstype_boxed
__patsfun_157__cfun
(
__patsfun_157__closure_t0ype *p_cenv, atstype_bool arg0
)
{
ATSFCreturn(__patsfun_157(arg0)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_157__closureinit
(
__patsfun_157__closure_t0ype *p_cenv
)
{
p_cenv->cfun = __patsfun_157__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_157__closurerize
(
// argumentless
)
{
return __patsfun_157__closureinit(ATS_MALLOC(sizeof(__patsfun_157__closure_t0ype))) ;
} /* end of [closurerize] */
ATSclosurerize_end()
ATSclosurerize_beg(__patsfun_172, (), (postiats_tyrec_0, atsrefarg1_type(atstkind_t0ype(atstype_int))), postiats_tyrec_0)
typedef
ATSstruct {
atstype_funptr cfun ;
} __patsfun_172__closure_t0ype ;
ATSstatic()
postiats_tyrec_0
__patsfun_172__cfun
(
__patsfun_172__closure_t0ype *p_cenv, postiats_tyrec_0 arg0, atsrefarg1_type(atstkind_t0ype(atstype_int)) arg1
)
{
ATSFCreturn(__patsfun_172(arg0, arg1)) ;
} /* end of [cfun] */
ATSstatic()
atstype_cloptr
__patsfun_172__closureinit
(
__patsfun_172__closure_t0ype *p_cenv
)
{
p_cenv->cfun = __patsfun_172__cfun ;
return p_cenv ;
} /* end of [closureinit] */
ATSstatic()
atstype_cloptr
__patsfun_172__closurerize
(
// argumentless
)
{
return __patsfun_172__closureinit(ATS_MALLOC(sizeof(__patsfun_172__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: 620(line=22, offs=5) -- 902(line=30, offs=8)
*/
/*
local: rising_fac_ref_3$0(level=0)
global: rising_fac_ref_3$0(level=0)
local:
global:
*/
ATSstatic()
atsvoid_t0ype
rising_fac_ref_3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1, atsrefarg1_type(atstkind_type(atstype_ptrk)) arg2)
{
/* tmpvardeclst(beg) */
// ATStmpdec_void(tmpret6) ;
ATStmpdec(tmp7, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp15, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp20) ;
ATStmpdec(tmp21, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp22, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp23, atstkind_type(atstype_ptrk)) ;
/* tmpvardeclst(end) */
ATSfunbody_beg()
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 620(line=22, offs=5) -- 902(line=30, offs=8)
*/
ATSINSflab(__patsflab_rising_fac_ref_3):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 711(line=23, offs=3) -- 902(line=30, offs=8)
*/
ATScaseof_beg()
/*
** ibranchlst-beg
*/
ATSbranch_beg()
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 728(line=24, offs=7) -- 729(line=24, offs=8)
*/
ATSINSlab(__atstmplab0):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 662(line=22, offs=47) -- 663(line=22, offs=48)
*/
ATSifnthen(ATSCKpat_int(arg1, ATSPMVint(0))) { ATSINSgoto(__atstmplab2) ; } ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 729(line=24, offs=8) -- 729(line=24, 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: 740(line=24, offs=19) -- 753(line=24, offs=32)
*/
ATSINSmove(tmp7, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__1(ATSPMVi0nt(1))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 733(line=24, offs=12) -- 753(line=24, offs=32)
*/
ATSINSstore(ATSderef(arg2, atstkind_type(atstype_ptrk)), tmp7) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 733(line=24, offs=12) -- 753(line=24, offs=32)
*/
ATSINSmove_void(tmpret6, ATSPMVempty()) ;
ATSbranch_end()
ATSbranch_beg()
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 760(line=25, offs=7) -- 761(line=25, offs=8)
*/
ATSINSlab(__atstmplab2):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 662(line=22, offs=47) -- 663(line=22, offs=48)
*/
ATSifnthen(ATSCKpat_int(arg1, ATSPMVint(1))) { ATSINSgoto(__atstmplab4) ; } ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 761(line=25, offs=8) -- 761(line=25, offs=8)
*/
ATSINSlab(__atstmplab3):
/*
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: 772(line=25, offs=19) -- 784(line=25, offs=31)
*/
ATSINSmove(tmp15, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__2(arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 765(line=25, offs=12) -- 784(line=25, offs=31)
*/
ATSINSstore(ATSderef(arg2, atstkind_type(atstype_ptrk)), tmp15) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 765(line=25, offs=12) -- 784(line=25, offs=31)
*/
ATSINSmove_void(tmpret6, ATSPMVempty()) ;
ATSbranch_end()
ATSbranch_beg()
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 793(line=26, offs=8) -- 793(line=26, 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: 798(line=26, offs=13) -- 902(line=30, offs=8)
*/
/*
letpush(beg)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 832(line=27, offs=31) -- 837(line=27, offs=36)
*/
ATSINSmove(tmp21, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 839(line=27, offs=38) -- 844(line=27, offs=43)
*/
ATSINSmove(tmp22, atspre_g1int_sub_int(arg1, ATSPMVi0nt(1))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 817(line=27, offs=16) -- 850(line=27, offs=49)
*/
ATSINSmove_void(tmp20, rising_fac_ref_3(tmp21, tmp22, ATSPMVrefarg1(arg2))) ;
/*
letpush(end)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 871(line=29, offs=14) -- 894(line=29, offs=37)
*/
ATSINSmove(tmp23, ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__11__1(ATSderef(arg2, atstkind_type(atstype_ptrk)), arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 864(line=29, offs=7) -- 894(line=29, offs=37)
*/
ATSINSstore(ATSderef(arg2, atstkind_type(atstype_ptrk)), tmp23) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 864(line=29, offs=7) -- 894(line=29, offs=37)
*/
ATSINSmove_void(tmpret6, ATSPMVempty()) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 798(line=26, offs=13) -- 902(line=30, offs=8)
*/
/*
INSletpop()
*/
ATSbranch_end()
/*
** ibranchlst-end
*/
ATScaseof_end()
ATSfunbody_end()
ATSreturn_void(tmpret6) ;
} /* end of [rising_fac_ref_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$4$0(level=0)
local:
global:
*/
ATSextern()
/*
imparg =
tmparg =
tmpsub = None()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret8, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp9, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp10) ;
/* 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(tmp9, PMVtmpltcst(ptr_alloc<S2Ecst(mpz_vt0ype)>)()) ;
/*
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(tmp10, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp9, 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(tmpret8, tmp9) ;
/*
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(tmpret8) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4] */
#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$4$1(level=1)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__1(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret8__1, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp9__1, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp10__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(tmp9__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: 2264(line=78, offs=10) -- 2296(line=78, offs=42)
*/
ATSINSmove_void(tmp10__1, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp9__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(tmpret8__1, tmp9__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(tmpret8__1) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__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=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__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] */
/*
/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$4$2(level=1)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__2(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret8__2, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp9__2, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp10__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(tmp9__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: 2264(line=78, offs=10) -- 2296(line=78, offs=42)
*/
ATSINSmove_void(tmp10__2, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp9__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(tmpret8__2, tmp9__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(tmpret8__2) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__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: 7394(line=413, offs=3) -- 7461(line=418, offs=2)
*/
/*
local:
global: mul_intinf0_int$11$0(level=0)
local:
global:
*/
ATSextern()
/*
imparg =
tmparg =
tmpsub = None()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__11(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret24, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp25) ;
/* 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: 7376(line=412, offs=1) -- 7461(line=418, offs=2)
*/
ATSINSflab(__patsflab_mul_intinf0_int):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, 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: 7427(line=416, offs=10) -- 7456(line=416, offs=39)
*/
ATSINSmove_void(tmp25, atscntrb_gmp_mpz_mul2_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: 7404(line=413, offs=13) -- 7405(line=413, offs=14)
*/
ATSINSmove(tmpret24, arg0) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2)
*/
/*
INSletpop()
*/
ATSfunbody_end()
ATSreturn(tmpret24) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__11] */
#endif // end of [TEMPLATE]
/*
/home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7394(line=413, offs=3) -- 7461(line=418, offs=2)
*/
/*
local:
global: mul_intinf0_int$11$1(level=1)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__11__1(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret24__1, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp25__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: 7376(line=412, offs=1) -- 7461(line=418, offs=2)
*/
ATSINSflab(__patsflab_mul_intinf0_int):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, 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: 7427(line=416, offs=10) -- 7456(line=416, offs=39)
*/
ATSINSmove_void(tmp25__1, atscntrb_gmp_mpz_mul2_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: 7404(line=413, offs=13) -- 7405(line=413, offs=14)
*/
ATSINSmove(tmpret24__1, arg0) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7403(line=413, offs=12) -- 7461(line=418, offs=2)
*/
/*
INSletpop()
*/
ATSfunbody_end()
ATSreturn(tmpret24__1) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_int__11__1] */
/*
/home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 907(line=32, offs=4) -- 1057(line=38, offs=6)
*/
/*
local: rising_fac_ref_3$0(level=0)
global: rising_fac_ref_3$0(level=0), rising_fac_13$0(level=0)
local:
global:
*/
ATSstatic()
atstkind_type(atstype_ptrk)
rising_fac_13(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret28, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmpref29, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp30) ;
/* tmpvardeclst(end) */
ATSfunbody_beg()
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 907(line=32, offs=4) -- 1057(line=38, offs=6)
*/
ATSINSflab(__patsflab_rising_fac_13):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 970(line=33, offs=3) -- 1057(line=38, offs=6)
*/
/*
letpush(beg)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 982(line=34, offs=9) -- 985(line=34, offs=12)
*/
/*
ATSINStmpdec(tmpref29) ;
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1013(line=35, offs=14) -- 1038(line=35, offs=39)
*/
ATSINSmove_void(tmp30, rising_fac_ref_3(arg0, arg1, ATSPMVrefarg1(ATSPMVptrof(tmpref29)))) ;
/*
letpush(end)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1048(line=37, offs=5) -- 1051(line=37, offs=8)
*/
ATSINSmove(tmpret28, tmpref29) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 970(line=33, offs=3) -- 1057(line=38, offs=6)
*/
/*
INSletpop()
*/
ATSfunbody_end()
ATSreturn(tmpret28) ;
} /* end of [rising_fac_13] */
/*
/home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1234(line=43, offs=5) -- 1673(line=64, offs=10)
*/
/*
local: exp_14$0(level=0)
global: exp_14$0(level=0)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
exp_14(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(tmpret31, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp32, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmpref37, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref38, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp39, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp44, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref45, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp46, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp47, 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: 1234(line=43, offs=5) -- 1673(line=64, offs=10)
*/
ATSINSflab(__patsflab_exp_14):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1284(line=44, offs=3) -- 1673(line=64, 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: 1301(line=45, offs=7) -- 1302(line=45, offs=8)
*/
ATSINSlab(__atstmplab5):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1253(line=43, offs=24) -- 1254(line=43, offs=25)
*/
ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab7) ; } ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1302(line=45, offs=8) -- 1302(line=45, offs=8)
*/
ATSINSlab(__atstmplab6):
/*
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: 1306(line=45, offs=12) -- 1307(line=45, offs=13)
*/
ATSINSmove(tmpret31, ATSPMVi0nt(0)) ;
ATSbranch_end()
ATSbranch_beg()
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1315(line=46, offs=8) -- 1315(line=46, 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: 1344(line=48, offs=12) -- 1349(line=48, offs=17)
*/
ATSINSmove(tmp32, ATSLIB_056_prelude__gt_g1int_int__15__1(arg1, ATSPMVi0nt(0))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1341(line=48, offs=9) -- 1663(line=63, offs=12)
*/
ATSif(
tmp32
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1365(line=49, offs=11) -- 1638(line=61, offs=14)
*/
/*
letpush(beg)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1385(line=50, offs=17) -- 1387(line=50, offs=19)
*/
/*
ATSINStmpdec(tmpref37) ;
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1390(line=50, offs=22) -- 1396(line=50, offs=28)
*/
ATSINSmove(tmpref37, atspre_g1int_half_int(arg1)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1414(line=51, offs=17) -- 1416(line=51, offs=19)
*/
/*
ATSINStmpdec(tmpref38) ;
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1419(line=51, offs=22) -- 1424(line=51, offs=27)
*/
ATSINSmove(tmpref38, 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: 1453(line=53, offs=16) -- 1459(line=53, offs=22)
*/
ATSINSmove(tmp39, ATSLIB_056_prelude__eq_g0int_int__21__1(tmpref38, ATSPMVi0nt(0))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1450(line=53, offs=13) -- 1624(line=60, offs=18)
*/
ATSif(
tmp39
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1483(line=54, offs=19) -- 1488(line=54, offs=24)
*/
ATSINSmove(tmp44, atspre_g0int_mul_int(arg0, arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1479(line=54, offs=15) -- 1493(line=54, offs=29)
*/
ATStailcal_beg()
ATSINSmove_tlcal(apy0, tmp44) ;
ATSINSmove_tlcal(apy1, tmpref37) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSfgoto(__patsflab_exp_14) ;
ATStailcal_end()
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1525(line=56, offs=15) -- 1624(line=60, offs=18)
*/
/*
letpush(beg)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1549(line=57, offs=21) -- 1550(line=57, offs=22)
*/
/*
ATSINStmpdec(tmpref45) ;
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1561(line=57, offs=33) -- 1566(line=57, offs=38)
*/
ATSINSmove(tmp47, atspre_g0int_mul_int(arg0, arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1557(line=57, offs=29) -- 1571(line=57, offs=43)
*/
ATSINSmove(tmp46, exp_14(tmp47, tmpref37)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1553(line=57, offs=25) -- 1571(line=57, offs=43)
*/
ATSINSmove(tmpref45, atspre_g0int_mul_int(arg0, tmp46)) ;
/*
letpush(end)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1605(line=59, offs=17) -- 1606(line=59, offs=18)
*/
ATSINSmove(tmpret31, tmpref45) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1525(line=56, offs=15) -- 1624(line=60, offs=18)
*/
/*
INSletpop()
*/
} /* ATSendif */
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1365(line=49, offs=11) -- 1638(line=61, offs=14)
*/
/*
INSletpop()
*/
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1662(line=63, offs=11) -- 1663(line=63, offs=12)
*/
ATSINSmove(tmpret31, ATSPMVi0nt(1)) ;
} /* ATSendif */
ATSbranch_end()
/*
** ibranchlst-end
*/
ATScaseof_end()
ATSfunbody_end()
ATSreturn(tmpret31) ;
} /* end of [exp_14] */
#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$15$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__15(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret33, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp34, 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(tmp34, PMVtmpltcst(g1int2int<S2Eextkind(atstype_int), S2Evar(tk(4643))>)(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(tmpret33, PMVtmpltcst(g1int_gt<S2Evar(tk(4643))>)(arg0, tmp34)) ;
ATSfunbody_end()
ATSreturn(tmpret33) ;
} /* end of [ATSLIB_056_prelude__gt_g1int_int__15] */
#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$15$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__15__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret33__1, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp34__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(tmp34__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(tmpret33__1, atspre_g1int_gt_int(arg0, tmp34__1)) ;
ATSfunbody_end()
ATSreturn(tmpret33__1) ;
} /* end of [ATSLIB_056_prelude__gt_g1int_int__15__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$21$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__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): 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(tmp41, PMVtmpltcst(g0int2int<S2Eextkind(atstype_int), S2Evar(tk(4634))>)(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(tmpret40, PMVtmpltcst(g0int_eq<S2Evar(tk(4634))>)(arg0, tmp41)) ;
ATSfunbody_end()
ATSreturn(tmpret40) ;
} /* end of [ATSLIB_056_prelude__eq_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: 12259(line=635, offs=3) -- 12298(line=635, offs=42)
*/
/*
local:
global: eq_g0int_int$21$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__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): 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(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): 12268(line=635, offs=12) -- 12298(line=635, offs=42)
*/
ATSINSmove(tmpret40__1, atspre_g0int_eq_int(arg0, tmp41__1)) ;
ATSfunbody_end()
ATSreturn(tmpret40__1) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__1] */
/*
/home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1711(line=67, offs=5) -- 2319(line=93, offs=39)
*/
/*
local: big_exp_26$0(level=0)
global: big_exp_26$0(level=0)
local:
global:
*/
ATSstatic()
atstkind_type(atstype_ptrk)
big_exp_26(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(tmpret48, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp49, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp54, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp73, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmpref76, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref77, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp78, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmpref81, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmpref101, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmpref107, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmpref108, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp113) ;
// ATStmpdec_void(tmp116) ;
/* tmpvardeclst(end) */
ATSfunbody_beg()
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1711(line=67, offs=5) -- 2319(line=93, offs=39)
*/
ATSINSflab(__patsflab_big_exp_26):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1774(line=68, offs=6) -- 1798(line=68, offs=30)
*/
ATSINSmove(tmp54, ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__30__1(ATSPMVrefarg0(arg0), ATSPMVi0nt(0))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1774(line=68, offs=6) -- 1802(line=68, offs=34)
*/
ATSINSmove(tmp49, ATSLIB_056_prelude__eq_g1int_int__27__1(tmp54, ATSPMVi0nt(0))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1771(line=68, offs=3) -- 2319(line=93, offs=39)
*/
ATSif(
tmp49
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1812(line=69, offs=5) -- 1813(line=69, offs=6)
*/
ATSINSmove(tmpret48, arg0) ;
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1828(line=71, offs=8) -- 1833(line=71, offs=13)
*/
ATSINSmove(tmp73, ATSLIB_056_prelude__gt_g1int_int__15__2(arg1, ATSPMVi0nt(0))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1825(line=71, offs=5) -- 2319(line=93, offs=39)
*/
ATSif(
tmp73
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1845(line=72, offs=7) -- 2271(line=91, offs=10)
*/
/*
letpush(beg)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1861(line=73, offs=13) -- 1863(line=73, offs=15)
*/
/*
ATSINStmpdec(tmpref76) ;
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1866(line=73, offs=18) -- 1872(line=73, offs=24)
*/
ATSINSmove(tmpref76, atspre_g1int_half_int(arg1)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1886(line=74, offs=13) -- 1888(line=74, offs=15)
*/
/*
ATSINStmpdec(tmpref77) ;
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1891(line=74, offs=18) -- 1896(line=74, offs=23)
*/
ATSINSmove(tmpref77, 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: 1917(line=76, offs=12) -- 1923(line=76, offs=18)
*/
ATSINSmove(tmp78, ATSLIB_056_prelude__eq_g0int_int__21__2(tmpref77, ATSPMVi0nt(0))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1914(line=76, offs=9) -- 2261(line=90, offs=14)
*/
ATSif(
tmp78
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1939(line=77, offs=11) -- 2034(line=81, offs=14)
*/
/*
letpush(beg)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1959(line=78, offs=17) -- 1960(line=78, offs=18)
*/
/*
ATSINStmpdec(tmpref81) ;
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1963(line=78, offs=21) -- 1979(line=78, offs=37)
*/
ATSINSmove(tmpref81, ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__41__1(arg0)) ;
/*
letpush(end)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2006(line=80, offs=13) -- 2020(line=80, offs=27)
*/
ATStailcal_beg()
ATSINSmove_tlcal(apy0, tmpref81) ;
ATSINSmove_tlcal(apy1, tmpref76) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSfgoto(__patsflab_big_exp_26) ;
ATStailcal_end()
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1939(line=77, offs=11) -- 2034(line=81, offs=14)
*/
/*
INSletpop()
*/
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2058(line=83, offs=11) -- 2261(line=90, offs=14)
*/
/*
letpush(beg)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2078(line=84, offs=17) -- 2080(line=84, offs=19)
*/
/*
ATSINStmpdec(tmpref101) ;
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2083(line=84, offs=22) -- 2099(line=84, offs=38)
*/
ATSINSmove(tmpref101, ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__43__2(ATSPMVrefarg0(arg0))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2117(line=85, offs=17) -- 2119(line=85, offs=19)
*/
/*
ATSINStmpdec(tmpref107) ;
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2122(line=85, offs=22) -- 2137(line=85, offs=37)
*/
ATSINSmove(tmpref107, big_exp_26(tmpref101, tmpref76)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2154(line=86, offs=17) -- 2155(line=86, offs=18)
*/
/*
ATSINStmpdec(tmpref108) ;
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2158(line=86, offs=21) -- 2184(line=86, offs=47)
*/
ATSINSmove(tmpref108, ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__50__1(tmpref107, ATSPMVrefarg0(arg0))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2206(line=87, offs=22) -- 2219(line=87, offs=35)
*/
ATSINSmove_void(tmp113, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46__2(arg0)) ;
/*
letpush(end)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2246(line=89, offs=13) -- 2247(line=89, offs=14)
*/
ATSINSmove(tmpret48, tmpref108) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2058(line=83, offs=11) -- 2261(line=90, offs=14)
*/
/*
INSletpop()
*/
} /* ATSendif */
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1845(line=72, offs=7) -- 2271(line=91, offs=10)
*/
/*
INSletpop()
*/
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2288(line=93, offs=8) -- 2301(line=93, offs=21)
*/
ATSINSmove_void(tmp116, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46__3(arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2305(line=93, offs=25) -- 2318(line=93, offs=38)
*/
ATSINSmove(tmpret48, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__3(ATSPMVi0nt(1))) ;
} /* ATSendif */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret48) ;
} /* end of [big_exp_26] */
#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$27$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__27(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret50, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp51, 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(tmp51, PMVtmpltcst(g1int2int<S2Eextkind(atstype_int), S2Evar(tk(4649))>)(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(tmpret50, PMVtmpltcst(g1int_eq<S2Evar(tk(4649))>)(arg0, tmp51)) ;
ATSfunbody_end()
ATSreturn(tmpret50) ;
} /* end of [ATSLIB_056_prelude__eq_g1int_int__27] */
#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$27$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__27__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret50__1, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp51__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(tmp51__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(tmpret50__1, atspre_g1int_eq_int(arg0, tmp51__1)) ;
ATSfunbody_end()
ATSreturn(tmpret50__1) ;
} /* end of [ATSLIB_056_prelude__eq_g1int_int__27__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$30$0(level=0)
local:
global:
*/
ATSextern()
/*
imparg =
tmparg =
tmpsub = None()
*/
atstkind_t0ype(atstype_int)
ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__30(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret55, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp56, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp57, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp58, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp59, 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(tmp56, 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(tmp58, PMVtmpltcst(lt_g0int_int<S2Eextkind(atstype_int)>)(tmp56, 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(
tmp58
) 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(tmp57, PMVtmpltcst(g1int_neg<S2Eextkind(atstype_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(tmp59, PMVtmpltcst(gt_g0int_int<S2Eextkind(atstype_int)>)(tmp56, 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(
tmp59
) 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(tmp57, 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(tmp57, 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(tmpret55, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp57)) ;
/*
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(tmpret55) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__30] */
#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$30$1(level=1)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atstkind_t0ype(atstype_int)
ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__30__1(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret55__1, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp56__1, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp57__1, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp58__1, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp59__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(tmp56__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(tmp58__1, ATSLIB_056_prelude__lt_g0int_int__32__1(tmp56__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(
tmp58__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(tmp57__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(tmp59__1, ATSLIB_056_prelude__gt_g0int_int__36__1(tmp56__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(
tmp59__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(tmp57__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(tmp57__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(tmpret55__1, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp57__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(tmpret55__1) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__30__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$32$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__32(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret65, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp66, 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(tmp66, PMVtmpltcst(g0int2int<S2Eextkind(atstype_int), S2Evar(tk(4630))>)(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(tmpret65, PMVtmpltcst(g0int_lt<S2Evar(tk(4630))>)(arg0, tmp66)) ;
ATSfunbody_end()
ATSreturn(tmpret65) ;
} /* end of [ATSLIB_056_prelude__lt_g0int_int__32] */
#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$32$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__32__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret65__1, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp66__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(tmp66__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(tmpret65__1, atspre_g0int_lt_int(arg0, tmp66__1)) ;
ATSfunbody_end()
ATSreturn(tmpret65__1) ;
} /* end of [ATSLIB_056_prelude__lt_g0int_int__32__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$36$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__36(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret69, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp70, 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(tmp70, PMVtmpltcst(g0int2int<S2Eextkind(atstype_int), S2Evar(tk(4632))>)(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(tmpret69, PMVtmpltcst(g0int_gt<S2Evar(tk(4632))>)(arg0, tmp70)) ;
ATSfunbody_end()
ATSreturn(tmpret69) ;
} /* end of [ATSLIB_056_prelude__gt_g0int_int__36] */
#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$36$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__36__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret69__1, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp70__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(tmp70__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(tmpret69__1, atspre_g0int_gt_int(arg0, tmp70__1)) ;
ATSfunbody_end()
ATSreturn(tmpret69__1) ;
} /* end of [ATSLIB_056_prelude__gt_g0int_int__36__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$15$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__15__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret33__2, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp34__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(tmp34__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(tmpret33__2, atspre_g1int_gt_int(arg0, tmp34__2)) ;
ATSfunbody_end()
ATSreturn(tmpret33__2) ;
} /* end of [ATSLIB_056_prelude__gt_g1int_int__15__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$21$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__21__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__2, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__2, atspre_g0int_eq_int(arg0, tmp41__2)) ;
ATSfunbody_end()
ATSreturn(tmpret40__2) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$41$0(level=0)
local:
global:
*/
ATSextern()
/*
imparg =
tmparg =
tmpsub = None()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__41(atstkind_type(atstype_ptrk) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret82, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp83, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp84) ;
/* 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(tmp83, 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(tmp84, 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(tmpret82, tmp83) ;
/*
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(tmpret82) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__41] */
#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$41$1(level=1)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__41__1(atstkind_type(atstype_ptrk) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret82__1, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp83__1, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp84__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(tmp83__1, ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__43__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(tmp84__1, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46__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(tmpret82__1, tmp83__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(tmpret82__1) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__41__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$43$0(level=0)
local:
global:
*/
ATSextern()
/*
imparg =
tmparg =
tmpsub = None()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__43(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret88, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp89, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp90) ;
// ATStmpdec_void(tmp91) ;
/* 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(tmp89, PMVtmpltcst(ptr_alloc<S2Ecst(mpz_vt0ype)>)()) ;
/*
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(tmp90, atscntrb_gmp_mpz_init_set_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp89, 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(tmp91, atscntrb_gmp_mpz_mul2_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp89, 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(tmpret88, tmp89) ;
/*
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(tmpret88) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__43] */
#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$43$1(level=2)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__43__1(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret88__1, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp89__1, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp90__1) ;
// ATStmpdec_void(tmp91__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(tmp89__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: 4812(line=252, offs=3) -- 4849(line=252, offs=40)
*/
ATSINSmove_void(tmp90__1, atscntrb_gmp_mpz_init_set_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp89__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(tmp91__1, atscntrb_gmp_mpz_mul2_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp89__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(tmpret88__1, tmp89__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(tmpret88__1) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__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=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__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] */
#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$46$0(level=0)
local:
global:
*/
ATSextern()
/*
imparg =
tmparg =
tmpsub = None()
*/
atsvoid_t0ype
ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46(atstkind_type(atstype_ptrk) arg0)
{
/* tmpvardeclst(beg) */
// ATStmpdec_void(tmpret97) ;
// ATStmpdec_void(tmp98) ;
/* 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(tmp98, 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(tmpret97, 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(tmpret97) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46] */
#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$46$1(level=2)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atsvoid_t0ype
ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46__1(atstkind_type(atstype_ptrk) arg0)
{
/* tmpvardeclst(beg) */
// ATStmpdec_void(tmpret97__1) ;
// ATStmpdec_void(tmp98__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(tmp98__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(tmpret97__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(tmpret97__1) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46__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$43$2(level=1)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__43__2(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret88__2, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp89__2, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp90__2) ;
// ATStmpdec_void(tmp91__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(tmp89__2, ATSLIB_056_prelude__ptr_alloc__1__5()) ;
/*
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(tmp90__2, atscntrb_gmp_mpz_init_set_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp89__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(tmp91__2, atscntrb_gmp_mpz_mul2_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp89__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(tmpret88__2, tmp89__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(tmpret88__2) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__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$5(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__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] */
#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$50$0(level=0)
local:
global:
*/
ATSextern()
/*
imparg =
tmparg =
tmpsub = None()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__50(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret109, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp110) ;
/* 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(tmp110, 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(tmpret109, 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(tmpret109) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__50] */
#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$50$1(level=1)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__50__1(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret109__1, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp110__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(tmp110__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(tmpret109__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(tmpret109__1) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__50__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$46$2(level=1)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atsvoid_t0ype
ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46__2(atstkind_type(atstype_ptrk) arg0)
{
/* tmpvardeclst(beg) */
// ATStmpdec_void(tmpret97__2) ;
// ATStmpdec_void(tmp98__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(tmp98__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(tmpret97__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(tmpret97__2) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46__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$46$3(level=1)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atsvoid_t0ype
ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46__3(atstkind_type(atstype_ptrk) arg0)
{
/* tmpvardeclst(beg) */
// ATStmpdec_void(tmpret97__3) ;
// ATStmpdec_void(tmp98__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(tmp98__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(tmpret97__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(tmpret97__3) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__46__3] */
/*
/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$4$3(level=1)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__3(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret8__3, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp9__3, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp10__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: 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(tmp9__3, 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(tmp10__3, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp9__3, 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(tmpret8__3, tmp9__3) ;
/*
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(tmpret8__3) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__3] */
/*
/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=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__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/numerics-internal.dats: 2365(line=96, offs=4) -- 2512(line=101, offs=6)
*/
/*
local:
global: sqrt_int_56$0(level=0)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
sqrt_int_56(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret123, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref124, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp125, atstkind_t0ype(atstype_double)) ;
ATStmpdec(tmp126, 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: 2365(line=96, offs=4) -- 2512(line=101, offs=6)
*/
ATSINSflab(__patsflab_sqrt_int_56):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2411(line=97, offs=3) -- 2512(line=101, offs=6)
*/
/*
letpush(beg)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2423(line=98, offs=9) -- 2428(line=98, offs=14)
*/
/*
ATSINStmpdec(tmpref124) ;
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2455(line=98, offs=41) -- 2479(line=98, offs=65)
*/
ATSINSmove(tmp126, atspre_g0int2float_int_double(arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2443(line=98, offs=29) -- 2481(line=98, offs=67)
*/
ATSINSmove(tmp125, atslib_libats_libc_sqrt_double(tmp126)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2431(line=98, offs=17) -- 2482(line=98, offs=68)
*/
ATSINSmove(tmpref124, atspre_g0float2int_double_int(tmp125)) ;
/*
letpush(end)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2492(line=100, offs=5) -- 2505(line=100, offs=18)
*/
ATSINSmove(tmpret123, ATSPMVcastfn(witness, atstkind_t0ype(atstype_int), tmpref124)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2411(line=97, offs=3) -- 2512(line=101, offs=6)
*/
/*
INSletpop()
*/
ATSfunbody_end()
ATSreturn(tmpret123) ;
} /* end of [sqrt_int_56] */
/*
/home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2548(line=104, offs=4) -- 3129(line=127, offs=10)
*/
/*
local: sqrt_int_56$0(level=0)
global: sqrt_int_56$0(level=0), is_prime_58$0(level=0)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_bool)
is_prime_58(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret127, 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: 2548(line=104, offs=4) -- 3129(line=127, offs=10)
*/
ATSINSflab(__patsflab_is_prime_58):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2584(line=105, offs=3) -- 3129(line=127, 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: 2601(line=106, offs=7) -- 2602(line=106, offs=8)
*/
ATSINSlab(__atstmplab8):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2557(line=104, offs=13) -- 2558(line=104, offs=14)
*/
ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab10) ; } ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2602(line=106, offs=8) -- 2602(line=106, offs=8)
*/
ATSINSlab(__atstmplab9):
/*
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: 2606(line=106, offs=12) -- 2611(line=106, offs=17)
*/
ATSINSmove(tmpret127, ATSPMVbool_false()) ;
ATSbranch_end()
ATSbranch_beg()
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2619(line=107, offs=8) -- 2619(line=107, 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/numerics-internal.dats: 2644(line=109, offs=9) -- 3119(line=126, offs=12)
*/
/*
letpush(beg)
*/
/*
letpush(end)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3095(line=125, offs=19) -- 3105(line=125, offs=29)
*/
ATSINSmove(tmp146, sqrt_int_56(arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3087(line=125, offs=11) -- 3107(line=125, offs=31)
*/
ATSINSmove(tmpret127, loop_59(arg0, ATSPMVi0nt(2), tmp146)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2644(line=109, offs=9) -- 3119(line=126, offs=12)
*/
/*
INSletpop()
*/
ATSbranch_end()
/*
** ibranchlst-end
*/
ATScaseof_end()
ATSfunbody_end()
ATSreturn(tmpret127) ;
} /* end of [is_prime_58] */
/*
/home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2662(line=110, offs=15) -- 3065(line=123, offs=21)
*/
/*
local: loop_59$0(level=1)
global: loop_59$0(level=1)
local: k$5131(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
global: k$5131(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
*/
ATSstatic()
atstkind_t0ype(atstype_bool)
loop_59(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(tmpret128, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp129, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp134, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp137, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp138, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp139, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp142, 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: 2662(line=110, offs=15) -- 3065(line=123, offs=21)
*/
ATSINSflab(__patsflab_loop_59):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2752(line=111, offs=16) -- 2761(line=111, offs=25)
*/
ATSINSmove(tmp129, ATSLIB_056_prelude__lt_g1int_int__60__1(arg0, arg1)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2749(line=111, offs=13) -- 3065(line=123, offs=21)
*/
ATSif(
tmp129
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2784(line=112, offs=18) -- 2789(line=112, offs=23)
*/
ATSINSmove(tmp137, atspre_g0int_mod_int(env0, arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2784(line=112, offs=18) -- 2793(line=112, offs=27)
*/
ATSINSmove(tmp134, ATSLIB_056_prelude__eq_g0int_int__21__3(tmp137, ATSPMVi0nt(0))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2781(line=112, offs=15) -- 2874(line=115, offs=35)
*/
ATSif(
tmp134
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2815(line=113, offs=17) -- 2820(line=113, offs=22)
*/
ATSINSmove(tmpret128, ATSPMVbool_false()) ;
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2861(line=115, offs=22) -- 2866(line=115, offs=27)
*/
ATSINSmove(tmp138, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2856(line=115, offs=17) -- 2874(line=115, offs=35)
*/
ATStailcal_beg()
ATSINSmove_tlcal(apy0, tmp138) ;
ATSINSmove_tlcal(apy1, arg1) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSfgoto(__patsflab_loop_59) ;
ATStailcal_end()
} /* ATSendif */
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2909(line=117, offs=18) -- 2918(line=117, offs=27)
*/
ATSINSmove(tmp139, ATSLIB_056_prelude__eq_g1int_int__27__2(arg0, arg1)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2906(line=117, offs=15) -- 3065(line=123, offs=21)
*/
ATSif(
tmp139
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2943(line=118, offs=20) -- 2948(line=118, offs=25)
*/
ATSINSmove(tmp145, atspre_g0int_mod_int(env0, arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2943(line=118, offs=20) -- 2952(line=118, offs=29)
*/
ATSINSmove(tmp142, ATSLIB_056_prelude__eq_g0int_int__21__4(tmp145, ATSPMVi0nt(0))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2940(line=118, offs=17) -- 3025(line=121, offs=23)
*/
ATSif(
tmp142
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2976(line=119, offs=19) -- 2981(line=119, offs=24)
*/
ATSINSmove(tmpret128, ATSPMVbool_false()) ;
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3021(line=121, offs=19) -- 3025(line=121, offs=23)
*/
ATSINSmove(tmpret128, ATSPMVbool_true()) ;
} /* ATSendif */
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3061(line=123, offs=17) -- 3065(line=123, offs=21)
*/
ATSINSmove(tmpret128, ATSPMVbool_true()) ;
} /* ATSendif */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret128) ;
} /* end of [loop_59] */
#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$60$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__60(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret130, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp131, 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(tmp131, PMVtmpltcst(g1int2int<S2Eextkind(atstype_int), S2Evar(tk(4637))>)(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(tmpret130, PMVtmpltcst(g1int_lt<S2Evar(tk(4637))>)(arg0, tmp131)) ;
ATSfunbody_end()
ATSreturn(tmpret130) ;
} /* end of [ATSLIB_056_prelude__lt_g1int_int__60] */
#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$60$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__60__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret130__1, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp131__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(tmp131__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(tmpret130__1, atspre_g1int_lt_int(arg0, tmp131__1)) ;
ATSfunbody_end()
ATSreturn(tmpret130__1) ;
} /* end of [ATSLIB_056_prelude__lt_g1int_int__60__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$21$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__21__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__3, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__3, atspre_g0int_eq_int(arg0, tmp41__3)) ;
ATSfunbody_end()
ATSreturn(tmpret40__3) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$27$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__27__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret50__2, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp51__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(tmp51__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(tmpret50__2, atspre_g1int_eq_int(arg0, tmp51__2)) ;
ATSfunbody_end()
ATSreturn(tmpret50__2) ;
} /* end of [ATSLIB_056_prelude__eq_g1int_int__27__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$21$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__21__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__4, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__4, atspre_g0int_eq_int(arg0, tmp41__4)) ;
ATSfunbody_end()
ATSreturn(tmpret40__4) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__4] */
/*
/home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3134(line=129, offs=4) -- 3945(line=158, offs=10)
*/
/*
local: sqrt_int_56$0(level=0), is_prime_58$0(level=0)
global: sqrt_int_56$0(level=0), is_prime_58$0(level=0), is_semiprime_66$0(level=0)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_bool)
is_semiprime_66(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret147, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp168, 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: 3134(line=129, offs=4) -- 3945(line=158, offs=10)
*/
ATSINSflab(__patsflab_is_semiprime_66):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3174(line=130, offs=3) -- 3945(line=158, 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: 3191(line=131, offs=7) -- 3192(line=131, offs=8)
*/
ATSINSlab(__atstmplab11):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3147(line=129, offs=17) -- 3148(line=129, offs=18)
*/
ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab13) ; } ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3192(line=131, offs=8) -- 3192(line=131, offs=8)
*/
ATSINSlab(__atstmplab12):
/*
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: 3196(line=131, offs=12) -- 3201(line=131, offs=17)
*/
ATSINSmove(tmpret147, ATSPMVbool_false()) ;
ATSbranch_end()
ATSbranch_beg()
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3209(line=132, offs=8) -- 3209(line=132, offs=8)
*/
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/numerics-internal.dats: 3234(line=134, offs=9) -- 3935(line=157, offs=12)
*/
/*
letpush(beg)
*/
/*
letpush(end)
*/
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3911(line=156, offs=19) -- 3921(line=156, offs=29)
*/
ATSINSmove(tmp168, sqrt_int_56(arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3903(line=156, offs=11) -- 3923(line=156, offs=31)
*/
ATSINSmove(tmpret147, loop_67(arg0, ATSPMVi0nt(2), tmp168)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3234(line=134, offs=9) -- 3935(line=157, offs=12)
*/
/*
INSletpop()
*/
ATSbranch_end()
/*
** ibranchlst-end
*/
ATScaseof_end()
ATSfunbody_end()
ATSreturn(tmpret147) ;
} /* end of [is_semiprime_66] */
/*
/home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3252(line=135, offs=15) -- 3881(line=154, offs=22)
*/
/*
local: is_prime_58$0(level=0), loop_67$0(level=1)
global: is_prime_58$0(level=0), loop_67$0(level=1)
local: k$5137(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
global: k$5137(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
*/
ATSstatic()
atstkind_t0ype(atstype_bool)
loop_67(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(tmpret148, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp149, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp152, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp155, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp156, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp157, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp158, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp159, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp162, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp165, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp166, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp167, 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: 3252(line=135, offs=15) -- 3881(line=154, offs=22)
*/
ATSINSflab(__patsflab_loop_67):
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3354(line=136, offs=16) -- 3363(line=136, offs=25)
*/
ATSINSmove(tmp149, ATSLIB_056_prelude__lt_g1int_int__60__2(arg0, arg1)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3351(line=136, offs=13) -- 3881(line=154, offs=22)
*/
ATSif(
tmp149
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3386(line=137, offs=18) -- 3391(line=137, offs=23)
*/
ATSINSmove(tmp155, atspre_g0int_mod_int(env0, arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3386(line=137, offs=18) -- 3395(line=137, offs=27)
*/
ATSINSmove(tmp152, ATSLIB_056_prelude__eq_g0int_int__21__5(tmp155, ATSPMVi0nt(0))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3383(line=137, offs=15) -- 3579(line=143, offs=35)
*/
ATSif(
tmp152
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3420(line=138, offs=20) -- 3430(line=138, offs=30)
*/
ATSINSmove(tmp156, is_prime_58(arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3417(line=138, offs=17) -- 3525(line=141, offs=24)
*/
ATSif(
tmp156
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3473(line=139, offs=37) -- 3478(line=139, offs=42)
*/
ATSINSmove(tmp157, atspre_g1int_div_int(env0, arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3455(line=139, offs=19) -- 3480(line=139, offs=44)
*/
ATSINSmove(tmpret148, is_prime_58(ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp157))) ;
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3520(line=141, offs=19) -- 3525(line=141, offs=24)
*/
ATSINSmove(tmpret148, ATSPMVbool_false()) ;
} /* ATSendif */
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3566(line=143, offs=22) -- 3571(line=143, offs=27)
*/
ATSINSmove(tmp158, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3561(line=143, offs=17) -- 3579(line=143, offs=35)
*/
ATStailcal_beg()
ATSINSmove_tlcal(apy0, tmp158) ;
ATSINSmove_tlcal(apy1, arg1) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSfgoto(__patsflab_loop_67) ;
ATStailcal_end()
} /* ATSendif */
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3614(line=145, offs=18) -- 3623(line=145, offs=27)
*/
ATSINSmove(tmp159, ATSLIB_056_prelude__eq_g1int_int__27__3(arg0, arg1)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3611(line=145, offs=15) -- 3881(line=154, offs=22)
*/
ATSif(
tmp159
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3648(line=146, offs=20) -- 3653(line=146, offs=25)
*/
ATSINSmove(tmp165, atspre_g0int_mod_int(env0, arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3648(line=146, offs=20) -- 3657(line=146, offs=29)
*/
ATSINSmove(tmp162, ATSLIB_056_prelude__eq_g0int_int__21__6(tmp165, ATSPMVi0nt(0))) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3645(line=146, offs=17) -- 3840(line=152, offs=24)
*/
ATSif(
tmp162
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3684(line=147, offs=22) -- 3694(line=147, offs=32)
*/
ATSINSmove(tmp166, is_prime_58(arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3681(line=147, offs=19) -- 3795(line=150, offs=26)
*/
ATSif(
tmp166
) ATSthen() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3739(line=148, offs=39) -- 3744(line=148, offs=44)
*/
ATSINSmove(tmp167, atspre_g1int_div_int(env0, arg0)) ;
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3721(line=148, offs=21) -- 3746(line=148, offs=46)
*/
ATSINSmove(tmpret148, is_prime_58(ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp167))) ;
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3790(line=150, offs=21) -- 3795(line=150, offs=26)
*/
ATSINSmove(tmpret148, ATSPMVbool_false()) ;
} /* ATSendif */
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3835(line=152, offs=19) -- 3840(line=152, offs=24)
*/
ATSINSmove(tmpret148, ATSPMVbool_false()) ;
} /* ATSendif */
} ATSelse() {
/*
emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3876(line=154, offs=17) -- 3881(line=154, offs=22)
*/
ATSINSmove(tmpret148, ATSPMVbool_false()) ;
} /* ATSendif */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret148) ;
} /* end of [loop_67] */
/*
/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$60$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__60__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret130__2, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp131__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(tmp131__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(tmpret130__2, atspre_g1int_lt_int(arg0, tmp131__2)) ;
ATSfunbody_end()
ATSreturn(tmpret130__2) ;
} /* end of [ATSLIB_056_prelude__lt_g1int_int__60__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$21$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__21__5(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__5, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__5, atspre_g0int_eq_int(arg0, tmp41__5)) ;
ATSfunbody_end()
ATSreturn(tmpret40__5) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$27$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__27__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret50__3, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp51__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(tmp51__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(tmpret50__3, atspre_g1int_eq_int(arg0, tmp51__3)) ;
ATSfunbody_end()
ATSreturn(tmpret50__3) ;
} /* end of [ATSLIB_056_prelude__eq_g1int_int__27__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$21$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__21__6(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__6, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__6, atspre_g0int_eq_int(arg0, tmp41__6)) ;
ATSfunbody_end()
ATSreturn(tmpret40__6) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$73$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(tmpret169, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp172, 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(tmp172, 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(tmpret169, ATSLIB_056_prelude__eq_g0int_int__21__7(tmp172, ATSPMVi0nt(0))) ;
ATSfunbody_end()
ATSreturn(tmpret169) ;
} /* 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$21$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__21__7(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__7, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__7, atspre_g0int_eq_int(arg0, tmp41__7)) ;
ATSfunbody_end()
ATSreturn(tmpret40__7) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$75$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(tmpret173, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp174, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp179, 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(tmp174, ATSLIB_056_prelude__neq_g1int_int__76__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(
tmp174
) 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(tmp179, 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), tmp179)) ;
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(tmpret173, arg0) ;
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret173) ;
} /* 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$76$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__76(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret175, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp176, 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(tmp176, PMVtmpltcst(g1int2int<S2Eextkind(atstype_int), S2Evar(tk(4652))>)(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(tmpret175, PMVtmpltcst(g1int_neq<S2Evar(tk(4652))>)(arg0, tmp176)) ;
ATSfunbody_end()
ATSreturn(tmpret175) ;
} /* end of [ATSLIB_056_prelude__neq_g1int_int__76] */
#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$76$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__76__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret175__1, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp176__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(tmp176__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(tmpret175__1, atspre_g1int_neq_int(arg0, tmp176__1)) ;
ATSfunbody_end()
ATSreturn(tmpret175__1) ;
} /* end of [ATSLIB_056_prelude__neq_g1int_int__76__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$79$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(tmpret180, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp181, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp182, 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(tmp182, _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(tmp181, atspre_g0int_div_int(arg0, tmp182)) ;
/*
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(tmpret180, atspre_g0int_mul_int(tmp181, arg1)) ;
ATSfunbody_end()
ATSreturn(tmpret180) ;
} /* 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$81$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(tmpret183, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp186, 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(tmp186, _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(tmpret183, ATSLIB_056_prelude__eq_g0int_int__21__8(tmp186, ATSPMVi0nt(1))) ;
ATSfunbody_end()
ATSreturn(tmpret183) ;
} /* 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$21$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__21__8(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__8, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__8, atspre_g0int_eq_int(arg0, tmp41__8)) ;
ATSfunbody_end()
ATSreturn(tmpret40__8) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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_56$0(level=0)
global: sqrt_int_56$0(level=0), divisors$83$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(tmpret187, 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(__atstmplab14):
/*
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(__atstmplab16) ; } ;
/*
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(__atstmplab15):
/*
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(tmpret187, atstype_boxed, ATSPMVcfunlab(1, __patsfun_84, ())) ;
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(__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: 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(tmpret187, loop_86(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(tmpret187) ;
} /* 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_84$0(level=1)
local:
global:
*/
ATSstatic()
atstype_boxed
__patsfun_84(atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret188, atstype_boxed) ;
ATStmpdec(tmp189, 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_84):
/*
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(tmp189, atstype_boxed, ATSPMVcfunlab(1, __patsfun_85, ())) ;
/*
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(tmpret188, postiats_tysum_1) ;
#if(0)
ATSINSstore_con1_tag(tmpret188, 1) ;
#endif
ATSINSstore_con1_ofs(tmpret188, postiats_tysum_1, atslab__0, ATSPMVi0nt(1)) ;
ATSINSstore_con1_ofs(tmpret188, postiats_tysum_1, atslab__1, tmp189) ;
ATSINSmove_con1_end()
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret188) ;
} /* end of [__patsfun_84] */
/*
/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_85$0(level=2)
local:
global:
*/
ATSstatic()
atstype_boxed
__patsfun_85(atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret190, 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_85):
/*
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(tmpret190) ;
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret190) ;
} /* end of [__patsfun_85] */
/*
/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_56$0(level=0), loop_86$0(level=1)
global: sqrt_int_56$0(level=0), loop_86$0(level=1)
local:
global:
*/
ATSstatic()
atstkind_type(atstype_ptrk)
loop_86(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(tmpret191, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp192, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp197, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp198, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp201, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp202, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp205, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref206, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp216, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp219, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref220, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp226, 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_86):
/*
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(tmp197, sqrt_int_56(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(tmp192, ATSLIB_056_prelude__gte_g1int_int__87__1(arg1, tmp197)) ;
/*
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(
tmp192
) 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(tmp201, 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(tmp198, ATSLIB_056_prelude__eq_g0int_int__21__9(tmp201, 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(
tmp198
) 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(tmp205, 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(tmp202, ATSLIB_056_prelude__neq_g1int_int__76__2(tmp205, 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(
tmp202
) 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(tmpref206) ;
*/
/*
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(tmpref206, 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(tmpret191, atstype_boxed, ATSPMVcfunlab(1, __patsfun_92, (arg1, ATSPMVptrof(tmpref206)))) ;
/*
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(tmpret191, atstype_boxed, ATSPMVcfunlab(1, __patsfun_95, (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(tmpret191, atstype_boxed, ATSPMVcfunlab(1, __patsfun_97, ())) ;
} /* 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(tmp219, 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(tmp216, ATSLIB_056_prelude__eq_g0int_int__21__10(tmp219, 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(
tmp216
) 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(tmpref220) ;
*/
/*
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(tmpref220, 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(tmpret191, atstype_boxed, ATSPMVcfunlab(1, __patsfun_99, (arg0, arg1, ATSPMVptrof(tmpref220)))) ;
/*
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(tmp226, 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, tmp226) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSfgoto(__patsflab_loop_86) ;
ATStailcal_end()
} /* ATSendif */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret191) ;
} /* end of [loop_86] */
#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$87$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__87(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret193, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp194, 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(tmp194, PMVtmpltcst(g1int2int<S2Eextkind(atstype_int), S2Evar(tk(4646))>)(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(tmpret193, PMVtmpltcst(g1int_gte<S2Evar(tk(4646))>)(arg0, tmp194)) ;
ATSfunbody_end()
ATSreturn(tmpret193) ;
} /* end of [ATSLIB_056_prelude__gte_g1int_int__87] */
#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$87$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__87__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret193__1, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp194__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(tmp194__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(tmpret193__1, atspre_g1int_gte_int(arg0, tmp194__1)) ;
ATSfunbody_end()
ATSreturn(tmpret193__1) ;
} /* end of [ATSLIB_056_prelude__gte_g1int_int__87__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$21$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__21__9(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__9, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__9, atspre_g0int_eq_int(arg0, tmp41__9)) ;
ATSfunbody_end()
ATSreturn(tmpret40__9) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$76$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__76__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret175__2, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp176__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(tmp176__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(tmpret175__2, atspre_g1int_neq_int(arg0, tmp176__2)) ;
ATSfunbody_end()
ATSreturn(tmpret175__2) ;
} /* end of [ATSLIB_056_prelude__neq_g1int_int__76__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_92$0(level=2)
local: acc$5152(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5153(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk))))
global: acc$5152(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5153(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk))))
*/
ATSstatic()
atstype_boxed
__patsfun_92(atstkind_t0ype(atstype_int) env0, atstkind_type(atstype_ptrk) env1, atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret207, atstype_boxed) ;
ATStmpdec(tmp208, 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_92):
/*
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(tmp208, atstype_boxed, ATSPMVcfunlab(1, __patsfun_93, (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(tmpret207, postiats_tysum_1) ;
#if(0)
ATSINSstore_con1_tag(tmpret207, 1) ;
#endif
ATSINSstore_con1_ofs(tmpret207, postiats_tysum_1, atslab__0, env0) ;
ATSINSstore_con1_ofs(tmpret207, postiats_tysum_1, atslab__1, tmp208) ;
ATSINSmove_con1_end()
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret207) ;
} /* end of [__patsfun_92] */
/*
/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_93$0(level=3)
local: x$5153(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk))))
global: x$5153(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk))))
*/
ATSstatic()
atstype_boxed
__patsfun_93(atstkind_type(atstype_ptrk) env0, atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret209, atstype_boxed) ;
ATStmpdec(tmp210, 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_93):
/*
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(tmp210, atstype_boxed, ATSPMVcfunlab(1, __patsfun_94, ())) ;
/*
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(tmpret209, postiats_tysum_1) ;
#if(0)
ATSINSstore_con1_tag(tmpret209, 1) ;
#endif
ATSINSstore_con1_ofs(tmpret209, postiats_tysum_1, atslab__0, ATSderef(env0, atstkind_t0ype(atstype_int))) ;
ATSINSstore_con1_ofs(tmpret209, postiats_tysum_1, atslab__1, tmp210) ;
ATSINSmove_con1_end()
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret209) ;
} /* end of [__patsfun_93] */
/*
/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_94$0(level=4)
local:
global:
*/
ATSstatic()
atstype_boxed
__patsfun_94(atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret211, 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_94):
/*
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(tmpret211) ;
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret211) ;
} /* end of [__patsfun_94] */
/*
/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_95$0(level=2)
local: acc$5152(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
global: acc$5152(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
*/
ATSstatic()
atstype_boxed
__patsfun_95(atstkind_t0ype(atstype_int) env0, atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret212, atstype_boxed) ;
ATStmpdec(tmp213, 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_95):
/*
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(tmp213, atstype_boxed, ATSPMVcfunlab(1, __patsfun_96, ())) ;
/*
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(tmpret212, postiats_tysum_1) ;
#if(0)
ATSINSstore_con1_tag(tmpret212, 1) ;
#endif
ATSINSstore_con1_ofs(tmpret212, postiats_tysum_1, atslab__0, env0) ;
ATSINSstore_con1_ofs(tmpret212, postiats_tysum_1, atslab__1, tmp213) ;
ATSINSmove_con1_end()
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret212) ;
} /* end of [__patsfun_95] */
/*
/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_96$0(level=3)
local:
global:
*/
ATSstatic()
atstype_boxed
__patsfun_96(atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret214, 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_96):
/*
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(tmpret214) ;
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret214) ;
} /* end of [__patsfun_96] */
/*
/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_97$0(level=2)
local:
global:
*/
ATSstatic()
atstype_boxed
__patsfun_97(atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret215, 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_97):
/*
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(tmpret215) ;
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret215) ;
} /* end of [__patsfun_97] */
/*
/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$21$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__21__10(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__10, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__10, atspre_g0int_eq_int(arg0, tmp41__10)) ;
ATSfunbody_end()
ATSreturn(tmpret40__10) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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_86$0(level=1)
global: loop_86$0(level=1), __patsfun_99$0(level=2)
local: n$5151(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5152(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5154(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk))))
global: n$5151(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5152(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5154(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk))))
*/
ATSstatic()
atstype_boxed
__patsfun_99(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2, atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret221, atstype_boxed) ;
ATStmpdec(tmp222, 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_99):
/*
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(tmp222, atstype_boxed, ATSPMVcfunlab(1, __patsfun_100, (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(tmpret221, postiats_tysum_1) ;
#if(0)
ATSINSstore_con1_tag(tmpret221, 1) ;
#endif
ATSINSstore_con1_ofs(tmpret221, postiats_tysum_1, atslab__0, env1) ;
ATSINSstore_con1_ofs(tmpret221, postiats_tysum_1, atslab__1, tmp222) ;
ATSINSmove_con1_end()
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret221) ;
} /* end of [__patsfun_99] */
/*
/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_86$0(level=1)
global: loop_86$0(level=1), __patsfun_100$0(level=3)
local: n$5151(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5152(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5154(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk))))
global: n$5151(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5152(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5154(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk))))
*/
ATSstatic()
atstype_boxed
__patsfun_100(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2, atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret223, atstype_boxed) ;
ATStmpdec(tmp224, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp225, 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_100):
/*
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(tmp225, 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(tmp224, loop_86(env0, tmp225)) ;
/*
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(tmpret223, postiats_tysum_1) ;
#if(0)
ATSINSstore_con1_tag(tmpret223, 1) ;
#endif
ATSINSstore_con1_ofs(tmpret223, postiats_tysum_1, atslab__0, ATSderef(env2, atstkind_t0ype(atstype_int))) ;
ATSINSstore_con1_ofs(tmpret223, postiats_tysum_1, atslab__1, tmp224) ;
ATSINSmove_con1_end()
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret223) ;
} /* end of [__patsfun_100] */
/*
/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_101$0(level=0)
local:
global:
*/
ATSstatic()
atstkind_type(atstype_ptrk)
primorial_gmp_101(atstkind_t0ype(atstype_ullint) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret227, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmpref228, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp230) ;
// ATStmpdec_void(tmp231) ;
/* 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_101):
/*
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(tmpref228) ;
*/
/*
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(tmpref228, ATSLIB_056_prelude__ptr_alloc__1__7()) ;
/*
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(tmp230, atscntrb_gmp_mpz_init(ATSPMVrefarg1(ATSSELrecsin(tmpref228, 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(tmp231, mpz_primorial_ui(ATSPMVrefarg1(ATSSELrecsin(tmpref228, 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(tmpret227, ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), tmpref228)) ;
/*
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(tmpret227) ;
} /* end of [primorial_gmp_101] */
/*
/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$7(level=1)
local:
global:
*/
ATSstatic()
/*
imparg = a(4746)
tmparg = S2Evar(a(4746))
tmpsub = Some(a(4746) -> S2EVar(5733))
*/
atstkind_type(atstype_ptrk)
ATSLIB_056_prelude__ptr_alloc__1__7()
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret2__7, 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__7, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ;
ATSfunbody_end()
ATSreturn(tmpret2__7) ;
} /* end of [ATSLIB_056_prelude__ptr_alloc__1__7] */
/*
/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_103$0(level=0)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
div_gt_zero_103(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret232, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp233, 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_103):
/*
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(tmp233, 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(tmpret232, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp233)) ;
ATSfunbody_end()
ATSreturn(tmpret232) ;
} /* end of [div_gt_zero_103] */
/*
/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_14$0(level=0), is_prime_58$0(level=0), div_gt_zero_103$0(level=0)
global: exp_14$0(level=0), sqrt_int_56$0(level=0), is_prime_58$0(level=0), div_gt_zero_103$0(level=0), jacobi_104$0(level=0)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
jacobi_104(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret234, 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_104):
/*
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(tmpret234, loop_114(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(tmpret234) ;
} /* end of [jacobi_104] */
/*
/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_105$0(level=1)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
legendre_105(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret235, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp236, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref255, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp256, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp257, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp258, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp259, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp262, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp263, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp264, atstkind_t0ype(atstype_bool)) ;
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: 2248(line=85, offs=9) -- 3576(line=125, offs=12)
*/
ATSINSflab(__patsflab_legendre_105):
/*
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(tmp236, 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(__atstmplab17):
/*
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(tmp236, ATSPMVint(0))) { ATSINSgoto(__atstmplab19) ; } ;
/*
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(__atstmplab18):
/*
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(tmpret235, 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(__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: 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(tmpref255) ;
*/
/*
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(tmp257, 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(tmp256, atspre_g1int_div_int(tmp257, 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(tmpref255, exp_mod_prime_106(arg0, tmp256, 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(tmp258, tmpref255) ;
/*
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(__atstmplab23):
/*
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(tmp263, 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(tmp262, atspre_g0int_mod_int(tmp258, tmp263)) ;
/*
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(tmp259, ATSLIB_056_prelude__eq_g0int_int__21__12(tmp262, 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(tmp259, ATSPMVbool_true())) { ATSINSgoto(__atstmplab24) ; } ;
/*
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(tmpret235, 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(__atstmplab24):
/*
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(tmp267, atspre_g0int_mod_int(tmp258, 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(tmp264, ATSLIB_056_prelude__eq_g0int_int__21__13(tmp267, 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(tmp264, ATSPMVbool_true())) { ATSINSgoto(__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: 3542(line=123, offs=35) -- 3543(line=123, offs=36)
*/
ATSINSmove(tmpret235, 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(__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: 3563(line=124, offs=20) -- 3564(line=124, offs=21)
*/
ATSINSmove(tmpret235, 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(tmpret235) ;
} /* end of [legendre_105] */
/*
/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_106$0(level=2)
global: exp_mod_prime_106$0(level=2)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
exp_mod_prime_106(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(tmpret237, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref238, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref239, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp240, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp241, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmpref244, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp245, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref246, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref247, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp248, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp249, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp250, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmpref253, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp254, 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_106):
/*
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(tmpref238) ;
*/
/*
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(tmpref238, 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(tmpref239) ;
*/
/*
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(tmp240, 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(tmpref239, atspre_g0int_mod_int(arg1, tmp240)) ;
/*
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(__atstmplab20):
/*
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(__atstmplab22) ; } ;
/*
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(__atstmplab21):
/*
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(tmpret237, 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(__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: 2720(line=99, offs=24) -- 2725(line=99, offs=29)
*/
ATSINSmove(tmp241, ATSLIB_056_prelude__gt_g1int_int__15__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(
tmp241
) 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(tmpref244) ;
*/
/*
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(tmp245, atspre_g0int_half_int(tmpref239)) ;
/*
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(tmpref244, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp245)) ;
/*
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(tmpref246) ;
*/
/*
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(tmpref246, atspre_g0int_mod_int(tmpref239, 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(tmpref247) ;
*/
/*
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(tmp249, 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(tmp248, atspre_g0int_mod_int(tmp249, 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(tmpref247, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp248)) ;
/*
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(tmp250, ATSLIB_056_prelude__eq_g0int_int__21__11(tmpref246, 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(
tmp250
) 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, tmpref247) ;
ATSINSmove_tlcal(apy1, tmpref244) ;
ATSINSmove_tlcal(apy2, arg2) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSargmove_tlcal(arg2, apy2) ;
ATSINSfgoto(__patsflab_exp_mod_prime_106) ;
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(tmpref253) ;
*/
/*
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(tmp254, exp_mod_prime_106(tmpref247, tmpref244, 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(tmpref253, atspre_g0int_mul_int(arg0, tmp254)) ;
/*
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(tmpret237, tmpref253) ;
/*
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(tmpret237, 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(tmpret237) ;
} /* end of [exp_mod_prime_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$15$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__15__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret33__3, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp34__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(tmp34__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(tmpret33__3, atspre_g1int_gt_int(arg0, tmp34__3)) ;
ATSfunbody_end()
ATSreturn(tmpret33__3) ;
} /* end of [ATSLIB_056_prelude__gt_g1int_int__15__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$21$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__21__11(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__11, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__11, atspre_g0int_eq_int(arg0, tmp41__11)) ;
ATSfunbody_end()
ATSreturn(tmpret40__11) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$21$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__21__12(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__12, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__12, atspre_g0int_eq_int(arg0, tmp41__12)) ;
ATSfunbody_end()
ATSreturn(tmpret40__12) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$21$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__21__13(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__13, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__13, atspre_g0int_eq_int(arg0, tmp41__13)) ;
ATSfunbody_end()
ATSreturn(tmpret40__13) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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_103$0(level=0), get_multiplicity_113$0(level=1)
global: div_gt_zero_103$0(level=0), get_multiplicity_113$0(level=1)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
get_multiplicity_113(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret268, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp269, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp270, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp271, 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_113):
/*
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(tmp269, 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(__atstmplab26):
/*
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(tmp269, ATSPMVint(0))) { ATSINSgoto(__atstmplab28) ; } ;
/*
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(__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: 3707(line=129, offs=37) -- 3724(line=129, offs=54)
*/
ATSINSmove(tmp271, div_gt_zero_103(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(tmp270, get_multiplicity_113(tmp271, 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(tmpret268, atspre_g1int_add_int(ATSPMVi0nt(1), tmp270)) ;
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(__atstmplab28):
/*
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(tmpret268, ATSPMVi0nt(0)) ;
ATSbranch_end()
/*
** ibranchlst-end
*/
ATScaseof_end()
ATSfunbody_end()
ATSreturn(tmpret268) ;
} /* end of [get_multiplicity_113] */
/*
/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_14$0(level=0), is_prime_58$0(level=0), legendre_105$0(level=1), get_multiplicity_113$0(level=1), loop_114$0(level=1)
global: exp_14$0(level=0), is_prime_58$0(level=0), div_gt_zero_103$0(level=0), legendre_105$0(level=1), get_multiplicity_113$0(level=1), loop_114$0(level=1)
local: a$5162(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), n$5163(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
global: a$5162(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), n$5163(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
*/
ATSstatic()
atstkind_t0ype(atstype_int)
loop_114(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpret272, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp273, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp276, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp279, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp280, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp283, 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_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_114):
/*
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(tmp273, ATSLIB_056_prelude__gt_g1int_int__15__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(
tmp273
) 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(tmpret272, 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(tmp276, ATSLIB_056_prelude__eq_g1int_int__27__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(
tmp276
) 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(tmpret272, 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(tmp283, 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(tmp280, ATSLIB_056_prelude__eq_g0int_int__21__14(tmp283, 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(
tmp280
) 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(tmp279, is_prime_58(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(tmp279, 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(
tmp279
) 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(tmp285, 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(tmp284, loop_114(env0, env1, tmp285)) ;
/*
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(tmp287, legendre_105(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(tmp288, get_multiplicity_113(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(tmp286, exp_14(tmp287, tmp288)) ;
/*
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(tmpret272, atspre_g0int_mul_int(tmp284, tmp286)) ;
} 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(tmp289, 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, tmp289) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSfgoto(__patsflab_loop_114) ;
ATStailcal_end()
} /* ATSendif */
} /* ATSendif */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret272) ;
} /* end of [loop_114] */
/*
/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$15$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__15__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret33__4, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp34__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(tmp34__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(tmpret33__4, atspre_g1int_gt_int(arg0, tmp34__4)) ;
ATSfunbody_end()
ATSreturn(tmpret33__4) ;
} /* end of [ATSLIB_056_prelude__gt_g1int_int__15__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$27$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__27__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret50__4, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp51__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(tmp51__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(tmpret50__4, atspre_g1int_eq_int(arg0, tmp51__4)) ;
ATSfunbody_end()
ATSreturn(tmpret50__4) ;
} /* end of [ATSLIB_056_prelude__eq_g1int_int__27__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$21$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__21__14(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__14, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__14, atspre_g0int_eq_int(arg0, tmp41__14)) ;
ATSfunbody_end()
ATSreturn(tmpret40__14) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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_118$0(level=0)
global: jacobi2_118$0(level=0)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
jacobi2_118(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(tmpret290, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp291, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp294, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp295, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp298, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp299, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp300, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp303, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp306, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp307, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp308, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp309, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp310, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp311, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp312, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp315, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp318, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp319, 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_118):
/*
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(__atstmplab29):
/*
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(__atstmplab31) ; } ;
/*
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(__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: 4236(line=150, offs=12) -- 4237(line=150, offs=13)
*/
ATSINSmove(tmpret290, 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(__atstmplab31):
/*
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(__atstmplab33) ; } ;
/*
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(__atstmplab32):
/*
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(tmpret290, 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(__atstmplab33):
/*
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(tmp291, ATSLIB_056_prelude__gt_g1int_int__15__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(tmp291, ATSPMVbool_true())) { ATSINSgoto(__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: 4290(line=152, offs=40) -- 4295(line=152, offs=45)
*/
ATSINSmove(tmp294, 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), tmp294)) ;
ATSINSmove_tlcal(apy1, arg1) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSfgoto(__patsflab_jacobi2_118) ;
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(__atstmplab34):
/*
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(tmp298, 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(tmp295, ATSLIB_056_prelude__eq_g0int_int__21__15(tmp298, 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(tmp295, ATSPMVbool_true())) { ATSINSgoto(__atstmplab35) ; } ;
/*
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(tmp303, 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(tmp300, ATSLIB_056_prelude__eq_g0int_int__21__16(tmp303, 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(
tmp300
) 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(tmp299, 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(tmp306, 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(tmp307, 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(tmp299, ATSLIB_056_prelude__eq_g0int_int__21__17(tmp306, tmp307)) ;
} /* 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(
tmp299
) 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(tmp308, 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, tmp308) ;
ATSINSmove_tlcal(apy1, arg1) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSfgoto(__patsflab_jacobi2_118) ;
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(tmp310, 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(tmp309, jacobi2_118(tmp310, 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(tmpret290, atspre_g0int_neg_int(tmp309)) ;
} /* 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(__atstmplab35):
/*
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(tmp315, 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(tmp312, ATSLIB_056_prelude__eq_g0int_int__21__18(tmp315, 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(
tmp312
) 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(tmp318, 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(tmp311, ATSLIB_056_prelude__eq_g0int_int__21__19(tmp318, 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(tmp311, 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(tmp311, ATSPMVbool_true())) { ATSINSgoto(__atstmplab36) ; } ;
/*
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_118) ;
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(__atstmplab36):
/*
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(tmp319, jacobi2_118(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(tmpret290, atspre_g0int_neg_int(tmp319)) ;
ATSbranch_end()
/*
** ibranchlst-end
*/
ATScaseof_end()
ATSfunbody_end()
ATSreturn(tmpret290) ;
} /* end of [jacobi2_118] */
/*
/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$15$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__15__5(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret33__5, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp34__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(tmp34__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(tmpret33__5, atspre_g1int_gt_int(arg0, tmp34__5)) ;
ATSfunbody_end()
ATSreturn(tmpret33__5) ;
} /* end of [ATSLIB_056_prelude__gt_g1int_int__15__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$21$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__21__15(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__15, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__15, atspre_g0int_eq_int(arg0, tmp41__15)) ;
ATSfunbody_end()
ATSreturn(tmpret40__15) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$21$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__21__16(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__16, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__16, atspre_g0int_eq_int(arg0, tmp41__16)) ;
ATSfunbody_end()
ATSreturn(tmpret40__16) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$21$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__21__17(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__17, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__17, atspre_g0int_eq_int(arg0, tmp41__17)) ;
ATSfunbody_end()
ATSreturn(tmpret40__17) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$21$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__21__18(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__18, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__18, atspre_g0int_eq_int(arg0, tmp41__18)) ;
ATSfunbody_end()
ATSreturn(tmpret40__18) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$21$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__21__19(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__19, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__19, atspre_g0int_eq_int(arg0, tmp41__19)) ;
ATSfunbody_end()
ATSreturn(tmpret40__19) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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_56$0(level=0)
global: sqrt_int_56$0(level=0), count_divisors_ats$126$0(level=0)
local:
global:
*/
ATSextern()
atstkind_t0ype(atstype_int)
count_divisors_ats(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret320, 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(tmpret320, loop_127(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(tmpret320) ;
} /* 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_56$0(level=0), loop_127$0(level=1)
global: sqrt_int_56$0(level=0), loop_127$0(level=1)
local: n$5189(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
global: n$5189(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
*/
ATSstatic()
atstkind_t0ype(atstype_int)
loop_127(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpret321, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp322, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp325, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp326, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp329, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp330, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp333, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp334, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp337, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp338, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp339, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp340, 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_127):
/*
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(tmp325, sqrt_int_56(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(tmp322, ATSLIB_056_prelude__gte_g1int_int__87__2(arg0, tmp325)) ;
/*
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(
tmp322
) 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(tmp329, 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(tmp326, ATSLIB_056_prelude__eq_g0int_int__21__20(tmp329, 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(
tmp326
) 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(tmp333, 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(tmp330, ATSLIB_056_prelude__neq_g1int_int__76__3(tmp333, 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(
tmp330
) 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(tmpret321, 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(tmpret321, 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(tmpret321, 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(tmp337, 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(tmp334, ATSLIB_056_prelude__eq_g0int_int__21__21(tmp337, 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(
tmp334
) 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(tmp339, 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(tmp338, loop_127(env0, tmp339)) ;
/*
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(tmpret321, atspre_g0int_add_int(ATSPMVi0nt(2), tmp338)) ;
} 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(tmp340, 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, tmp340) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSfgoto(__patsflab_loop_127) ;
ATStailcal_end()
} /* ATSendif */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret321) ;
} /* end of [loop_127] */
/*
/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$87$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__87__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret193__2, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp194__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(tmp194__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(tmpret193__2, atspre_g1int_gte_int(arg0, tmp194__2)) ;
ATSfunbody_end()
ATSreturn(tmpret193__2) ;
} /* end of [ATSLIB_056_prelude__gte_g1int_int__87__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$21$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__21__20(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__20, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__20, atspre_g0int_eq_int(arg0, tmp41__20)) ;
ATSfunbody_end()
ATSreturn(tmpret40__20) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$76$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__76__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret175__3, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp176__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(tmp176__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(tmpret175__3, atspre_g1int_neq_int(arg0, tmp176__3)) ;
ATSfunbody_end()
ATSreturn(tmpret175__3) ;
} /* end of [ATSLIB_056_prelude__neq_g1int_int__76__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$21$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__21__21(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__21, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__21, atspre_g0int_eq_int(arg0, tmp41__21)) ;
ATSfunbody_end()
ATSreturn(tmpret40__21) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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_56$0(level=0)
global: sqrt_int_56$0(level=0), sum_divisors_ats$133$0(level=0)
local:
global:
*/
ATSextern()
atstkind_t0ype(atstype_int)
sum_divisors_ats(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret341, 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(tmpret341, loop_134(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(tmpret341) ;
} /* 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_56$0(level=0), loop_134$0(level=1)
global: sqrt_int_56$0(level=0), loop_134$0(level=1)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
loop_134(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(tmpret342, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp343, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp346, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp347, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp350, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp351, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp354, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref355, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp356, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp359, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref360, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp361, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp362, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp363, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp364, 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_134):
/*
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(tmp346, sqrt_int_56(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(tmp343, ATSLIB_056_prelude__gte_g1int_int__87__3(arg1, tmp346)) ;
/*
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(
tmp343
) 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(tmp350, 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(tmp347, ATSLIB_056_prelude__eq_g0int_int__21__22(tmp350, 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(
tmp347
) 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(tmp354, 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(tmp351, ATSLIB_056_prelude__neq_g1int_int__76__4(tmp354, 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(
tmp351
) 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(tmpref355) ;
*/
/*
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(tmpref355, 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(tmpret342, atspre_g1int_add_int(arg1, tmpref355)) ;
/*
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(tmpret342, 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(tmpret342, 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(tmp359, 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(tmp356, ATSLIB_056_prelude__eq_g0int_int__21__23(tmp359, 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(
tmp356
) 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(tmpref360) ;
*/
/*
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(tmpref360, 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(tmp361, atspre_g1int_add_int(arg1, tmpref360)) ;
/*
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(tmp363, 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(tmp362, loop_134(arg0, tmp363)) ;
/*
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(tmpret342, atspre_g0int_add_int(tmp361, tmp362)) ;
/*
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(tmp364, 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, tmp364) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSfgoto(__patsflab_loop_134) ;
ATStailcal_end()
} /* ATSendif */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret342) ;
} /* end of [loop_134] */
/*
/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$87$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__87__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret193__3, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp194__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(tmp194__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(tmpret193__3, atspre_g1int_gte_int(arg0, tmp194__3)) ;
ATSfunbody_end()
ATSreturn(tmpret193__3) ;
} /* end of [ATSLIB_056_prelude__gte_g1int_int__87__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$21$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__21__22(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__22, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__22, atspre_g0int_eq_int(arg0, tmp41__22)) ;
ATSfunbody_end()
ATSreturn(tmpret40__22) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$76$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__76__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret175__4, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp176__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(tmp176__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(tmpret175__4, atspre_g1int_neq_int(arg0, tmp176__4)) ;
ATSfunbody_end()
ATSreturn(tmpret175__4) ;
} /* end of [ATSLIB_056_prelude__neq_g1int_int__76__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$21$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__21__23(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__23, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__23, atspre_g0int_eq_int(arg0, tmp41__23)) ;
ATSfunbody_end()
ATSreturn(tmpret40__23) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$139$0(level=0)
local:
global:
*/
ATSextern()
atstkind_t0ype(atstype_bool)
is_perfect_ats(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret365, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp368, 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(tmp368, 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(tmpret365, ATSLIB_056_prelude__eq_g0int_int__21__24(tmp368, arg0)) ;
ATSfunbody_end()
ATSreturn(tmpret365) ;
} /* 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$21$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__21__24(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__24, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__24, atspre_g0int_eq_int(arg0, tmp41__24)) ;
ATSfunbody_end()
ATSreturn(tmpret40__24) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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_141$0(level=0)
global: rip_141$0(level=0)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
rip_141(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(tmpret369, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp370, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp375, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp376, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp379, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref380, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp381, 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_141):
/*
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(tmp375, 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(tmp370, ATSLIB_056_prelude__neq_g0int_int__142__1(tmp375, 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(
tmp370
) 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(tmpret369, 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(tmp379, 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(tmp376, ATSLIB_056_prelude__gt_g1int_int__15__6(tmp379, 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(
tmp376
) 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(tmpref380) ;
*/
/*
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(tmpref380, 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(tmp381, ATSLIB_056_prelude__lt_g1int_int__60__3(tmpref380, 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(
tmp381
) 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, tmpref380) ;
ATSINSmove_tlcal(apy1, arg1) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSfgoto(__patsflab_rip_141) ;
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(tmpret369, 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(tmpret369, ATSPMVi0nt(1)) ;
} /* ATSendif */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret369) ;
} /* end of [rip_141] */
#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$142$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__142(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret371, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp372, 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(tmp372, PMVtmpltcst(g0int2int<S2Eextkind(atstype_int), S2Evar(tk(4635))>)(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(tmpret371, PMVtmpltcst(g0int_neq<S2Evar(tk(4635))>)(arg0, tmp372)) ;
ATSfunbody_end()
ATSreturn(tmpret371) ;
} /* end of [ATSLIB_056_prelude__neq_g0int_int__142] */
#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$142$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__142__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret371__1, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp372__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(tmp372__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(tmpret371__1, atspre_g0int_neq_int(arg0, tmp372__1)) ;
ATSfunbody_end()
ATSreturn(tmpret371__1) ;
} /* end of [ATSLIB_056_prelude__neq_g0int_int__142__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$15$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__15__6(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret33__6, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp34__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(tmp34__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(tmpret33__6, atspre_g1int_gt_int(arg0, tmp34__6)) ;
ATSfunbody_end()
ATSreturn(tmpret33__6) ;
} /* end of [ATSLIB_056_prelude__gt_g1int_int__15__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$60$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__60__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret130__3, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp131__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(tmp131__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(tmpret130__3, atspre_g1int_lt_int(arg0, tmp131__3)) ;
ATSfunbody_end()
ATSreturn(tmpret130__3) ;
} /* end of [ATSLIB_056_prelude__lt_g1int_int__60__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_58$0(level=0), rip_141$0(level=0)
global: sqrt_int_56$0(level=0), is_prime_58$0(level=0), rip_141$0(level=0), prime_factors$147$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(tmpret384, 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(tmpret384, loop_148(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(tmpret384) ;
} /* 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_58$0(level=0), rip_141$0(level=0), loop_148$0(level=1)
global: is_prime_58$0(level=0), rip_141$0(level=0), loop_148$0(level=1)
local:
global:
*/
ATSstatic()
atstkind_type(atstype_ptrk)
loop_148(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(tmpret385, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp386, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp389, 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(tmp409, 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_148):
/*
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(tmp386, ATSLIB_056_prelude__gte_g1int_int__87__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(
tmp386
) 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(tmp389, is_prime_58(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(
tmp389
) 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(tmpret385, atstype_boxed, ATSPMVcfunlab(1, __patsfun_150, (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(tmpret385, atstype_boxed, ATSPMVcfunlab(1, __patsfun_152, ())) ;
} /* 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(tmp398, 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(tmp395, ATSLIB_056_prelude__eq_g0int_int__21__25(tmp398, 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(
tmp395
) 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(tmp394, is_prime_58(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(tmp394, 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(
tmp394
) 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(tmp402, 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(tmp399, ATSLIB_056_prelude__gt_g1int_int__15__7(tmp402, 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(
tmp399
) 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(tmpret385, atstype_boxed, ATSPMVcfunlab(1, __patsfun_155, (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(tmpret385, atstype_boxed, ATSPMVcfunlab(1, __patsfun_156, (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(tmp409, 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, tmp409) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSfgoto(__patsflab_loop_148) ;
ATStailcal_end()
} /* ATSendif */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret385) ;
} /* end of [loop_148] */
/*
/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$87$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__87__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret193__4, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp194__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(tmp194__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(tmpret193__4, atspre_g1int_gte_int(arg0, tmp194__4)) ;
ATSfunbody_end()
ATSreturn(tmpret193__4) ;
} /* end of [ATSLIB_056_prelude__gte_g1int_int__87__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_150$0(level=2)
local: n$5205(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
global: n$5205(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
*/
ATSstatic()
atstype_boxed
__patsfun_150(atstkind_t0ype(atstype_int) env0, atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret390, atstype_boxed) ;
ATStmpdec(tmp391, 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_150):
/*
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(tmp391, atstype_boxed, ATSPMVcfunlab(1, __patsfun_151, ())) ;
/*
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(tmpret390, postiats_tysum_1) ;
#if(0)
ATSINSstore_con1_tag(tmpret390, 1) ;
#endif
ATSINSstore_con1_ofs(tmpret390, postiats_tysum_1, atslab__0, env0) ;
ATSINSstore_con1_ofs(tmpret390, postiats_tysum_1, atslab__1, tmp391) ;
ATSINSmove_con1_end()
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret390) ;
} /* end of [__patsfun_150] */
/*
/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_151$0(level=3)
local:
global:
*/
ATSstatic()
atstype_boxed
__patsfun_151(atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret392, 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_151):
/*
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(tmpret392) ;
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret392) ;
} /* end of [__patsfun_151] */
/*
/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_152$0(level=2)
local:
global:
*/
ATSstatic()
atstype_boxed
__patsfun_152(atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret393, 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_152):
/*
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(tmpret393) ;
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret393) ;
} /* end of [__patsfun_152] */
/*
/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$21$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__21__25(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__25, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__25, atspre_g0int_eq_int(arg0, tmp41__25)) ;
ATSfunbody_end()
ATSreturn(tmpret40__25) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$15$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__15__7(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret33__7, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp34__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(tmp34__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(tmpret33__7, atspre_g1int_gt_int(arg0, tmp34__7)) ;
ATSfunbody_end()
ATSreturn(tmpret33__7) ;
} /* end of [ATSLIB_056_prelude__gt_g1int_int__15__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_141$0(level=0), loop_148$0(level=1)
global: rip_141$0(level=0), loop_148$0(level=1), __patsfun_155$0(level=2)
local: n$5205(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5206(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
global: n$5205(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5206(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
*/
ATSstatic()
atstype_boxed
__patsfun_155(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret403, atstype_boxed) ;
ATStmpdec(tmp404, atstkind_type(atstype_ptrk)) ;
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: 6228(line=238, offs=13) -- 6278(line=238, offs=63)
*/
ATSINSflab(__patsflab___patsfun_155):
/*
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(tmp405, rip_141(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(tmp404, loop_148(tmp405, 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(tmpret403, postiats_tysum_1) ;
#if(0)
ATSINSstore_con1_tag(tmpret403, 1) ;
#endif
ATSINSstore_con1_ofs(tmpret403, postiats_tysum_1, atslab__0, env1) ;
ATSINSstore_con1_ofs(tmpret403, postiats_tysum_1, atslab__1, tmp404) ;
ATSINSmove_con1_end()
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret403) ;
} /* end of [__patsfun_155] */
/*
/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_156$0(level=2)
local: acc$5206(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
global: acc$5206(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int))))
*/
ATSstatic()
atstype_boxed
__patsfun_156(atstkind_t0ype(atstype_int) env0, atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret406, atstype_boxed) ;
ATStmpdec(tmp407, 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_156):
/*
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(tmp407, atstype_boxed, ATSPMVcfunlab(1, __patsfun_157, ())) ;
/*
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(tmpret406, postiats_tysum_1) ;
#if(0)
ATSINSstore_con1_tag(tmpret406, 1) ;
#endif
ATSINSstore_con1_ofs(tmpret406, postiats_tysum_1, atslab__0, env0) ;
ATSINSstore_con1_ofs(tmpret406, postiats_tysum_1, atslab__1, tmp407) ;
ATSINSmove_con1_end()
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret406) ;
} /* end of [__patsfun_156] */
/*
/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_157$0(level=3)
local:
global:
*/
ATSstatic()
atstype_boxed
__patsfun_157(atstype_bool arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret408, 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_157):
/*
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(tmpret408) ;
} ATSelse() {
/* (*nothing*) */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret408) ;
} /* end of [__patsfun_157] */
/*
/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_58$0(level=0), rip_141$0(level=0)
global: sqrt_int_56$0(level=0), is_prime_58$0(level=0), rip_141$0(level=0), little_omega_ats$158$0(level=0)
local:
global:
*/
ATSextern()
atstkind_t0ype(atstype_int)
little_omega_ats(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret410, 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(tmpret410, loop_159(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(tmpret410) ;
} /* 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_58$0(level=0), rip_141$0(level=0), loop_159$0(level=1)
global: is_prime_58$0(level=0), rip_141$0(level=0), loop_159$0(level=1)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
loop_159(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(tmpret411, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp412, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp415, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp416, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp417, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp420, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp421, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp424, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp425, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp426, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp427, 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_159):
/*
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(tmp412, ATSLIB_056_prelude__gte_g1int_int__87__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(
tmp412
) 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(tmp415, is_prime_58(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(
tmp415
) 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(tmpret411, 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(tmpret411, 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(tmp420, 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(tmp417, ATSLIB_056_prelude__eq_g0int_int__21__26(tmp420, 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(
tmp417
) 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(tmp416, is_prime_58(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(tmp416, 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(
tmp416
) 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(tmp424, 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(tmp421, ATSLIB_056_prelude__gt_g1int_int__15__8(tmp424, 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(
tmp421
) 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(tmp426, rip_141(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(tmp425, loop_159(tmp426, 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(tmpret411, atspre_g0int_add_int(ATSPMVi0nt(1), tmp425)) ;
} 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(tmpret411, 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(tmp427, 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, tmp427) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSfgoto(__patsflab_loop_159) ;
ATStailcal_end()
} /* ATSendif */
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret411) ;
} /* end of [loop_159] */
/*
/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$87$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__87__5(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret193__5, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp194__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(tmp194__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(tmpret193__5, atspre_g1int_gte_int(arg0, tmp194__5)) ;
ATSfunbody_end()
ATSreturn(tmpret193__5) ;
} /* end of [ATSLIB_056_prelude__gte_g1int_int__87__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$21$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__21__26(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret40__26, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp41__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(tmp41__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(tmpret40__26, atspre_g0int_eq_int(arg0, tmp41__26)) ;
ATSfunbody_end()
ATSreturn(tmpret40__26) ;
} /* end of [ATSLIB_056_prelude__eq_g0int_int__21__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$15$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__15__8(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret33__8, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp34__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(tmp34__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(tmpret33__8, atspre_g1int_gt_int(arg0, tmp34__8)) ;
ATSfunbody_end()
ATSreturn(tmpret33__8) ;
} /* end of [ATSLIB_056_prelude__gt_g1int_int__15__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$163$0(level=0)
local:
global:
*/
ATSextern()
atstkind_t0ype(atstype_int)
radical_ats(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret428, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref429, 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(__atstmplab37):
/*
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(__atstmplab39) ; } ;
/*
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(__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: 6916(line=269, offs=12) -- 6917(line=269, offs=13)
*/
ATSINSmove(tmpret428, 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(__atstmplab39):
/*
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(tmpref429) ;
*/
/*
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(tmpref429, _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(tmpret428, product_164(tmpref429)) ;
/*
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(tmpret428) ;
} /* 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_164$0(level=1)
global: product_164$0(level=1)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
product_164(atstkind_type(atstype_ptrk) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret430, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp431, atstype_boxed) ;
ATStmpdec(tmp432, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp433, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp434, 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_164):
/*
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(tmp431, 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(__atstmplab40):
/*
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(tmp431)) { ATSINSgoto(__atstmplab43) ; } ;
/*
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(__atstmplab41):
/*
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(tmp432, ATSSELcon(tmp431, 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(tmp433, ATSSELcon(tmp431, 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(tmp431) ;
/*
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(tmp434, product_164(tmp433)) ;
/*
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(tmpret430, atspre_g0int_mul_int(tmp432, tmp434)) ;
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(__atstmplab42):
/*
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(tmp431)) { 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(__atstmplab43):
/*
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(tmpret430, ATSPMVi0nt(1)) ;
ATSbranch_end()
/*
** ibranchlst-end
*/
ATScaseof_end()
ATSfunbody_end()
ATSreturn(tmpret430) ;
} /* end of [product_164] */
/*
/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_165$0(level=0)
local:
global:
*/
ATSstatic()
atstkind_t0ype(atstype_int)
totient_165(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret435, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref440, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmpref441, postiats_tyrec_0) ;
ATStmpdec(tmpref442, postiats_tyrec_0) ;
ATStmpdec(tmp460, 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_165):
/*
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(__atstmplab44):
/*
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(__atstmplab46) ; } ;
/*
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(__atstmplab45):
/*
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(tmpret435, 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(__atstmplab46):
/*
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(tmpref440) ;
*/
/*
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(tmpref440, _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(tmpref441) ;
*/
/*
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(tmpref441, postiats_tyrec_0, atslab__first, ATSPMVi0nt(1)) ;
ATSINSstore_fltrec_ofs(tmpref441, 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(tmpref442) ;
*/
/*
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(tmpref442, ATSLIB_056_prelude__stream_vt_foldleft_cloptr__168__1(tmpref440, tmpref441, ATSPMVcfunlab(1, __patsfun_172, ()))) ;
/*
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(tmp460, atspre_g0int_mul_int(arg0, ATSSELfltrec(tmpref442, 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(tmpret435, atspre_g0int_div_int(tmp460, ATSSELfltrec(tmpref442, 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(tmpret435) ;
} /* end of [totient_165] */
/*
/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_166$0(level=1)
local:
global:
*/
ATSstatic()
postiats_tyrec_0
adjust_contents_166(postiats_tyrec_0 arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret436, postiats_tyrec_0) ;
ATStmpdec(tmp437, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp438, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp439, 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_166):
/*
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(tmp438, 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(tmp437, atspre_g0int_mul_int(ATSSELfltrec(arg0, postiats_tyrec_0, atslab__first), tmp438)) ;
/*
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(tmp439, 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(tmpret436, postiats_tyrec_0, atslab__first, tmp437) ;
ATSINSstore_fltrec_ofs(tmpret436, postiats_tyrec_0, atslab__second, tmp439) ;
ATSINSmove_fltrec_end()
ATSfunbody_end()
ATSreturn(tmpret436) ;
} /* end of [adjust_contents_166] */
#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$168$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__168(atstkind_type(atstype_ptrk) arg0, atstyvar_type(res) arg1, atstype_cloptr arg2)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret443, 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(tmpret443, ATSfunclo_fun(PMVd2vfunlab(d2v=loop$4504(1), flab=loop_169$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(tmpret443) ;
} /* end of [ATSLIB_056_prelude__stream_vt_foldleft_cloptr__168] */
#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_169$0(level=1)
global: loop_169$0(level=1)
local:
global:
*/
ATSstatic()
atstyvar_type(res)
loop_169__169(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(tmpret444, atstyvar_type(res)) ;
ATStmpdec(tmpref445, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp446, atstype_boxed) ;
// ATStmpdec_void(tmp449) ;
ATStmpdec(tmp450, atstyvar_type(res)) ;
ATStmpdec(tmp451, 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_169):
/*
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(tmpref445) ;
*/
/*
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(tmpref445, 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(tmp446, tmpref445) ;
/*
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(__atstmplab47):
/*
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(tmp446)) { ATSINSgoto(__atstmplab50) ; } ;
/*
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(__atstmplab48):
/*
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(tmp449, 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(tmpret444, 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(__atstmplab49):
/*
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(tmp446)) { 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(__atstmplab50):
/*
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(tmp450, ATSfunclo_clo(ATSPMVrefarg0(arg2), (atstype_cloptr, atstyvar_type(res), atsrefarg1_type(atstyvar_type(a))), atstyvar_type(res))(ATSPMVrefarg0(arg2), arg1, ATSPMVrefarg1(ATSPMVptrof(ATSSELcon(tmp446, 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(tmp451, ATSSELcon(tmp446, 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(tmpref445) ;
/*
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, tmp451) ;
ATSINSmove_tlcal(apy1, tmp450) ;
ATSINSmove_tlcal(apy2, arg2) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSargmove_tlcal(arg2, apy2) ;
ATSINSfgoto(__patsflab_loop_169) ;
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(tmpret444) ;
} /* end of [loop_169__169] */
#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$168$1(level=1)
local:
global:
*/
ATSstatic()
/*
imparg = res(8358), a(8359)
tmparg = S2Evar(res(8358)); S2Evar(a(8359))
tmpsub = Some(res(8358) -> S2EVar(6002); a(8359) -> S2Eapp(S2Ecst(g0int_t0ype); S2Eextkind(atstype_int)))
*/
postiats_tyrec_0
ATSLIB_056_prelude__stream_vt_foldleft_cloptr__168__1(atstkind_type(atstype_ptrk) arg0, postiats_tyrec_0 arg1, atstype_cloptr arg2)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret443__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(tmpret443__1, loop_169__169__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(tmpret443__1) ;
} /* end of [ATSLIB_056_prelude__stream_vt_foldleft_cloptr__168__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_169$1(level=2)
global: loop_169$1(level=2)
local:
global:
*/
ATSstatic()
postiats_tyrec_0
loop_169__169__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(tmpret444__1, postiats_tyrec_0) ;
ATStmpdec(tmpref445__1, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp446__1, atstype_boxed) ;
// ATStmpdec_void(tmp449__1) ;
ATStmpdec(tmp450__1, postiats_tyrec_0) ;
ATStmpdec(tmp451__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_169):
/*
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(tmpref445) ;
*/
/*
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(tmpref445__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(tmp446__1, tmpref445__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(__atstmplab47):
/*
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(tmp446__1)) { ATSINSgoto(__atstmplab50) ; } ;
/*
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(__atstmplab48):
/*
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(tmp449__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(tmpret444__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(__atstmplab49):
/*
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(tmp446__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(__atstmplab50):
/*
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(tmp450__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(tmp446__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(tmp451__1, ATSSELcon(tmp446__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(tmpref445__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, tmp451__1) ;
ATSINSmove_tlcal(apy1, tmp450__1) ;
ATSINSmove_tlcal(apy2, arg2) ;
ATSINSargmove_tlcal(arg0, apy0) ;
ATSINSargmove_tlcal(arg1, apy1) ;
ATSINSargmove_tlcal(arg2, apy2) ;
ATSINSfgoto(__patsflab_loop_169) ;
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(tmpret444__1) ;
} /* end of [loop_169__169__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_166$0(level=1)
global: adjust_contents_166$0(level=1), __patsfun_172$0(level=1)
local:
global:
*/
ATSstatic()
postiats_tyrec_0
__patsfun_172(postiats_tyrec_0 arg0, atsrefarg1_type(atstkind_t0ype(atstype_int)) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret459, 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_172):
/*
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(tmpret459, adjust_contents_166(arg0, ATSderef(arg1, atstkind_t0ype(atstype_int)))) ;
ATSfunbody_end()
ATSreturn(tmpret459) ;
} /* end of [__patsfun_172] */
/*
/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_165$0(level=0)
global: totient_165$0(level=0), totient_sum$173$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(tmpret461, 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(tmpret461, loop_174(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(tmpret461) ;
} /* 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_165$0(level=0), loop_174$0(level=1)
global: totient_165$0(level=0), loop_174$0(level=1)
local:
global:
*/
ATSstatic()
atstkind_type(atstype_ptrk)
loop_174(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret462, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp463, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmpref466, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp467, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmpref468, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp473, atstkind_t0ype(atstype_int)) ;
ATStmpdec(tmp478, 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_174):
/*
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(tmp463, ATSLIB_056_prelude__lt_g1int_int__60__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(
tmp463
) 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(tmpref466) ;
*/
/*
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(tmp467, 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(tmpref466, loop_174(tmp467, 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(tmpref468) ;
*/
/*
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(tmp473, totient_165(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(tmpref468, ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__176__1(tmpref466, ATSPMVcastfn(witness, atstkind_t0ype(atstype_int), tmp473))) ;
/*
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(tmpret462, tmpref468) ;
/*
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(tmp478, totient_165(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(tmpret462, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__4(ATSPMVcastfn(witness, atstkind_t0ype(atstype_int), tmp478))) ;
} /* ATSendif */
ATSfunbody_end()
ATSreturn(tmpret462) ;
} /* end of [loop_174] */
/*
/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$60$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__60__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret130__4, atstkind_t0ype(atstype_bool)) ;
ATStmpdec(tmp131__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(tmp131__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(tmpret130__4, atspre_g1int_lt_int(arg0, tmp131__4)) ;
ATSfunbody_end()
ATSreturn(tmpret130__4) ;
} /* end of [ATSLIB_056_prelude__lt_g1int_int__60__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$176$0(level=0)
local:
global:
*/
ATSextern()
/*
imparg =
tmparg =
tmpsub = None()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__176(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret469, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp470) ;
/* 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(tmp470, 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(tmpret469, 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(tmpret469) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__176] */
#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$176$1(level=2)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__176__1(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret469__1, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp470__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(tmp470__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(tmpret469__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(tmpret469__1) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__176__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$4$4(level=2)
local:
global:
*/
ATSstatic()
/*
imparg =
tmparg =
tmpsub = Some()
*/
atstkind_type(atstype_ptrk)
ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__4(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret8__4, atstkind_type(atstype_ptrk)) ;
ATStmpdec(tmp9__4, atstkind_type(atstype_ptrk)) ;
// ATStmpdec_void(tmp10__4) ;
/* 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(tmp9__4, ATSLIB_056_prelude__ptr_alloc__1__8()) ;
/*
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(tmp10__4, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp9__4, 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(tmpret8__4, tmp9__4) ;
/*
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(tmpret8__4) ;
} /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__4__4] */
/*
/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$8(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__8()
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret2__8, 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__8, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ;
ATSfunbody_end()
ATSreturn(tmpret2__8) ;
} /* end of [ATSLIB_056_prelude__ptr_alloc__1__8] */
/*
/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_165$0(level=0)
global: totient_165$0(level=0), totient_ats$180$0(level=0)
local:
global:
*/
ATSextern()
atstkind_t0ype(atstype_int)
totient_ats(atstkind_t0ype(atstype_int) arg0)
{
/* tmpvardeclst(beg) */
ATStmpdec(tmpret479, 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(tmpret479, totient_165(arg0)) ;
ATSfunbody_end()
ATSreturn(tmpret479) ;
} /* 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_104$0(level=0)
global: exp_14$0(level=0), sqrt_int_56$0(level=0), is_prime_58$0(level=0), div_gt_zero_103$0(level=0), jacobi_104$0(level=0), jacobi_ats$181$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(tmpret480, 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(tmpret480, jacobi_104(arg0, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), arg1))) ;
ATSfunbody_end()
ATSreturn(tmpret480) ;
} /* 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_101$0(level=0)
global: primorial_gmp_101$0(level=0), primorial$182$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(tmpret481, 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(tmpret481, primorial_gmp_101(arg0)) ;
ATSfunbody_end()
ATSreturn(tmpret481) ;
} /* 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 */