/* ** ** The C code is generated by [ATS/Postiats-0-3-11] ** */ /* ** 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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/basics.dats: 1636(line=50, offs=1) -- 1675(line=50, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 1596(line=49, offs=1) -- 1635(line=49, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/pointer.dats: 1533(line=44, offs=1) -- 1572(line=44, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer_long.dats: 1602(line=49, offs=1) -- 1641(line=49, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer_size.dats: 1597(line=49, offs=1) -- 1636(line=49, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer_short.dats: 1603(line=49, offs=1) -- 1642(line=49, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/char.dats: 1610(line=48, offs=1) -- 1649(line=48, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/float.dats: 1636(line=50, offs=1) -- 1675(line=50, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/string.dats: 1631(line=50, offs=1) -- 1670(line=50, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/strptr.dats: 1629(line=50, offs=1) -- 1668(line=50, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/strptr.dats: 1691(line=54, offs=1) -- 1738(line=54, offs=48) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 1596(line=49, offs=1) -- 1635(line=49, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer_ptr.dats: 1601(line=49, offs=1) -- 1640(line=49, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer_fixed.dats: 1603(line=49, offs=1) -- 1642(line=49, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/memory.dats: 1410(line=38, offs=1) -- 1449(line=39, offs=32) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/filebas.dats: 1607(line=49, offs=1) -- 1646(line=50, offs=32) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/filebas.dats: 1669(line=54, offs=1) -- 1715(line=55, offs=39) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 1596(line=49, offs=1) -- 1635(line=49, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/filebas.dats: 1738(line=59, offs=1) -- 1783(line=60, offs=38) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/libats/libc/SATS/stdio.sats: 1950(line=69, offs=1) -- 1999(line=71, offs=34) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/filebas.dats: 1865(line=66, offs=1) -- 1912(line=66, offs=48) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/libats/libc/SATS/sys/stat.sats: 1756(line=58, offs=1) -- 1805(line=60, offs=34) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/filebas.dats: 15937(line=927, offs=1) -- 15974(line=928, offs=30) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/libats/libc/SATS/stdio.sats: 1950(line=69, offs=1) -- 1999(line=71, offs=34) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/list.dats: 1529(line=44, offs=1) -- 1568(line=45, offs=32) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/list.dats: 1569(line=46, offs=1) -- 1615(line=47, offs=39) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/unsafe.dats: 1532(line=44, offs=1) -- 1566(line=44, offs=35) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/list_vt.dats: 1538(line=44, offs=1) -- 1577(line=45, offs=32) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/list_vt.dats: 1578(line=46, offs=1) -- 1624(line=47, offs=39) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/unsafe.dats: 1532(line=44, offs=1) -- 1566(line=44, offs=35) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/SHARE/list_vt_mergesort.dats: 1546(line=44, offs=1) -- 1585(line=44, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/SHARE/list_vt_quicksort.dats: 1546(line=44, offs=1) -- 1585(line=44, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/array.dats: 1528(line=44, offs=1) -- 1567(line=45, offs=32) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/SHARE/array_bsearch.dats: 1531(line=44, offs=1) -- 1570(line=44, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/SHARE/array_quicksort.dats: 1531(line=44, offs=1) -- 1570(line=44, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/arrayptr.dats: 1532(line=44, offs=1) -- 1571(line=44, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/arrayref.dats: 1532(line=44, offs=1) -- 1571(line=44, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/matrix.dats: 1535(line=44, offs=1) -- 1574(line=44, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/matrixptr.dats: 1538(line=44, offs=1) -- 1577(line=44, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/matrixref.dats: 1538(line=44, offs=1) -- 1577(line=44, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream.dats: 1523(line=44, offs=1) -- 1562(line=44, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 1523(line=44, offs=1) -- 1562(line=44, offs=40) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/tostring.dats: 1528(line=44, offs=1) -- 1567(line=45, offs=32) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/unsafe.dats: 1532(line=44, offs=1) -- 1566(line=44, offs=35) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/checkast.dats: 1531(line=44, offs=1) -- 1570(line=45, offs=32) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1660(line=37, offs=1) -- 1700(line=38, offs=27) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1727(line=42, offs=1) -- 1759(line=42, offs=33) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1833(line=49, offs=1) -- 1867(line=49, offs=35) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1868(line=50, offs=1) -- 1908(line=50, offs=41) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1656(line=37, offs=1) -- 1696(line=39, offs=27) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/mydepies.hats: 208(line=18, offs=1) -- 248(line=19, offs=32) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1813(line=49, offs=1) -- 1845(line=49, offs=33) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1846(line=50, offs=1) -- 1881(line=50, offs=36) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1657(line=37, offs=1) -- 1689(line=37, offs=33) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1690(line=38, offs=1) -- 1724(line=38, offs=35) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1660(line=37, offs=1) -- 1700(line=38, offs=27) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1727(line=42, offs=1) -- 1759(line=42, offs=33) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1833(line=49, offs=1) -- 1867(line=49, offs=35) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_t.dats: 1868(line=50, offs=1) -- 1908(line=50, offs=41) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1656(line=37, offs=1) -- 1696(line=39, offs=27) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/mydepies.hats: 208(line=18, offs=1) -- 248(line=19, offs=32) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1813(line=49, offs=1) -- 1845(line=49, offs=33) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 1846(line=50, offs=1) -- 1881(line=50, offs=36) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1657(line=37, offs=1) -- 1689(line=37, offs=33) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/gintinf_t.dats: 1690(line=38, offs=1) -- 1724(line=38, offs=35) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_t.sats: 1805(line=48, offs=1) -- 1828(line=48, offs=24) */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/libats/libc/SATS/math.sats: 1380(line=35, offs=1) -- 1426(line=38, offs=3) */ #include \ "libats/libc/CATS/math.cats" /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/SATS/intinf_vt.sats: 1806(line=48, offs=1) -- 1829(line=48, offs=24) */ /* 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 ; typedef ATSstruct { #if(0) int contag ; #endif atstyvar_type(a) atslab__0 ; atstkind_type(atstype_ptrk) atslab__1 ; } postiats_tysum_3 ; typedef ATSstruct { #if(0) int contag ; #endif atstyvar_type(a) atslab__0 ; atstkind_type(atstype_ptrk) atslab__1 ; } postiats_tysum_4 ; /* typedefs-for-tyrecs-and-tysums(end) */ /* dynconlst-declaration(beg) */ /* dynconlst-declaration(end) */ /* dyncstlst-declaration(beg) */ ATSdyncst_mac(atspre_ptr_alloc_tsz) ATSdyncst_mac(atspre_g0int2uint_int_uint) ATSdyncst_mac(atspre_g1int_add_int) ATSdyncst_mac(atscntrb_gmp_mpz_init) ATSdyncst_mac(atscntrb_gmp_mpz_fib_uint) ATSdyncst_mac(atspre_g1int2int_int_int) ATSdyncst_mac(atspre_g1int_gt_int) ATSdyncst_mac(atspre_g1int_half_int) ATSdyncst_mac(atspre_g0int_mod_int) ATSdyncst_mac(atspre_g0int2int_int_int) ATSdyncst_mac(atspre_g0int_eq_int) ATSdyncst_mac(atspre_g0int_mul_int) ATSdyncst_mac(atspre_g1int_eq_int) ATSdyncst_mac(atscntrb_gmp_mpz_cmp_int) ATSdyncst_mac(atspre_g0int_lt_int) ATSdyncst_mac(atspre_g1int_neg_int) ATSdyncst_mac(atspre_g0int_gt_int) ATSdyncst_mac(atscntrb_gmp_mpz_init_set_mpz) ATSdyncst_mac(atscntrb_gmp_mpz_mul2_mpz) ATSdyncst_mac(atscntrb_gmp_mpz_clear) ATSdyncst_mac(atspre_ptr_free) ATSdyncst_mac(atscntrb_gmp_mpz_init_set_int) ATSdyncst_mac(atspre_g0float2int_float_int) ATSdyncst_mac(atslib_libats_libc_sqrt_float) ATSdyncst_mac(atspre_g0int2float_int_float) ATSdyncst_mac(atspre_g1int_lt_int) ATSdyncst_mac(atspre_g0int_div_int) ATSdyncst_mac(atspre_g1int_gte_int) ATSdyncst_mac(atspre_g1int_neq_int) ATSdyncst_mac(atspre_g1int_div_int) ATSdyncst_mac(atspre_lazy_vt_free) ATSdyncst_mac(atspre_cloptr_free) ATSdyncst_mac(atspre_g1int_sub_int) ATSdyncst_mac(atspre_g0int_half_int) ATSdyncst_mac(atspre_g1int_mul_int) ATSdyncst_mac(atspre_g0int_neg_int) ATSdyncst_mac(atspre_g0int_add_int) ATSdyncst_mac(atspre_g0int_neq_int) ATSdyncst_mac(atspre_g0int_sub_int) 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_int)) ; #if(0) #if(0) ATSextern() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1() ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__1() ; ATSstatic() atstkind_t0ype(atstype_int) exp_5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6(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__6__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12(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__12__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_type(atstype_ptrk) big_exp_17(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__18(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__18__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__21(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__21__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__23(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__23__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g0int_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__gt_g0int_int__27__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__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__32(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__32__1(atstkind_type(atstype_ptrk)) ; #if(0) #if(0) ATSextern() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__34(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__34__1(atsrefarg0_type(atstkind_type(atstype_ptrk))) ; ATSstatic() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__2() ; #if(0) #if(0) ATSextern() atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37(atstkind_type(atstype_ptrk)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] ATSstatic() atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37__1(atstkind_type(atstype_ptrk)) ; ATSstatic() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__34__2(atsrefarg0_type(atstkind_type(atstype_ptrk))) ; ATSstatic() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__3() ; #if(0) #if(0) ATSextern() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__41(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__41__1(atstkind_type(atstype_ptrk), atsrefarg0_type(atstkind_type(atstype_ptrk))) ; ATSstatic() atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37__2(atstkind_type(atstype_ptrk)) ; ATSstatic() atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37__3(atstkind_type(atstype_ptrk)) ; #if(0) #if(0) ATSextern() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__45(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__45__1(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__4() ; ATSstatic() atstkind_t0ype(atstype_int) sqrt_int_48(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) is_prime_51(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) loop_52(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__53(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__53__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__18__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) divides_59(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) gcd_61(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) lcm_63(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) is_coprime_65(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__6(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_type(atstype_ptrk) divisors_67(atstkind_t0ype(atstype_int)) ; ATSstatic() atstype_boxed __patsfun_68(atstype_bool) ; ATSstatic() atstype_boxed __patsfun_69(atstype_bool) ; ATSstatic() atstkind_type(atstype_ptrk) loop_70(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__71(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__71__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__7(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__75(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__75__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstype_boxed __patsfun_79(atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_80(atstkind_type(atstype_ptrk), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_81(atstype_bool) ; ATSstatic() atstype_boxed __patsfun_82(atstkind_t0ype(atstype_int), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_83(atstype_bool) ; ATSstatic() atstype_boxed __patsfun_84(atstype_bool) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__8(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstype_boxed __patsfun_86(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_87(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_type(atstype_ptrk), atstype_bool) ; ATSstatic() atstkind_type(atstype_ptrk) prime_divisors_88(atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__stream_vt_filter_cloptr__89(atstkind_type(atstype_ptrk), atstype_cloptr) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] #if(0) ATSstatic() atstkind_type(atstype_ptrk) auxmain_90__90(atstkind_type(atstype_ptrk), atstype_cloptr) ; #endif // end of [TEMPLATE] #if(0) ATSstatic() atstype_boxed auxmain_con_91__91(atstkind_type(atstype_ptrk), atstype_cloptr) ; #endif // end of [TEMPLATE] #if(0) ATSstatic() atstype_boxed __patsfun_92__92(atstkind_type(atstype_ptrk), atstype_cloptr, atstype_bool) ; #endif // end of [TEMPLATE] ATSstatic() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__stream_vt_filter_cloptr__89__1(atstkind_type(atstype_ptrk), atstype_cloptr) ; ATSstatic() atstkind_type(atstype_ptrk) auxmain_90__90__1(atstkind_type(atstype_ptrk), atstype_cloptr) ; ATSstatic() atstype_boxed auxmain_con_91__91__1(atstkind_type(atstype_ptrk), atstype_cloptr) ; ATSstatic() atstype_boxed __patsfun_92__92__1(atstkind_type(atstype_ptrk), atstype_cloptr, atstype_bool) ; ATSstatic() atstkind_t0ype(atstype_bool) __patsfun_97(atsrefarg1_type(atstkind_t0ype(atstype_int))) ; ATSstatic() atstkind_t0ype(atstype_int) div_gt_zero_98(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) exp_mod_prime_99(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__9(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) jacobi_105(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) legendre_106(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__10(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__11(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) get_multiplicity_109(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) loop_110(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__5(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__18__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__12(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) jacobi2_114(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__6(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__13(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__14(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__15(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__16(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__17(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) count_divisors_122(atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_int) ATSLIB_056_prelude__stream_vt_length__123(atstkind_type(atstype_ptrk)) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] #if(0) ATSstatic() atstkind_t0ype(atstype_int) loop_124__124(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; #endif // end of [TEMPLATE] ATSstatic() atstkind_t0ype(atstype_int) ATSLIB_056_prelude__stream_vt_length__123__1(atstkind_type(atstype_ptrk)) ; ATSstatic() atstkind_t0ype(atstype_int) loop_124__124__1(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) sum_divisors_127(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) loop_128(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__71__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__18(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__75__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__19(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) is_perfect_134(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__20(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) rip_136(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g0int_int__137(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__137__1(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__7(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__53__2(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_type(atstype_ptrk) prime_factors_142(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_type(atstype_ptrk) loop_143(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__71__3(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstype_boxed __patsfun_145(atstkind_t0ype(atstype_int), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_146(atstype_bool) ; ATSstatic() atstype_boxed __patsfun_147(atstype_bool) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__21(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__8(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstype_boxed __patsfun_150(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_151(atstkind_t0ype(atstype_int), atstype_bool) ; ATSstatic() atstype_boxed __patsfun_152(atstype_bool) ; ATSstatic() atstkind_t0ype(atstype_int) little_omega_153(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) loop_154(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__71__4(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__22(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__9(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_int) totient_158(atstkind_t0ype(atstype_int)) ; ATSstatic() postiats_tyrec_0 adjust_contents_159(postiats_tyrec_0, atstkind_t0ype(atstype_int)) ; #if(0) #if(0) ATSextern() atstyvar_type(res) ATSLIB_056_prelude__stream_vt_foldleft_cloptr__161(atstkind_type(atstype_ptrk), atstyvar_type(res), atstype_cloptr) ; #endif // end of [QUALIFIED] #endif // end of [TEMPLATE] #if(0) ATSstatic() atstyvar_type(res) loop_162__162(atstkind_type(atstype_ptrk), atstyvar_type(res), atstype_cloptr) ; #endif // end of [TEMPLATE] ATSstatic() postiats_tyrec_0 ATSLIB_056_prelude__stream_vt_foldleft_cloptr__161__1(atstkind_type(atstype_ptrk), postiats_tyrec_0, atstype_cloptr) ; ATSstatic() postiats_tyrec_0 loop_162__162__1(atstkind_type(atstype_ptrk), postiats_tyrec_0, atstype_cloptr) ; ATSstatic() postiats_tyrec_0 __patsfun_165(postiats_tyrec_0, atsrefarg1_type(atstkind_t0ype(atstype_int))) ; ATSstatic() atstkind_type(atstype_ptrk) totient_sum_166(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_type(atstype_ptrk) loop_167(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__53__3(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__169(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__169__1(atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__45__2(atstkind_t0ype(atstype_int)) ; ATSstatic() atstkind_type(atstype_ptrk) ATSLIB_056_prelude__ptr_alloc__1__5() ; #if(0) ATSextern() atstkind_t0ype(atstype_int) sum_divisors_ats(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #if(0) ATSextern() atstkind_t0ype(atstype_int) count_divisors_ats(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #if(0) ATSextern() atstkind_t0ype(atstype_int) totient_ats(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #if(0) ATSextern() atstkind_t0ype(atstype_int) little_omega_ats(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #if(0) ATSextern() atstkind_t0ype(atstype_bool) is_perfect_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) totient_sum_ats(atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] #if(0) ATSextern() atstkind_t0ype(atstype_bool) coprime_ats(atstkind_t0ype(atstype_int), atstkind_t0ype(atstype_int)) ; #endif // end of [QUALIFIED] ATSclosurerize_beg(__patsfun_68, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_68__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_68__cfun ( __patsfun_68__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_68(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_68__closureinit ( __patsfun_68__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_68__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_68__closurerize ( // argumentless ) { return __patsfun_68__closureinit(ATS_MALLOC(sizeof(__patsfun_68__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_69, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_69__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_69__cfun ( __patsfun_69__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_69(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_69__closureinit ( __patsfun_69__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_69__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_69__closurerize ( // argumentless ) { return __patsfun_69__closureinit(ATS_MALLOC(sizeof(__patsfun_69__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_79, (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_79__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_79__cfun ( __patsfun_79__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_79(p_cenv->env0, p_cenv->env1, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_79__closureinit ( __patsfun_79__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_79__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_79__closurerize ( atstkind_t0ype(atstype_int) env0, atstkind_type(atstype_ptrk) env1 ) { return __patsfun_79__closureinit(ATS_MALLOC(sizeof(__patsfun_79__closure_t0ype)), env0, env1) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_80, (atstkind_type(atstype_ptrk)), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_type(atstype_ptrk) env0 ; } __patsfun_80__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_80__cfun ( __patsfun_80__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_80(p_cenv->env0, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_80__closureinit ( __patsfun_80__closure_t0ype *p_cenv, atstkind_type(atstype_ptrk) env0 ) { p_cenv->env0 = env0 ; p_cenv->cfun = __patsfun_80__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_80__closurerize ( atstkind_type(atstype_ptrk) env0 ) { return __patsfun_80__closureinit(ATS_MALLOC(sizeof(__patsfun_80__closure_t0ype)), env0) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_81, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_81__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_81__cfun ( __patsfun_81__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_81(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_81__closureinit ( __patsfun_81__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_81__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_81__closurerize ( // argumentless ) { return __patsfun_81__closureinit(ATS_MALLOC(sizeof(__patsfun_81__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_82, (atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_t0ype(atstype_int) env0 ; } __patsfun_82__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_82__cfun ( __patsfun_82__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_82(p_cenv->env0, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_82__closureinit ( __patsfun_82__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0 ) { p_cenv->env0 = env0 ; p_cenv->cfun = __patsfun_82__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_82__closurerize ( atstkind_t0ype(atstype_int) env0 ) { return __patsfun_82__closureinit(ATS_MALLOC(sizeof(__patsfun_82__closure_t0ype)), env0) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_83, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_83__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_83__cfun ( __patsfun_83__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_83(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_83__closureinit ( __patsfun_83__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_83__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_83__closurerize ( // argumentless ) { return __patsfun_83__closureinit(ATS_MALLOC(sizeof(__patsfun_83__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() 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_86, (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_86__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_86__cfun ( __patsfun_86__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_86(p_cenv->env0, p_cenv->env1, p_cenv->env2, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_86__closureinit ( __patsfun_86__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_86__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_86__closurerize ( atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2 ) { return __patsfun_86__closureinit(ATS_MALLOC(sizeof(__patsfun_86__closure_t0ype)), env0, env1, env2) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_87, (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_87__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_87__cfun ( __patsfun_87__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_87(p_cenv->env0, p_cenv->env1, p_cenv->env2, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_87__closureinit ( __patsfun_87__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_87__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_87__closurerize ( atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2 ) { return __patsfun_87__closureinit(ATS_MALLOC(sizeof(__patsfun_87__closure_t0ype)), env0, env1, env2) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_92__92__1, (atstkind_type(atstype_ptrk), atstype_cloptr), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_type(atstype_ptrk) env0 ; atstype_cloptr env1 ; } __patsfun_92__92__1__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_92__92__1__cfun ( __patsfun_92__92__1__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_92__92__1(p_cenv->env0, p_cenv->env1, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_92__92__1__closureinit ( __patsfun_92__92__1__closure_t0ype *p_cenv, atstkind_type(atstype_ptrk) env0, atstype_cloptr env1 ) { p_cenv->env0 = env0 ; p_cenv->env1 = env1 ; p_cenv->cfun = __patsfun_92__92__1__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_92__92__1__closurerize ( atstkind_type(atstype_ptrk) env0, atstype_cloptr env1 ) { return __patsfun_92__92__1__closureinit(ATS_MALLOC(sizeof(__patsfun_92__92__1__closure_t0ype)), env0, env1) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_97, (), (atsrefarg1_type(atstkind_t0ype(atstype_int))), atstkind_t0ype(atstype_bool)) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_97__closure_t0ype ; ATSstatic() atstkind_t0ype(atstype_bool) __patsfun_97__cfun ( __patsfun_97__closure_t0ype *p_cenv, atsrefarg1_type(atstkind_t0ype(atstype_int)) 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_145, (atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_t0ype(atstype_int) env0 ; } __patsfun_145__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_145__cfun ( __patsfun_145__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_145(p_cenv->env0, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_145__closureinit ( __patsfun_145__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0 ) { p_cenv->env0 = env0 ; p_cenv->cfun = __patsfun_145__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_145__closurerize ( atstkind_t0ype(atstype_int) env0 ) { return __patsfun_145__closureinit(ATS_MALLOC(sizeof(__patsfun_145__closure_t0ype)), env0) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_146, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_146__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_146__cfun ( __patsfun_146__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_146(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_146__closureinit ( __patsfun_146__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_146__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_146__closurerize ( // argumentless ) { return __patsfun_146__closureinit(ATS_MALLOC(sizeof(__patsfun_146__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_147, (), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_147__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_147__cfun ( __patsfun_147__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_147(arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_147__closureinit ( __patsfun_147__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_147__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_147__closurerize ( // argumentless ) { return __patsfun_147__closureinit(ATS_MALLOC(sizeof(__patsfun_147__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_150, (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_150__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_150__cfun ( __patsfun_150__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_150(p_cenv->env0, p_cenv->env1, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_150__closureinit ( __patsfun_150__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_150__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_150__closurerize ( atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1 ) { return __patsfun_150__closureinit(ATS_MALLOC(sizeof(__patsfun_150__closure_t0ype)), env0, env1) ; } /* end of [closurerize] */ ATSclosurerize_end() ATSclosurerize_beg(__patsfun_151, (atstkind_t0ype(atstype_int)), (atstype_bool), atstype_boxed) typedef ATSstruct { atstype_funptr cfun ; atstkind_t0ype(atstype_int) env0 ; } __patsfun_151__closure_t0ype ; ATSstatic() atstype_boxed __patsfun_151__cfun ( __patsfun_151__closure_t0ype *p_cenv, atstype_bool arg0 ) { ATSFCreturn(__patsfun_151(p_cenv->env0, arg0)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_151__closureinit ( __patsfun_151__closure_t0ype *p_cenv, atstkind_t0ype(atstype_int) env0 ) { p_cenv->env0 = env0 ; p_cenv->cfun = __patsfun_151__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_151__closurerize ( atstkind_t0ype(atstype_int) env0 ) { return __patsfun_151__closureinit(ATS_MALLOC(sizeof(__patsfun_151__closure_t0ype)), env0) ; } /* 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_165, (), (postiats_tyrec_0, atsrefarg1_type(atstkind_t0ype(atstype_int))), postiats_tyrec_0) typedef ATSstruct { atstype_funptr cfun ; } __patsfun_165__closure_t0ype ; ATSstatic() postiats_tyrec_0 __patsfun_165__cfun ( __patsfun_165__closure_t0ype *p_cenv, postiats_tyrec_0 arg0, atsrefarg1_type(atstkind_t0ype(atstype_int)) arg1 ) { ATSFCreturn(__patsfun_165(arg0, arg1)) ; } /* end of [cfun] */ ATSstatic() atstype_cloptr __patsfun_165__closureinit ( __patsfun_165__closure_t0ype *p_cenv ) { p_cenv->cfun = __patsfun_165__cfun ; return p_cenv ; } /* end of [closureinit] */ ATSstatic() atstype_cloptr __patsfun_165__closurerize ( // argumentless ) { return __patsfun_165__closureinit(ATS_MALLOC(sizeof(__patsfun_165__closure_t0ype))) ; } /* end of [closurerize] */ ATSclosurerize_end() /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 941(line=25, offs=4) -- 1143(line=33, offs=6) */ /* local: global: fib_gmp_0$0(level=0) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) fib_gmp_0(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret0, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmpref1, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmpref4, atstkind_t0ype(atstype_uint)) ; ATStmpdec(tmp5, atstkind_t0ype(atstype_int)) ; // ATStmpdec_void(tmp6) ; // ATStmpdec_void(tmp7) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 941(line=25, offs=4) -- 1143(line=33, offs=6) */ ATSINSflab(__patsflab_fib_gmp_0): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 977(line=26, offs=3) -- 1143(line=33, offs=6) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 989(line=27, offs=9) -- 990(line=27, offs=10) */ /* ATSINStmpdec(tmpref1) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 993(line=27, offs=13) -- 1004(line=27, 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: 1013(line=28, offs=9) -- 1014(line=28, offs=10) */ /* ATSINStmpdec(tmpref4) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1028(line=28, offs=24) -- 1033(line=28, offs=29) */ ATSINSmove(tmp5, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1017(line=28, offs=13) -- 1034(line=28, offs=30) */ ATSINSmove(tmpref4, atspre_g0int2uint_int_uint(tmp5)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1048(line=29, offs=14) -- 1069(line=29, offs=35) */ ATSINSmove_void(tmp6, 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: 1083(line=30, offs=14) -- 1111(line=30, offs=42) */ ATSINSmove_void(tmp7, atscntrb_gmp_mpz_fib_uint(ATSPMVrefarg1(ATSSELrecsin(tmpref1, atstkind_type(atstype_ptrk), atslab__2)), tmpref4)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1121(line=32, offs=5) -- 1136(line=32, 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: 977(line=26, offs=3) -- 1143(line=33, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret0) ; } /* end of [fib_gmp_0] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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(4736) tmparg = S2Evar(a(4736)) 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.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/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(4736) tmparg = S2Evar(a(4736)) tmpsub = Some(a(4736) -> S2EVar(5559)) */ 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.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/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: 1320(line=38, offs=5) -- 1759(line=59, offs=10) */ /* local: exp_5$0(level=0) global: exp_5$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) exp_5(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(tmpret8, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp9, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmpref14, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref15, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp16, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp21, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref22, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp23, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp24, 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: 1320(line=38, offs=5) -- 1759(line=59, offs=10) */ ATSINSflab(__patsflab_exp_5): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1370(line=39, offs=3) -- 1759(line=59, 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: 1387(line=40, offs=7) -- 1388(line=40, offs=8) */ ATSINSlab(__atstmplab0): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1339(line=38, offs=24) -- 1340(line=38, offs=25) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab2) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1388(line=40, offs=8) -- 1388(line=40, 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: 1392(line=40, offs=12) -- 1393(line=40, offs=13) */ ATSINSmove(tmpret8, ATSPMVi0nt(0)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1401(line=41, offs=8) -- 1401(line=41, offs=8) */ ATSINSlab(__atstmplab2): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1430(line=43, offs=12) -- 1435(line=43, offs=17) */ ATSINSmove(tmp9, ATSLIB_056_prelude__gt_g1int_int__6__1(arg1, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1427(line=43, offs=9) -- 1749(line=58, offs=12) */ ATSif( tmp9 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1451(line=44, offs=11) -- 1724(line=56, offs=14) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1471(line=45, offs=17) -- 1473(line=45, offs=19) */ /* ATSINStmpdec(tmpref14) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1476(line=45, offs=22) -- 1482(line=45, offs=28) */ ATSINSmove(tmpref14, atspre_g1int_half_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1500(line=46, offs=17) -- 1502(line=46, offs=19) */ /* ATSINStmpdec(tmpref15) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1505(line=46, offs=22) -- 1510(line=46, offs=27) */ ATSINSmove(tmpref15, 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: 1539(line=48, offs=16) -- 1545(line=48, offs=22) */ ATSINSmove(tmp16, ATSLIB_056_prelude__eq_g0int_int__12__1(tmpref15, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1536(line=48, offs=13) -- 1710(line=55, offs=18) */ ATSif( tmp16 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1569(line=49, offs=19) -- 1574(line=49, offs=24) */ ATSINSmove(tmp21, atspre_g0int_mul_int(arg0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1565(line=49, offs=15) -- 1579(line=49, offs=29) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp21) ; ATSINSmove_tlcal(apy1, tmpref14) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_exp_5) ; ATStailcal_end() } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1611(line=51, offs=15) -- 1710(line=55, offs=18) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1635(line=52, offs=21) -- 1636(line=52, offs=22) */ /* ATSINStmpdec(tmpref22) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1647(line=52, offs=33) -- 1652(line=52, offs=38) */ ATSINSmove(tmp24, atspre_g0int_mul_int(arg0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1643(line=52, offs=29) -- 1657(line=52, offs=43) */ ATSINSmove(tmp23, exp_5(tmp24, tmpref14)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1639(line=52, offs=25) -- 1657(line=52, offs=43) */ ATSINSmove(tmpref22, atspre_g0int_mul_int(arg0, tmp23)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1691(line=54, offs=17) -- 1692(line=54, offs=18) */ ATSINSmove(tmpret8, tmpref22) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1611(line=51, offs=15) -- 1710(line=55, offs=18) */ /* INSletpop() */ } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1451(line=44, offs=11) -- 1724(line=56, offs=14) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1748(line=58, offs=11) -- 1749(line=58, offs=12) */ ATSINSmove(tmpret8, ATSPMVi0nt(1)) ; } /* ATSendif */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret8) ; } /* end of [exp_5] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$6$0(level=0) local: global: */ ATSextern() /* imparg = tk(4633) tmparg = S2Evar(tk(4633)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret10, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp11, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp11, PMVtmpltcst(g1int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret10, PMVtmpltcst(g1int_gt)(arg0, tmp11)) ; ATSfunbody_end() ATSreturn(tmpret10) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__6] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$6$1(level=1) local: global: */ ATSstatic() /* imparg = tk(4633) tmparg = S2Evar(tk(4633)) tmpsub = Some(tk(4633) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret10__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp11__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp11__1, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret10__1, atspre_g1int_gt_int(arg0, tmp11__1)) ; ATSfunbody_end() ATSreturn(tmpret10__1) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__6__1] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$0(level=0) local: global: */ ATSextern() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18, PMVtmpltcst(g0int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17, PMVtmpltcst(g0int_eq)(arg0, tmp18)) ; ATSfunbody_end() ATSreturn(tmpret17) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$1(level=1) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__1, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__1, atspre_g0int_eq_int(arg0, tmp18__1)) ; ATSfunbody_end() ATSreturn(tmpret17__1) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__1] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1797(line=62, offs=5) -- 2405(line=88, offs=39) */ /* local: big_exp_17$0(level=0) global: big_exp_17$0(level=0) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) big_exp_17(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(tmpret25, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp26, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp31, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp50, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmpref53, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref54, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp55, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmpref58, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmpref78, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmpref84, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmpref85, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp90) ; // ATStmpdec_void(tmp93) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1797(line=62, offs=5) -- 2405(line=88, offs=39) */ ATSINSflab(__patsflab_big_exp_17): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1860(line=63, offs=6) -- 1884(line=63, offs=30) */ ATSINSmove(tmp31, ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__21__1(ATSPMVrefarg0(arg0), ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1860(line=63, offs=6) -- 1888(line=63, offs=34) */ ATSINSmove(tmp26, ATSLIB_056_prelude__eq_g1int_int__18__1(tmp31, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1857(line=63, offs=3) -- 2405(line=88, offs=39) */ ATSif( tmp26 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1898(line=64, offs=5) -- 1899(line=64, offs=6) */ ATSINSmove(tmpret25, arg0) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1914(line=66, offs=8) -- 1919(line=66, offs=13) */ ATSINSmove(tmp50, ATSLIB_056_prelude__gt_g1int_int__6__2(arg1, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1911(line=66, offs=5) -- 2405(line=88, offs=39) */ ATSif( tmp50 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1931(line=67, offs=7) -- 2357(line=86, offs=10) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1947(line=68, offs=13) -- 1949(line=68, offs=15) */ /* ATSINStmpdec(tmpref53) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1952(line=68, offs=18) -- 1958(line=68, offs=24) */ ATSINSmove(tmpref53, atspre_g1int_half_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1972(line=69, offs=13) -- 1974(line=69, offs=15) */ /* ATSINStmpdec(tmpref54) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1977(line=69, offs=18) -- 1982(line=69, offs=23) */ ATSINSmove(tmpref54, 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: 2003(line=71, offs=12) -- 2009(line=71, offs=18) */ ATSINSmove(tmp55, ATSLIB_056_prelude__eq_g0int_int__12__2(tmpref54, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2000(line=71, offs=9) -- 2347(line=85, offs=14) */ ATSif( tmp55 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2025(line=72, offs=11) -- 2120(line=76, offs=14) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2045(line=73, offs=17) -- 2046(line=73, offs=18) */ /* ATSINStmpdec(tmpref58) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2049(line=73, offs=21) -- 2065(line=73, offs=37) */ ATSINSmove(tmpref58, ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__32__1(arg0)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2092(line=75, offs=13) -- 2106(line=75, offs=27) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmpref58) ; ATSINSmove_tlcal(apy1, tmpref53) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_big_exp_17) ; ATStailcal_end() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2025(line=72, offs=11) -- 2120(line=76, offs=14) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2144(line=78, offs=11) -- 2347(line=85, offs=14) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2164(line=79, offs=17) -- 2166(line=79, offs=19) */ /* ATSINStmpdec(tmpref78) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2169(line=79, offs=22) -- 2185(line=79, offs=38) */ ATSINSmove(tmpref78, ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__34__2(ATSPMVrefarg0(arg0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2203(line=80, offs=17) -- 2205(line=80, offs=19) */ /* ATSINStmpdec(tmpref84) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2208(line=80, offs=22) -- 2223(line=80, offs=37) */ ATSINSmove(tmpref84, big_exp_17(tmpref78, tmpref53)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2240(line=81, offs=17) -- 2241(line=81, offs=18) */ /* ATSINStmpdec(tmpref85) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2244(line=81, offs=21) -- 2270(line=81, offs=47) */ ATSINSmove(tmpref85, ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__41__1(tmpref84, ATSPMVrefarg0(arg0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2292(line=82, offs=22) -- 2305(line=82, offs=35) */ ATSINSmove_void(tmp90, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37__2(arg0)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2332(line=84, offs=13) -- 2333(line=84, offs=14) */ ATSINSmove(tmpret25, tmpref85) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2144(line=78, offs=11) -- 2347(line=85, offs=14) */ /* INSletpop() */ } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 1931(line=67, offs=7) -- 2357(line=86, offs=10) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2374(line=88, offs=8) -- 2387(line=88, offs=21) */ ATSINSmove_void(tmp93, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37__3(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2391(line=88, offs=25) -- 2404(line=88, offs=38) */ ATSINSmove(tmpret25, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__45__1(ATSPMVi0nt(1))) ; } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret25) ; } /* end of [big_exp_17] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) */ /* local: global: eq_g1int_int$18$0(level=0) local: global: */ ATSextern() /* imparg = tk(4639) tmparg = S2Evar(tk(4639)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__18(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret27, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp28, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) */ ATSINSmove(tmp28, PMVtmpltcst(g1int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) */ ATSINSmove(tmpret27, PMVtmpltcst(g1int_eq)(arg0, tmp28)) ; ATSfunbody_end() ATSreturn(tmpret27) ; } /* end of [ATSLIB_056_prelude__eq_g1int_int__18] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) */ /* local: global: eq_g1int_int$18$1(level=1) local: global: */ ATSstatic() /* imparg = tk(4639) tmparg = S2Evar(tk(4639)) tmpsub = Some(tk(4639) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__18__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret27__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp28__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) */ ATSINSmove(tmp28__1, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) */ ATSINSmove(tmpret27__1, atspre_g1int_eq_int(arg0, tmp28__1)) ; ATSfunbody_end() ATSreturn(tmpret27__1) ; } /* end of [ATSLIB_056_prelude__eq_g1int_int__18__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$21$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atstkind_t0ype(atstype_int) ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__21(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret32, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp33, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp34, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp35, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp36, 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(tmp33, 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(tmp35, PMVtmpltcst(lt_g0int_int)(tmp33, 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( tmp35 ) 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(tmp34, PMVtmpltcst(g1int_neg)(ATSPMVi0nt(1))) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 13415(line=771, offs=40) -- 13422(line=771, offs=47) */ ATSINSmove(tmp36, PMVtmpltcst(gt_g0int_int)(tmp33, 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( tmp36 ) 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(tmp34, 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(tmp34, 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(tmpret32, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp34)) ; /* 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(tmpret32) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__21] */ #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$21$1(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_t0ype(atstype_int) ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__21__1(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret32__1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp33__1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp34__1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp35__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp36__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(tmp33__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(tmp35__1, ATSLIB_056_prelude__lt_g0int_int__23__1(tmp33__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( tmp35__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(tmp34__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(tmp36__1, ATSLIB_056_prelude__gt_g0int_int__27__1(tmp33__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( tmp36__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(tmp34__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(tmp34__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(tmpret32__1, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp34__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(tmpret32__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__compare_intinf_int__21__1] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 11941(line=617, offs=3) -- 11980(line=617, offs=42) */ /* local: global: lt_g0int_int$23$0(level=0) local: global: */ ATSextern() /* imparg = tk(4620) tmparg = S2Evar(tk(4620)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g0int_int__23(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret42, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp43, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 11967(line=617, offs=29) -- 11978(line=617, offs=40) */ ATSINSmove(tmp43, PMVtmpltcst(g0int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 11950(line=617, offs=12) -- 11980(line=617, offs=42) */ ATSINSmove(tmpret42, PMVtmpltcst(g0int_lt)(arg0, tmp43)) ; ATSfunbody_end() ATSreturn(tmpret42) ; } /* end of [ATSLIB_056_prelude__lt_g0int_int__23] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 11941(line=617, offs=3) -- 11980(line=617, offs=42) */ /* local: global: lt_g0int_int$23$1(level=2) local: global: */ ATSstatic() /* imparg = tk(4620) tmparg = S2Evar(tk(4620)) tmpsub = Some(tk(4620) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g0int_int__23__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret42__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp43__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 11967(line=617, offs=29) -- 11978(line=617, offs=40) */ ATSINSmove(tmp43__1, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 11950(line=617, offs=12) -- 11980(line=617, offs=42) */ ATSINSmove(tmpret42__1, atspre_g0int_lt_int(arg0, tmp43__1)) ; ATSfunbody_end() ATSreturn(tmpret42__1) ; } /* end of [ATSLIB_056_prelude__lt_g0int_int__23__1] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12100(line=626, offs=3) -- 12139(line=626, offs=42) */ /* local: global: gt_g0int_int$27$0(level=0) local: global: */ ATSextern() /* imparg = tk(4622) tmparg = S2Evar(tk(4622)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g0int_int__27(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret46, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp47, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12126(line=626, offs=29) -- 12137(line=626, offs=40) */ ATSINSmove(tmp47, PMVtmpltcst(g0int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12109(line=626, offs=12) -- 12139(line=626, offs=42) */ ATSINSmove(tmpret46, PMVtmpltcst(g0int_gt)(arg0, tmp47)) ; ATSfunbody_end() ATSreturn(tmpret46) ; } /* end of [ATSLIB_056_prelude__gt_g0int_int__27] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12100(line=626, offs=3) -- 12139(line=626, offs=42) */ /* local: global: gt_g0int_int$27$1(level=2) local: global: */ ATSstatic() /* imparg = tk(4622) tmparg = S2Evar(tk(4622)) tmpsub = Some(tk(4622) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g0int_int__27__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret46__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp47__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12126(line=626, offs=29) -- 12137(line=626, offs=40) */ ATSINSmove(tmp47__1, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12109(line=626, offs=12) -- 12139(line=626, offs=42) */ ATSINSmove(tmpret46__1, atspre_g0int_gt_int(arg0, tmp47__1)) ; ATSfunbody_end() ATSreturn(tmpret46__1) ; } /* end of [ATSLIB_056_prelude__gt_g0int_int__27__1] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$6$2(level=1) local: global: */ ATSstatic() /* imparg = tk(4633) tmparg = S2Evar(tk(4633)) tmpsub = Some(tk(4633) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret10__2, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp11__2, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp11__2, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret10__2, atspre_g1int_gt_int(arg0, tmp11__2)) ; ATSfunbody_end() ATSreturn(tmpret10__2) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__6__2] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$2(level=1) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__2, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__2, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__2, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__2, atspre_g0int_eq_int(arg0, tmp18__2)) ; ATSfunbody_end() ATSreturn(tmpret17__2) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__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$32$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__32(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret59, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp60, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp61) ; /* 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(tmp60, 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(tmp61, 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(tmpret59, tmp60) ; /* 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(tmpret59) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__32] */ #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$32$1(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__32__1(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret59__1, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp60__1, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp61__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(tmp60__1, ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__34__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(tmp61__1, ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37__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(tmpret59__1, tmp60__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(tmpret59__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf0__32__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$34$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__34(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret65, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp66, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp67) ; // ATStmpdec_void(tmp68) ; /* 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(tmp66, PMVtmpltcst(ptr_alloc)()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4812(line=252, offs=3) -- 4849(line=252, offs=40) */ ATSINSmove_void(tmp67, atscntrb_gmp_mpz_init_set_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp66, 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(tmp68, atscntrb_gmp_mpz_mul2_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp66, 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(tmpret65, tmp66) ; /* 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(tmpret65) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__34] */ #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$34$1(level=2) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__34__1(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret65__1, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp66__1, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp67__1) ; // ATStmpdec_void(tmp68__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(tmp66__1, ATSLIB_056_prelude__ptr_alloc__1__2()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4812(line=252, offs=3) -- 4849(line=252, offs=40) */ ATSINSmove_void(tmp67__1, atscntrb_gmp_mpz_init_set_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp66__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(tmp68__1, atscntrb_gmp_mpz_mul2_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp66__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(tmpret65__1, tmp66__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(tmpret65__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__34__1] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) */ /* local: global: ptr_alloc$1$2(level=3) local: global: */ ATSstatic() /* imparg = a(4736) tmparg = S2Evar(a(4736)) tmpsub = Some(a(4736) -> 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.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) */ ATSINSmove(tmpret2__2, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; ATSfunbody_end() ATSreturn(tmpret2__2) ; } /* end of [ATSLIB_056_prelude__ptr_alloc__1__2] */ #if(0) /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2888(line=119, offs=12) -- 2987(line=122, offs=4) */ /* local: global: intinf_free$37$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ // ATStmpdec_void(tmpret74) ; // ATStmpdec_void(tmp75) ; /* 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(tmp75, 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(tmpret74, 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(tmpret74) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37] */ #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$37$1(level=2) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37__1(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ // ATStmpdec_void(tmpret74__1) ; // ATStmpdec_void(tmp75__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(tmp75__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(tmpret74__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(tmpret74__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37__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$34$2(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__34__2(atsrefarg0_type(atstkind_type(atstype_ptrk)) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret65__2, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp66__2, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp67__2) ; // ATStmpdec_void(tmp68__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(tmp66__2, ATSLIB_056_prelude__ptr_alloc__1__3()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 4812(line=252, offs=3) -- 4849(line=252, offs=40) */ ATSINSmove_void(tmp67__2, atscntrb_gmp_mpz_init_set_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp66__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(tmp68__2, atscntrb_gmp_mpz_mul2_mpz(ATSPMVrefarg1(ATSSELrecsin(tmp66__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(tmpret65__2, tmp66__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(tmpret65__2) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__square_intinf1__34__2] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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(4736) tmparg = S2Evar(a(4736)) tmpsub = Some(a(4736) -> 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.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) */ ATSINSmove(tmpret2__3, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; ATSfunbody_end() ATSreturn(tmpret2__3) ; } /* end of [ATSLIB_056_prelude__ptr_alloc__1__3] */ #if(0) /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 7761(line=437, offs=3) -- 7833(line=442, offs=2) */ /* local: global: mul_intinf0_intinf1$41$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__41(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret86, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp87) ; /* 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(tmp87, 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(tmpret86, 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(tmpret86) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__41] */ #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$41$1(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__41__1(atstkind_type(atstype_ptrk) arg0, atsrefarg0_type(atstkind_type(atstype_ptrk)) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret86__1, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp87__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(tmp87__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(tmpret86__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(tmpret86__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__mul_intinf0_intinf1__41__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$37$2(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37__2(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ // ATStmpdec_void(tmpret74__2) ; // ATStmpdec_void(tmp75__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(tmp75__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(tmpret74__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(tmpret74__2) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37__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$37$3(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atsvoid_t0ype ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37__3(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ // ATStmpdec_void(tmpret74__3) ; // ATStmpdec_void(tmp75__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(tmp75__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(tmpret74__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(tmpret74__3) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_free__37__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$45$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__45(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret96, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp97, atstkind_type(atstype_ptrk)) ; // 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: 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(tmp97, PMVtmpltcst(ptr_alloc)()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) */ ATSINSmove_void(tmp98, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp97, 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(tmpret96, tmp97) ; /* 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(tmpret96) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__45] */ #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$45$1(level=1) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__45__1(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret96__1, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp97__1, atstkind_type(atstype_ptrk)) ; // 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: 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(tmp97__1, ATSLIB_056_prelude__ptr_alloc__1__4()) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/.atspkg/contrib/atscntrb-hx-intinf/DATS/intinf_vt.dats: 2264(line=78, offs=10) -- 2296(line=78, offs=42) */ ATSINSmove_void(tmp98__1, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp97__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(tmpret96__1, tmp97__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(tmpret96__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__45__1] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) */ /* local: global: ptr_alloc$1$4(level=2) local: global: */ ATSstatic() /* imparg = a(4736) tmparg = S2Evar(a(4736)) tmpsub = Some(a(4736) -> 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.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) */ ATSINSmove(tmpret2__4, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; ATSfunbody_end() ATSreturn(tmpret2__4) ; } /* end of [ATSLIB_056_prelude__ptr_alloc__1__4] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2497(line=92, offs=4) -- 2632(line=97, offs=6) */ /* local: global: sqrt_int_48$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) sqrt_int_48(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret103, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref104, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp105, atstkind_t0ype(atstype_float)) ; ATStmpdec(tmp106, atstkind_t0ype(atstype_float)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2497(line=92, offs=4) -- 2632(line=97, offs=6) */ ATSINSflab(__patsflab_sqrt_int_48): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2543(line=93, offs=3) -- 2632(line=97, offs=6) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2555(line=94, offs=9) -- 2560(line=94, offs=14) */ /* ATSINStmpdec(tmpref104) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2586(line=94, offs=40) -- 2599(line=94, offs=53) */ ATSINSmove(tmp106, atspre_g0int2float_int_float(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2575(line=94, offs=29) -- 2601(line=94, offs=55) */ ATSINSmove(tmp105, atslib_libats_libc_sqrt_float(tmp106)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2563(line=94, offs=17) -- 2602(line=94, offs=56) */ ATSINSmove(tmpref104, atspre_g0float2int_float_int(tmp105)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2612(line=96, offs=5) -- 2625(line=96, offs=18) */ ATSINSmove(tmpret103, ATSPMVcastfn(witness, atstkind_t0ype(atstype_int), tmpref104)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2543(line=93, offs=3) -- 2632(line=97, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret103) ; } /* end of [sqrt_int_48] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2668(line=100, offs=4) -- 3249(line=123, offs=10) */ /* local: sqrt_int_48$0(level=0) global: sqrt_int_48$0(level=0), is_prime_51$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_bool) is_prime_51(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret107, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp126, 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: 2668(line=100, offs=4) -- 3249(line=123, offs=10) */ ATSINSflab(__patsflab_is_prime_51): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2704(line=101, offs=3) -- 3249(line=123, offs=10) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2721(line=102, offs=7) -- 2722(line=102, offs=8) */ ATSINSlab(__atstmplab3): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2677(line=100, offs=13) -- 2678(line=100, offs=14) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab5) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2722(line=102, offs=8) -- 2722(line=102, 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: 2726(line=102, offs=12) -- 2731(line=102, offs=17) */ ATSINSmove(tmpret107, ATSPMVbool_false()) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2739(line=103, offs=8) -- 2739(line=103, offs=8) */ ATSINSlab(__atstmplab5): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2764(line=105, offs=9) -- 3239(line=122, offs=12) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3215(line=121, offs=19) -- 3225(line=121, offs=29) */ ATSINSmove(tmp126, sqrt_int_48(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3207(line=121, offs=11) -- 3227(line=121, offs=31) */ ATSINSmove(tmpret107, loop_52(arg0, ATSPMVi0nt(2), tmp126)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2764(line=105, offs=9) -- 3239(line=122, offs=12) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret107) ; } /* end of [is_prime_51] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2782(line=106, offs=15) -- 3185(line=119, offs=21) */ /* local: loop_52$0(level=1) global: loop_52$0(level=1) local: k$5098(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: k$5098(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstkind_t0ype(atstype_bool) loop_52(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(tmpret108, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp109, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp114, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp117, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp118, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp119, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp122, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp125, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2782(line=106, offs=15) -- 3185(line=119, offs=21) */ ATSINSflab(__patsflab_loop_52): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2872(line=107, offs=16) -- 2881(line=107, offs=25) */ ATSINSmove(tmp109, ATSLIB_056_prelude__lt_g1int_int__53__1(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2869(line=107, offs=13) -- 3185(line=119, offs=21) */ ATSif( tmp109 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2904(line=108, offs=18) -- 2909(line=108, offs=23) */ ATSINSmove(tmp117, atspre_g0int_mod_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2904(line=108, offs=18) -- 2913(line=108, offs=27) */ ATSINSmove(tmp114, ATSLIB_056_prelude__eq_g0int_int__12__3(tmp117, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2901(line=108, offs=15) -- 2994(line=111, offs=35) */ ATSif( tmp114 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2935(line=109, offs=17) -- 2940(line=109, offs=22) */ ATSINSmove(tmpret108, ATSPMVbool_false()) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2981(line=111, offs=22) -- 2986(line=111, offs=27) */ ATSINSmove(tmp118, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 2976(line=111, offs=17) -- 2994(line=111, offs=35) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp118) ; ATSINSmove_tlcal(apy1, arg1) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_52) ; ATStailcal_end() } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3029(line=113, offs=18) -- 3038(line=113, offs=27) */ ATSINSmove(tmp119, ATSLIB_056_prelude__eq_g1int_int__18__2(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3026(line=113, offs=15) -- 3185(line=119, offs=21) */ ATSif( tmp119 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3063(line=114, offs=20) -- 3068(line=114, offs=25) */ ATSINSmove(tmp125, atspre_g0int_mod_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3063(line=114, offs=20) -- 3072(line=114, offs=29) */ ATSINSmove(tmp122, ATSLIB_056_prelude__eq_g0int_int__12__4(tmp125, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3060(line=114, offs=17) -- 3145(line=117, offs=23) */ ATSif( tmp122 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3096(line=115, offs=19) -- 3101(line=115, offs=24) */ ATSINSmove(tmpret108, ATSPMVbool_false()) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3141(line=117, offs=19) -- 3145(line=117, offs=23) */ ATSINSmove(tmpret108, ATSPMVbool_true()) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/numerics-internal.dats: 3181(line=119, offs=17) -- 3185(line=119, offs=21) */ ATSINSmove(tmpret108, ATSPMVbool_true()) ; } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret108) ; } /* end of [loop_52] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) */ /* local: global: lt_g1int_int$53$0(level=0) local: global: */ ATSextern() /* imparg = tk(4627) tmparg = S2Evar(tk(4627)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__53(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret110, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp111, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) */ ATSINSmove(tmp111, PMVtmpltcst(g1int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) */ ATSINSmove(tmpret110, PMVtmpltcst(g1int_lt)(arg0, tmp111)) ; ATSfunbody_end() ATSreturn(tmpret110) ; } /* end of [ATSLIB_056_prelude__lt_g1int_int__53] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) */ /* local: global: lt_g1int_int$53$1(level=2) local: global: */ ATSstatic() /* imparg = tk(4627) tmparg = S2Evar(tk(4627)) tmpsub = Some(tk(4627) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__53__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret110__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp111__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) */ ATSINSmove(tmp111__1, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) */ ATSINSmove(tmpret110__1, atspre_g1int_lt_int(arg0, tmp111__1)) ; ATSfunbody_end() ATSreturn(tmpret110__1) ; } /* end of [ATSLIB_056_prelude__lt_g1int_int__53__1] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$3(level=2) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__3, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__3, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__3, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__3, atspre_g0int_eq_int(arg0, tmp18__3)) ; ATSfunbody_end() ATSreturn(tmpret17__3) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__3] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) */ /* local: global: eq_g1int_int$18$2(level=2) local: global: */ ATSstatic() /* imparg = tk(4639) tmparg = S2Evar(tk(4639)) tmpsub = Some(tk(4639) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__18__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret27__2, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp28__2, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) */ ATSINSmove(tmp28__2, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) */ ATSINSmove(tmpret27__2, atspre_g1int_eq_int(arg0, tmp28__2)) ; ATSfunbody_end() ATSreturn(tmpret27__2) ; } /* end of [ATSLIB_056_prelude__eq_g1int_int__18__2] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$4(level=2) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__4, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__4, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__4, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__4, atspre_g0int_eq_int(arg0, tmp18__4)) ; ATSfunbody_end() ATSreturn(tmpret17__4) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__4] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 376(line=13, offs=4) -- 424(line=14, offs=12) */ /* local: global: divides_59$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_bool) divides_59(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret127, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp130, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 376(line=13, offs=4) -- 424(line=14, offs=12) */ ATSINSflab(__patsflab_divides_59): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 415(line=14, offs=3) -- 420(line=14, offs=8) */ ATSINSmove(tmp130, atspre_g0int_mod_int(arg1, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 415(line=14, offs=3) -- 424(line=14, offs=12) */ ATSINSmove(tmpret127, ATSLIB_056_prelude__eq_g0int_int__12__5(tmp130, ATSPMVi0nt(0))) ; ATSfunbody_end() ATSreturn(tmpret127) ; } /* end of [divides_59] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$5(level=1) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__5(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__5, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__5, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__5, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__5, atspre_g0int_eq_int(arg0, tmp18__5)) ; ATSfunbody_end() ATSreturn(tmpret17__5) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__5] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 452(line=17, offs=5) -- 558(line=21, offs=6) */ /* local: gcd_61$0(level=0) global: gcd_61$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) gcd_61(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(tmpret131, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp132, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp135, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 452(line=17, offs=5) -- 558(line=21, offs=6) */ ATSINSflab(__patsflab_gcd_61): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 508(line=18, offs=6) -- 513(line=18, offs=11) */ ATSINSmove(tmp132, ATSLIB_056_prelude__gt_g1int_int__6__3(arg1, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 505(line=18, offs=3) -- 558(line=21, offs=6) */ ATSif( tmp132 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 538(line=19, offs=20) -- 543(line=19, offs=25) */ ATSINSmove(tmp135, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 523(line=19, offs=5) -- 545(line=19, offs=27) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, arg1) ; ATSINSmove_tlcal(apy1, ATSPMVcastfn(witness, atstkind_t0ype(atstype_int), tmp135)) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_gcd_61) ; ATStailcal_end() } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 557(line=21, offs=5) -- 558(line=21, offs=6) */ ATSINSmove(tmpret131, arg0) ; } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret131) ; } /* end of [gcd_61] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$6$3(level=1) local: global: */ ATSstatic() /* imparg = tk(4633) tmparg = S2Evar(tk(4633)) tmpsub = Some(tk(4633) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret10__3, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp11__3, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp11__3, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret10__3, atspre_g1int_gt_int(arg0, tmp11__3)) ; ATSfunbody_end() ATSreturn(tmpret10__3) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__6__3] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 563(line=23, offs=4) -- 635(line=24, offs=22) */ /* local: gcd_61$0(level=0) global: gcd_61$0(level=0), lcm_63$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) lcm_63(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret136, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp137, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp138, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 563(line=23, offs=4) -- 635(line=24, offs=22) */ ATSINSflab(__patsflab_lcm_63): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 621(line=24, offs=8) -- 630(line=24, offs=17) */ ATSINSmove(tmp138, gcd_61(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 617(line=24, offs=4) -- 630(line=24, offs=17) */ ATSINSmove(tmp137, atspre_g0int_div_int(arg0, tmp138)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 616(line=24, offs=3) -- 635(line=24, offs=22) */ ATSINSmove(tmpret136, atspre_g0int_mul_int(tmp137, arg1)) ; ATSfunbody_end() ATSreturn(tmpret136) ; } /* end of [lcm_63] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 640(line=26, offs=4) -- 714(line=27, offs=16) */ /* local: gcd_61$0(level=0) global: gcd_61$0(level=0), is_coprime_65$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_bool) is_coprime_65(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret139, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp142, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 640(line=26, offs=4) -- 714(line=27, offs=16) */ ATSINSflab(__patsflab_is_coprime_65): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 701(line=27, offs=3) -- 710(line=27, offs=12) */ ATSINSmove(tmp142, gcd_61(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 701(line=27, offs=3) -- 714(line=27, offs=16) */ ATSINSmove(tmpret139, ATSLIB_056_prelude__eq_g0int_int__12__6(tmp142, ATSPMVi0nt(1))) ; ATSfunbody_end() ATSreturn(tmpret139) ; } /* end of [is_coprime_65] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$6(level=1) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__6(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__6, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__6, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__6, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__6, atspre_g0int_eq_int(arg0, tmp18__6)) ; ATSfunbody_end() ATSreturn(tmpret17__6) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__6] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 757(line=30, offs=4) -- 1773(line=62, offs=8) */ /* local: sqrt_int_48$0(level=0) global: sqrt_int_48$0(level=0), divisors_67$0(level=0) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) divisors_67(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret143, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 757(line=30, offs=4) -- 1773(line=62, offs=8) */ ATSINSflab(__patsflab_divisors_67): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 802(line=31, offs=3) -- 1773(line=62, offs=8) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 819(line=32, offs=7) -- 820(line=32, offs=8) */ ATSINSlab(__atstmplab6): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 766(line=30, offs=13) -- 767(line=30, offs=14) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab8) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 820(line=32, offs=8) -- 820(line=32, 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/number-theory-internal.dats: 824(line=32, offs=12) -- 874(line=32, offs=62) */ ATSINSmove_ldelay(tmpret143, atstype_boxed, ATSPMVcfunlab(1, __patsfun_68, ())) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 882(line=33, offs=8) -- 882(line=33, offs=8) */ ATSINSlab(__atstmplab8): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 886(line=33, offs=12) -- 1773(line=62, offs=8) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1755(line=61, offs=7) -- 1765(line=61, offs=17) */ ATSINSmove(tmpret143, loop_70(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 886(line=33, offs=12) -- 1773(line=62, offs=8) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret143) ; } /* end of [divisors_67] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 824(line=32, offs=12) -- 874(line=32, offs=62) */ /* local: global: __patsfun_68$0(level=1) local: global: */ ATSstatic() atstype_boxed __patsfun_68(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret144, atstype_boxed) ; ATStmpdec(tmp145, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 824(line=32, offs=12) -- 874(line=32, offs=62) */ ATSINSflab(__patsflab___patsfun_68): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 824(line=32, offs=12) -- 874(line=32, offs=62) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 850(line=32, offs=38) -- 872(line=32, offs=60) */ ATSINSmove_ldelay(tmp145, atstype_boxed, ATSPMVcfunlab(1, __patsfun_69, ())) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 832(line=32, offs=20) -- 873(line=32, offs=61) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret144, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret144, 1) ; #endif ATSINSstore_con1_ofs(tmpret144, postiats_tysum_1, atslab__0, ATSPMVi0nt(1)) ; ATSINSstore_con1_ofs(tmpret144, postiats_tysum_1, atslab__1, tmp145) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret144) ; } /* end of [__patsfun_68] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 850(line=32, offs=38) -- 872(line=32, offs=60) */ /* local: global: __patsfun_69$0(level=2) local: global: */ ATSstatic() atstype_boxed __patsfun_69(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret146, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 850(line=32, offs=38) -- 872(line=32, offs=60) */ ATSINSflab(__patsflab___patsfun_69): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 850(line=32, offs=38) -- 872(line=32, offs=60) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 858(line=32, offs=46) -- 871(line=32, offs=59) */ ATSINSmove_nil(tmpret146) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret146) ; } /* end of [__patsfun_69] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 900(line=34, offs=11) -- 1741(line=59, offs=29) */ /* local: sqrt_int_48$0(level=0), loop_70$0(level=1) global: sqrt_int_48$0(level=0), loop_70$0(level=1) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) loop_70(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(tmpret147, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp148, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp153, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp154, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp157, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp158, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp163, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref164, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp174, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp177, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref178, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp184, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 900(line=34, offs=11) -- 1741(line=59, offs=29) */ ATSINSflab(__patsflab_loop_70): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1007(line=35, offs=19) -- 1017(line=35, offs=29) */ ATSINSmove(tmp153, sqrt_int_48(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1000(line=35, offs=12) -- 1017(line=35, offs=29) */ ATSINSmove(tmp148, ATSLIB_056_prelude__gte_g1int_int__71__1(arg1, tmp153)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 997(line=35, offs=9) -- 1741(line=59, offs=29) */ ATSif( tmp148 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1037(line=36, offs=14) -- 1044(line=36, offs=21) */ ATSINSmove(tmp157, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1037(line=36, offs=14) -- 1048(line=36, offs=25) */ ATSINSmove(tmp154, ATSLIB_056_prelude__eq_g0int_int__12__7(tmp157, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1034(line=36, offs=11) -- 1481(line=50, offs=35) */ ATSif( tmp154 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1069(line=37, offs=16) -- 1076(line=37, offs=23) */ ATSINSmove(tmp163, atspre_g1int_div_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1069(line=37, offs=16) -- 1083(line=37, offs=30) */ ATSINSmove(tmp158, ATSLIB_056_prelude__neq_g1int_int__75__1(tmp163, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1066(line=37, offs=13) -- 1431(line=48, offs=18) */ ATSif( tmp158 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1103(line=38, offs=15) -- 1275(line=42, offs=18) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1127(line=39, offs=21) -- 1128(line=39, offs=22) */ /* ATSINStmpdec(tmpref164) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1136(line=39, offs=30) -- 1143(line=39, offs=37) */ ATSINSmove(tmpref164, atspre_g1int_div_int(arg0, arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1177(line=41, offs=17) -- 1257(line=41, offs=97) */ ATSINSmove_ldelay(tmpret147, atstype_boxed, ATSPMVcfunlab(1, __patsfun_79, (arg1, ATSPMVptrof(tmpref164)))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1103(line=38, offs=15) -- 1275(line=42, offs=18) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1361(line=47, offs=17) -- 1413(line=47, offs=69) */ ATSINSmove_ldelay(tmpret147, atstype_boxed, ATSPMVcfunlab(1, __patsfun_82, (arg1))) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1459(line=50, offs=13) -- 1481(line=50, offs=35) */ ATSINSmove_ldelay(tmpret147, atstype_boxed, ATSPMVcfunlab(1, __patsfun_84, ())) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1508(line=52, offs=14) -- 1515(line=52, offs=21) */ ATSINSmove(tmp177, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1508(line=52, offs=14) -- 1519(line=52, offs=25) */ ATSINSmove(tmp174, ATSLIB_056_prelude__eq_g0int_int__12__8(tmp177, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1505(line=52, offs=11) -- 1741(line=59, offs=29) */ ATSif( tmp174 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1537(line=53, offs=13) -- 1697(line=57, offs=16) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1559(line=54, offs=19) -- 1560(line=54, offs=20) */ /* ATSINStmpdec(tmpref178) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1568(line=54, offs=28) -- 1575(line=54, offs=35) */ ATSINSmove(tmpref178, atspre_g1int_div_int(arg0, arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1605(line=56, offs=15) -- 1681(line=56, offs=91) */ ATSINSmove_ldelay(tmpret147, atstype_boxed, ATSPMVcfunlab(1, __patsfun_86, (arg0, arg1, ATSPMVptrof(tmpref178)))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1537(line=53, offs=13) -- 1697(line=57, offs=16) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1733(line=59, offs=21) -- 1740(line=59, offs=28) */ ATSINSmove(tmp184, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1725(line=59, offs=13) -- 1741(line=59, offs=29) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, arg0) ; ATSINSmove_tlcal(apy1, tmp184) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_70) ; ATStailcal_end() } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret147) ; } /* end of [loop_70] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) */ /* local: global: gte_g1int_int$71$0(level=0) local: global: */ ATSextern() /* imparg = tk(4636) tmparg = S2Evar(tk(4636)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__71(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret149, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp150, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) */ ATSINSmove(tmp150, PMVtmpltcst(g1int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) */ ATSINSmove(tmpret149, PMVtmpltcst(g1int_gte)(arg0, tmp150)) ; ATSfunbody_end() ATSreturn(tmpret149) ; } /* end of [ATSLIB_056_prelude__gte_g1int_int__71] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) */ /* local: global: gte_g1int_int$71$1(level=2) local: global: */ ATSstatic() /* imparg = tk(4636) tmparg = S2Evar(tk(4636)) tmpsub = Some(tk(4636) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__71__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret149__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp150__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) */ ATSINSmove(tmp150__1, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) */ ATSINSmove(tmpret149__1, atspre_g1int_gte_int(arg0, tmp150__1)) ; ATSfunbody_end() ATSreturn(tmpret149__1) ; } /* end of [ATSLIB_056_prelude__gte_g1int_int__71__1] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$7(level=2) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__7(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__7, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__7, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__7, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__7, atspre_g0int_eq_int(arg0, tmp18__7)) ; ATSfunbody_end() ATSreturn(tmpret17__7) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__7] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12916(line=672, offs=3) -- 12956(line=672, offs=43) */ /* local: global: neq_g1int_int$75$0(level=0) local: global: */ ATSextern() /* imparg = tk(4642) tmparg = S2Evar(tk(4642)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__75(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret159, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp160, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12943(line=672, offs=30) -- 12954(line=672, offs=41) */ ATSINSmove(tmp160, PMVtmpltcst(g1int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12925(line=672, offs=12) -- 12956(line=672, offs=43) */ ATSINSmove(tmpret159, PMVtmpltcst(g1int_neq)(arg0, tmp160)) ; ATSfunbody_end() ATSreturn(tmpret159) ; } /* end of [ATSLIB_056_prelude__neq_g1int_int__75] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12916(line=672, offs=3) -- 12956(line=672, offs=43) */ /* local: global: neq_g1int_int$75$1(level=2) local: global: */ ATSstatic() /* imparg = tk(4642) tmparg = S2Evar(tk(4642)) tmpsub = Some(tk(4642) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__75__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret159__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp160__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12943(line=672, offs=30) -- 12954(line=672, offs=41) */ ATSINSmove(tmp160__1, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12925(line=672, offs=12) -- 12956(line=672, offs=43) */ ATSINSmove(tmpret159__1, atspre_g1int_neq_int(arg0, tmp160__1)) ; ATSfunbody_end() ATSreturn(tmpret159__1) ; } /* end of [ATSLIB_056_prelude__neq_g1int_int__75__1] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1177(line=41, offs=17) -- 1257(line=41, offs=97) */ /* local: global: __patsfun_79$0(level=2) local: acc$5118(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5119(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) global: acc$5118(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5119(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) */ ATSstatic() atstype_boxed __patsfun_79(atstkind_t0ype(atstype_int) env0, atstkind_type(atstype_ptrk) env1, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret165, atstype_boxed) ; ATStmpdec(tmp166, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1177(line=41, offs=17) -- 1257(line=41, offs=97) */ ATSINSflab(__patsflab___patsfun_79): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1177(line=41, offs=17) -- 1257(line=41, offs=97) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1205(line=41, offs=45) -- 1255(line=41, offs=95) */ ATSINSmove_ldelay(tmp166, atstype_boxed, ATSPMVcfunlab(1, __patsfun_80, (env1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1185(line=41, offs=25) -- 1256(line=41, offs=96) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret165, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret165, 1) ; #endif ATSINSstore_con1_ofs(tmpret165, postiats_tysum_1, atslab__0, env0) ; ATSINSstore_con1_ofs(tmpret165, postiats_tysum_1, atslab__1, tmp166) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret165) ; } /* end of [__patsfun_79] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1205(line=41, offs=45) -- 1255(line=41, offs=95) */ /* local: global: __patsfun_80$0(level=3) local: x$5119(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) global: x$5119(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) */ ATSstatic() atstype_boxed __patsfun_80(atstkind_type(atstype_ptrk) env0, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret167, atstype_boxed) ; ATStmpdec(tmp168, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1205(line=41, offs=45) -- 1255(line=41, offs=95) */ ATSINSflab(__patsflab___patsfun_80): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1205(line=41, offs=45) -- 1255(line=41, offs=95) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1231(line=41, offs=71) -- 1253(line=41, offs=93) */ ATSINSmove_ldelay(tmp168, atstype_boxed, ATSPMVcfunlab(1, __patsfun_81, ())) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1213(line=41, offs=53) -- 1254(line=41, offs=94) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret167, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret167, 1) ; #endif ATSINSstore_con1_ofs(tmpret167, postiats_tysum_1, atslab__0, ATSderef(env0, atstkind_t0ype(atstype_int))) ; ATSINSstore_con1_ofs(tmpret167, postiats_tysum_1, atslab__1, tmp168) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret167) ; } /* end of [__patsfun_80] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1231(line=41, offs=71) -- 1253(line=41, offs=93) */ /* local: global: __patsfun_81$0(level=4) local: global: */ ATSstatic() atstype_boxed __patsfun_81(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret169, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1231(line=41, offs=71) -- 1253(line=41, offs=93) */ ATSINSflab(__patsflab___patsfun_81): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1231(line=41, offs=71) -- 1253(line=41, offs=93) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1239(line=41, offs=79) -- 1252(line=41, offs=92) */ ATSINSmove_nil(tmpret169) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret169) ; } /* end of [__patsfun_81] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1361(line=47, offs=17) -- 1413(line=47, offs=69) */ /* local: global: __patsfun_82$0(level=2) local: acc$5118(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: acc$5118(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstype_boxed __patsfun_82(atstkind_t0ype(atstype_int) env0, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret170, atstype_boxed) ; ATStmpdec(tmp171, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1361(line=47, offs=17) -- 1413(line=47, offs=69) */ ATSINSflab(__patsflab___patsfun_82): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1361(line=47, offs=17) -- 1413(line=47, offs=69) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1389(line=47, offs=45) -- 1411(line=47, offs=67) */ ATSINSmove_ldelay(tmp171, atstype_boxed, ATSPMVcfunlab(1, __patsfun_83, ())) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1369(line=47, offs=25) -- 1412(line=47, offs=68) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret170, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret170, 1) ; #endif ATSINSstore_con1_ofs(tmpret170, postiats_tysum_1, atslab__0, env0) ; ATSINSstore_con1_ofs(tmpret170, postiats_tysum_1, atslab__1, tmp171) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret170) ; } /* end of [__patsfun_82] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1389(line=47, offs=45) -- 1411(line=47, offs=67) */ /* local: global: __patsfun_83$0(level=3) local: global: */ ATSstatic() atstype_boxed __patsfun_83(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret172, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1389(line=47, offs=45) -- 1411(line=47, offs=67) */ ATSINSflab(__patsflab___patsfun_83): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1389(line=47, offs=45) -- 1411(line=47, offs=67) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1397(line=47, offs=53) -- 1410(line=47, offs=66) */ ATSINSmove_nil(tmpret172) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret172) ; } /* end of [__patsfun_83] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1459(line=50, offs=13) -- 1481(line=50, offs=35) */ /* local: global: __patsfun_84$0(level=2) local: global: */ ATSstatic() atstype_boxed __patsfun_84(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret173, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1459(line=50, offs=13) -- 1481(line=50, offs=35) */ ATSINSflab(__patsflab___patsfun_84): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1459(line=50, offs=13) -- 1481(line=50, offs=35) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1467(line=50, offs=21) -- 1480(line=50, offs=34) */ ATSINSmove_nil(tmpret173) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret173) ; } /* end of [__patsfun_84] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$8(level=2) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__8(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__8, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__8, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__8, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__8, atspre_g0int_eq_int(arg0, tmp18__8)) ; ATSfunbody_end() ATSreturn(tmpret17__8) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__8] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1605(line=56, offs=15) -- 1681(line=56, offs=91) */ /* local: loop_70$0(level=1) global: loop_70$0(level=1), __patsfun_86$0(level=2) local: n$5117(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5118(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5120(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) global: n$5117(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5118(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5120(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) */ ATSstatic() atstype_boxed __patsfun_86(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret179, atstype_boxed) ; ATStmpdec(tmp180, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1605(line=56, offs=15) -- 1681(line=56, offs=91) */ ATSINSflab(__patsflab___patsfun_86): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1605(line=56, offs=15) -- 1681(line=56, offs=91) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1633(line=56, offs=43) -- 1679(line=56, offs=89) */ ATSINSmove_ldelay(tmp180, atstype_boxed, ATSPMVcfunlab(1, __patsfun_87, (env0, env1, env2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1613(line=56, offs=23) -- 1680(line=56, offs=90) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret179, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret179, 1) ; #endif ATSINSstore_con1_ofs(tmpret179, postiats_tysum_1, atslab__0, env1) ; ATSINSstore_con1_ofs(tmpret179, postiats_tysum_1, atslab__1, tmp180) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret179) ; } /* end of [__patsfun_86] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1633(line=56, offs=43) -- 1679(line=56, offs=89) */ /* local: loop_70$0(level=1) global: loop_70$0(level=1), __patsfun_87$0(level=3) local: n$5117(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5118(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5120(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) global: n$5117(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5118(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), x$5120(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))) */ ATSstatic() atstype_boxed __patsfun_87(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_type(atstype_ptrk) env2, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret181, atstype_boxed) ; ATStmpdec(tmp182, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp183, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1633(line=56, offs=43) -- 1679(line=56, offs=89) */ ATSINSflab(__patsflab___patsfun_87): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1633(line=56, offs=43) -- 1679(line=56, offs=89) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1668(line=56, offs=78) -- 1675(line=56, offs=85) */ ATSINSmove(tmp183, atspre_g1int_add_int(env1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1660(line=56, offs=70) -- 1676(line=56, offs=86) */ ATSINSmove(tmp182, loop_70(env0, tmp183)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1641(line=56, offs=51) -- 1678(line=56, offs=88) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret181, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret181, 1) ; #endif ATSINSstore_con1_ofs(tmpret181, postiats_tysum_1, atslab__0, ATSderef(env2, atstkind_t0ype(atstype_int))) ; ATSINSstore_con1_ofs(tmpret181, postiats_tysum_1, atslab__1, tmp182) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret181) ; } /* end of [__patsfun_87] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1810(line=65, offs=4) -- 1929(line=66, offs=71) */ /* local: is_prime_51$0(level=0), divisors_67$0(level=0) global: sqrt_int_48$0(level=0), is_prime_51$0(level=0), divisors_67$0(level=0), prime_divisors_88$0(level=0) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) prime_divisors_88(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret185, atstkind_type(atstype_ptrk)) ; 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-internal.dats: 1810(line=65, offs=4) -- 1929(line=66, offs=71) */ ATSINSflab(__patsflab_prime_divisors_88): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1885(line=66, offs=27) -- 1895(line=66, offs=37) */ ATSINSmove(tmp210, divisors_67(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1861(line=66, offs=3) -- 1929(line=66, offs=71) */ ATSINSmove(tmpret185, ATSLIB_056_prelude__stream_vt_filter_cloptr__89__1(tmp210, ATSPMVcfunlab(1, __patsfun_97, ()))) ; ATSfunbody_end() ATSreturn(tmpret185) ; } /* end of [prime_divisors_88] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 12936(line=777, offs=1) -- 13966(line=847, offs=2) */ /* local: global: stream_vt_filter_cloptr$89$0(level=0) local: global: */ ATSextern() /* imparg = a(8216) tmparg = S2Evar(a(8216)) tmpsub = None() */ atstkind_type(atstype_ptrk) ATSLIB_056_prelude__stream_vt_filter_cloptr__89(atstkind_type(atstype_ptrk) arg0, atstype_cloptr arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret186, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12912(line=776, offs=1) -- 13966(line=847, offs=2) */ ATSINSflab(__patsflab_stream_vt_filter_cloptr): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12953(line=779, offs=5) -- 13966(line=847, offs=2) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12953(line=779, offs=5) -- 12970(line=779, offs=22) */ ATSINSmove(tmpret186, ATSfunclo_fun(PMVd2vfunlab(d2v=auxmain$4250(1), flab=auxmain_90$0(level=1)), (atstkind_type(atstype_ptrk), atstype_cloptr), atstkind_type(atstype_ptrk))(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12953(line=779, offs=5) -- 13966(line=847, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret186) ; } /* end of [ATSLIB_056_prelude__stream_vt_filter_cloptr__89] */ #endif // end of [TEMPLATE] #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 12986(line=783, offs=1) -- 13161(line=798, offs=2) */ /* local: auxmain_con_91$0(level=1) global: auxmain_90$0(level=1), auxmain_con_91$0(level=1) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) auxmain_90__90(atstkind_type(atstype_ptrk) arg0, atstype_cloptr arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret187, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12986(line=783, offs=1) -- 13161(line=798, offs=2) */ ATSINSflab(__patsflab_auxmain_90): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13066(line=789, offs=20) -- 13161(line=798, offs=2) */ ATSINSmove_ldelay(tmpret187, atstype_boxed, ATSPMVcfunlab(1, __patsfun_92__92, (arg0, arg1))) ; ATSfunbody_end() ATSreturn(tmpret187) ; } /* end of [auxmain_90__90] */ #endif // end of [TEMPLATE] #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 13166(line=800, offs=1) -- 13936(line=845, offs=2) */ /* local: auxmain_90$0(level=1), auxmain_con_91$0(level=1) global: auxmain_90$0(level=1), auxmain_con_91$0(level=1) local: global: */ ATSstatic() atstype_boxed auxmain_con_91__91(atstkind_type(atstype_ptrk) arg0, atstype_cloptr arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_type(atstype_ptrk)) ; ATStmpdec(apy1, atstype_cloptr) ; ATStmpdec(tmpret191, atstype_boxed) ; ATStmpdec(tmp192, atstype_boxed) ; // ATStmpdec_void(tmp195) ; ATStmpdec(tmp196, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp197, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp198, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13166(line=800, offs=1) -- 13936(line=845, offs=2) */ ATSINSflab(__patsflab_auxmain_con_91): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13259(line=809, offs=1) -- 13915(line=843, offs=4) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13278(line=810, offs=16) -- 13281(line=810, offs=19) */ ATSINSmove_llazyeval(tmp192, atstype_boxed, arg0) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13288(line=813, offs=1) -- 13881(line=841, offs=6) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13306(line=814, offs=3) -- 13332(line=815, offs=12) */ ATSINSlab(__atstmplab9): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13278(line=810, offs=16) -- 13281(line=810, offs=19) */ ATSifthen(ATSCKptriscons(tmp192)) { ATSINSgoto(__atstmplab12) ; } ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13332(line=815, offs=12) -- 13332(line=815, offs=12) */ ATSINSlab(__atstmplab10): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13336(line=815, offs=16) -- 13462(line=822, offs=6) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13357(line=817, offs=5) -- 13405(line=818, offs=37) */ ATSINSmove_void(tmp195, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), arg1))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13435(line=821, offs=5) -- 13448(line=821, offs=18) */ ATSINSmove_nil(tmpret191) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13336(line=815, offs=16) -- 13462(line=822, offs=6) */ /* INSletpop() */ ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13491(line=823, offs=3) -- 13520(line=824, offs=14) */ ATSINSlab(__atstmplab11): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13278(line=810, offs=16) -- 13281(line=810, offs=19) */ #if(0) ATSifthen(ATSCKptrisnull(tmp192)) { ATSINSdeadcode_fail() ; } ; #endif /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13520(line=824, offs=14) -- 13520(line=824, offs=14) */ ATSINSlab(__atstmplab12): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13524(line=824, offs=18) -- 13881(line=841, offs=6) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13543(line=825, offs=16) -- 13550(line=825, offs=23) */ ATSINSmove(tmp196, ATSfunclo_clo(ATSPMVrefarg0(arg1), (atstype_cloptr, atsrefarg1_type(atstyvar_type(a))), atstkind_t0ype(atstype_bool))(ATSPMVrefarg0(arg1), ATSPMVrefarg1(ATSPMVptrof(ATSSELcon(tmp192, postiats_tysum_2, atslab__0))))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13561(line=827, offs=5) -- 13836(line=839, offs=8) */ ATSif( tmp196 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13580(line=828, offs=12) -- 13693(line=833, offs=8) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13633(line=831, offs=16) -- 13651(line=831, offs=34) */ ATSINSmove(tmp197, ATSfunclo_fun(PMVd2vfunlab(d2v=auxmain$4250(1), flab=auxmain_90$0(level=1)), (atstkind_type(atstype_ptrk), atstype_cloptr), atstkind_type(atstype_ptrk))(ATSSELcon(tmp192, postiats_tysum_2, atslab__1), arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13626(line=831, offs=9) -- 13651(line=831, offs=34) */ ATSINSstore(ATSSELcon(tmp192, postiats_tysum_2, atslab__1), tmp197) ; /* (*nothing*) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13580(line=828, offs=12) -- 13586(line=828, offs=18) */ ATSINSmove(tmpret191, tmp192) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13580(line=828, offs=12) -- 13693(line=833, offs=8) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13731(line=835, offs=7) -- 13836(line=839, offs=8) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13786(line=837, offs=19) -- 13789(line=837, offs=22) */ ATSINSmove(tmp198, ATSSELcon(tmp192, postiats_tysum_2, atslab__1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13812(line=838, offs=23) -- 13827(line=838, offs=38) */ ATSINSfreecon(tmp192) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13731(line=835, offs=7) -- 13753(line=835, offs=29) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp198) ; ATSINSmove_tlcal(apy1, arg1) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_auxmain_con_91) ; ATStailcal_end() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13731(line=835, offs=7) -- 13836(line=839, offs=8) */ /* INSletpop() */ } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13524(line=824, offs=18) -- 13881(line=841, offs=6) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13259(line=809, offs=1) -- 13915(line=843, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret191) ; } /* end of [auxmain_con_91__91] */ #endif // end of [TEMPLATE] #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 13066(line=789, offs=20) -- 13161(line=798, offs=2) */ /* local: auxmain_con_91$0(level=1) global: auxmain_con_91$0(level=1), __patsfun_92$0(level=2) local: xs$4252(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))), pred$4253(2)(HSEfun(CLO(1); HSErefarg(1; HSEtyvar(a(8216))); HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_bool))))) global: xs$4252(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))), pred$4253(2)(HSEfun(CLO(1); HSErefarg(1; HSEtyvar(a(8216))); HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_bool))))) */ ATSstatic() atstype_boxed __patsfun_92__92(atstkind_type(atstype_ptrk) env0, atstype_cloptr env1, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret188, atstype_boxed) ; // ATStmpdec_void(tmp189) ; // ATStmpdec_void(tmp190) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13066(line=789, offs=20) -- 13161(line=798, offs=2) */ ATSINSflab(__patsflab___patsfun_92): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13066(line=789, offs=20) -- 13161(line=798, offs=2) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13078(line=791, offs=3) -- 13099(line=791, offs=24) */ ATSINSmove(tmpret188, ATSfunclo_fun(PMVd2vfunlab(d2v=auxmain_con$4251(1), flab=auxmain_con_91$0(level=1)), (atstkind_type(atstype_ptrk), atstype_cloptr), atstype_boxed)(env0, env1)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13106(line=794, offs=3) -- 13109(line=794, offs=6) */ ATSINSmove_void(tmp189, atspre_lazy_vt_free(env0)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13113(line=795, offs=3) -- 13157(line=796, offs=33) */ ATSINSmove_void(tmp190, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), env1))) ; } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret188) ; } /* end of [__patsfun_92__92] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 12936(line=777, offs=1) -- 13966(line=847, offs=2) */ /* local: global: stream_vt_filter_cloptr$89$1(level=1) local: global: */ ATSstatic() /* imparg = a(8216) tmparg = S2Evar(a(8216)) tmpsub = Some(a(8216) -> S2Eapp(S2Ecst(g0int_t0ype); S2Eextkind(atstype_int))) */ atstkind_type(atstype_ptrk) ATSLIB_056_prelude__stream_vt_filter_cloptr__89__1(atstkind_type(atstype_ptrk) arg0, atstype_cloptr arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret186__1, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12912(line=776, offs=1) -- 13966(line=847, offs=2) */ ATSINSflab(__patsflab_stream_vt_filter_cloptr): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12953(line=779, offs=5) -- 13966(line=847, offs=2) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12953(line=779, offs=5) -- 12970(line=779, offs=22) */ ATSINSmove(tmpret186__1, auxmain_90__90__1(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12953(line=779, offs=5) -- 13966(line=847, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret186__1) ; } /* end of [ATSLIB_056_prelude__stream_vt_filter_cloptr__89__1] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 12986(line=783, offs=1) -- 13161(line=798, offs=2) */ /* local: auxmain_con_91$1(level=2) global: auxmain_90$1(level=2), auxmain_con_91$1(level=2) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) auxmain_90__90__1(atstkind_type(atstype_ptrk) arg0, atstype_cloptr arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret187__1, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 12986(line=783, offs=1) -- 13161(line=798, offs=2) */ ATSINSflab(__patsflab_auxmain_90): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13066(line=789, offs=20) -- 13161(line=798, offs=2) */ ATSINSmove_ldelay(tmpret187__1, atstype_boxed, ATSPMVcfunlab(1, __patsfun_92__92__1, (arg0, arg1))) ; ATSfunbody_end() ATSreturn(tmpret187__1) ; } /* end of [auxmain_90__90__1] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 13166(line=800, offs=1) -- 13936(line=845, offs=2) */ /* local: auxmain_90$1(level=2), auxmain_con_91$1(level=2) global: auxmain_90$1(level=2), auxmain_con_91$1(level=2) local: global: */ ATSstatic() atstype_boxed auxmain_con_91__91__1(atstkind_type(atstype_ptrk) arg0, atstype_cloptr arg1) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_type(atstype_ptrk)) ; ATStmpdec(apy1, atstype_cloptr) ; ATStmpdec(tmpret191__1, atstype_boxed) ; ATStmpdec(tmp192__1, atstype_boxed) ; // ATStmpdec_void(tmp195__1) ; ATStmpdec(tmp196__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp197__1, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp198__1, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13166(line=800, offs=1) -- 13936(line=845, offs=2) */ ATSINSflab(__patsflab_auxmain_con_91): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13259(line=809, offs=1) -- 13915(line=843, offs=4) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13278(line=810, offs=16) -- 13281(line=810, offs=19) */ ATSINSmove_llazyeval(tmp192__1, atstype_boxed, arg0) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13288(line=813, offs=1) -- 13881(line=841, offs=6) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13306(line=814, offs=3) -- 13332(line=815, offs=12) */ ATSINSlab(__atstmplab9): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13278(line=810, offs=16) -- 13281(line=810, offs=19) */ ATSifthen(ATSCKptriscons(tmp192__1)) { ATSINSgoto(__atstmplab12) ; } ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13332(line=815, offs=12) -- 13332(line=815, offs=12) */ ATSINSlab(__atstmplab10): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13336(line=815, offs=16) -- 13462(line=822, offs=6) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13357(line=817, offs=5) -- 13405(line=818, offs=37) */ ATSINSmove_void(tmp195__1, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), arg1))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13435(line=821, offs=5) -- 13448(line=821, offs=18) */ ATSINSmove_nil(tmpret191__1) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13336(line=815, offs=16) -- 13462(line=822, offs=6) */ /* INSletpop() */ ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13491(line=823, offs=3) -- 13520(line=824, offs=14) */ ATSINSlab(__atstmplab11): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13278(line=810, offs=16) -- 13281(line=810, offs=19) */ #if(0) ATSifthen(ATSCKptrisnull(tmp192__1)) { ATSINSdeadcode_fail() ; } ; #endif /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13520(line=824, offs=14) -- 13520(line=824, offs=14) */ ATSINSlab(__atstmplab12): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13524(line=824, offs=18) -- 13881(line=841, offs=6) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13543(line=825, offs=16) -- 13550(line=825, offs=23) */ ATSINSmove(tmp196__1, ATSfunclo_clo(ATSPMVrefarg0(arg1), (atstype_cloptr, atsrefarg1_type(atstkind_t0ype(atstype_int))), atstkind_t0ype(atstype_bool))(ATSPMVrefarg0(arg1), ATSPMVrefarg1(ATSPMVptrof(ATSSELcon(tmp192__1, postiats_tysum_1, atslab__0))))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13561(line=827, offs=5) -- 13836(line=839, offs=8) */ ATSif( tmp196__1 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13580(line=828, offs=12) -- 13693(line=833, offs=8) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13633(line=831, offs=16) -- 13651(line=831, offs=34) */ ATSINSmove(tmp197__1, auxmain_90__90__1(ATSSELcon(tmp192__1, postiats_tysum_1, atslab__1), arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13626(line=831, offs=9) -- 13651(line=831, offs=34) */ ATSINSstore(ATSSELcon(tmp192__1, postiats_tysum_1, atslab__1), tmp197__1) ; /* (*nothing*) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13580(line=828, offs=12) -- 13586(line=828, offs=18) */ ATSINSmove(tmpret191__1, tmp192__1) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13580(line=828, offs=12) -- 13693(line=833, offs=8) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13731(line=835, offs=7) -- 13836(line=839, offs=8) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13786(line=837, offs=19) -- 13789(line=837, offs=22) */ ATSINSmove(tmp198__1, ATSSELcon(tmp192__1, postiats_tysum_1, atslab__1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13812(line=838, offs=23) -- 13827(line=838, offs=38) */ ATSINSfreecon(tmp192__1) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13731(line=835, offs=7) -- 13753(line=835, offs=29) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp198__1) ; ATSINSmove_tlcal(apy1, arg1) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_auxmain_con_91) ; ATStailcal_end() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13731(line=835, offs=7) -- 13836(line=839, offs=8) */ /* INSletpop() */ } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13524(line=824, offs=18) -- 13881(line=841, offs=6) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13259(line=809, offs=1) -- 13915(line=843, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret191__1) ; } /* end of [auxmain_con_91__91__1] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 13066(line=789, offs=20) -- 13161(line=798, offs=2) */ /* local: auxmain_con_91$1(level=2) global: auxmain_con_91$1(level=2), __patsfun_92$1(level=3) local: xs$4252(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))), pred$4253(2)(HSEfun(CLO(1); HSErefarg(1; HSEs2exp(S2Eapp(S2Ecst(g0int_t0ype); S2Eextkind(atstype_int)))); HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_bool))))) global: xs$4252(2)(HSEapp(HSEcst(atstkind_type); HSEs2exp(S2Eextkind(atstype_ptrk)))), pred$4253(2)(HSEfun(CLO(1); HSErefarg(1; HSEs2exp(S2Eapp(S2Ecst(g0int_t0ype); S2Eextkind(atstype_int)))); HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_bool))))) */ ATSstatic() atstype_boxed __patsfun_92__92__1(atstkind_type(atstype_ptrk) env0, atstype_cloptr env1, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret188__1, atstype_boxed) ; // ATStmpdec_void(tmp189__1) ; // ATStmpdec_void(tmp190__1) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13066(line=789, offs=20) -- 13161(line=798, offs=2) */ ATSINSflab(__patsflab___patsfun_92): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13066(line=789, offs=20) -- 13161(line=798, offs=2) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13078(line=791, offs=3) -- 13099(line=791, offs=24) */ ATSINSmove(tmpret188__1, auxmain_con_91__91__1(env0, env1)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13106(line=794, offs=3) -- 13109(line=794, offs=6) */ ATSINSmove_void(tmp189__1, atspre_lazy_vt_free(env0)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 13113(line=795, offs=3) -- 13157(line=796, offs=33) */ ATSINSmove_void(tmp190__1, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), env1))) ; } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret188__1) ; } /* end of [__patsfun_92__92__1] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1898(line=66, offs=40) -- 1928(line=66, offs=70) */ /* local: is_prime_51$0(level=0) global: is_prime_51$0(level=0), __patsfun_97$0(level=1) local: global: */ ATSstatic() atstkind_t0ype(atstype_bool) __patsfun_97(atsrefarg1_type(atstkind_t0ype(atstype_int)) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret211, atstkind_t0ype(atstype_bool)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1898(line=66, offs=40) -- 1928(line=66, offs=70) */ ATSINSflab(__patsflab___patsfun_97): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1907(line=66, offs=49) -- 1928(line=66, offs=70) */ ATSINSmove(tmpret211, is_prime_51(ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), ATSderef(arg0, atstkind_t0ype(atstype_int))))) ; ATSfunbody_end() ATSreturn(tmpret211) ; } /* end of [__patsfun_97] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1969(line=69, offs=4) -- 2041(line=70, offs=18) */ /* local: global: div_gt_zero_98$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) div_gt_zero_98(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret212, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp213, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 1969(line=69, offs=4) -- 2041(line=70, offs=18) */ ATSINSflab(__patsflab_div_gt_zero_98): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2035(line=70, offs=12) -- 2040(line=70, offs=17) */ ATSINSmove(tmp213, atspre_g1int_div_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2026(line=70, offs=3) -- 2041(line=70, offs=18) */ ATSINSmove(tmpret212, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp213)) ; ATSfunbody_end() ATSreturn(tmpret212) ; } /* end of [div_gt_zero_98] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2079(line=73, offs=5) -- 2742(line=100, offs=6) */ /* local: exp_mod_prime_99$0(level=0) global: exp_mod_prime_99$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) exp_mod_prime_99(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(tmpret214, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref215, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref216, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp217, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp218, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmpref221, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp222, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref223, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref224, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp225, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp226, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp227, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmpref230, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp231, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2079(line=73, offs=5) -- 2742(line=100, offs=6) */ ATSINSflab(__patsflab_exp_mod_prime_99): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2147(line=74, offs=3) -- 2742(line=100, offs=6) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2159(line=75, offs=9) -- 2161(line=75, offs=11) */ /* ATSINStmpdec(tmpref215) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2164(line=75, offs=14) -- 2169(line=75, offs=19) */ ATSINSmove(tmpref215, atspre_g0int_mod_int(arg0, arg2)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2178(line=76, offs=9) -- 2180(line=76, offs=11) */ /* ATSINStmpdec(tmpref216) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2188(line=76, offs=19) -- 2193(line=76, offs=24) */ ATSINSmove(tmp217, atspre_g1int_sub_int(arg2, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2183(line=76, offs=14) -- 2194(line=76, offs=25) */ ATSINSmove(tmpref216, atspre_g0int_mod_int(arg1, tmp217)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2204(line=78, offs=5) -- 2736(line=99, offs=12) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2223(line=79, offs=9) -- 2224(line=79, offs=10) */ ATSINSlab(__atstmplab13): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2093(line=73, offs=19) -- 2094(line=73, offs=20) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab15) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2224(line=79, offs=10) -- 2224(line=79, offs=10) */ ATSINSlab(__atstmplab14): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2228(line=79, offs=14) -- 2229(line=79, offs=15) */ ATSINSmove(tmpret214, ATSPMVi0nt(0)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2239(line=80, offs=10) -- 2239(line=80, offs=10) */ 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-internal.dats: 2272(line=82, offs=14) -- 2277(line=82, offs=19) */ ATSINSmove(tmp218, ATSLIB_056_prelude__gt_g1int_int__6__4(arg1, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2269(line=82, offs=11) -- 2724(line=98, offs=14) */ ATSif( tmp218 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2295(line=83, offs=13) -- 2695(line=96, offs=16) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2317(line=84, offs=19) -- 2319(line=84, offs=21) */ /* ATSINStmpdec(tmpref221) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2342(line=84, offs=44) -- 2349(line=84, offs=51) */ ATSINSmove(tmp222, atspre_g0int_half_int(tmpref216)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2333(line=84, offs=35) -- 2351(line=84, offs=53) */ ATSINSmove(tmpref221, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp222)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2370(line=85, offs=19) -- 2372(line=85, offs=21) */ /* ATSINStmpdec(tmpref223) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2375(line=85, offs=24) -- 2381(line=85, offs=30) */ ATSINSmove(tmpref223, atspre_g0int_mod_int(tmpref216, ATSPMVi0nt(2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2400(line=86, offs=19) -- 2404(line=86, offs=23) */ /* ATSINStmpdec(tmpref224) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2427(line=86, offs=46) -- 2432(line=86, offs=51) */ ATSINSmove(tmp226, atspre_g1int_mul_int(arg0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2427(line=86, offs=46) -- 2436(line=86, offs=55) */ ATSINSmove(tmp225, atspre_g0int_mod_int(tmp226, arg2)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2418(line=86, offs=37) -- 2437(line=86, offs=56) */ ATSINSmove(tmpref224, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp225)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2470(line=88, offs=18) -- 2476(line=88, offs=24) */ ATSINSmove(tmp227, ATSLIB_056_prelude__eq_g0int_int__12__9(tmpref223, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2467(line=88, offs=15) -- 2679(line=95, offs=20) */ ATSif( tmp227 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2498(line=89, offs=17) -- 2524(line=89, offs=43) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmpref224) ; ATSINSmove_tlcal(apy1, tmpref221) ; ATSINSmove_tlcal(apy2, arg2) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSargmove_tlcal(arg2, apy2) ; ATSINSfgoto(__patsflab_exp_mod_prime_99) ; ATStailcal_end() } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2560(line=91, offs=17) -- 2679(line=95, offs=20) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2586(line=92, offs=23) -- 2587(line=92, offs=24) */ /* ATSINStmpdec(tmpref230) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2594(line=92, offs=31) -- 2620(line=92, offs=57) */ ATSINSmove(tmp231, exp_mod_prime_99(tmpref224, tmpref221, arg2)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2590(line=92, offs=27) -- 2620(line=92, offs=57) */ ATSINSmove(tmpref230, atspre_g0int_mul_int(arg0, tmp231)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2658(line=94, offs=19) -- 2659(line=94, offs=20) */ ATSINSmove(tmpret214, tmpref230) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2560(line=91, offs=17) -- 2679(line=95, offs=20) */ /* INSletpop() */ } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2295(line=83, offs=13) -- 2695(line=96, offs=16) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2723(line=98, offs=13) -- 2724(line=98, offs=14) */ ATSINSmove(tmpret214, 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-internal.dats: 2147(line=74, offs=3) -- 2742(line=100, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret214) ; } /* end of [exp_mod_prime_99] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$6$4(level=1) local: global: */ ATSstatic() /* imparg = tk(4633) tmparg = S2Evar(tk(4633)) tmpsub = Some(tk(4633) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret10__4, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp11__4, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp11__4, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret10__4, atspre_g1int_gt_int(arg0, tmp11__4)) ; ATSfunbody_end() ATSreturn(tmpret10__4) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__6__4] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$9(level=1) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__9(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__9, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__9, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__9, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__9, atspre_g0int_eq_int(arg0, tmp18__9)) ; ATSfunbody_end() ATSreturn(tmpret17__9) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__9] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2861(line=104, offs=5) -- 3788(line=137, offs=6) */ /* local: exp_5$0(level=0), is_prime_51$0(level=0), div_gt_zero_98$0(level=0), exp_mod_prime_99$0(level=0) global: exp_5$0(level=0), sqrt_int_48$0(level=0), is_prime_51$0(level=0), div_gt_zero_98$0(level=0), exp_mod_prime_99$0(level=0), jacobi_105$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) jacobi_105(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret232, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2861(line=104, offs=5) -- 3788(line=137, offs=6) */ ATSINSflab(__patsflab_jacobi_105): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2902(line=105, offs=3) -- 3788(line=137, offs=6) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3775(line=136, offs=5) -- 3782(line=136, offs=12) */ ATSINSmove(tmpret232, loop_110(arg0, arg1, ATSPMVi0nt(2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2902(line=105, offs=3) -- 3788(line=137, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret232) ; } /* end of [jacobi_105] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2955(line=107, offs=9) -- 3282(line=117, offs=12) */ /* local: exp_mod_prime_99$0(level=0) global: exp_mod_prime_99$0(level=0), legendre_106$0(level=1) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) legendre_106(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret233, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp234, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref235, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp236, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp237, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp238, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp239, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp242, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp243, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp244, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp247, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 2955(line=107, offs=9) -- 3282(line=117, offs=12) */ ATSINSflab(__patsflab_legendre_106): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3043(line=108, offs=13) -- 3048(line=108, offs=18) */ ATSINSmove(tmp234, atspre_g0int_mod_int(arg1, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3037(line=108, offs=7) -- 3282(line=117, offs=12) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3062(line=109, offs=11) -- 3063(line=109, offs=12) */ ATSINSlab(__atstmplab16): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3043(line=108, offs=13) -- 3048(line=108, offs=18) */ ATSifnthen(ATSCKpat_int(tmp234, ATSPMVint(0))) { ATSINSgoto(__atstmplab18) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3063(line=109, offs=12) -- 3063(line=109, offs=12) */ ATSINSlab(__atstmplab17): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3067(line=109, offs=16) -- 3068(line=109, offs=17) */ ATSINSmove(tmpret233, ATSPMVi0nt(0)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3080(line=110, offs=12) -- 3080(line=110, 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-internal.dats: 3084(line=110, offs=16) -- 3282(line=117, offs=12) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3102(line=111, offs=15) -- 3103(line=111, offs=16) */ /* ATSINStmpdec(tmpref235) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3124(line=111, offs=37) -- 3129(line=111, offs=42) */ ATSINSmove(tmp237, atspre_g1int_sub_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3123(line=111, offs=36) -- 3134(line=111, offs=47) */ ATSINSmove(tmp236, atspre_g1int_div_int(tmp237, ATSPMVi0nt(2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3106(line=111, offs=19) -- 3138(line=111, offs=51) */ ATSINSmove(tmpref235, exp_mod_prime_99(arg0, tmp236, arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3166(line=113, offs=17) -- 3167(line=113, offs=18) */ ATSINSmove(tmp238, tmpref235) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3160(line=113, offs=11) -- 3270(line=116, offs=21) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3186(line=114, offs=16) -- 3186(line=114, offs=16) */ ATSINSlab(__atstmplab19): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-guard: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3197(line=114, offs=27) -- 3202(line=114, offs=32) */ ATSINSmove(tmp243, atspre_g1int_sub_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3192(line=114, offs=22) -- 3203(line=114, offs=33) */ ATSINSmove(tmp242, atspre_g0int_mod_int(tmp238, tmp243)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3192(line=114, offs=22) -- 3207(line=114, offs=37) */ ATSINSmove(tmp239, ATSLIB_056_prelude__eq_g0int_int__12__10(tmp242, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3192(line=114, offs=22) -- 3207(line=114, offs=37) */ ATSifnthen(ATSCKpat_bool(tmp239, ATSPMVbool_true())) { ATSINSgoto(__atstmplab20) ; } ; /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3211(line=114, offs=41) -- 3213(line=114, offs=43) */ ATSINSmove(tmpret233, 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-internal.dats: 3229(line=115, offs=16) -- 3229(line=115, offs=16) */ ATSINSlab(__atstmplab20): /* 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-internal.dats: 3235(line=115, offs=22) -- 3240(line=115, offs=27) */ ATSINSmove(tmp247, atspre_g0int_mod_int(tmp238, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3235(line=115, offs=22) -- 3244(line=115, offs=31) */ ATSINSmove(tmp244, ATSLIB_056_prelude__eq_g0int_int__12__11(tmp247, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3235(line=115, offs=22) -- 3244(line=115, offs=31) */ ATSifnthen(ATSCKpat_bool(tmp244, ATSPMVbool_true())) { ATSINSgoto(__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-internal.dats: 3248(line=115, offs=35) -- 3249(line=115, offs=36) */ ATSINSmove(tmpret233, ATSPMVi0nt(0)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3265(line=116, offs=16) -- 3265(line=116, offs=16) */ 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-internal.dats: 3269(line=116, offs=20) -- 3270(line=116, offs=21) */ ATSINSmove(tmpret233, ATSPMVi0nt(1)) ; ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3084(line=110, offs=16) -- 3282(line=117, offs=12) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret233) ; } /* end of [legendre_106] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$10(level=2) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__10(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__10, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__10, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__10, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__10, atspre_g0int_eq_int(arg0, tmp18__10)) ; ATSfunbody_end() ATSreturn(tmpret17__10) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__10] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$11(level=2) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__11(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__11, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__11, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__11, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__11, atspre_g0int_eq_int(arg0, tmp18__11)) ; ATSfunbody_end() ATSreturn(tmpret17__11) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__11] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3296(line=119, offs=9) -- 3451(line=122, offs=17) */ /* local: div_gt_zero_98$0(level=0), get_multiplicity_109$0(level=1) global: div_gt_zero_98$0(level=0), get_multiplicity_109$0(level=1) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) get_multiplicity_109(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret248, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp249, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp250, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp251, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3296(line=119, offs=9) -- 3451(line=122, offs=17) */ ATSINSflab(__patsflab_get_multiplicity_109): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3368(line=120, offs=13) -- 3373(line=120, offs=18) */ ATSINSmove(tmp249, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3362(line=120, offs=7) -- 3451(line=122, offs=17) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3387(line=121, offs=11) -- 3388(line=121, offs=12) */ ATSINSlab(__atstmplab22): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3368(line=120, offs=13) -- 3373(line=120, offs=18) */ ATSifnthen(ATSCKpat_int(tmp249, ATSPMVint(0))) { ATSINSgoto(__atstmplab24) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3388(line=121, offs=12) -- 3388(line=121, offs=12) */ ATSINSlab(__atstmplab23): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3413(line=121, offs=37) -- 3430(line=121, offs=54) */ ATSINSmove(tmp251, div_gt_zero_98(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3396(line=121, offs=20) -- 3434(line=121, offs=58) */ ATSINSmove(tmp250, get_multiplicity_109(tmp251, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3392(line=121, offs=16) -- 3434(line=121, offs=58) */ ATSINSmove(tmpret248, atspre_g1int_add_int(ATSPMVi0nt(1), tmp250)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3446(line=122, offs=12) -- 3446(line=122, offs=12) */ ATSINSlab(__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-internal.dats: 3450(line=122, offs=16) -- 3451(line=122, offs=17) */ ATSINSmove(tmpret248, ATSPMVi0nt(0)) ; ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret248) ; } /* end of [get_multiplicity_109] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3465(line=124, offs=9) -- 3765(line=134, offs=26) */ /* local: exp_5$0(level=0), is_prime_51$0(level=0), legendre_106$0(level=1), get_multiplicity_109$0(level=1), loop_110$0(level=1) global: exp_5$0(level=0), is_prime_51$0(level=0), div_gt_zero_98$0(level=0), exp_mod_prime_99$0(level=0), legendre_106$0(level=1), get_multiplicity_109$0(level=1), loop_110$0(level=1) local: a$5139(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), n$5140(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: a$5139(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), n$5140(1)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstkind_t0ype(atstype_int) loop_110(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(apy0, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpret252, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp253, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp256, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp259, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp260, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp263, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp264, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp265, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp266, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp267, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp268, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp269, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3465(line=124, offs=9) -- 3765(line=134, offs=26) */ ATSINSflab(__patsflab_loop_110): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3521(line=125, offs=10) -- 3528(line=125, offs=17) */ ATSINSmove(tmp253, ATSLIB_056_prelude__gt_g1int_int__6__5(arg0, env1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3518(line=125, offs=7) -- 3765(line=134, offs=26) */ ATSif( tmp253 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3542(line=126, offs=9) -- 3543(line=126, offs=10) */ ATSINSmove(tmpret252, ATSPMVi0nt(1)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3566(line=128, offs=12) -- 3571(line=128, offs=17) */ ATSINSmove(tmp256, ATSLIB_056_prelude__eq_g1int_int__18__3(env0, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3563(line=128, offs=9) -- 3765(line=134, offs=26) */ ATSif( tmp256 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3587(line=129, offs=11) -- 3588(line=129, offs=12) */ ATSINSmove(tmpret252, ATSPMVi0nt(0)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3615(line=131, offs=14) -- 3642(line=131, offs=41) */ ATSINSmove(tmp263, atspre_g0int_mod_int(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3615(line=131, offs=14) -- 3642(line=131, offs=41) */ ATSINSmove(tmp260, ATSLIB_056_prelude__eq_g0int_int__12__12(tmp263, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3615(line=131, offs=14) -- 3642(line=131, offs=41) */ ATSif( tmp260 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3615(line=131, offs=14) -- 3642(line=131, offs=41) */ ATSINSmove(tmp259, is_prime_51(arg0)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3615(line=131, offs=14) -- 3642(line=131, offs=41) */ ATSINSmove(tmp259, ATSPMVbool_false()) ; } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3612(line=131, offs=11) -- 3765(line=134, offs=26) */ ATSif( tmp259 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3666(line=132, offs=18) -- 3673(line=132, offs=25) */ ATSINSmove(tmp265, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3661(line=132, offs=13) -- 3674(line=132, offs=26) */ ATSINSmove(tmp264, loop_110(env0, env1, tmp265)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3681(line=132, offs=33) -- 3697(line=132, offs=49) */ ATSINSmove(tmp267, legendre_106(arg0, env1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3699(line=132, offs=51) -- 3723(line=132, offs=75) */ ATSINSmove(tmp268, get_multiplicity_109(env0, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3677(line=132, offs=29) -- 3724(line=132, offs=76) */ ATSINSmove(tmp266, exp_5(tmp267, tmp268)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3661(line=132, offs=13) -- 3724(line=132, offs=76) */ ATSINSmove(tmpret252, atspre_g0int_mul_int(tmp264, tmp266)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3757(line=134, offs=18) -- 3764(line=134, offs=25) */ ATSINSmove(tmp269, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3752(line=134, offs=13) -- 3765(line=134, offs=26) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp269) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSfgoto(__patsflab_loop_110) ; ATStailcal_end() } /* ATSendif */ } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret252) ; } /* end of [loop_110] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$6$5(level=2) local: global: */ ATSstatic() /* imparg = tk(4633) tmparg = S2Evar(tk(4633)) tmpsub = Some(tk(4633) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__5(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret10__5, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp11__5, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp11__5, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret10__5, atspre_g1int_gt_int(arg0, tmp11__5)) ; ATSfunbody_end() ATSreturn(tmpret10__5) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__6__5] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12838(line=668, offs=3) -- 12877(line=668, offs=42) */ /* local: global: eq_g1int_int$18$3(level=2) local: global: */ ATSstatic() /* imparg = tk(4639) tmparg = S2Evar(tk(4639)) tmpsub = Some(tk(4639) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g1int_int__18__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret27__3, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp28__3, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12864(line=668, offs=29) -- 12875(line=668, offs=40) */ ATSINSmove(tmp28__3, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12847(line=668, offs=12) -- 12877(line=668, offs=42) */ ATSINSmove(tmpret27__3, atspre_g1int_eq_int(arg0, tmp28__3)) ; ATSfunbody_end() ATSreturn(tmpret27__3) ; } /* end of [ATSLIB_056_prelude__eq_g1int_int__18__3] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$12(level=2) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__12(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__12, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__12, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__12, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__12, atspre_g0int_eq_int(arg0, tmp18__12)) ; ATSfunbody_end() ATSreturn(tmpret17__12) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__12] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3863(line=140, offs=5) -- 4201(line=150, offs=26) */ /* local: jacobi2_114$0(level=0) global: jacobi2_114$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) jacobi2_114(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(tmpret270, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp271, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp274, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp275, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp278, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp279, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp280, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp283, 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)) ; ATStmpdec(tmp290, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp291, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp292, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp295, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp298, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp299, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3863(line=140, offs=5) -- 4201(line=150, offs=26) */ ATSINSflab(__patsflab_jacobi2_114): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3920(line=141, offs=3) -- 4201(line=150, offs=26) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3937(line=142, offs=7) -- 3938(line=142, offs=8) */ ATSINSlab(__atstmplab25): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3886(line=140, offs=28) -- 3887(line=140, offs=29) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(0))) { ATSINSgoto(__atstmplab27) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3938(line=142, offs=8) -- 3938(line=142, offs=8) */ ATSINSlab(__atstmplab26): /* 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-internal.dats: 3942(line=142, offs=12) -- 3943(line=142, offs=13) */ ATSINSmove(tmpret270, ATSPMVi0nt(0)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3950(line=143, offs=7) -- 3951(line=143, offs=8) */ ATSINSlab(__atstmplab27): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3886(line=140, offs=28) -- 3887(line=140, offs=29) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab29) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3951(line=143, offs=8) -- 3951(line=143, offs=8) */ 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-internal.dats: 3955(line=143, offs=12) -- 3956(line=143, offs=13) */ ATSINSmove(tmpret270, ATSPMVi0nt(1)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3964(line=144, offs=8) -- 3964(line=144, offs=8) */ ATSINSlab(__atstmplab29): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-guard: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3970(line=144, offs=14) -- 3975(line=144, offs=19) */ ATSINSmove(tmp271, ATSLIB_056_prelude__gt_g1int_int__6__6(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3970(line=144, offs=14) -- 3975(line=144, offs=19) */ ATSifnthen(ATSCKpat_bool(tmp271, ATSPMVbool_true())) { ATSINSgoto(__atstmplab30) ; } ; /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3996(line=144, offs=40) -- 4001(line=144, offs=45) */ ATSINSmove(tmp274, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 3979(line=144, offs=23) -- 4006(line=144, offs=50) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp274)) ; ATSINSmove_tlcal(apy1, arg1) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_jacobi2_114) ; ATStailcal_end() ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4014(line=145, offs=8) -- 4014(line=145, offs=8) */ ATSINSlab(__atstmplab30): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-guard: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4020(line=145, offs=14) -- 4025(line=145, offs=19) */ ATSINSmove(tmp278, atspre_g0int_mod_int(arg0, ATSPMVi0nt(2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4020(line=145, offs=14) -- 4029(line=145, offs=23) */ ATSINSmove(tmp275, ATSLIB_056_prelude__eq_g0int_int__12__13(tmp278, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4020(line=145, offs=14) -- 4029(line=145, offs=23) */ ATSifnthen(ATSCKpat_bool(tmp275, ATSPMVbool_true())) { ATSINSgoto(__atstmplab31) ; } ; /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4036(line=145, offs=30) -- 4059(line=145, offs=53) */ ATSINSmove(tmp283, atspre_g0int_mod_int(arg1, ATSPMVi0nt(8))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4036(line=145, offs=30) -- 4059(line=145, offs=53) */ ATSINSmove(tmp280, ATSLIB_056_prelude__eq_g0int_int__12__14(tmp283, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4036(line=145, offs=30) -- 4059(line=145, offs=53) */ ATSif( tmp280 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4036(line=145, offs=30) -- 4059(line=145, offs=53) */ ATSINSmove(tmp279, ATSPMVbool_true()) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4036(line=145, offs=30) -- 4059(line=145, offs=53) */ ATSINSmove(tmp286, atspre_g0int_mod_int(arg1, ATSPMVi0nt(8))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4036(line=145, offs=30) -- 4059(line=145, offs=53) */ ATSINSmove(tmp287, atspre_g1int_neg_int(ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4036(line=145, offs=30) -- 4059(line=145, offs=53) */ ATSINSmove(tmp279, ATSLIB_056_prelude__eq_g0int_int__12__15(tmp286, tmp287)) ; } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4033(line=145, offs=27) -- 4122(line=148, offs=25) */ ATSif( tmp279 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4079(line=146, offs=15) -- 4084(line=146, offs=20) */ ATSINSmove(tmp288, atspre_g1int_div_int(arg0, ATSPMVi0nt(2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4071(line=146, offs=7) -- 4088(line=146, offs=24) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp288) ; ATSINSmove_tlcal(apy1, arg1) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_jacobi2_114) ; ATStailcal_end() } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4113(line=148, offs=16) -- 4118(line=148, offs=21) */ ATSINSmove(tmp290, atspre_g1int_div_int(arg0, ATSPMVi0nt(2))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4105(line=148, offs=8) -- 4122(line=148, offs=25) */ ATSINSmove(tmp289, jacobi2_114(tmp290, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4104(line=148, offs=7) -- 4122(line=148, offs=25) */ ATSINSmove(tmpret270, atspre_g0int_neg_int(tmp289)) ; } /* ATSendif */ ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4130(line=149, offs=8) -- 4130(line=149, offs=8) */ ATSINSlab(__atstmplab31): /* 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-internal.dats: 4136(line=149, offs=14) -- 4158(line=149, offs=36) */ ATSINSmove(tmp295, atspre_g0int_mod_int(arg0, ATSPMVi0nt(4))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4136(line=149, offs=14) -- 4158(line=149, offs=36) */ ATSINSmove(tmp292, ATSLIB_056_prelude__eq_g0int_int__12__16(tmp295, ATSPMVi0nt(3))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4136(line=149, offs=14) -- 4158(line=149, offs=36) */ ATSif( tmp292 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4136(line=149, offs=14) -- 4158(line=149, offs=36) */ ATSINSmove(tmp298, atspre_g0int_mod_int(arg1, ATSPMVi0nt(4))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4136(line=149, offs=14) -- 4158(line=149, offs=36) */ ATSINSmove(tmp291, ATSLIB_056_prelude__eq_g0int_int__12__17(tmp298, ATSPMVi0nt(3))) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4136(line=149, offs=14) -- 4158(line=149, offs=36) */ ATSINSmove(tmp291, ATSPMVbool_false()) ; } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4136(line=149, offs=14) -- 4158(line=149, offs=36) */ ATSifnthen(ATSCKpat_bool(tmp291, ATSPMVbool_true())) { ATSINSgoto(__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-internal.dats: 4162(line=149, offs=40) -- 4175(line=149, offs=53) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, arg1) ; ATSINSmove_tlcal(apy1, arg0) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_jacobi2_114) ; ATStailcal_end() ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4183(line=150, offs=8) -- 4183(line=150, 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-internal.dats: 4188(line=150, offs=13) -- 4201(line=150, offs=26) */ ATSINSmove(tmp299, jacobi2_114(arg1, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4187(line=150, offs=12) -- 4201(line=150, offs=26) */ ATSINSmove(tmpret270, atspre_g0int_neg_int(tmp299)) ; ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret270) ; } /* end of [jacobi2_114] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$6$6(level=1) local: global: */ ATSstatic() /* imparg = tk(4633) tmparg = S2Evar(tk(4633)) tmpsub = Some(tk(4633) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__6(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret10__6, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp11__6, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp11__6, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret10__6, atspre_g1int_gt_int(arg0, tmp11__6)) ; ATSfunbody_end() ATSreturn(tmpret10__6) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__6__6] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$13(level=1) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__13(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__13, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__13, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__13, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__13, atspre_g0int_eq_int(arg0, tmp18__13)) ; ATSfunbody_end() ATSreturn(tmpret17__13) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__13] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$14(level=1) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__14(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__14, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__14, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__14, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__14, atspre_g0int_eq_int(arg0, tmp18__14)) ; ATSfunbody_end() ATSreturn(tmpret17__14) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__14] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$15(level=1) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__15(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__15, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__15, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__15, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__15, atspre_g0int_eq_int(arg0, tmp18__15)) ; ATSfunbody_end() ATSreturn(tmpret17__15) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__15] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$16(level=1) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__16(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__16, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__16, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__16, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__16, atspre_g0int_eq_int(arg0, tmp18__16)) ; ATSfunbody_end() ATSreturn(tmpret17__16) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__16] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$17(level=1) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__17(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__17, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__17, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__17, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__17, atspre_g0int_eq_int(arg0, tmp18__17)) ; ATSfunbody_end() ATSreturn(tmpret17__17) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__17] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4206(line=152, offs=4) -- 4275(line=153, offs=32) */ /* local: divisors_67$0(level=0) global: sqrt_int_48$0(level=0), divisors_67$0(level=0), count_divisors_122$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) count_divisors_122(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret300, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp312, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4206(line=152, offs=4) -- 4275(line=153, offs=32) */ ATSINSflab(__patsflab_count_divisors_122): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4263(line=153, offs=20) -- 4273(line=153, offs=30) */ ATSINSmove(tmp312, divisors_67(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4246(line=153, offs=3) -- 4275(line=153, offs=32) */ ATSINSmove(tmpret300, ATSLIB_056_prelude__stream_vt_length__123__1(tmp312)) ; ATSfunbody_end() ATSreturn(tmpret300) ; } /* end of [count_divisors_122] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 8385(line=480, offs=17) -- 8607(line=495, offs=4) */ /* local: global: stream_vt_length$123$0(level=0) local: global: */ ATSextern() /* imparg = a(8178) tmparg = S2Evar(a(8178)) tmpsub = None() */ atstkind_t0ype(atstype_int) ATSLIB_056_prelude__stream_vt_length__123(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret301, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8369(line=480, offs=1) -- 8607(line=495, offs=4) */ ATSINSflab(__patsflab_stream_vt_length): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8393(line=480, offs=25) -- 8607(line=495, offs=4) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8590(line=494, offs=16) -- 8602(line=494, offs=28) */ ATSINSmove(tmpret301, ATSfunclo_fun(PMVd2vfunlab(d2v=loop$4186(1), flab=loop_124$0(level=1)), (atstkind_type(atstype_ptrk), atstkind_t0ype(atstype_int)), atstkind_t0ype(atstype_int))(arg0, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8393(line=480, offs=25) -- 8607(line=495, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret301) ; } /* end of [ATSLIB_056_prelude__stream_vt_length__123] */ #endif // end of [TEMPLATE] #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 8404(line=483, offs=1) -- 8548(line=491, offs=2) */ /* local: loop_124$0(level=1) global: loop_124$0(level=1) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) loop_124__124(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(tmpret302, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp303, atstype_boxed) ; ATStmpdec(tmp305, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp306, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8404(line=483, offs=1) -- 8548(line=491, offs=2) */ ATSINSflab(__patsflab_loop_124): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8470(line=488, offs=9) -- 8473(line=488, offs=12) */ ATSINSmove_llazyeval(tmp303, atstype_boxed, arg0) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8464(line=488, offs=3) -- 8546(line=490, offs=44) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8481(line=489, offs=5) -- 8497(line=489, offs=21) */ ATSINSlab(__atstmplab33): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8470(line=488, offs=9) -- 8473(line=488, offs=12) */ ATSifthen(ATSCKptriscons(tmp303)) { ATSINSgoto(__atstmplab36) ; } ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8497(line=489, offs=21) -- 8497(line=489, offs=21) */ ATSINSlab(__atstmplab34): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8501(line=489, offs=25) -- 8502(line=489, offs=26) */ ATSINSmove(tmpret302, arg1) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8507(line=490, offs=5) -- 8529(line=490, offs=27) */ ATSINSlab(__atstmplab35): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8470(line=488, offs=9) -- 8473(line=488, offs=12) */ #if(0) ATSifthen(ATSCKptrisnull(tmp303)) { ATSINSdeadcode_fail() ; } ; #endif /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8529(line=490, offs=27) -- 8529(line=490, offs=27) */ ATSINSlab(__atstmplab36): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8526(line=490, offs=24) -- 8528(line=490, offs=26) */ ATSINSmove(tmp305, ATSSELcon(tmp303, postiats_tysum_3, atslab__1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8507(line=490, offs=5) -- 8546(line=490, offs=44) */ ATSINSfreecon(tmp303) ; /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8542(line=490, offs=40) -- 8545(line=490, offs=43) */ ATSINSmove(tmp306, PMVtmpltcst(g1int_add)(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8533(line=490, offs=31) -- 8546(line=490, offs=44) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp305) ; ATSINSmove_tlcal(apy1, tmp306) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_124) ; ATStailcal_end() ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret302) ; } /* end of [loop_124__124] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 8385(line=480, offs=17) -- 8607(line=495, offs=4) */ /* local: global: stream_vt_length$123$1(level=1) local: global: */ ATSstatic() /* imparg = a(8178) tmparg = S2Evar(a(8178)) tmpsub = Some(a(8178) -> S2Eapp(S2Ecst(g0int_t0ype); S2Eextkind(atstype_int))) */ atstkind_t0ype(atstype_int) ATSLIB_056_prelude__stream_vt_length__123__1(atstkind_type(atstype_ptrk) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret301__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8369(line=480, offs=1) -- 8607(line=495, offs=4) */ ATSINSflab(__patsflab_stream_vt_length): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8393(line=480, offs=25) -- 8607(line=495, offs=4) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8590(line=494, offs=16) -- 8602(line=494, offs=28) */ ATSINSmove(tmpret301__1, loop_124__124__1(arg0, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8393(line=480, offs=25) -- 8607(line=495, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret301__1) ; } /* end of [ATSLIB_056_prelude__stream_vt_length__123__1] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 8404(line=483, offs=1) -- 8548(line=491, offs=2) */ /* local: loop_124$1(level=2) global: loop_124$1(level=2) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) loop_124__124__1(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(tmpret302__1, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp303__1, atstype_boxed) ; ATStmpdec(tmp305__1, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp306__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8404(line=483, offs=1) -- 8548(line=491, offs=2) */ ATSINSflab(__patsflab_loop_124): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8470(line=488, offs=9) -- 8473(line=488, offs=12) */ ATSINSmove_llazyeval(tmp303__1, atstype_boxed, arg0) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8464(line=488, offs=3) -- 8546(line=490, offs=44) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8481(line=489, offs=5) -- 8497(line=489, offs=21) */ ATSINSlab(__atstmplab33): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8470(line=488, offs=9) -- 8473(line=488, offs=12) */ ATSifthen(ATSCKptriscons(tmp303__1)) { ATSINSgoto(__atstmplab36) ; } ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8497(line=489, offs=21) -- 8497(line=489, offs=21) */ ATSINSlab(__atstmplab34): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8501(line=489, offs=25) -- 8502(line=489, offs=26) */ ATSINSmove(tmpret302__1, arg1) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8507(line=490, offs=5) -- 8529(line=490, offs=27) */ ATSINSlab(__atstmplab35): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8470(line=488, offs=9) -- 8473(line=488, offs=12) */ #if(0) ATSifthen(ATSCKptrisnull(tmp303__1)) { ATSINSdeadcode_fail() ; } ; #endif /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8529(line=490, offs=27) -- 8529(line=490, offs=27) */ ATSINSlab(__atstmplab36): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8526(line=490, offs=24) -- 8528(line=490, offs=26) */ ATSINSmove(tmp305__1, ATSSELcon(tmp303__1, postiats_tysum_1, atslab__1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8507(line=490, offs=5) -- 8546(line=490, offs=44) */ ATSINSfreecon(tmp303__1) ; /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8542(line=490, offs=40) -- 8545(line=490, offs=43) */ ATSINSmove(tmp306__1, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 8533(line=490, offs=31) -- 8546(line=490, offs=44) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, tmp305__1) ; ATSINSmove_tlcal(apy1, tmp306__1) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_124) ; ATStailcal_end() ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret302__1) ; } /* end of [loop_124__124__1] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4355(line=158, offs=4) -- 4954(line=184, offs=6) */ /* local: sqrt_int_48$0(level=0) global: sqrt_int_48$0(level=0), sum_divisors_127$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) sum_divisors_127(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret313, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4355(line=158, offs=4) -- 4954(line=184, offs=6) */ ATSINSflab(__patsflab_sum_divisors_127): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4393(line=159, offs=3) -- 4954(line=184, offs=6) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4938(line=183, offs=5) -- 4948(line=183, offs=15) */ ATSINSmove(tmpret313, loop_128(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4393(line=159, offs=3) -- 4954(line=184, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret313) ; } /* end of [sum_divisors_127] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4405(line=160, offs=9) -- 4928(line=181, offs=27) */ /* local: sqrt_int_48$0(level=0), loop_128$0(level=1) global: sqrt_int_48$0(level=0), loop_128$0(level=1) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) loop_128(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(tmpret314, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp315, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp318, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp319, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp322, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp323, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp326, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref327, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp328, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp331, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref332, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp333, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp334, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp335, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp336, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4405(line=160, offs=9) -- 4928(line=181, offs=27) */ ATSINSflab(__patsflab_loop_128): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4499(line=161, offs=17) -- 4509(line=161, offs=27) */ ATSINSmove(tmp318, sqrt_int_48(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4492(line=161, offs=10) -- 4509(line=161, offs=27) */ ATSINSmove(tmp315, ATSLIB_056_prelude__gte_g1int_int__71__2(arg1, tmp318)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4489(line=161, offs=7) -- 4928(line=181, offs=27) */ ATSif( tmp315 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4527(line=162, offs=12) -- 4534(line=162, offs=19) */ ATSINSmove(tmp322, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4527(line=162, offs=12) -- 4538(line=162, offs=23) */ ATSINSmove(tmp319, ATSLIB_056_prelude__eq_g0int_int__12__18(tmp322, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4524(line=162, offs=9) -- 4736(line=172, offs=12) */ ATSif( tmp319 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4557(line=163, offs=14) -- 4564(line=163, offs=21) */ ATSINSmove(tmp326, atspre_g1int_div_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4557(line=163, offs=14) -- 4571(line=163, offs=28) */ ATSINSmove(tmp323, ATSLIB_056_prelude__neq_g1int_int__75__2(tmp326, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4554(line=163, offs=11) -- 4711(line=170, offs=16) */ ATSif( tmp323 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4589(line=164, offs=13) -- 4680(line=168, offs=16) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4611(line=165, offs=19) -- 4612(line=165, offs=20) */ /* ATSINStmpdec(tmpref327) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4620(line=165, offs=28) -- 4627(line=165, offs=35) */ ATSINSmove(tmpref327, atspre_g1int_div_int(arg0, arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4657(line=167, offs=15) -- 4664(line=167, offs=22) */ ATSINSmove(tmpret314, atspre_g1int_add_int(arg1, tmpref327)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4589(line=164, offs=13) -- 4680(line=168, offs=16) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4708(line=170, offs=13) -- 4711(line=170, offs=16) */ ATSINSmove(tmpret314, arg1) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4735(line=172, offs=11) -- 4736(line=172, offs=12) */ ATSINSmove(tmpret314, ATSPMVi0nt(0)) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4759(line=174, offs=12) -- 4766(line=174, offs=19) */ ATSINSmove(tmp331, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4759(line=174, offs=12) -- 4770(line=174, offs=23) */ ATSINSmove(tmp328, ATSLIB_056_prelude__eq_g0int_int__12__19(tmp331, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4756(line=174, offs=9) -- 4928(line=181, offs=27) */ ATSif( tmp328 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4786(line=175, offs=11) -- 4888(line=179, offs=14) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4806(line=176, offs=17) -- 4807(line=176, offs=18) */ /* ATSINStmpdec(tmpref332) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4815(line=176, offs=26) -- 4822(line=176, offs=33) */ ATSINSmove(tmpref332, atspre_g1int_div_int(arg0, arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4848(line=178, offs=13) -- 4855(line=178, offs=20) */ ATSINSmove(tmp333, atspre_g1int_add_int(arg1, tmpref332)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4866(line=178, offs=31) -- 4873(line=178, offs=38) */ ATSINSmove(tmp335, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4858(line=178, offs=23) -- 4874(line=178, offs=39) */ ATSINSmove(tmp334, loop_128(arg0, tmp335)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4848(line=178, offs=13) -- 4874(line=178, offs=39) */ ATSINSmove(tmpret314, atspre_g0int_add_int(tmp333, tmp334)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4786(line=175, offs=11) -- 4888(line=179, offs=14) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4920(line=181, offs=19) -- 4927(line=181, offs=26) */ ATSINSmove(tmp336, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4912(line=181, offs=11) -- 4928(line=181, offs=27) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, arg0) ; ATSINSmove_tlcal(apy1, tmp336) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_128) ; ATStailcal_end() } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret314) ; } /* end of [loop_128] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) */ /* local: global: gte_g1int_int$71$2(level=2) local: global: */ ATSstatic() /* imparg = tk(4636) tmparg = S2Evar(tk(4636)) tmpsub = Some(tk(4636) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__71__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret149__2, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp150__2, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) */ ATSINSmove(tmp150__2, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) */ ATSINSmove(tmpret149__2, atspre_g1int_gte_int(arg0, tmp150__2)) ; ATSfunbody_end() ATSreturn(tmpret149__2) ; } /* end of [ATSLIB_056_prelude__gte_g1int_int__71__2] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$18(level=2) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__18(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__18, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__18, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__18, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__18, atspre_g0int_eq_int(arg0, tmp18__18)) ; ATSfunbody_end() ATSreturn(tmpret17__18) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__18] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12916(line=672, offs=3) -- 12956(line=672, offs=43) */ /* local: global: neq_g1int_int$75$2(level=2) local: global: */ ATSstatic() /* imparg = tk(4642) tmparg = S2Evar(tk(4642)) tmpsub = Some(tk(4642) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g1int_int__75__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret159__2, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp160__2, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12943(line=672, offs=30) -- 12954(line=672, offs=41) */ ATSINSmove(tmp160__2, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12925(line=672, offs=12) -- 12956(line=672, offs=43) */ ATSINSmove(tmpret159__2, atspre_g1int_neq_int(arg0, tmp160__2)) ; ATSfunbody_end() ATSreturn(tmpret159__2) ; } /* end of [ATSLIB_056_prelude__neq_g1int_int__75__2] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$19(level=2) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__19(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__19, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__19, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__19, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__19, atspre_g0int_eq_int(arg0, tmp18__19)) ; ATSfunbody_end() ATSreturn(tmpret17__19) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__19] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4959(line=186, offs=4) -- 5014(line=187, offs=22) */ /* local: sum_divisors_127$0(level=0) global: sqrt_int_48$0(level=0), sum_divisors_127$0(level=0), is_perfect_134$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_bool) is_perfect_134(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret337, atstkind_t0ype(atstype_bool)) ; 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-internal.dats: 4959(line=186, offs=4) -- 5014(line=187, offs=22) */ ATSINSflab(__patsflab_is_perfect_134): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4995(line=187, offs=3) -- 5009(line=187, offs=17) */ ATSINSmove(tmp340, sum_divisors_127(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 4995(line=187, offs=3) -- 5014(line=187, offs=22) */ ATSINSmove(tmpret337, ATSLIB_056_prelude__eq_g0int_int__12__20(tmp340, arg0)) ; ATSfunbody_end() ATSreturn(tmpret337) ; } /* end of [is_perfect_134] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$20(level=1) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__20(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__20, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__20, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__20, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__20, atspre_g0int_eq_int(arg0, tmp18__20)) ; ATSfunbody_end() ATSreturn(tmpret17__20) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__20] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5020(line=189, offs=5) -- 5340(line=203, offs=8) */ /* local: rip_136$0(level=0) global: rip_136$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) rip_136(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret341, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp342, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp347, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp348, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp351, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref352, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp353, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp356, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5020(line=189, offs=5) -- 5340(line=203, offs=8) */ ATSINSflab(__patsflab_rip_136): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5142(line=190, offs=6) -- 5147(line=190, offs=11) */ ATSINSmove(tmp347, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5142(line=190, offs=6) -- 5152(line=190, offs=16) */ ATSINSmove(tmp342, ATSLIB_056_prelude__neq_g0int_int__137__1(tmp347, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5139(line=190, offs=3) -- 5340(line=203, offs=8) */ ATSif( tmp342 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5162(line=191, offs=5) -- 5163(line=191, offs=6) */ ATSINSmove(tmpret341, arg0) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5178(line=193, offs=8) -- 5183(line=193, offs=13) */ ATSINSmove(tmp351, atspre_g1int_div_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5178(line=193, offs=8) -- 5187(line=193, offs=17) */ ATSINSmove(tmp348, ATSLIB_056_prelude__gt_g1int_int__6__7(tmp351, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5175(line=193, offs=5) -- 5340(line=203, offs=8) */ ATSif( tmp348 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5199(line=194, offs=7) -- 5323(line=201, offs=10) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5215(line=195, offs=13) -- 5217(line=195, offs=15) */ /* ATSINStmpdec(tmpref352) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5220(line=195, offs=18) -- 5225(line=195, offs=23) */ ATSINSmove(tmpref352, atspre_g1int_div_int(arg0, arg1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5246(line=197, offs=12) -- 5252(line=197, offs=18) */ ATSINSmove(tmp353, ATSLIB_056_prelude__lt_g1int_int__53__2(tmpref352, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5243(line=197, offs=9) -- 5313(line=200, offs=12) */ ATSif( tmp353 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5277(line=198, offs=20) -- 5287(line=198, offs=30) */ ATSINSmove(tmp356, rip_136(tmpref352, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5268(line=198, offs=11) -- 5288(line=198, offs=31) */ ATSINSmove(tmpret341, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), tmp356)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5312(line=200, offs=11) -- 5313(line=200, offs=12) */ ATSINSmove(tmpret341, ATSPMVi0nt(1)) ; } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5199(line=194, offs=7) -- 5323(line=201, offs=10) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5339(line=203, offs=7) -- 5340(line=203, offs=8) */ ATSINSmove(tmpret341, ATSPMVi0nt(1)) ; } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret341) ; } /* end of [rip_136] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12337(line=639, offs=3) -- 12377(line=639, offs=43) */ /* local: global: neq_g0int_int$137$0(level=0) local: global: */ ATSextern() /* imparg = tk(4625) tmparg = S2Evar(tk(4625)) tmpsub = None() */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g0int_int__137(atstkind_t0ype(atstyvar_type(tk)) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret343, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp344, atstkind_t0ype(atstyvar_type(tk))) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12364(line=639, offs=30) -- 12375(line=639, offs=41) */ ATSINSmove(tmp344, PMVtmpltcst(g0int2int)(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12346(line=639, offs=12) -- 12377(line=639, offs=43) */ ATSINSmove(tmpret343, PMVtmpltcst(g0int_neq)(arg0, tmp344)) ; ATSfunbody_end() ATSreturn(tmpret343) ; } /* end of [ATSLIB_056_prelude__neq_g0int_int__137] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12337(line=639, offs=3) -- 12377(line=639, offs=43) */ /* local: global: neq_g0int_int$137$1(level=1) local: global: */ ATSstatic() /* imparg = tk(4625) tmparg = S2Evar(tk(4625)) tmpsub = Some(tk(4625) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__neq_g0int_int__137__1(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret343__1, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp344__1, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12364(line=639, offs=30) -- 12375(line=639, offs=41) */ ATSINSmove(tmp344__1, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12346(line=639, offs=12) -- 12377(line=639, offs=43) */ ATSINSmove(tmpret343__1, atspre_g0int_neq_int(arg0, tmp344__1)) ; ATSfunbody_end() ATSreturn(tmpret343__1) ; } /* end of [ATSLIB_056_prelude__neq_g0int_int__137__1] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$6$7(level=1) local: global: */ ATSstatic() /* imparg = tk(4633) tmparg = S2Evar(tk(4633)) tmpsub = Some(tk(4633) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__7(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret10__7, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp11__7, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp11__7, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret10__7, atspre_g1int_gt_int(arg0, tmp11__7)) ; ATSfunbody_end() ATSreturn(tmpret10__7) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__6__7] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) */ /* local: global: lt_g1int_int$53$2(level=1) local: global: */ ATSstatic() /* imparg = tk(4627) tmparg = S2Evar(tk(4627)) tmpsub = Some(tk(4627) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__53__2(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret110__2, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp111__2, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) */ ATSINSmove(tmp111__2, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) */ ATSINSmove(tmpret110__2, atspre_g1int_lt_int(arg0, tmp111__2)) ; ATSfunbody_end() ATSreturn(tmpret110__2) ; } /* end of [ATSLIB_056_prelude__lt_g1int_int__53__2] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5345(line=205, offs=4) -- 5948(line=223, offs=6) */ /* local: is_prime_51$0(level=0), rip_136$0(level=0) global: sqrt_int_48$0(level=0), is_prime_51$0(level=0), rip_136$0(level=0), prime_factors_142$0(level=0) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) prime_factors_142(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret357, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5345(line=205, offs=4) -- 5948(line=223, offs=6) */ ATSINSflab(__patsflab_prime_factors_142): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5395(line=206, offs=3) -- 5948(line=223, offs=6) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5932(line=222, offs=5) -- 5942(line=222, offs=15) */ ATSINSmove(tmpret357, loop_143(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5395(line=206, offs=3) -- 5948(line=223, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret357) ; } /* end of [prime_factors_142] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5407(line=207, offs=9) -- 5922(line=220, offs=27) */ /* local: is_prime_51$0(level=0), rip_136$0(level=0), loop_143$0(level=1) global: is_prime_51$0(level=0), rip_136$0(level=0), loop_143$0(level=1) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) loop_143(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(tmpret358, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp359, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp362, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp367, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp368, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp371, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp372, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp375, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp382, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5407(line=207, offs=9) -- 5922(line=220, offs=27) */ ATSINSflab(__patsflab_loop_143): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5505(line=208, offs=10) -- 5513(line=208, offs=18) */ ATSINSmove(tmp359, ATSLIB_056_prelude__gte_g1int_int__71__3(arg1, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5502(line=208, offs=7) -- 5922(line=220, offs=27) */ ATSif( tmp359 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5530(line=209, offs=12) -- 5540(line=209, offs=22) */ ATSINSmove(tmp362, is_prime_51(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5527(line=209, offs=9) -- 5653(line=212, offs=33) */ ATSif( tmp362 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5557(line=210, offs=11) -- 5607(line=210, offs=61) */ ATSINSmove_ldelay(tmpret358, atstype_boxed, ATSPMVcfunlab(1, __patsfun_145, (arg0))) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5631(line=212, offs=11) -- 5653(line=212, offs=33) */ ATSINSmove_ldelay(tmpret358, atstype_boxed, ATSPMVcfunlab(1, __patsfun_147, ())) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5676(line=214, offs=12) -- 5703(line=214, offs=39) */ ATSINSmove(tmp371, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5676(line=214, offs=12) -- 5703(line=214, offs=39) */ ATSINSmove(tmp368, ATSLIB_056_prelude__eq_g0int_int__12__21(tmp371, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5676(line=214, offs=12) -- 5703(line=214, offs=39) */ ATSif( tmp368 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5676(line=214, offs=12) -- 5703(line=214, offs=39) */ ATSINSmove(tmp367, is_prime_51(arg1)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5676(line=214, offs=12) -- 5703(line=214, offs=39) */ ATSINSmove(tmp367, ATSPMVbool_false()) ; } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5673(line=214, offs=9) -- 5922(line=220, offs=27) */ ATSif( tmp367 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5723(line=215, offs=14) -- 5730(line=215, offs=21) */ ATSINSmove(tmp375, atspre_g1int_div_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5723(line=215, offs=14) -- 5734(line=215, offs=25) */ ATSINSmove(tmp372, ATSLIB_056_prelude__gt_g1int_int__6__8(tmp375, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5720(line=215, offs=11) -- 5882(line=218, offs=65) */ ATSif( tmp372 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5752(line=216, offs=13) -- 5802(line=216, offs=63) */ ATSINSmove_ldelay(tmpret358, atstype_boxed, ATSPMVcfunlab(1, __patsfun_150, (arg0, arg1))) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5830(line=218, offs=13) -- 5882(line=218, offs=65) */ ATSINSmove_ldelay(tmpret358, atstype_boxed, ATSPMVcfunlab(1, __patsfun_151, (arg1))) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5914(line=220, offs=19) -- 5921(line=220, offs=26) */ ATSINSmove(tmp382, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5906(line=220, offs=11) -- 5922(line=220, offs=27) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, arg0) ; ATSINSmove_tlcal(apy1, tmp382) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_143) ; ATStailcal_end() } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret358) ; } /* end of [loop_143] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) */ /* local: global: gte_g1int_int$71$3(level=2) local: global: */ ATSstatic() /* imparg = tk(4636) tmparg = S2Evar(tk(4636)) tmpsub = Some(tk(4636) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__71__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret149__3, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp150__3, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) */ ATSINSmove(tmp150__3, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) */ ATSINSmove(tmpret149__3, atspre_g1int_gte_int(arg0, tmp150__3)) ; ATSfunbody_end() ATSreturn(tmpret149__3) ; } /* end of [ATSLIB_056_prelude__gte_g1int_int__71__3] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5557(line=210, offs=11) -- 5607(line=210, offs=61) */ /* local: global: __patsfun_145$0(level=2) local: n$5173(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: n$5173(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstype_boxed __patsfun_145(atstkind_t0ype(atstype_int) env0, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret363, atstype_boxed) ; ATStmpdec(tmp364, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5557(line=210, offs=11) -- 5607(line=210, offs=61) */ ATSINSflab(__patsflab___patsfun_145): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5557(line=210, offs=11) -- 5607(line=210, offs=61) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5583(line=210, offs=37) -- 5605(line=210, offs=59) */ ATSINSmove_ldelay(tmp364, atstype_boxed, ATSPMVcfunlab(1, __patsfun_146, ())) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5565(line=210, offs=19) -- 5606(line=210, offs=60) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret363, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret363, 1) ; #endif ATSINSstore_con1_ofs(tmpret363, postiats_tysum_1, atslab__0, env0) ; ATSINSstore_con1_ofs(tmpret363, postiats_tysum_1, atslab__1, tmp364) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret363) ; } /* end of [__patsfun_145] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5583(line=210, offs=37) -- 5605(line=210, offs=59) */ /* local: global: __patsfun_146$0(level=3) local: global: */ ATSstatic() atstype_boxed __patsfun_146(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret365, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5583(line=210, offs=37) -- 5605(line=210, offs=59) */ ATSINSflab(__patsflab___patsfun_146): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5583(line=210, offs=37) -- 5605(line=210, offs=59) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5591(line=210, offs=45) -- 5604(line=210, offs=58) */ ATSINSmove_nil(tmpret365) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret365) ; } /* end of [__patsfun_146] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5631(line=212, offs=11) -- 5653(line=212, offs=33) */ /* local: global: __patsfun_147$0(level=2) local: global: */ ATSstatic() atstype_boxed __patsfun_147(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret366, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5631(line=212, offs=11) -- 5653(line=212, offs=33) */ ATSINSflab(__patsflab___patsfun_147): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5631(line=212, offs=11) -- 5653(line=212, offs=33) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5639(line=212, offs=19) -- 5652(line=212, offs=32) */ ATSINSmove_nil(tmpret366) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret366) ; } /* end of [__patsfun_147] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$21(level=2) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__21(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__21, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__21, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__21, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__21, atspre_g0int_eq_int(arg0, tmp18__21)) ; ATSfunbody_end() ATSreturn(tmpret17__21) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__21] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$6$8(level=2) local: global: */ ATSstatic() /* imparg = tk(4633) tmparg = S2Evar(tk(4633)) tmpsub = Some(tk(4633) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__8(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret10__8, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp11__8, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp11__8, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret10__8, atspre_g1int_gt_int(arg0, tmp11__8)) ; ATSfunbody_end() ATSreturn(tmpret10__8) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__6__8] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5752(line=216, offs=13) -- 5802(line=216, offs=63) */ /* local: rip_136$0(level=0), loop_143$0(level=1) global: rip_136$0(level=0), loop_143$0(level=1), __patsfun_150$0(level=2) local: n$5173(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5174(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: n$5173(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))), acc$5174(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstype_boxed __patsfun_150(atstkind_t0ype(atstype_int) env0, atstkind_t0ype(atstype_int) env1, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret376, atstype_boxed) ; ATStmpdec(tmp377, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp378, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5752(line=216, offs=13) -- 5802(line=216, offs=63) */ ATSINSflab(__patsflab___patsfun_150): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5752(line=216, offs=13) -- 5802(line=216, offs=63) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5785(line=216, offs=46) -- 5796(line=216, offs=57) */ ATSINSmove(tmp378, rip_136(env0, env1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5780(line=216, offs=41) -- 5800(line=216, offs=61) */ ATSINSmove(tmp377, loop_143(tmp378, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5760(line=216, offs=21) -- 5801(line=216, offs=62) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret376, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret376, 1) ; #endif ATSINSstore_con1_ofs(tmpret376, postiats_tysum_1, atslab__0, env1) ; ATSINSstore_con1_ofs(tmpret376, postiats_tysum_1, atslab__1, tmp377) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret376) ; } /* end of [__patsfun_150] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5830(line=218, offs=13) -- 5882(line=218, offs=65) */ /* local: global: __patsfun_151$0(level=2) local: acc$5174(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) global: acc$5174(2)(HSEapp(HSEcst(atstkind_t0ype); HSEs2exp(S2Eextkind(atstype_int)))) */ ATSstatic() atstype_boxed __patsfun_151(atstkind_t0ype(atstype_int) env0, atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret379, atstype_boxed) ; ATStmpdec(tmp380, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5830(line=218, offs=13) -- 5882(line=218, offs=65) */ ATSINSflab(__patsflab___patsfun_151): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5830(line=218, offs=13) -- 5882(line=218, offs=65) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5858(line=218, offs=41) -- 5880(line=218, offs=63) */ ATSINSmove_ldelay(tmp380, atstype_boxed, ATSPMVcfunlab(1, __patsfun_152, ())) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5838(line=218, offs=21) -- 5881(line=218, offs=64) */ /* #LINCONSTATUS==0 */ ATSINSmove_con1_beg() ATSINSmove_con1_new(tmpret379, postiats_tysum_1) ; #if(0) ATSINSstore_con1_tag(tmpret379, 1) ; #endif ATSINSstore_con1_ofs(tmpret379, postiats_tysum_1, atslab__0, env0) ; ATSINSstore_con1_ofs(tmpret379, postiats_tysum_1, atslab__1, tmp380) ; ATSINSmove_con1_end() } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret379) ; } /* end of [__patsfun_151] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5858(line=218, offs=41) -- 5880(line=218, offs=63) */ /* local: global: __patsfun_152$0(level=3) local: global: */ ATSstatic() atstype_boxed __patsfun_152(atstype_bool arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret381, atstype_boxed) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5858(line=218, offs=41) -- 5880(line=218, offs=63) */ ATSINSflab(__patsflab___patsfun_152): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5858(line=218, offs=41) -- 5880(line=218, offs=63) */ ATSif( arg0 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5866(line=218, offs=49) -- 5879(line=218, offs=62) */ ATSINSmove_nil(tmpret381) ; } ATSelse() { /* (*nothing*) */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret381) ; } /* end of [__patsfun_152] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5980(line=226, offs=4) -- 6419(line=244, offs=6) */ /* local: is_prime_51$0(level=0), rip_136$0(level=0) global: sqrt_int_48$0(level=0), is_prime_51$0(level=0), rip_136$0(level=0), little_omega_153$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) little_omega_153(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret383, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 5980(line=226, offs=4) -- 6419(line=244, offs=6) */ ATSINSflab(__patsflab_little_omega_153): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6018(line=227, offs=3) -- 6419(line=244, offs=6) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6403(line=243, offs=5) -- 6413(line=243, offs=15) */ ATSINSmove(tmpret383, loop_154(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6018(line=227, offs=3) -- 6419(line=244, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret383) ; } /* end of [little_omega_153] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6030(line=228, offs=9) -- 6393(line=241, offs=27) */ /* local: is_prime_51$0(level=0), rip_136$0(level=0), loop_154$0(level=1) global: is_prime_51$0(level=0), rip_136$0(level=0), loop_154$0(level=1) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) loop_154(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(tmpret384, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp385, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp388, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp389, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp390, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp393, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp394, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp397, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp398, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp399, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp400, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6030(line=228, offs=9) -- 6393(line=241, offs=27) */ ATSINSflab(__patsflab_loop_154): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6123(line=229, offs=10) -- 6131(line=229, offs=18) */ ATSINSmove(tmp385, ATSLIB_056_prelude__gte_g1int_int__71__4(arg1, arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6120(line=229, offs=7) -- 6393(line=241, offs=27) */ ATSif( tmp385 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6148(line=230, offs=12) -- 6158(line=230, offs=22) */ ATSINSmove(tmp388, is_prime_51(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6145(line=230, offs=9) -- 6201(line=233, offs=12) */ ATSif( tmp388 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6175(line=231, offs=11) -- 6176(line=231, offs=12) */ ATSINSmove(tmpret384, ATSPMVi0nt(1)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6200(line=233, offs=11) -- 6201(line=233, offs=12) */ ATSINSmove(tmpret384, ATSPMVi0nt(0)) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6224(line=235, offs=12) -- 6251(line=235, offs=39) */ ATSINSmove(tmp393, atspre_g0int_mod_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6224(line=235, offs=12) -- 6251(line=235, offs=39) */ ATSINSmove(tmp390, ATSLIB_056_prelude__eq_g0int_int__12__22(tmp393, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6224(line=235, offs=12) -- 6251(line=235, offs=39) */ ATSif( tmp390 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6224(line=235, offs=12) -- 6251(line=235, offs=39) */ ATSINSmove(tmp389, is_prime_51(arg1)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6224(line=235, offs=12) -- 6251(line=235, offs=39) */ ATSINSmove(tmp389, ATSPMVbool_false()) ; } /* ATSendif */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6221(line=235, offs=9) -- 6393(line=241, offs=27) */ ATSif( tmp389 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6271(line=236, offs=14) -- 6278(line=236, offs=21) */ ATSINSmove(tmp397, atspre_g1int_div_int(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6271(line=236, offs=14) -- 6282(line=236, offs=25) */ ATSINSmove(tmp394, ATSLIB_056_prelude__gt_g1int_int__6__9(tmp397, ATSPMVi0nt(0))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6268(line=236, offs=11) -- 6353(line=239, offs=14) */ ATSif( tmp394 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6309(line=237, offs=22) -- 6320(line=237, offs=33) */ ATSINSmove(tmp399, rip_136(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6304(line=237, offs=17) -- 6324(line=237, offs=37) */ ATSINSmove(tmp398, loop_154(tmp399, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6300(line=237, offs=13) -- 6324(line=237, offs=37) */ ATSINSmove(tmpret384, atspre_g0int_add_int(ATSPMVi0nt(1), tmp398)) ; } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6352(line=239, offs=13) -- 6353(line=239, offs=14) */ ATSINSmove(tmpret384, ATSPMVi0nt(1)) ; } /* ATSendif */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6385(line=241, offs=19) -- 6392(line=241, offs=26) */ ATSINSmove(tmp400, atspre_g1int_add_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6377(line=241, offs=11) -- 6393(line=241, offs=27) */ ATStailcal_beg() ATSINSmove_tlcal(apy0, arg0) ; ATSINSmove_tlcal(apy1, tmp400) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSfgoto(__patsflab_loop_154) ; ATStailcal_end() } /* ATSendif */ } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret384) ; } /* end of [loop_154] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12757(line=663, offs=3) -- 12797(line=663, offs=43) */ /* local: global: gte_g1int_int$71$4(level=2) local: global: */ ATSstatic() /* imparg = tk(4636) tmparg = S2Evar(tk(4636)) tmpsub = Some(tk(4636) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gte_g1int_int__71__4(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret149__4, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp150__4, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12784(line=663, offs=30) -- 12795(line=663, offs=41) */ ATSINSmove(tmp150__4, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12766(line=663, offs=12) -- 12797(line=663, offs=43) */ ATSINSmove(tmpret149__4, atspre_g1int_gte_int(arg0, tmp150__4)) ; ATSfunbody_end() ATSreturn(tmpret149__4) ; } /* end of [ATSLIB_056_prelude__gte_g1int_int__71__4] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12259(line=635, offs=3) -- 12298(line=635, offs=42) */ /* local: global: eq_g0int_int$12$22(level=2) local: global: */ ATSstatic() /* imparg = tk(4624) tmparg = S2Evar(tk(4624)) tmpsub = Some(tk(4624) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__eq_g0int_int__12__22(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret17__22, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp18__22, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12285(line=635, offs=29) -- 12296(line=635, offs=40) */ ATSINSmove(tmp18__22, atspre_g0int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12268(line=635, offs=12) -- 12298(line=635, offs=42) */ ATSINSmove(tmpret17__22, atspre_g0int_eq_int(arg0, tmp18__22)) ; ATSfunbody_end() ATSreturn(tmpret17__22) ; } /* end of [ATSLIB_056_prelude__eq_g0int_int__12__22] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12679(line=659, offs=3) -- 12718(line=659, offs=42) */ /* local: global: gt_g1int_int$6$9(level=2) local: global: */ ATSstatic() /* imparg = tk(4633) tmparg = S2Evar(tk(4633)) tmpsub = Some(tk(4633) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__gt_g1int_int__6__9(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret10__9, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp11__9, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12705(line=659, offs=29) -- 12716(line=659, offs=40) */ ATSINSmove(tmp11__9, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12688(line=659, offs=12) -- 12718(line=659, offs=42) */ ATSINSmove(tmpret10__9, atspre_g1int_gt_int(arg0, tmp11__9)) ; ATSfunbody_end() ATSreturn(tmpret10__9) ; } /* end of [ATSLIB_056_prelude__gt_g1int_int__6__9] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6453(line=247, offs=4) -- 6942(line=259, offs=8) */ /* local: prime_factors_142$0(level=0) global: sqrt_int_48$0(level=0), is_prime_51$0(level=0), rip_136$0(level=0), prime_factors_142$0(level=0), totient_158$0(level=0) local: global: */ ATSstatic() atstkind_t0ype(atstype_int) totient_158(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret401, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref406, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmpref407, postiats_tyrec_0) ; ATStmpdec(tmpref408, postiats_tyrec_0) ; ATStmpdec(tmp426, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6453(line=247, offs=4) -- 6942(line=259, offs=8) */ ATSINSflab(__patsflab_totient_158): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6486(line=248, offs=3) -- 6942(line=259, offs=8) */ ATScaseof_beg() /* ** ibranchlst-beg */ ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6503(line=249, offs=7) -- 6504(line=249, offs=8) */ ATSINSlab(__atstmplab37): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6461(line=247, offs=12) -- 6462(line=247, offs=13) */ ATSifnthen(ATSCKpat_int(arg0, ATSPMVint(1))) { ATSINSgoto(__atstmplab39) ; } ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6504(line=249, offs=8) -- 6504(line=249, 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-internal.dats: 6508(line=249, offs=12) -- 6509(line=249, offs=13) */ ATSINSmove(tmpret401, ATSPMVi0nt(1)) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6517(line=250, offs=8) -- 6517(line=250, 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-internal.dats: 6522(line=250, offs=13) -- 6942(line=259, offs=8) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6676(line=254, offs=11) -- 6677(line=254, offs=12) */ /* ATSINStmpdec(tmpref406) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6696(line=254, offs=31) -- 6711(line=254, offs=46) */ ATSINSmove(tmpref406, prime_factors_142(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6723(line=255, offs=11) -- 6733(line=255, offs=21) */ /* ATSINStmpdec(tmpref407) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6736(line=255, offs=24) -- 6762(line=255, offs=50) */ ATSINSmove_fltrec_beg() ATSINSstore_fltrec_ofs(tmpref407, postiats_tyrec_0, atslab__first, ATSPMVi0nt(1)) ; ATSINSstore_fltrec_ofs(tmpref407, 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-internal.dats: 6780(line=256, offs=11) -- 6781(line=256, offs=12) */ /* ATSINStmpdec(tmpref408) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6784(line=256, offs=15) -- 6871(line=256, offs=102) */ ATSINSmove(tmpref408, ATSLIB_056_prelude__stream_vt_foldleft_cloptr__161__1(tmpref406, tmpref407, ATSPMVcfunlab(1, __patsfun_165, ()))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6902(line=258, offs=17) -- 6923(line=258, offs=38) */ ATSINSmove(tmp426, atspre_g0int_mul_int(arg0, ATSSELfltrec(tmpref408, postiats_tyrec_0, atslab__first))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6892(line=258, offs=7) -- 6934(line=258, offs=49) */ ATSINSmove(tmpret401, atspre_g0int_div_int(tmp426, ATSSELfltrec(tmpref408, postiats_tyrec_0, atslab__second))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6522(line=250, offs=13) -- 6942(line=259, offs=8) */ /* INSletpop() */ ATSbranch_end() /* ** ibranchlst-end */ ATScaseof_end() ATSfunbody_end() ATSreturn(tmpret401) ; } /* end of [totient_158] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6535(line=251, offs=10) -- 6658(line=252, offs=80) */ /* local: global: adjust_contents_159$0(level=1) local: global: */ ATSstatic() postiats_tyrec_0 adjust_contents_159(postiats_tyrec_0 arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret402, postiats_tyrec_0) ; ATStmpdec(tmp403, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp404, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp405, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6535(line=251, offs=10) -- 6658(line=252, offs=80) */ ATSINSflab(__patsflab_adjust_contents_159): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6617(line=252, offs=39) -- 6622(line=252, offs=44) */ ATSINSmove(tmp404, atspre_g0int_sub_int(arg1, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6598(line=252, offs=20) -- 6623(line=252, offs=45) */ ATSINSmove(tmp403, atspre_g0int_mul_int(ATSSELfltrec(arg0, postiats_tyrec_0, atslab__first), tmp404)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6634(line=252, offs=56) -- 6656(line=252, offs=78) */ ATSINSmove(tmp405, 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-internal.dats: 6587(line=252, offs=9) -- 6658(line=252, offs=80) */ ATSINSmove_fltrec_beg() ATSINSstore_fltrec_ofs(tmpret402, postiats_tyrec_0, atslab__first, tmp403) ; ATSINSstore_fltrec_ofs(tmpret402, postiats_tyrec_0, atslab__second, tmp405) ; ATSINSmove_fltrec_end() ATSfunbody_end() ATSreturn(tmpret402) ; } /* end of [adjust_contents_159] */ #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 29943(line=1864, offs=3) -- 30423(line=1895, offs=2) */ /* local: global: stream_vt_foldleft_cloptr$161$0(level=0) local: global: */ ATSextern() /* imparg = res(8326), a(8327) tmparg = S2Evar(res(8326)); S2Evar(a(8327)) tmpsub = None() */ atstyvar_type(res) ATSLIB_056_prelude__stream_vt_foldleft_cloptr__161(atstkind_type(atstype_ptrk) arg0, atstyvar_type(res) arg1, atstype_cloptr arg2) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret409, atstyvar_type(res)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 29964(line=1865, offs=3) -- 29984(line=1865, offs=23) */ ATSINSmove(tmpret409, ATSfunclo_fun(PMVd2vfunlab(d2v=loop$4479(1), flab=loop_162$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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 29964(line=1865, offs=3) -- 30423(line=1895, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret409) ; } /* end of [ATSLIB_056_prelude__stream_vt_foldleft_cloptr__161] */ #endif // end of [TEMPLATE] #if(0) /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 30000(line=1869, offs=1) -- 30401(line=1893, offs=4) */ /* local: loop_162$0(level=1) global: loop_162$0(level=1) local: global: */ ATSstatic() atstyvar_type(res) loop_162__162(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(tmpret410, atstyvar_type(res)) ; ATStmpdec(tmpref411, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp412, atstype_boxed) ; // ATStmpdec_void(tmp415) ; ATStmpdec(tmp416, atstyvar_type(res)) ; ATStmpdec(tmp417, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30000(line=1869, offs=1) -- 30401(line=1893, offs=4) */ ATSINSflab(__patsflab_loop_162): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30088(line=1876, offs=7) -- 30094(line=1876, offs=13) */ /* ATSINStmpdec(tmpref411) ; */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30097(line=1876, offs=16) -- 30100(line=1876, offs=19) */ ATSINSmove_llazyeval(tmpref411, atstype_boxed, arg0) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30113(line=1880, offs=1) -- 30119(line=1880, offs=7) */ ATSINSmove(tmp412, tmpref411) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30134(line=1882, offs=3) -- 30155(line=1883, offs=7) */ ATSINSlab(__atstmplab40): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30113(line=1880, offs=1) -- 30119(line=1880, offs=7) */ ATSifthen(ATSCKptriscons(tmp412)) { ATSINSgoto(__atstmplab43) ; } ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30155(line=1883, offs=7) -- 30155(line=1883, offs=7) */ ATSINSlab(__atstmplab41): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30167(line=1885, offs=5) -- 30199(line=1885, offs=37) */ ATSINSmove_void(tmp415, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), arg2))) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30201(line=1885, offs=39) -- 30204(line=1885, offs=42) */ ATSINSmove(tmpret410, arg1) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30240(line=1887, offs=3) -- 30269(line=1888, offs=14) */ ATSINSlab(__atstmplab42): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30113(line=1880, offs=1) -- 30119(line=1880, offs=7) */ #if(0) ATSifthen(ATSCKptrisnull(tmp412)) { ATSINSdeadcode_fail() ; } ; #endif /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30269(line=1888, offs=14) -- 30269(line=1888, offs=14) */ ATSINSlab(__atstmplab43): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30291(line=1889, offs=15) -- 30304(line=1889, offs=28) */ ATSINSmove(tmp416, ATSfunclo_clo(ATSPMVrefarg0(arg2), (atstype_cloptr, atstyvar_type(res), atsrefarg1_type(atstyvar_type(a))), atstyvar_type(res))(ATSPMVrefarg0(arg2), arg1, ATSPMVrefarg1(ATSPMVptrof(ATSSELcon(tmp412, postiats_tysum_4, atslab__0))))) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30319(line=1890, offs=15) -- 30322(line=1890, offs=18) */ ATSINSmove(tmp417, ATSSELcon(tmp412, postiats_tysum_4, atslab__1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30326(line=1890, offs=22) -- 30338(line=1890, offs=34) */ ATSINSfreecon(tmpref411) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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, tmp417) ; ATSINSmove_tlcal(apy1, tmp416) ; ATSINSmove_tlcal(apy2, arg2) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSargmove_tlcal(arg2, apy2) ; ATSINSfgoto(__patsflab_loop_162) ; ATStailcal_end() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30078(line=1875, offs=6) -- 30401(line=1893, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret410) ; } /* end of [loop_162__162] */ #endif // end of [TEMPLATE] /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 29943(line=1864, offs=3) -- 30423(line=1895, offs=2) */ /* local: global: stream_vt_foldleft_cloptr$161$1(level=1) local: global: */ ATSstatic() /* imparg = res(8326), a(8327) tmparg = S2Evar(res(8326)); S2Evar(a(8327)) tmpsub = Some(res(8326) -> S2EVar(5933); a(8327) -> S2Eapp(S2Ecst(g0int_t0ype); S2Eextkind(atstype_int))) */ postiats_tyrec_0 ATSLIB_056_prelude__stream_vt_foldleft_cloptr__161__1(atstkind_type(atstype_ptrk) arg0, postiats_tyrec_0 arg1, atstype_cloptr arg2) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret409__1, postiats_tyrec_0) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 29964(line=1865, offs=3) -- 29984(line=1865, offs=23) */ ATSINSmove(tmpret409__1, loop_162__162__1(arg0, arg1, arg2)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 29964(line=1865, offs=3) -- 30423(line=1895, offs=2) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret409__1) ; } /* end of [ATSLIB_056_prelude__stream_vt_foldleft_cloptr__161__1] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats: 30000(line=1869, offs=1) -- 30401(line=1893, offs=4) */ /* local: loop_162$1(level=2) global: loop_162$1(level=2) local: global: */ ATSstatic() postiats_tyrec_0 loop_162__162__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(tmpret410__1, postiats_tyrec_0) ; ATStmpdec(tmpref411__1, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp412__1, atstype_boxed) ; // ATStmpdec_void(tmp415__1) ; ATStmpdec(tmp416__1, postiats_tyrec_0) ; ATStmpdec(tmp417__1, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30000(line=1869, offs=1) -- 30401(line=1893, offs=4) */ ATSINSflab(__patsflab_loop_162): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30088(line=1876, offs=7) -- 30094(line=1876, offs=13) */ /* ATSINStmpdec(tmpref411) ; */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30097(line=1876, offs=16) -- 30100(line=1876, offs=19) */ ATSINSmove_llazyeval(tmpref411__1, atstype_boxed, arg0) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30113(line=1880, offs=1) -- 30119(line=1880, offs=7) */ ATSINSmove(tmp412__1, tmpref411__1) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30134(line=1882, offs=3) -- 30155(line=1883, offs=7) */ ATSINSlab(__atstmplab40): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30113(line=1880, offs=1) -- 30119(line=1880, offs=7) */ ATSifthen(ATSCKptriscons(tmp412__1)) { ATSINSgoto(__atstmplab43) ; } ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30155(line=1883, offs=7) -- 30155(line=1883, offs=7) */ ATSINSlab(__atstmplab41): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30167(line=1885, offs=5) -- 30199(line=1885, offs=37) */ ATSINSmove_void(tmp415__1, atspre_cloptr_free(ATSPMVcastfn(castvwtp0, atstkind_type(atstype_ptrk), arg2))) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30201(line=1885, offs=39) -- 30204(line=1885, offs=42) */ ATSINSmove(tmpret410__1, arg1) ; ATSbranch_end() ATSbranch_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30240(line=1887, offs=3) -- 30269(line=1888, offs=14) */ ATSINSlab(__atstmplab42): /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30113(line=1880, offs=1) -- 30119(line=1880, offs=7) */ #if(0) ATSifthen(ATSCKptrisnull(tmp412__1)) { ATSINSdeadcode_fail() ; } ; #endif /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30269(line=1888, offs=14) -- 30269(line=1888, offs=14) */ ATSINSlab(__atstmplab43): /* emit_instr: loc0 = : 0(line=0, offs=0) -- 0(line=0, offs=0) */ /* ibranch-mbody: */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30291(line=1889, offs=15) -- 30304(line=1889, offs=28) */ ATSINSmove(tmp416__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(tmp412__1, postiats_tysum_1, atslab__0))))) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30319(line=1890, offs=15) -- 30322(line=1890, offs=18) */ ATSINSmove(tmp417__1, ATSSELcon(tmp412__1, postiats_tysum_1, atslab__1)) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30326(line=1890, offs=22) -- 30338(line=1890, offs=34) */ ATSINSfreecon(tmpref411__1) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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, tmp417__1) ; ATSINSmove_tlcal(apy1, tmp416__1) ; ATSINSmove_tlcal(apy2, arg2) ; ATSINSargmove_tlcal(arg0, apy0) ; ATSINSargmove_tlcal(arg1, apy1) ; ATSINSargmove_tlcal(arg2, apy2) ; ATSINSfgoto(__patsflab_loop_162) ; ATStailcal_end() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/stream_vt.dats({$PATSPRE}/DATS/stream_vt.dats): 30078(line=1875, offs=6) -- 30401(line=1893, offs=4) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret410__1) ; } /* end of [loop_162__162__1] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6825(line=256, offs=56) -- 6870(line=256, offs=101) */ /* local: adjust_contents_159$0(level=1) global: adjust_contents_159$0(level=1), __patsfun_165$0(level=1) local: global: */ ATSstatic() postiats_tyrec_0 __patsfun_165(postiats_tyrec_0 arg0, atsrefarg1_type(atstkind_t0ype(atstype_int)) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret425, postiats_tyrec_0) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6825(line=256, offs=56) -- 6870(line=256, offs=101) */ ATSINSflab(__patsflab___patsfun_165): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 6844(line=256, offs=75) -- 6870(line=256, offs=101) */ ATSINSmove(tmpret425, adjust_contents_159(arg0, ATSderef(arg1, atstkind_t0ype(atstype_int)))) ; ATSfunbody_end() ATSreturn(tmpret425) ; } /* end of [__patsfun_165] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7173(line=264, offs=4) -- 7561(line=278, offs=6) */ /* local: totient_158$0(level=0) global: sqrt_int_48$0(level=0), is_prime_51$0(level=0), rip_136$0(level=0), prime_factors_142$0(level=0), totient_158$0(level=0), totient_sum_166$0(level=0) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) totient_sum_166(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret427, atstkind_type(atstype_ptrk)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7173(line=264, offs=4) -- 7561(line=278, offs=6) */ ATSINSflab(__patsflab_totient_sum_166): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7213(line=265, offs=3) -- 7561(line=278, offs=6) */ /* letpush(beg) */ /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7545(line=277, offs=5) -- 7555(line=277, offs=15) */ ATSINSmove(tmpret427, loop_167(ATSPMVi0nt(1), arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7213(line=265, offs=3) -- 7561(line=278, offs=6) */ /* INSletpop() */ ATSfunbody_end() ATSreturn(tmpret427) ; } /* end of [totient_sum_166] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7225(line=266, offs=9) -- 7535(line=275, offs=40) */ /* local: totient_158$0(level=0), loop_167$0(level=1) global: totient_158$0(level=0), loop_167$0(level=1) local: global: */ ATSstatic() atstkind_type(atstype_ptrk) loop_167(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret428, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp429, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmpref432, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp433, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmpref434, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp439, atstkind_t0ype(atstype_int)) ; ATStmpdec(tmp444, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7225(line=266, offs=9) -- 7535(line=275, offs=40) */ ATSINSflab(__patsflab_loop_167): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7328(line=267, offs=10) -- 7337(line=267, offs=19) */ ATSINSmove(tmp429, ATSLIB_056_prelude__lt_g1int_int__53__3(arg0, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7325(line=267, offs=7) -- 7535(line=275, offs=40) */ ATSif( tmp429 ) ATSthen() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7351(line=268, offs=9) -- 7484(line=273, offs=12) */ /* letpush(beg) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7369(line=269, offs=15) -- 7370(line=269, offs=16) */ /* ATSINStmpdec(tmpref432) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7378(line=269, offs=24) -- 7383(line=269, offs=29) */ ATSINSmove(tmp433, atspre_g1int_add_int(arg0, ATSPMVi0nt(1))) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7373(line=269, offs=19) -- 7391(line=269, offs=37) */ ATSINSmove(tmpref432, loop_167(tmp433, arg1)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7406(line=270, offs=15) -- 7407(line=270, offs=16) */ /* ATSINStmpdec(tmpref434) ; */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7437(line=270, offs=46) -- 7446(line=270, offs=55) */ ATSINSmove(tmp439, totient_158(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7410(line=270, offs=19) -- 7449(line=270, offs=58) */ ATSINSmove(tmpref434, ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__169__1(tmpref432, ATSPMVcastfn(witness, atstkind_t0ype(atstype_int), tmp439))) ; /* letpush(end) */ /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7471(line=272, offs=11) -- 7472(line=272, offs=12) */ ATSINSmove(tmpret428, tmpref434) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7351(line=268, offs=9) -- 7484(line=273, offs=12) */ /* INSletpop() */ } ATSelse() { /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7504(line=275, offs=9) -- 7535(line=275, offs=40) */ ATSINSmove(tmp444, totient_158(arg0)) ; /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory-internal.dats: 7504(line=275, offs=9) -- 7535(line=275, offs=40) */ ATSINSmove(tmpret428, ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__45__2(ATSPMVcastfn(witness, atstkind_t0ype(atstype_int), tmp444))) ; } /* ATSendif */ ATSfunbody_end() ATSreturn(tmpret428) ; } /* end of [loop_167] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats: 12520(line=650, offs=3) -- 12559(line=650, offs=42) */ /* local: global: lt_g1int_int$53$3(level=2) local: global: */ ATSstatic() /* imparg = tk(4627) tmparg = S2Evar(tk(4627)) tmpsub = Some(tk(4627) -> S2Eextkind(atstype_int)) */ atstkind_t0ype(atstype_bool) ATSLIB_056_prelude__lt_g1int_int__53__3(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret110__3, atstkind_t0ype(atstype_bool)) ; ATStmpdec(tmp111__3, atstkind_t0ype(atstype_int)) ; /* tmpvardeclst(end) */ ATSfunbody_beg() /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12546(line=650, offs=29) -- 12557(line=650, offs=40) */ ATSINSmove(tmp111__3, atspre_g1int2int_int_int(arg1)) ; /* emit_instr: loc0 = /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/integer.dats({$PATSPRE}/DATS/integer.dats): 12529(line=650, offs=12) -- 12559(line=650, offs=42) */ ATSINSmove(tmpret110__3, atspre_g1int_lt_int(arg0, tmp111__3)) ; ATSfunbody_end() ATSreturn(tmpret110__3) ; } /* end of [ATSLIB_056_prelude__lt_g1int_int__53__3] */ #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$169$0(level=0) local: global: */ ATSextern() /* imparg = tmparg = tmpsub = None() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__169(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret435, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp436) ; /* 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(tmp436, 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(tmpret435, 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(tmpret435) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__169] */ #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$169$1(level=2) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__169__1(atstkind_type(atstype_ptrk) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret435__1, atstkind_type(atstype_ptrk)) ; // ATStmpdec_void(tmp436__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(tmp436__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(tmpret435__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(tmpret435__1) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__add_intinf0_int__169__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$45$2(level=2) local: global: */ ATSstatic() /* imparg = tmparg = tmpsub = Some() */ atstkind_type(atstype_ptrk) ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__45__2(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret96__2, atstkind_type(atstype_ptrk)) ; ATStmpdec(tmp97__2, atstkind_type(atstype_ptrk)) ; // 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: 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(tmp97__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: 2264(line=78, offs=10) -- 2296(line=78, offs=42) */ ATSINSmove_void(tmp98__2, atscntrb_gmp_mpz_init_set_int(ATSPMVrefarg1(ATSSELrecsin(tmp97__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(tmpret96__2, tmp97__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(tmpret96__2) ; } /* end of [ATSCNTRB_056_HX_056_intinf_vt__intinf_make_int__45__2] */ /* /home/vanessa/.atspkg/0.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/pointer.dats: 3717(line=184, offs=10) -- 3749(line=184, offs=42) */ /* local: global: ptr_alloc$1$5(level=3) local: global: */ ATSstatic() /* imparg = a(4736) tmparg = S2Evar(a(4736)) tmpsub = Some(a(4736) -> 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.3.11/lib/ats2-postiats-0.3.11/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.3.11/lib/ats2-postiats-0.3.11/prelude/DATS/pointer.dats({$PATSPRE}/DATS/pointer.dats): 3722(line=184, offs=15) -- 3749(line=184, offs=42) */ ATSINSmove(tmpret2__5, atspre_ptr_alloc_tsz(ATSPMVsizeof(atscntrb_gmp_mpz))) ; ATSfunbody_end() ATSreturn(tmpret2__5) ; } /* end of [ATSLIB_056_prelude__ptr_alloc__1__5] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 630(line=35, offs=28) -- 652(line=36, offs=17) */ /* local: sum_divisors_127$0(level=0) global: sqrt_int_48$0(level=0), sum_divisors_127$0(level=0), sum_divisors_ats$173$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_int) sum_divisors_ats(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret445, 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: 613(line=35, offs=11) -- 653(line=36, offs=18) */ ATSINSflab(__patsflab_sum_divisors_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 638(line=36, offs=3) -- 652(line=36, offs=17) */ ATSINSmove(tmpret445, sum_divisors_127(arg0)) ; ATSfunbody_end() ATSreturn(tmpret445) ; } /* end of [sum_divisors_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 684(line=38, offs=30) -- 708(line=39, offs=19) */ /* local: count_divisors_122$0(level=0) global: sqrt_int_48$0(level=0), divisors_67$0(level=0), count_divisors_122$0(level=0), count_divisors_ats$174$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_int) count_divisors_ats(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret446, 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: 665(line=38, offs=11) -- 709(line=39, offs=20) */ ATSINSflab(__patsflab_count_divisors_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 692(line=39, offs=3) -- 708(line=39, offs=19) */ ATSINSmove(tmpret446, count_divisors_122(arg0)) ; ATSfunbody_end() ATSreturn(tmpret446) ; } /* end of [count_divisors_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 733(line=41, offs=23) -- 750(line=42, offs=12) */ /* local: totient_158$0(level=0) global: sqrt_int_48$0(level=0), is_prime_51$0(level=0), rip_136$0(level=0), prime_factors_142$0(level=0), totient_158$0(level=0), totient_ats$175$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_int) totient_ats(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret447, 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: 721(line=41, offs=11) -- 751(line=42, offs=13) */ ATSINSflab(__patsflab_totient_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 741(line=42, offs=3) -- 750(line=42, offs=12) */ ATSINSmove(tmpret447, totient_158(arg0)) ; ATSfunbody_end() ATSreturn(tmpret447) ; } /* end of [totient_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 780(line=44, offs=28) -- 802(line=45, offs=17) */ /* local: little_omega_153$0(level=0) global: sqrt_int_48$0(level=0), is_prime_51$0(level=0), rip_136$0(level=0), little_omega_153$0(level=0), little_omega_ats$176$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_int) little_omega_ats(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret448, 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: 763(line=44, offs=11) -- 803(line=45, offs=18) */ ATSINSflab(__patsflab_little_omega_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 788(line=45, offs=3) -- 802(line=45, offs=17) */ ATSINSmove(tmpret448, little_omega_153(arg0)) ; ATSfunbody_end() ATSreturn(tmpret448) ; } /* end of [little_omega_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 830(line=47, offs=26) -- 850(line=48, offs=15) */ /* local: is_perfect_134$0(level=0) global: sqrt_int_48$0(level=0), sum_divisors_127$0(level=0), is_perfect_134$0(level=0), is_perfect_ats$177$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_bool) is_perfect_ats(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret449, 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: 815(line=47, offs=11) -- 851(line=48, offs=16) */ ATSINSflab(__patsflab_is_perfect_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 838(line=48, offs=3) -- 850(line=48, offs=15) */ ATSINSmove(tmpret449, is_perfect_134(arg0)) ; ATSfunbody_end() ATSreturn(tmpret449) ; } /* end of [is_perfect_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 874(line=50, offs=22) -- 907(line=51, offs=25) */ /* local: jacobi_105$0(level=0) global: exp_5$0(level=0), sqrt_int_48$0(level=0), is_prime_51$0(level=0), div_gt_zero_98$0(level=0), exp_mod_prime_99$0(level=0), jacobi_105$0(level=0), jacobi_ats$178$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(tmpret450, 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: 863(line=50, offs=11) -- 907(line=51, offs=25) */ ATSINSflab(__patsflab_jacobi_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 885(line=51, offs=3) -- 907(line=51, offs=25) */ ATSINSmove(tmpret450, jacobi_105(arg0, ATSPMVcastfn(cast, atstkind_t0ype(atstype_int), arg1))) ; ATSfunbody_end() ATSreturn(tmpret450) ; } /* end of [jacobi_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 935(line=53, offs=27) -- 956(line=54, offs=16) */ /* local: totient_sum_166$0(level=0) global: sqrt_int_48$0(level=0), is_prime_51$0(level=0), rip_136$0(level=0), prime_factors_142$0(level=0), totient_158$0(level=0), totient_sum_166$0(level=0), totient_sum_ats$179$0(level=0) local: global: */ ATSextern() atstkind_type(atstype_ptrk) totient_sum_ats(atstkind_t0ype(atstype_int) arg0) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret451, 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: 919(line=53, offs=11) -- 957(line=54, offs=17) */ ATSINSflab(__patsflab_totient_sum_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 943(line=54, offs=3) -- 956(line=54, offs=16) */ ATSINSmove(tmpret451, totient_sum_166(arg0)) ; ATSfunbody_end() ATSreturn(tmpret451) ; } /* end of [totient_sum_ats] */ /* /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 981(line=56, offs=23) -- 1008(line=57, offs=19) */ /* local: is_coprime_65$0(level=0) global: gcd_61$0(level=0), is_coprime_65$0(level=0), coprime_ats$180$0(level=0) local: global: */ ATSextern() atstkind_t0ype(atstype_bool) coprime_ats(atstkind_t0ype(atstype_int) arg0, atstkind_t0ype(atstype_int) arg1) { /* tmpvardeclst(beg) */ ATStmpdec(tmpret452, 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: 969(line=56, offs=11) -- 1008(line=57, offs=19) */ ATSINSflab(__patsflab_coprime_ats): /* emit_instr: loc0 = /home/vanessa/programming/haskell/done/hs-ats/fast-arithmetic/ats-src/number-theory.dats: 992(line=57, offs=3) -- 1008(line=57, offs=19) */ ATSINSmove(tmpret452, is_coprime_65(arg0, arg1)) ; ATSfunbody_end() ATSreturn(tmpret452) ; } /* end of [coprime_ats] */ /* ** 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 */