//modex does 
//          for (zk=1;zk<precp2;zk++) z[zk-1]=z[zk];

#define modex()             \
__asm__ (                   \
    "pushl %%eax\n\t"       \
    "pushl %%ebx\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
    "movl $0x0,%%ecx\n\t"   \
    "movl $-1,%%edx\n\t"    \
    "movl _z,%%ebx\n\t"     \
    "133: incl %%ecx\n\t"   \
    "incl %%edx\n\t"        \
    "movl (%%ebx,%%ecx,4),%%eax\n\t"      \
    "movl %%eax,(%%ebx,%%edx,4)\n\t"      \
    "cmpl %%edx,_prec\n\t"  \
    "jne 133b\n\t"          \
    "popl %%edx\n\t"        \
    "popl %%ecx\n\t"        \
    "popl %%ebx\n\t"        \
    "popl %%eax\n\t"        \
    :                       \
    :                       \
    : "memory", "cc" );

#define modey()             \
__asm__ (                   \
    "pushl %%eax\n\t"       \
    "pushl %%ebx\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
    "movl $0x1,%%ecx\n\t"   \
    "movl $0x0,%%edx\n\t"   \
    "movl _z,%%ebx\n\t"     \
    "133: incl %%ecx\n\t"   \
    "incl %%edx\n\t"                   \
    "movl (%%ebx,%%ecx,4),%%eax\n\t"   \
    "movl %%eax,(%%ebx,%%edx,4)\n\t"   \
    "cmpl %%edx,_prec\n\t" \
    "jne 133b\n\t"         \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%ebx\n\t"       \
    "popl %%eax\n\t"       \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%ebx\n\t"       \
    "popl %%eax\n\t"       \
    :                      \
    :                      \
    : "memory", "cc" );


#define moxy1()                                                     \
__asm__ (                                                           \
   "pushl %%eax\n\t"                                                \
   "pushl %%ebx\n\t"                                                \
   "pushl %%edx\n\t"                                                \
   "movl _zugh1, %%eax\n\t"                                            \
   "movl $0xA,%%ebx\n\t"                                               \
   "mull %%ebx\n\t"                                                    \
   "movl _zcarryprnt,%%ebx\n\t"                                        \
   "addl %%ebx,%%eax\n\t"                                              \
   "adcl $0x0,%%edx\n\t"                                               \
   "movl %%edx,_zcarryprnt\n\t"                                        \
   "movl %%eax,_zugh1\n\t"                                             \
   "popl %%edx\n\t"        \
   "popl %%ebx\n\t"        \
   "popl %%eax\n\t"        \
   :                                                                \
   :                                                                \
   : "memory", "cc");

#define mode4()                                                     \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
    "pushl %%edi\n\t"     \
    "pushl %%esi\n\t"     \
    "pushl %%ebp\n\t"     \
    "movl _x,%%edi\n\t"  \
    "movl _y,%%esi\n\t"   \
    "movl _z,%%ebp\n\t"  \
    "movl $0x1,%%ecx\n\t"                                              \
    "movl (%%edi,%%ecx,4),%%eax\n\t"                                      \
    "addl (%%esi,%%ecx,4),%%eax\n\t"                                      \
    "movl %%eax,(%%ebp,%%ecx,4)\n\t"                                      \
    "movl $0x0,%%edx\n\t"                                              \
    "adcl $0x0,%%edx\n\t"                                              \
    "100: incl %%ecx\n\t"                                               \
    "movl (%%edi,%%ecx,4),%%eax\n\t"                                      \
    "addl %%edx,%%eax\n\t"                                             \
    "movl $0x0,%%edx\n\t"                                              \
    "adcl $0x0,%%edx\n\t"                                              \
    "addl (%%esi,%%ecx,4),%%eax\n\t"                                      \
    "movl %%eax,(%%ebp,%%ecx,4)\n\t"                                      \
    "adcl $0x0,%%edx\n\t"                                             \
    "cmpl _precp1a,%%ecx\n\t"                                           \
    "jne 100b\n\t"                                                   \
    "popl %%ebp\n\t"  \
    "popl %%esi\n\t"  \
    "popl %%edi\n\t"  \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%eax\n\t"       \
    :                                                            \
    :                                                            \
    : "memory", "cc");

#define mode5()                                    \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%ebx\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
   "movl _zugh1,%%eax\n\t"                      \
   "movl _y2,%%ebx\n\t"                         \
   "movl _zaddress,%%ecx\n\t"                     \
   "pushl %%edi\n\t" \
   "movl _z,%%edi\n\t"  \
   "mull %%ebx\n\t"                                                     \
   "addl _zcarry,%%eax\n\t"                                            \
   "movl %%eax,(%%edi,%%ecx,4)\n\t"                                       \
   "adcl $0x0,%%edx\n\t"                                               \
   "movl %%edx,_zcarry\n\t"                                            \
   "popl %%edi\n\t"  \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%ebx\n\t"       \
    "popl %%eax\n\t"       \
   :                                                               \
   :                                \
   : "memory", "cc");


#define mode55()                                      \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
   "movl _zugh1,%%eax\n\t"                  \
   "movl _zaddress,%%ecx\n\t"              \
   "pushl %%edi\n\t" \
   "movl _zden,%%edi\n\t"  \
   "mull _zdivisor\n\t"                                                \
   "addl _zcarry,%%eax\n\t"                                            \
   "movl %%eax,(%%edi,%%ecx,4)\n\t"                                    \
   "adcl $0x0,%%edx\n\t"                                               \
   "movl %%edx,_zcarry\n\t"                                            \
   "popl %%edi\n\t" \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%eax\n\t"       \
   :                                                                \
   :                                                                \
   : "memory", "cc");                                           

#define mode56()                                      \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
   "movl _zugh1,%%eax\n\t"      \
   "movl _zaddress,%%ecx\n\t"   \
   "pushl %%edi\n\t" \
   "movl _z,%%edi\n\t"  \
   "mull _zdivisor\n\t"                                                \
   "addl _zcarry,%%eax\n\t"                                            \
   "movl %%eax,(%%edi,%%ecx,4)\n\t"                                        \
   "adcl $0x0,%%edx\n\t"                                                \
   "movl %%edx,_zcarry\n\t"                                              \
   "popl %%edi\n\t" \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%eax\n\t"       \
   :                                                                 \
   :                                \
   : "memory", "cc");

#define mode6()                                              \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%ebx\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
   "movl _zlint28,%%eax\n\t"                       \
   "mull _zlint2\n\t"                                                   \
   "movl %%edx,_zcarry\n\t"                                             \
   "movl _precp1mzkisky,%%ecx\n\t"                                     \
   "movl $0x0,%%ebx\n\t"                                                 \
   "pushl %%edi\n\t"     \
   "pushl %%esi\n\t"     \
   "pushl %%ebp\n\t"     \
   "movl _z11,%%edi\n\t"  \
   "movl _x,%%esi\n\t"   \
   "movl _zcarry,%%ebp\n\t"  \
   "3:\n\t"                                                    \
   "incl %%ecx\n\t"                                             \
   "incl %%ebx\n\t"                                                 \
   "movl (%%edi,%%ecx,4),%%eax\n\t"                                      \
   "mull _zlint2\n\t"                                                   \
   "addl %%ebp,%%eax\n\t"                                             \
   "movl %%eax,(%%esi,%%ebx,4)\n\t"                                        \
   "adcl $0x0,%%edx\n\t"                                                \
   "movl %%edx,%%ebp\n\t"                                             \
   "cmpl _prec,%%ecx\n\t"                                          \
   "jne 3b\n\t"                                                   \
   "movl %%ebp,_zcarry\n\t"                                      \
   "popl %%ebp\n\t"  \
   "popl %%esi\n\t"  \
   "popl %%edi\n\t"  \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%ebx\n\t"       \
    "popl %%eax\n\t"       \
   :                                                                 \
   :                                         \
   : "memory", "cc");


#define mode66()                                                     \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%ebx\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
   "movl _precp1mzkisky,%%ecx\n\t"                                     \
   "movl $0x0,%%ebx\n\t"                                                 \
   "pushl %%edi\n\t"     \
   "pushl %%esi\n\t"     \
   "pushl %%ebp\n\t"     \
   "movl _z11,%%edi\n\t"  \
   "movl _x,%%esi\n\t"   \
   "movl _zcarry,%%ebp\n\t"  \
   "4:\n\t"                                                       \
   "incl %%ecx\n\t"                                             \
   "incl %%ebx\n\t"                                                 \
   "movl (%%edi,%%ecx,4),%%eax\n\t"                                      \
   "mull _zlint2\n\t"                                                   \
   "addl %%ebp,%%eax\n\t"                                             \
   "movl %%eax,(%%esi,%%ebx,4)\n\t"                                        \
   "adcl $0x0,%%edx\n\t"                                                \
   "movl %%edx,%%ebp\n\t"                                             \
   "cmpl _prec,%%ecx\n\t"                                          \
   "jne 4b\n\t"                                                          \
   "incl %%ebx\n\t"                                                \
   "movl %%ebp,(%%esi,%%ebx,4)\n\t"                                          \
   "popl %%ebp\n\t"  \
   "popl %%esi\n\t"  \
   "popl %%edi\n\t"  \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%ebx\n\t"       \
    "popl %%eax\n\t"       \
   :                                                                  \
   :                                                                 \
   : "memory", "cc");


#define mode77()                                                     \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
   "pushl %%edi\n\t"     \
   "pushl %%esi\n\t"     \
   "movl _x,%%edi\n\t"  \
   "movl _z,%%esi\n\t"   \
   "movl $0x0,%%ecx\n\t"                                                \
   "movl $0x0,%%edx\n\t"                                               \
   "51:\n\t"                                                 \
   "incl %%ecx\n\t"                                           \
   "movl (%%edi,%%ecx,4),%%eax\n\t"                                        \
   "addl %%edx,%%eax\n\t"                                               \
   "movl $0x0,%%edx\n\t"                                                \
   "adcl $0x0,%%edx\n\t"                                                \
   "addl (%%esi,%%ecx,4),%%eax\n\t"                                        \
   "movl %%eax,(%%esi,%%ecx,4)\n\t"                                        \
   "adcl $0x0,%%edx\n\t"                                                \
   "cmpl _maxinmode7,%%ecx\n\t"                                          \
   "jne 51b\n\t"                                                         \
   "incl %%ecx\n\t"                                                \
   "movl (%%edi,%%ecx,4),%%eax\n\t"                                         \
   "addl %%edx,%%eax\n\t"                                               \
   "movl %%eax,(%%esi,%%ecx,4)\n\t"                                        \
   "popl %%esi\n\t"  \
   "popl %%edi\n\t"  \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%eax\n\t"       \
   :                                                                 \
   :                                                   \
   : "memory", "cc");


#define mode777()                                                     \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
   "pushl %%edi\n\t"     \
   "pushl %%esi\n\t"     \
   "movl _x,%%edi\n\t"  \
   "movl _z,%%esi\n\t"   \
   "movl $0x0,%%ecx\n\t"                                                \
   "movl $0x0,%%edx\n\t"                                               \
   "52:\n\t"                                                \
   "incl %%ecx\n\t"                                           \
   "movl (%%edi,%%ecx,4),%%eax\n\t"                                        \
   "addl %%edx,%%eax\n\t"                                               \
   "movl $0x0,%%edx\n\t"                                                \
   "adcl $0x0,%%edx\n\t"                                                \
   "addl (%%esi,%%ecx,4),%%eax\n\t"                                        \
   "movl %%eax,(%%esi,%%ecx,4)\n\t"                                        \
   "adcl $0x0,%%edx\n\t"                                                \
   "cmpl _prec,%%ecx\n\t"                                          \
   "jne 52b\n\t"                                                         \
   "incl %%ecx\n\t"                                                \
   "movl (%%edi,%%ecx,4),%%eax\n\t"                                         \
   "addl %%edx,%%eax\n\t"                                               \
   "movl %%eax,(%%esi,%%ecx,4)\n\t"                                        \
   "popl %%esi\n\t"  \
   "popl %%edi\n\t"  \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%eax\n\t"       \
   :                                                                 \
   :                                                  \
   : "memory", "cc");

#define mode8()                                                     \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%ebx\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
   "pushl %%ebp\n\t"             \
   "pushl %%edi\n\t"             \
   "movl _z11,%%ebp\n\t"     \
   "movl _z,%%edi\n\t"       \
   "movl _precp1a,%%ecx\n\t"                                         \
   "movl $0x0,%%edx\n\t"                                                \
   "6:\n\t"                                                   \
   "decl %%ecx\n\t"                                            \
   "movl (%%ebp,%%ecx,4),%%eax\n\t"                                      \
   "divl _zkk2\n\t"                                                     \
   "movl %%eax,(%%edi,%%ecx,4)\n\t"                                        \
   "cmpl $0x1,%%ecx\n\t"                                                 \
   "jne 6b\n\t"                                                          \
   "popl %%edi\n\t"  \
   "popl %%ebp\n\t"  \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%ebx\n\t"       \
    "popl %%eax\n\t"       \
   :                                                                 \
   :                                                                 \
   : "memory", "cc");


#define mode1()                                                     \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%ebx\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
   "movl _zl2,%%eax\n\t"      \
   "pushl %%edi\n\t"     \
   "pushl %%esi\n\t"     \
   "pushl %%ebp\n\t"     \
   "movl _zden,%%edi\n\t"  \
   "movl _zL,%%esi\n\t"   \
   "movl _zcar,%%ebp\n\t"  \
   "mull _zd\n\t"                                                      \
   "movl %%edx,%%ebp\n\t"                                              \
   "movl $0x0,%%ecx\n\t"                                               \
   "7:\n\t"                                                      \
   "movl %%ecx,%%ebx\n\t"                                          \
   "addl _precp1mzkn,%%ebx\n\t"                                          \
   "movl (%%edi,%%ebx,4),%%eax\n\t"                                    \
   "mull _zd\n\t"                                                      \
   "addl %%ebp,%%eax\n\t"                                              \
   "adcl $0x0,%%edx\n\t"                                                \
   "movl %%eax,(%%esi,%%ecx,4)\n\t"                                      \
   "movl %%edx,%%ebp\n\t"                                              \
   "incl %%ecx\n\t"                                                    \
   "cmpl _zkn,%%ecx\n\t"                                               \
   "jne 7b\n\t"                                                         \
   "movl %%ebp,_zcar\n\t"   \
   "popl %%ebp\n\t"  \
   "popl %%esi\n\t"  \
   "popl %%edi\n\t"  \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%ebx\n\t"       \
    "popl %%eax\n\t"       \
   :                                                                \
   :                                                     \
   : "memory", "cc");

#define mode2()                                       \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%edx\n\t"       \
   "movl _zftemp1,%%edx\n\t"                     \
   "movl _zftemp2,%%eax\n\t"                     \
   "divl _za\n\t"                                                      \
   "movl %%eax,_zd\n\t"                                                 \
    "popl %%edx\n\t"       \
    "popl %%eax\n\t"       \
   :                                                               \
   :                               \
   : "memory", "cc");

#define mode22()                                               \
__asm__ (                                                           \
   "pushl %%eax\n\t"  \
   "pushl %%edx\n\t"  \
   "movl _zftemp1,%%edx\n\t"                                       \
   "movl $0x0,%%eax\n\t"                                           \
   "divl _za\n\t"                                                     \
   "movl %%edx,_zugh1\n\t"   \
   "popl %%edx\n\t"   \
   "popl %%eax\n\t"   \
   :                                                               \
   :                                                           \
   : "memory", "cc");

#define mode3()                                                     \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%ebx\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
   "movl $0x0,%%edx\n\t"                                               \
   "movl $0x0,%%ecx\n\t"                                               \
   "pushl %%ebp\n\t"  \
   "movl _zrem,%%ebp\n\t"  \
   "pushl %%esi\n\t"  \
   "movl _precp1mzkn,%%esi\n\t"  \
   "pushl %%edi\n\t"  \
   "movl _zden,%%edi\n\t"  \
   "8:\n\t"                                                           \
   "movl (%%ebp,%%ecx,4),%%eax\n\t"                                     \
   "movl %%esi,%%ebx\n\t"                                          \
   "addl %%ecx,%%ebx\n\t"                                              \
   "addl (%%edi,%%ebx,4),%%eax\n\t"                                    \
   "movl $0x0,%%ebx\n\t"                                               \
   "adcl $0x0,%%ebx\n\t"                                              \
   "addl %%edx,%%eax\n\t"                                             \
   "adcl $0x0,%%ebx\n\t"                                              \
   "movl %%eax,(%%ebp,%%ecx,4)\n\t"                                   \
   "movl %%ebx,%%edx\n\t"                                             \
   "incl %%ecx\n\t"                                              \
   "cmpl _zknp2,%%ecx\n\t"                                       \
   "jne 8b\n\t"                                                        \
   "popl %%edi\n\t"  \
   "popl %%esi\n\t"  \
   "popl %%ebp\n\t"  \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%ebx\n\t"       \
    "popl %%eax\n\t"       \
   :                                                               \
   :                                                               \
   : "memory", "cc");

#define mode33()                                                     \
__asm__ (                                                           \
    "pushl %%eax\n\t"       \
    "pushl %%ebx\n\t"       \
    "pushl %%ecx\n\t"       \
    "pushl %%edx\n\t"       \
   "movl $0x0,%%ebx\n\t"                                               \
   "movl $0x0,%%ecx\n\t"                                               \
   "pushl %%ebp\n\t"  \
   "movl _zL,%%ebp\n\t"  \
   "pushl %%esi\n\t"  \
   "movl _zhex99,%%esi\n\t"  \
   "pushl %%edi\n\t"  \
   "movl _zrem,%%edi\n\t"  \
   "9:\n\t"                                         \
   "movl %%esi,%%eax\n\t"                                        \
   "subl (%%ebp,%%ecx,4),%%eax\n\t"                                      \
   "addl (%%edi,%%ecx,4),%%eax\n\t"                                     \
   "movl $0x0,%%edx\n\t"                                               \
   "adcl $0x0,%%edx\n\t"                                               \
   "addl %%ebx,%%eax\n\t"                                               \
   "adcl $0x0,%%edx\n\t"                                               \
   "movl %%eax,(%%edi,%%ecx,4)\n\t"                                    \
   "movl %%edx,%%ebx\n\t"                                              \
   "incl %%ecx\n\t"                                               \
   "cmpl _zknp2,%%ecx\n\t"                                        \
   "jne 9b\n\t"                                                         \
   "popl %%edi\n\t"  \
   "popl %%esi\n\t"  \
   "popl %%ebp\n\t"  \
    "popl %%edx\n\t"       \
    "popl %%ecx\n\t"       \
    "popl %%ebx\n\t"       \
    "popl %%eax\n\t"       \
   :                                                                \
   :                                                                \
   : "memory", "cc");