git.sur5r.net Git - cc65/blob - test/val/cq714.c

   1 /*
   2   !!DESCRIPTION!! C-Manual Chapter 7.14: assignment operators
   3   !!ORIGIN!!      LCC 4.1 Testsuite
   4   !!LICENCE!!     own, freely distributeable for non-profit. read CPYRIGHT.LCC
   5 */
   6
   7 struct defs {
   8      int cbits;          /* No. of bits per char           */
   9      int ibits;          /*                 int            */
  10      int sbits;          /*                 short          */
  11      int lbits;          /*                 long           */
  12      int ubits;          /*                 unsigned       */
  13      int fbits;          /*                 float          */
  14      int dbits;          /*                 double         */
  15      #ifndef NO_FLOATS
  16         float fprec;        /* Smallest number that can be    */
  17         float dprec;        /* significantly added to 1.      */
  18      #endif
  19      int flgs;           /* Print return codes, by section */
  20      int flgm;           /* Announce machine dependencies  */
  21      int flgd;           /* give explicit diagnostics      */
  22      int flgl;           /* Report local return codes.     */
  23      int rrc;            /* recent return code             */
  24      int crc;            /* Cumulative return code         */
  25      char rfs[8];        /* Return from section            */
  26 };
  27
  28      int lbits;          /*                 long           */
  29      int ubits;          /*                 unsigned       */
  30      int fbits;          /*                 float          */
  31      int dbits;          /*                 double         */
  32      #ifndef NO_FLOATS
  33         float fprec;        /* Smallest number that can be    */
  34         float dprec;        /* significantly added to 1.      */
  35      #endif
  36      int flgs;           /* Print return codes, by section */
  37      int flgm;           /* Announce machine dependencies  */
  38      int flgd;           /* give explicit diagnostics      */
  39      int flgl;           /* Report local return codes.     */
  40      int rrc;            /* recent return code             */
  41      int crc;            /* Cumulative return code         */
  42      char rfs[8];        /* Return from section            */
  43
  44 #ifndef NO_OLD_FUNC_DECL
  45 s714(pd0)          /*  7.14  Assignment operators       */
  46 struct defs *pd0;
  47 {
  48 #else
  49 int s714(struct defs *pd0){
  50 #endif
  51    static char f[] = "Local error %d.\n";
  52    static char s714er[] = "s714,er%d\n";
  53    static char qs714[8] = "s714   ";
  54    register int prlc, lrc;
  55    int rc;
  56    char cl, cr;
  57    short sl, sr;
  58    int il, ir;
  59    long ll, lr;
  60    unsigned ul, ur;
  61    #ifndef NO_FLOATS
  62    float fl, fr;
  63    double dl, dr;
  64    #else
  65    signed fl, fr;
  66    signed dl, dr;
  67    #endif
  68    char *ps, *pt;
  69    ps = qs714;
  70    pt = pd0->rfs;
  71    rc = 0;
  72    lrc = 0;
  73    prlc = pd0->flgl;
  74    while (*pt++ = *ps++);
  75
  76         /* This section tests the assignment operators.
  77
  78         It is an exhaustive test of all assignment statements
  79         of the form:
  80
  81                 vl op vr
  82
  83         where vl and vr are variables from the set
  84         {char,short,int,long,unsigned,float,double} and op is
  85         one of the assignment operators. There are 395 such
  86         statements.
  87
  88         The initial values for the variables have been chosen
  89         so that both the initial values and the results will
  90         "fit" in just about any implementation, and that the re-
  91         sults will be such that they test for the proper form-
  92         ation of composite operators, rather than checking for
  93         the valid operation of those operators' components.
  94         For example, in checking >>=, we want to verify that
  95         a right shift and a move take place, rather than
  96         whether or not there may be some peculiarities about
  97         the right shift. Such tests have been made previously,
  98         and to repeat them here would be to throw out a red
  99         herring.
 100
 101         The table below lists the operators, assignment targets,
 102         initial values for left and right operands, and the
 103         expected values of the results.
 104
 105           =  +=  -=  *=  /=  %=  >>=  <<=  &=  ^=  |=
 106 char      2   7   3  10   2   1   1    20   8   6  14
 107 short     2   7   3  10   2   1   1    20   8   6  14
 108 int       2   7   3  10   2   1   1    20   8   6  14
 109 long      2   7   3  10   2   1   1    20   8   6  14
 110 unsigned  2   7   3  10   2   1   1    20   8   6  14
 111 float     2   7   3  10 2.5 |             |
 112 double    2   7   3  10 2.5 |             |
 113                             |             |
 114 initial         (5,2)       |    (5,2)    |  (12,10)
 115
 116         The following machine-generated program reflects the
 117         tests described in the table.
 118                                                                 */
 119
 120    cl = 5; cr = 2;
 121    cl = cr;
 122    if(cl != 2){
 123      lrc = 1;
 124      if(prlc) printf(f,lrc);
 125    }
 126    cl = 5; sr = 2;
 127    cl = sr;
 128    if(cl != 2){
 129      lrc = 2;
 130      if(prlc) printf(f,lrc);
 131    }
 132    cl = 5; ir = 2;
 133    cl = ir;
 134    if(cl != 2){
 135      lrc = 3;
 136      if(prlc) printf(f,lrc);
 137    }
 138    cl = 5; lr = 2;
 139    cl = lr;
 140    if(cl != 2){
 141      lrc = 4;
 142      if(prlc) printf(f,lrc);
 143    }
 144    cl = 5; ur = 2;
 145    cl = ur;
 146    if(cl != 2){
 147      lrc = 5;
 148      if(prlc) printf(f,lrc);
 149    }
 150    cl = 5; fr = 2;
 151    cl = fr;
 152    if(cl != 2){
 153      lrc = 6;
 154      if(prlc) printf(f,lrc);
 155    }
 156    cl = 5; dr = 2;
 157    cl = dr;
 158    if(cl != 2){
 159      lrc = 7;
 160      if(prlc) printf(f,lrc);
 161    }
 162    sl = 5; cr = 2;
 163    sl = cr;
 164    if(sl != 2){
 165      lrc = 8;
 166      if(prlc) printf(f,lrc);
 167    }
 168    sl = 5; sr = 2;
 169    sl = sr;
 170    if(sl != 2){
 171      lrc = 9;
 172      if(prlc) printf(f,lrc);
 173    }
 174    sl = 5; ir = 2;
 175    sl = ir;
 176    if(sl != 2){
 177      lrc = 10;
 178      if(prlc) printf(f,lrc);
 179    }
 180    sl = 5; lr = 2;
 181    sl = lr;
 182    if(sl != 2){
 183      lrc = 11;
 184      if(prlc) printf(f,lrc);
 185    }
 186    sl = 5; ur = 2;
 187    sl = ur;
 188    if(sl != 2){
 189      lrc = 12;
 190      if(prlc) printf(f,lrc);
 191    }
 192    sl = 5; fr = 2;
 193    sl = fr;
 194    if(sl != 2){
 195      lrc = 13;
 196      if(prlc) printf(f,lrc);
 197    }
 198    sl = 5; dr = 2;
 199    sl = dr;
 200    if(sl != 2){
 201      lrc = 14;
 202      if(prlc) printf(f,lrc);
 203    }
 204    il = 5; cr = 2;
 205    il = cr;
 206    if(il != 2){
 207      lrc = 15;
 208      if(prlc) printf(f,lrc);
 209    }
 210    il = 5; sr = 2;
 211    il = sr;
 212    if(il != 2){
 213      lrc = 16;
 214      if(prlc) printf(f,lrc);
 215    }
 216    il = 5; ir = 2;
 217    il = ir;
 218    if(il != 2){
 219      lrc = 17;
 220      if(prlc) printf(f,lrc);
 221    }
 222    il = 5; lr = 2;
 223    il = lr;
 224    if(il != 2){
 225      lrc = 18;
 226      if(prlc) printf(f,lrc);
 227    }
 228    il = 5; ur = 2;
 229    il = ur;
 230    if(il != 2){
 231      lrc = 19;
 232      if(prlc) printf(f,lrc);
 233    }
 234    il = 5; fr = 2;
 235    il = fr;
 236    if(il != 2){
 237      lrc = 20;
 238      if(prlc) printf(f,lrc);
 239    }
 240    il = 5; dr = 2;
 241    il = dr;
 242    if(il != 2){
 243      lrc = 21;
 244      if(prlc) printf(f,lrc);
 245    }
 246    ll = 5; cr = 2;
 247    ll = cr;
 248    if(ll != 2){
 249      lrc = 22;
 250      if(prlc) printf(f,lrc);
 251    }
 252    ll = 5; sr = 2;
 253    ll = sr;
 254    if(ll != 2){
 255      lrc = 23;
 256      if(prlc) printf(f,lrc);
 257    }
 258    ll = 5; ir = 2;
 259    ll = ir;
 260    if(ll != 2){
 261      lrc = 24;
 262      if(prlc) printf(f,lrc);
 263    }
 264    ll = 5; lr = 2;
 265    ll = lr;
 266    if(ll != 2){
 267      lrc = 25;
 268      if(prlc) printf(f,lrc);
 269    }
 270    ll = 5; ur = 2;
 271    ll = ur;
 272    if(ll != 2){
 273      lrc = 26;
 274      if(prlc) printf(f,lrc);
 275    }
 276    ll = 5; fr = 2;
 277    ll = fr;
 278    if(ll != 2){
 279      lrc = 27;
 280      if(prlc) printf(f,lrc);
 281    }
 282    ll = 5; dr = 2;
 283    ll = dr;
 284    if(ll != 2){
 285      lrc = 28;
 286      if(prlc) printf(f,lrc);
 287    }
 288    ul = 5; cr = 2;
 289    ul = cr;
 290    if(ul != 2){
 291      lrc = 29;
 292      if(prlc) printf(f,lrc);
 293    }
 294    ul = 5; sr = 2;
 295    ul = sr;
 296    if(ul != 2){
 297      lrc = 30;
 298      if(prlc) printf(f,lrc);
 299    }
 300    ul = 5; ir = 2;
 301    ul = ir;
 302    if(ul != 2){
 303      lrc = 31;
 304      if(prlc) printf(f,lrc);
 305    }
 306    ul = 5; lr = 2;
 307    ul = lr;
 308    if(ul != 2){
 309      lrc = 32;
 310      if(prlc) printf(f,lrc);
 311    }
 312    ul = 5; ur = 2;
 313    ul = ur;
 314    if(ul != 2){
 315      lrc = 33;
 316      if(prlc) printf(f,lrc);
 317    }
 318    ul = 5; fr = 2;
 319    ul = fr;
 320    if(ul != 2){
 321      lrc = 34;
 322      if(prlc) printf(f,lrc);
 323    }
 324    ul = 5; dr = 2;
 325    ul = dr;
 326    if(ul != 2){
 327      lrc = 35;
 328      if(prlc) printf(f,lrc);
 329    }
 330    fl = 5; cr = 2;
 331    fl = cr;
 332    if(fl != 2){
 333      lrc = 36;
 334      if(prlc) printf(f,lrc);
 335    }
 336    fl = 5; sr = 2;
 337    fl = sr;
 338    if(fl != 2){
 339      lrc = 37;
 340      if(prlc) printf(f,lrc);
 341    }
 342    fl = 5; ir = 2;
 343    fl = ir;
 344    if(fl != 2){
 345      lrc = 38;
 346      if(prlc) printf(f,lrc);
 347    }
 348    fl = 5; lr = 2;
 349    fl = lr;
 350    if(fl != 2){
 351      lrc = 39;
 352      if(prlc) printf(f,lrc);
 353    }
 354    fl = 5; ur = 2;
 355    fl = ur;
 356    if(fl != 2){
 357      lrc = 40;
 358      if(prlc) printf(f,lrc);
 359    }
 360    fl = 5; fr = 2;
 361    fl = fr;
 362    if(fl != 2){
 363      lrc = 41;
 364      if(prlc) printf(f,lrc);
 365    }
 366    fl = 5; dr = 2;
 367    fl = dr;
 368    if(fl != 2){
 369      lrc = 42;
 370      if(prlc) printf(f,lrc);
 371    }
 372    dl = 5; cr = 2;
 373    dl = cr;
 374    if(dl != 2){
 375      lrc = 43;
 376      if(prlc) printf(f,lrc);
 377    }
 378    dl = 5; sr = 2;
 379    dl = sr;
 380    if(dl != 2){
 381      lrc = 44;
 382      if(prlc) printf(f,lrc);
 383    }
 384    dl = 5; ir = 2;
 385    dl = ir;
 386    if(dl != 2){
 387      lrc = 45;
 388      if(prlc) printf(f,lrc);
 389    }
 390    dl = 5; lr = 2;
 391    dl = lr;
 392    if(dl != 2){
 393      lrc = 46;
 394      if(prlc) printf(f,lrc);
 395    }
 396    dl = 5; ur = 2;
 397    dl = ur;
 398    if(dl != 2){
 399      lrc = 47;
 400      if(prlc) printf(f,lrc);
 401    }
 402    dl = 5; fr = 2;
 403    dl = fr;
 404    if(dl != 2){
 405      lrc = 48;
 406      if(prlc) printf(f,lrc);
 407    }
 408    dl = 5; dr = 2;
 409    dl = dr;
 410    if(dl != 2){
 411      lrc = 49;
 412      if(prlc) printf(f,lrc);
 413    }
 414    cl = 5; cr = 2;
 415    cl += cr;
 416    if(cl != 7){
 417      lrc = 50;
 418      if(prlc) printf(f,lrc);
 419    }
 420    cl = 5; sr = 2;
 421    cl += sr;
 422    if(cl != 7){
 423      lrc = 51;
 424      if(prlc) printf(f,lrc);
 425    }
 426    cl = 5; ir = 2;
 427    cl += ir;
 428    if(cl != 7){
 429      lrc = 52;
 430      if(prlc) printf(f,lrc);
 431    }
 432    cl = 5; lr = 2;
 433    cl += lr;
 434    if(cl != 7){
 435      lrc = 53;
 436      if(prlc) printf(f,lrc);
 437    }
 438    cl = 5; ur = 2;
 439    cl += ur;
 440    if(cl != 7){
 441      lrc = 54;
 442      if(prlc) printf(f,lrc);
 443    }
 444    cl = 5; fr = 2;
 445    cl += fr;
 446    if(cl != 7){
 447      lrc = 55;
 448      if(prlc) printf(f,lrc);
 449    }
 450    cl = 5; dr = 2;
 451    cl += dr;
 452    if(cl != 7){
 453      lrc = 56;
 454      if(prlc) printf(f,lrc);
 455    }
 456    sl = 5; cr = 2;
 457    sl += cr;
 458    if(sl != 7){
 459      lrc = 57;
 460      if(prlc) printf(f,lrc);
 461    }
 462    sl = 5; sr = 2;
 463    sl += sr;
 464    if(sl != 7){
 465      lrc = 58;
 466      if(prlc) printf(f,lrc);
 467    }
 468    sl = 5; ir = 2;
 469    sl += ir;
 470    if(sl != 7){
 471      lrc = 59;
 472      if(prlc) printf(f,lrc);
 473    }
 474    sl = 5; lr = 2;
 475    sl += lr;
 476    if(sl != 7){
 477      lrc = 60;
 478      if(prlc) printf(f,lrc);
 479    }
 480    sl = 5; ur = 2;
 481    sl += ur;
 482    if(sl != 7){
 483      lrc = 61;
 484      if(prlc) printf(f,lrc);
 485    }
 486    sl = 5; fr = 2;
 487    sl += fr;
 488    if(sl != 7){
 489      lrc = 62;
 490      if(prlc) printf(f,lrc);
 491    }
 492    sl = 5; dr = 2;
 493    sl += dr;
 494    if(sl != 7){
 495      lrc = 63;
 496      if(prlc) printf(f,lrc);
 497    }
 498    il = 5; cr = 2;
 499    il += cr;
 500    if(il != 7){
 501      lrc = 64;
 502      if(prlc) printf(f,lrc);
 503    }
 504    il = 5; sr = 2;
 505    il += sr;
 506    if(il != 7){
 507      lrc = 65;
 508      if(prlc) printf(f,lrc);
 509    }
 510    il = 5; ir = 2;
 511    il += ir;
 512    if(il != 7){
 513      lrc = 66;
 514      if(prlc) printf(f,lrc);
 515    }
 516    il = 5; lr = 2;
 517    il += lr;
 518    if(il != 7){
 519      lrc = 67;
 520      if(prlc) printf(f,lrc);
 521    }
 522    il = 5; ur = 2;
 523    il += ur;
 524    if(il != 7){
 525      lrc = 68;
 526      if(prlc) printf(f,lrc);
 527    }
 528    il = 5; fr = 2;
 529    il += fr;
 530    if(il != 7){
 531      lrc = 69;
 532      if(prlc) printf(f,lrc);
 533    }
 534    il = 5; dr = 2;
 535    il += dr;
 536    if(il != 7){
 537      lrc = 70;
 538      if(prlc) printf(f,lrc);
 539    }
 540    ll = 5; cr = 2;
 541    ll += cr;
 542    if(ll != 7){
 543      lrc = 71;
 544      if(prlc) printf(f,lrc);
 545    }
 546    ll = 5; sr = 2;
 547    ll += sr;
 548    if(ll != 7){
 549      lrc = 72;
 550      if(prlc) printf(f,lrc);
 551    }
 552    ll = 5; ir = 2;
 553    ll += ir;
 554    if(ll != 7){
 555      lrc = 73;
 556      if(prlc) printf(f,lrc);
 557    }
 558    ll = 5; lr = 2;
 559    ll += lr;
 560    if(ll != 7){
 561      lrc = 74;
 562      if(prlc) printf(f,lrc);
 563    }
 564    ll = 5; ur = 2;
 565    ll += ur;
 566    if(ll != 7){
 567      lrc = 75;
 568      if(prlc) printf(f,lrc);
 569    }
 570    ll = 5; fr = 2;
 571    ll += fr;
 572    if(ll != 7){
 573      lrc = 76;
 574      if(prlc) printf(f,lrc);
 575    }
 576    ll = 5; dr = 2;
 577    ll += dr;
 578    if(ll != 7){
 579      lrc = 77;
 580      if(prlc) printf(f,lrc);
 581    }
 582    ul = 5; cr = 2;
 583    ul += cr;
 584    if(ul != 7){
 585      lrc = 78;
 586      if(prlc) printf(f,lrc);
 587    }
 588    ul = 5; sr = 2;
 589    ul += sr;
 590    if(ul != 7){
 591      lrc = 79;
 592      if(prlc) printf(f,lrc);
 593    }
 594    ul = 5; ir = 2;
 595    ul += ir;
 596    if(ul != 7){
 597      lrc = 80;
 598      if(prlc) printf(f,lrc);
 599    }
 600    ul = 5; lr = 2;
 601    ul += lr;
 602    if(ul != 7){
 603      lrc = 81;
 604      if(prlc) printf(f,lrc);
 605    }
 606    ul = 5; ur = 2;
 607    ul += ur;
 608    if(ul != 7){
 609      lrc = 82;
 610      if(prlc) printf(f,lrc);
 611    }
 612    ul = 5; fr = 2;
 613    ul += fr;
 614    if(ul != 7){
 615      lrc = 83;
 616      if(prlc) printf(f,lrc);
 617    }
 618    ul = 5; dr = 2;
 619    ul += dr;
 620    if(ul != 7){
 621      lrc = 84;
 622      if(prlc) printf(f,lrc);
 623    }
 624    fl = 5; cr = 2;
 625    fl += cr;
 626    if(fl != 7){
 627      lrc = 85;
 628      if(prlc) printf(f,lrc);
 629    }
 630    fl = 5; sr = 2;
 631    fl += sr;
 632    if(fl != 7){
 633      lrc = 86;
 634      if(prlc) printf(f,lrc);
 635    }
 636    fl = 5; ir = 2;
 637    fl += ir;
 638    if(fl != 7){
 639      lrc = 87;
 640      if(prlc) printf(f,lrc);
 641    }
 642    fl = 5; lr = 2;
 643    fl += lr;
 644    if(fl != 7){
 645      lrc = 88;
 646      if(prlc) printf(f,lrc);
 647    }
 648    fl = 5; ur = 2;
 649    fl += ur;
 650    if(fl != 7){
 651      lrc = 89;
 652      if(prlc) printf(f,lrc);
 653    }
 654    fl = 5; fr = 2;
 655    fl += fr;
 656    if(fl != 7){
 657      lrc = 90;
 658      if(prlc) printf(f,lrc);
 659    }
 660    fl = 5; dr = 2;
 661    fl += dr;
 662    if(fl != 7){
 663      lrc = 91;
 664      if(prlc) printf(f,lrc);
 665    }
 666    dl = 5; cr = 2;
 667    dl += cr;
 668    if(dl != 7){
 669      lrc = 92;
 670      if(prlc) printf(f,lrc);
 671    }
 672    dl = 5; sr = 2;
 673    dl += sr;
 674    if(dl != 7){
 675      lrc = 93;
 676      if(prlc) printf(f,lrc);
 677    }
 678    dl = 5; ir = 2;
 679    dl += ir;
 680    if(dl != 7){
 681      lrc = 94;
 682      if(prlc) printf(f,lrc);
 683    }
 684    dl = 5; lr = 2;
 685    dl += lr;
 686    if(dl != 7){
 687      lrc = 95;
 688      if(prlc) printf(f,lrc);
 689    }
 690    dl = 5; ur = 2;
 691    dl += ur;
 692    if(dl != 7){
 693      lrc = 96;
 694      if(prlc) printf(f,lrc);
 695    }
 696    dl = 5; fr = 2;
 697    dl += fr;
 698    if(dl != 7){
 699      lrc = 97;
 700      if(prlc) printf(f,lrc);
 701    }
 702    dl = 5; dr = 2;
 703    dl += dr;
 704    if(dl != 7){
 705      lrc = 98;
 706      if(prlc) printf(f,lrc);
 707    }
 708    cl = 5; cr = 2;
 709    cl -= cr;
 710    if(cl != 3){
 711      lrc = 99;
 712      if(prlc) printf(f,lrc);
 713    }
 714    cl = 5; sr = 2;
 715    cl -= sr;
 716    if(cl != 3){
 717      lrc = 100;
 718      if(prlc) printf(f,lrc);
 719    }
 720    cl = 5; ir = 2;
 721    cl -= ir;
 722    if(cl != 3){
 723      lrc = 101;
 724      if(prlc) printf(f,lrc);
 725    }
 726    cl = 5; lr = 2;
 727    cl -= lr;
 728    if(cl != 3){
 729      lrc = 102;
 730      if(prlc) printf(f,lrc);
 731    }
 732    cl = 5; ur = 2;
 733    cl -= ur;
 734    if(cl != 3){
 735      lrc = 103;
 736      if(prlc) printf(f,lrc);
 737    }
 738    cl = 5; fr = 2;
 739    cl -= fr;
 740    if(cl != 3){
 741      lrc = 104;
 742      if(prlc) printf(f,lrc);
 743    }
 744    cl = 5; dr = 2;
 745    cl -= dr;
 746    if(cl != 3){
 747      lrc = 105;
 748      if(prlc) printf(f,lrc);
 749    }
 750    sl = 5; cr = 2;
 751    sl -= cr;
 752    if(sl != 3){
 753      lrc = 106;
 754      if(prlc) printf(f,lrc);
 755    }
 756    sl = 5; sr = 2;
 757    sl -= sr;
 758    if(sl != 3){
 759      lrc = 107;
 760      if(prlc) printf(f,lrc);
 761    }
 762    sl = 5; ir = 2;
 763    sl -= ir;
 764    if(sl != 3){
 765      lrc = 108;
 766      if(prlc) printf(f,lrc);
 767    }
 768    sl = 5; lr = 2;
 769    sl -= lr;
 770    if(sl != 3){
 771      lrc = 109;
 772      if(prlc) printf(f,lrc);
 773    }
 774    sl = 5; ur = 2;
 775    sl -= ur;
 776    if(sl != 3){
 777      lrc = 110;
 778      if(prlc) printf(f,lrc);
 779    }
 780    sl = 5; fr = 2;
 781    sl -= fr;
 782    if(sl != 3){
 783      lrc = 111;
 784      if(prlc) printf(f,lrc);
 785    }
 786    sl = 5; dr = 2;
 787    sl -= dr;
 788    if(sl != 3){
 789      lrc = 112;
 790      if(prlc) printf(f,lrc);
 791    }
 792    il = 5; cr = 2;
 793    il -= cr;
 794    if(il != 3){
 795      lrc = 113;
 796      if(prlc) printf(f,lrc);
 797    }
 798    il = 5; sr = 2;
 799    il -= sr;
 800    if(il != 3){
 801      lrc = 114;
 802      if(prlc) printf(f,lrc);
 803    }
 804    il = 5; ir = 2;
 805    il -= ir;
 806    if(il != 3){
 807      lrc = 115;
 808      if(prlc) printf(f,lrc);
 809    }
 810    il = 5; lr = 2;
 811    il -= lr;
 812    if(il != 3){
 813      lrc = 116;
 814      if(prlc) printf(f,lrc);
 815    }
 816    il = 5; ur = 2;
 817    il -= ur;
 818    if(il != 3){
 819      lrc = 117;
 820      if(prlc) printf(f,lrc);
 821    }
 822    il = 5; fr = 2;
 823    il -= fr;
 824    if(il != 3){
 825      lrc = 118;
 826      if(prlc) printf(f,lrc);
 827    }
 828    il = 5; dr = 2;
 829    il -= dr;
 830    if(il != 3){
 831      lrc = 119;
 832      if(prlc) printf(f,lrc);
 833    }
 834    ll = 5; cr = 2;
 835    ll -= cr;
 836    if(ll != 3){
 837      lrc = 120;
 838      if(prlc) printf(f,lrc);
 839    }
 840    ll = 5; sr = 2;
 841    ll -= sr;
 842    if(ll != 3){
 843      lrc = 121;
 844      if(prlc) printf(f,lrc);
 845    }
 846    ll = 5; ir = 2;
 847    ll -= ir;
 848    if(ll != 3){
 849      lrc = 122;
 850      if(prlc) printf(f,lrc);
 851    }
 852    ll = 5; lr = 2;
 853    ll -= lr;
 854    if(ll != 3){
 855      lrc = 123;
 856      if(prlc) printf(f,lrc);
 857    }
 858    ll = 5; ur = 2;
 859    ll -= ur;
 860    if(ll != 3){
 861      lrc = 124;
 862      if(prlc) printf(f,lrc);
 863    }
 864    ll = 5; fr = 2;
 865    ll -= fr;
 866    if(ll != 3){
 867      lrc = 125;
 868      if(prlc) printf(f,lrc);
 869    }
 870    ll = 5; dr = 2;
 871    ll -= dr;
 872    if(ll != 3){
 873      lrc = 126;
 874      if(prlc) printf(f,lrc);
 875    }
 876    ul = 5; cr = 2;
 877    ul -= cr;
 878    if(ul != 3){
 879      lrc = 127;
 880      if(prlc) printf(f,lrc);
 881    }
 882    ul = 5; sr = 2;
 883    ul -= sr;
 884    if(ul != 3){
 885      lrc = 128;
 886      if(prlc) printf(f,lrc);
 887    }
 888    ul = 5; ir = 2;
 889    ul -= ir;
 890    if(ul != 3){
 891      lrc = 129;
 892      if(prlc) printf(f,lrc);
 893    }
 894    ul = 5; lr = 2;
 895    ul -= lr;
 896    if(ul != 3){
 897      lrc = 130;
 898      if(prlc) printf(f,lrc);
 899    }
 900    ul = 5; ur = 2;
 901    ul -= ur;
 902    if(ul != 3){
 903      lrc = 131;
 904      if(prlc) printf(f,lrc);
 905    }
 906    ul = 5; fr = 2;
 907    ul -= fr;
 908    if(ul != 3){
 909      lrc = 132;
 910      if(prlc) printf(f,lrc);
 911    }
 912    ul = 5; dr = 2;
 913    ul -= dr;
 914    if(ul != 3){
 915      lrc = 133;
 916      if(prlc) printf(f,lrc);
 917    }
 918    fl = 5; cr = 2;
 919    fl -= cr;
 920    if(fl != 3){
 921      lrc = 134;
 922      if(prlc) printf(f,lrc);
 923    }
 924    fl = 5; sr = 2;
 925    fl -= sr;
 926    if(fl != 3){
 927      lrc = 135;
 928      if(prlc) printf(f,lrc);
 929    }
 930    fl = 5; ir = 2;
 931    fl -= ir;
 932    if(fl != 3){
 933      lrc = 136;
 934      if(prlc) printf(f,lrc);
 935    }
 936    fl = 5; lr = 2;
 937    fl -= lr;
 938    if(fl != 3){
 939      lrc = 137;
 940      if(prlc) printf(f,lrc);
 941    }
 942    fl = 5; ur = 2;
 943    fl -= ur;
 944    if(fl != 3){
 945      lrc = 138;
 946      if(prlc) printf(f,lrc);
 947    }
 948    fl = 5; fr = 2;
 949    fl -= fr;
 950    if(fl != 3){
 951      lrc = 139;
 952      if(prlc) printf(f,lrc);
 953    }
 954    fl = 5; dr = 2;
 955    fl -= dr;
 956    if(fl != 3){
 957      lrc = 140;
 958      if(prlc) printf(f,lrc);
 959    }
 960    dl = 5; cr = 2;
 961    dl -= cr;
 962    if(dl != 3){
 963      lrc = 141;
 964      if(prlc) printf(f,lrc);
 965    }
 966    dl = 5; sr = 2;
 967    dl -= sr;
 968    if(dl != 3){
 969      lrc = 142;
 970      if(prlc) printf(f,lrc);
 971    }
 972    dl = 5; ir = 2;
 973    dl -= ir;
 974    if(dl != 3){
 975      lrc = 143;
 976      if(prlc) printf(f,lrc);
 977    }
 978    dl = 5; lr = 2;
 979    dl -= lr;
 980    if(dl != 3){
 981      lrc = 144;
 982      if(prlc) printf(f,lrc);
 983    }
 984    dl = 5; ur = 2;
 985    dl -= ur;
 986    if(dl != 3){
 987      lrc = 145;
 988      if(prlc) printf(f,lrc);
 989    }
 990    dl = 5; fr = 2;
 991    dl -= fr;
 992    if(dl != 3){
 993      lrc = 146;
 994      if(prlc) printf(f,lrc);
 995    }
 996    dl = 5; dr = 2;
 997    dl -= dr;
 998    if(dl != 3){
 999      lrc = 147;
1000      if(prlc) printf(f,lrc);
1001    }
1002    cl = 5; cr = 2;
1003    cl *= cr;
1004    if(cl != 10){
1005      lrc = 148;
1006      if(prlc) printf(f,lrc);
1007    }
1008    cl = 5; sr = 2;
1009    cl *= sr;
1010    if(cl != 10){
1011      lrc = 149;
1012      if(prlc) printf(f,lrc);
1013    }
1014    cl = 5; ir = 2;
1015    cl *= ir;
1016    if(cl != 10){
1017      lrc = 150;
1018      if(prlc) printf(f,lrc);
1019    }
1020    cl = 5; lr = 2;
1021    cl *= lr;
1022    if(cl != 10){
1023      lrc = 151;
1024      if(prlc) printf(f,lrc);
1025    }
1026    cl = 5; ur = 2;
1027    cl *= ur;
1028    if(cl != 10){
1029      lrc = 152;
1030      if(prlc) printf(f,lrc);
1031    }
1032    cl = 5; fr = 2;
1033    cl *= fr;
1034    if(cl != 10){
1035      lrc = 153;
1036      if(prlc) printf(f,lrc);
1037    }
1038    cl = 5; dr = 2;
1039    cl *= dr;
1040    if(cl != 10){
1041      lrc = 154;
1042      if(prlc) printf(f,lrc);
1043    }
1044    sl = 5; cr = 2;
1045    sl *= cr;
1046    if(sl != 10){
1047      lrc = 155;
1048      if(prlc) printf(f,lrc);
1049    }
1050    sl = 5; sr = 2;
1051    sl *= sr;
1052    if(sl != 10){
1053      lrc = 156;
1054      if(prlc) printf(f,lrc);
1055    }
1056    sl = 5; ir = 2;
1057    sl *= ir;
1058    if(sl != 10){
1059      lrc = 157;
1060      if(prlc) printf(f,lrc);
1061    }
1062    sl = 5; lr = 2;
1063    sl *= lr;
1064    if(sl != 10){
1065      lrc = 158;
1066      if(prlc) printf(f,lrc);
1067    }
1068    sl = 5; ur = 2;
1069    sl *= ur;
1070    if(sl != 10){
1071      lrc = 159;
1072      if(prlc) printf(f,lrc);
1073    }
1074    sl = 5; fr = 2;
1075    sl *= fr;
1076    if(sl != 10){
1077      lrc = 160;
1078      if(prlc) printf(f,lrc);
1079    }
1080    sl = 5; dr = 2;
1081    sl *= dr;
1082    if(sl != 10){
1083      lrc = 161;
1084      if(prlc) printf(f,lrc);
1085    }
1086    il = 5; cr = 2;
1087    il *= cr;
1088    if(il != 10){
1089      lrc = 162;
1090      if(prlc) printf(f,lrc);
1091    }
1092    il = 5; sr = 2;
1093    il *= sr;
1094    if(il != 10){
1095      lrc = 163;
1096      if(prlc) printf(f,lrc);
1097    }
1098    il = 5; ir = 2;
1099    il *= ir;
1100    if(il != 10){
1101      lrc = 164;
1102      if(prlc) printf(f,lrc);
1103    }
1104    il = 5; lr = 2;
1105    il *= lr;
1106    if(il != 10){
1107      lrc = 165;
1108      if(prlc) printf(f,lrc);
1109    }
1110    il = 5; ur = 2;
1111    il *= ur;
1112    if(il != 10){
1113      lrc = 166;
1114      if(prlc) printf(f,lrc);
1115    }
1116    il = 5; fr = 2;
1117    il *= fr;
1118    if(il != 10){
1119      lrc = 167;
1120      if(prlc) printf(f,lrc);
1121    }
1122    il = 5; dr = 2;
1123    il *= dr;
1124    if(il != 10){
1125      lrc = 168;
1126      if(prlc) printf(f,lrc);
1127    }
1128    ll = 5; cr = 2;
1129    ll *= cr;
1130    if(ll != 10){
1131      lrc = 169;
1132      if(prlc) printf(f,lrc);
1133    }
1134    ll = 5; sr = 2;
1135    ll *= sr;
1136    if(ll != 10){
1137      lrc = 170;
1138      if(prlc) printf(f,lrc);
1139    }
1140    ll = 5; ir = 2;
1141    ll *= ir;
1142    if(ll != 10){
1143      lrc = 171;
1144      if(prlc) printf(f,lrc);
1145    }
1146    ll = 5; lr = 2;
1147    ll *= lr;
1148    if(ll != 10){
1149      lrc = 172;
1150      if(prlc) printf(f,lrc);
1151    }
1152    ll = 5; ur = 2;
1153    ll *= ur;
1154    if(ll != 10){
1155      lrc = 173;
1156      if(prlc) printf(f,lrc);
1157    }
1158    ll = 5; fr = 2;
1159    ll *= fr;
1160    if(ll != 10){
1161      lrc = 174;
1162      if(prlc) printf(f,lrc);
1163    }
1164    ll = 5; dr = 2;
1165    ll *= dr;
1166    if(ll != 10){
1167      lrc = 175;
1168      if(prlc) printf(f,lrc);
1169    }
1170    ul = 5; cr = 2;
1171    ul *= cr;
1172    if(ul != 10){
1173      lrc = 176;
1174      if(prlc) printf(f,lrc);
1175    }
1176    ul = 5; sr = 2;
1177    ul *= sr;
1178    if(ul != 10){
1179      lrc = 177;
1180      if(prlc) printf(f,lrc);
1181    }
1182    ul = 5; ir = 2;
1183    ul *= ir;
1184    if(ul != 10){
1185      lrc = 178;
1186      if(prlc) printf(f,lrc);
1187    }
1188    ul = 5; lr = 2;
1189    ul *= lr;
1190    if(ul != 10){
1191      lrc = 179;
1192      if(prlc) printf(f,lrc);
1193    }
1194    ul = 5; ur = 2;
1195    ul *= ur;
1196    if(ul != 10){
1197      lrc = 180;
1198      if(prlc) printf(f,lrc);
1199    }
1200    ul = 5; fr = 2;
1201    ul *= fr;
1202    if(ul != 10){
1203      lrc = 181;
1204      if(prlc) printf(f,lrc);
1205    }
1206    ul = 5; dr = 2;
1207    ul *= dr;
1208    if(ul != 10){
1209      lrc = 182;
1210      if(prlc) printf(f,lrc);
1211    }
1212    fl = 5; cr = 2;
1213    fl *= cr;
1214    if(fl != 10){
1215      lrc = 183;
1216      if(prlc) printf(f,lrc);
1217    }
1218    fl = 5; sr = 2;
1219    fl *= sr;
1220    if(fl != 10){
1221      lrc = 184;
1222      if(prlc) printf(f,lrc);
1223    }
1224    fl = 5; ir = 2;
1225    fl *= ir;
1226    if(fl != 10){
1227      lrc = 185;
1228      if(prlc) printf(f,lrc);
1229    }
1230    fl = 5; lr = 2;
1231    fl *= lr;
1232    if(fl != 10){
1233      lrc = 186;
1234      if(prlc) printf(f,lrc);
1235    }
1236    fl = 5; ur = 2;
1237    fl *= ur;
1238    if(fl != 10){
1239      lrc = 187;
1240      if(prlc) printf(f,lrc);
1241    }
1242    fl = 5; fr = 2;
1243    fl *= fr;
1244    if(fl != 10){
1245      lrc = 188;
1246      if(prlc) printf(f,lrc);
1247    }
1248    fl = 5; dr = 2;
1249    fl *= dr;
1250    if(fl != 10){
1251      lrc = 189;
1252      if(prlc) printf(f,lrc);
1253    }
1254    dl = 5; cr = 2;
1255    dl *= cr;
1256    if(dl != 10){
1257      lrc = 190;
1258      if(prlc) printf(f,lrc);
1259    }
1260    dl = 5; sr = 2;
1261    dl *= sr;
1262    if(dl != 10){
1263      lrc = 191;
1264      if(prlc) printf(f,lrc);
1265    }
1266    dl = 5; ir = 2;
1267    dl *= ir;
1268    if(dl != 10){
1269      lrc = 192;
1270      if(prlc) printf(f,lrc);
1271    }
1272    dl = 5; lr = 2;
1273    dl *= lr;
1274    if(dl != 10){
1275      lrc = 193;
1276      if(prlc) printf(f,lrc);
1277    }
1278    dl = 5; ur = 2;
1279    dl *= ur;
1280    if(dl != 10){
1281      lrc = 194;
1282      if(prlc) printf(f,lrc);
1283    }
1284    dl = 5; fr = 2;
1285    dl *= fr;
1286    if(dl != 10){
1287      lrc = 195;
1288      if(prlc) printf(f,lrc);
1289    }
1290    dl = 5; dr = 2;
1291    dl *= dr;
1292    if(dl != 10){
1293      lrc = 196;
1294      if(prlc) printf(f,lrc);
1295    }
1296    cl = 5; cr = 2;
1297    cl /= cr;
1298    if(cl != 2){
1299      lrc = 197;
1300      if(prlc) printf(f,lrc);
1301    }
1302    cl = 5; sr = 2;
1303    cl /= sr;
1304    if(cl != 2){
1305      lrc = 198;
1306      if(prlc) printf(f,lrc);
1307    }
1308    cl = 5; ir = 2;
1309    cl /= ir;
1310    if(cl != 2){
1311      lrc = 199;
1312      if(prlc) printf(f,lrc);
1313    }
1314    cl = 5; lr = 2;
1315    cl /= lr;
1316    if(cl != 2){
1317      lrc = 200;
1318      if(prlc) printf(f,lrc);
1319    }
1320    cl = 5; ur = 2;
1321    cl /= ur;
1322    if(cl != 2){
1323      lrc = 201;
1324      if(prlc) printf(f,lrc);
1325    }
1326    cl = 5; fr = 2;
1327    cl /= fr;
1328    if(cl != 2){
1329      lrc = 202;
1330      if(prlc) printf(f,lrc);
1331    }
1332    cl = 5; dr = 2;
1333    cl /= dr;
1334    if(cl != 2){
1335      lrc = 203;
1336      if(prlc) printf(f,lrc);
1337    }
1338    sl = 5; cr = 2;
1339    sl /= cr;
1340    if(sl != 2){
1341      lrc = 204;
1342      if(prlc) printf(f,lrc);
1343    }
1344    sl = 5; sr = 2;
1345    sl /= sr;
1346    if(sl != 2){
1347      lrc = 205;
1348      if(prlc) printf(f,lrc);
1349    }
1350    sl = 5; ir = 2;
1351    sl /= ir;
1352    if(sl != 2){
1353      lrc = 206;
1354      if(prlc) printf(f,lrc);
1355    }
1356    sl = 5; lr = 2;
1357    sl /= lr;
1358    if(sl != 2){
1359      lrc = 207;
1360      if(prlc) printf(f,lrc);
1361    }
1362    sl = 5; ur = 2;
1363    sl /= ur;
1364    if(sl != 2){
1365      lrc = 208;
1366      if(prlc) printf(f,lrc);
1367    }
1368    sl = 5; fr = 2;
1369    sl /= fr;
1370    if(sl != 2){
1371      lrc = 209;
1372      if(prlc) printf(f,lrc);
1373    }
1374    sl = 5; dr = 2;
1375    sl /= dr;
1376    if(sl != 2){
1377      lrc = 210;
1378      if(prlc) printf(f,lrc);
1379    }
1380    il = 5; cr = 2;
1381    il /= cr;
1382    if(il != 2){
1383      lrc = 211;
1384      if(prlc) printf(f,lrc);
1385    }
1386    il = 5; sr = 2;
1387    il /= sr;
1388    if(il != 2){
1389      lrc = 212;
1390      if(prlc) printf(f,lrc);
1391    }
1392    il = 5; ir = 2;
1393    il /= ir;
1394    if(il != 2){
1395      lrc = 213;
1396      if(prlc) printf(f,lrc);
1397    }
1398    il = 5; lr = 2;
1399    il /= lr;
1400    if(il != 2){
1401      lrc = 214;
1402      if(prlc) printf(f,lrc);
1403    }
1404    il = 5; ur = 2;
1405    il /= ur;
1406    if(il != 2){
1407      lrc = 215;
1408      if(prlc) printf(f,lrc);
1409    }
1410    il = 5; fr = 2;
1411    il /= fr;
1412    if(il != 2){
1413      lrc = 216;
1414      if(prlc) printf(f,lrc);
1415    }
1416    il = 5; dr = 2;
1417    il /= dr;
1418    if(il != 2){
1419      lrc = 217;
1420      if(prlc) printf(f,lrc);
1421    }
1422    ll = 5; cr = 2;
1423    ll /= cr;
1424    if(ll != 2){
1425      lrc = 218;
1426      if(prlc) printf(f,lrc);
1427    }
1428    ll = 5; sr = 2;
1429    ll /= sr;
1430    if(ll != 2){
1431      lrc = 219;
1432      if(prlc) printf(f,lrc);
1433    }
1434    ll = 5; ir = 2;
1435    ll /= ir;
1436    if(ll != 2){
1437      lrc = 220;
1438      if(prlc) printf(f,lrc);
1439    }
1440    ll = 5; lr = 2;
1441    ll /= lr;
1442    if(ll != 2){
1443      lrc = 221;
1444      if(prlc) printf(f,lrc);
1445    }
1446    ll = 5; ur = 2;
1447    ll /= ur;
1448    if(ll != 2){
1449      lrc = 222;
1450      if(prlc) printf(f,lrc);
1451    }
1452    ll = 5; fr = 2;
1453    ll /= fr;
1454    if(ll != 2){
1455      lrc = 223;
1456      if(prlc) printf(f,lrc);
1457    }
1458    ll = 5; dr = 2;
1459    ll /= dr;
1460    if(ll != 2){
1461      lrc = 224;
1462      if(prlc) printf(f,lrc);
1463    }
1464    ul = 5; cr = 2;
1465    ul /= cr;
1466    if(ul != 2){
1467      lrc = 225;
1468      if(prlc) printf(f,lrc);
1469    }
1470    ul = 5; sr = 2;
1471    ul /= sr;
1472    if(ul != 2){
1473      lrc = 226;
1474      if(prlc) printf(f,lrc);
1475    }
1476    ul = 5; ir = 2;
1477    ul /= ir;
1478    if(ul != 2){
1479      lrc = 227;
1480      if(prlc) printf(f,lrc);
1481    }
1482    ul = 5; lr = 2;
1483    ul /= lr;
1484    if(ul != 2){
1485      lrc = 228;
1486      if(prlc) printf(f,lrc);
1487    }
1488    ul = 5; ur = 2;
1489    ul /= ur;
1490    if(ul != 2){
1491      lrc = 229;
1492      if(prlc) printf(f,lrc);
1493    }
1494    ul = 5; fr = 2;
1495    ul /= fr;
1496    if(ul != 2){
1497      lrc = 230;
1498      if(prlc) printf(f,lrc);
1499    }
1500    ul = 5; dr = 2;
1501    ul /= dr;
1502    if(ul != 2){
1503      lrc = 231;
1504      if(prlc) printf(f,lrc);
1505    }
1506
1507    #ifdef NO_FLOATS
1508                 fl = 5; cr = 2;
1509                 fl /= cr;
1510                 if(fl != 2){
1511                 lrc = 232;
1512                 if(prlc) printf(f,lrc);
1513                 }
1514                 fl = 5; sr = 2;
1515                 fl /= sr;
1516                 if(fl != 2){
1517                 lrc = 233;
1518                 if(prlc) printf(f,lrc);
1519                 }
1520                 fl = 5; ir = 2;
1521                 fl /= ir;
1522                 if(fl != 2){
1523                 lrc = 234;
1524                 if(prlc) printf(f,lrc);
1525                 }
1526                 fl = 5; lr = 2;
1527                 fl /= lr;
1528                 if(fl != 2){
1529                 lrc = 235;
1530                 if(prlc) printf(f,lrc);
1531                 }
1532                 fl = 5; ur = 2;
1533                 fl /= ur;
1534                 if(fl != 2){
1535                 lrc = 236;
1536                 if(prlc) printf(f,lrc);
1537                 }
1538                 fl = 5; fr = 2;
1539                 fl /= fr;
1540                 if(fl != 2){
1541                 lrc = 237;
1542                 if(prlc) printf(f,lrc);
1543                 }
1544                 fl = 5; dr = 2;
1545                 fl /= dr;
1546                 if(fl != 2){
1547                 lrc = 238;
1548                 if(prlc) printf(f,lrc);
1549                 }
1550                 dl = 5; cr = 2;
1551                 dl /= cr;
1552                 if(dl != 2){
1553                 lrc = 239;
1554                 if(prlc) printf(f,lrc);
1555                 }
1556                 dl = 5; sr = 2;
1557                 dl /= sr;
1558                 if(dl != 2){
1559                 lrc = 240;
1560                 if(prlc) printf(f,lrc);
1561                 }
1562                 dl = 5; ir = 2;
1563                 dl /= ir;
1564                 if(dl != 2){
1565                 lrc = 241;
1566                 if(prlc) printf(f,lrc);
1567                 }
1568                 dl = 5; lr = 2;
1569                 dl /= lr;
1570                 if(dl != 2){
1571                 lrc = 242;
1572                 if(prlc) printf(f,lrc);
1573                 }
1574                 dl = 5; ur = 2;
1575                 dl /= ur;
1576                 if(dl != 2){
1577                 lrc = 243;
1578                 if(prlc) printf(f,lrc);
1579                 }
1580                 dl = 5; fr = 2;
1581                 dl /= fr;
1582                 if(dl != 2){
1583                 lrc = 244;
1584                 if(prlc) printf(f,lrc);
1585                 }
1586                 dl = 5; dr = 2;
1587                 dl /= dr;
1588                 if(dl != 2){
1589                 lrc = 245;
1590                 if(prlc) printf(f,lrc);
1591                 }
1592    #else
1593                 fl = 5; cr = 2;
1594                 fl /= cr;
1595                 if(fl != 2.5){
1596                 lrc = 232;
1597                 if(prlc) printf(f,lrc);
1598                 }
1599                 fl = 5; sr = 2;
1600                 fl /= sr;
1601                 if(fl != 2.5){
1602                 lrc = 233;
1603                 if(prlc) printf(f,lrc);
1604                 }
1605                 fl = 5; ir = 2;
1606                 fl /= ir;
1607                 if(fl != 2.5){
1608                 lrc = 234;
1609                 if(prlc) printf(f,lrc);
1610                 }
1611                 fl = 5; lr = 2;
1612                 fl /= lr;
1613                 if(fl != 2.5){
1614                 lrc = 235;
1615                 if(prlc) printf(f,lrc);
1616                 }
1617                 fl = 5; ur = 2;
1618                 fl /= ur;
1619                 if(fl != 2.5){
1620                 lrc = 236;
1621                 if(prlc) printf(f,lrc);
1622                 }
1623                 fl = 5; fr = 2;
1624                 fl /= fr;
1625                 if(fl != 2.5){
1626                 lrc = 237;
1627                 if(prlc) printf(f,lrc);
1628                 }
1629                 fl = 5; dr = 2;
1630                 fl /= dr;
1631                 if(fl != 2.5){
1632                 lrc = 238;
1633                 if(prlc) printf(f,lrc);
1634                 }
1635                 dl = 5; cr = 2;
1636                 dl /= cr;
1637                 if(dl != 2.5){
1638                 lrc = 239;
1639                 if(prlc) printf(f,lrc);
1640                 }
1641                 dl = 5; sr = 2;
1642                 dl /= sr;
1643                 if(dl != 2.5){
1644                 lrc = 240;
1645                 if(prlc) printf(f,lrc);
1646                 }
1647                 dl = 5; ir = 2;
1648                 dl /= ir;
1649                 if(dl != 2.5){
1650                 lrc = 241;
1651                 if(prlc) printf(f,lrc);
1652                 }
1653                 dl = 5; lr = 2;
1654                 dl /= lr;
1655                 if(dl != 2.5){
1656                 lrc = 242;
1657                 if(prlc) printf(f,lrc);
1658                 }
1659                 dl = 5; ur = 2;
1660                 dl /= ur;
1661                 if(dl != 2.5){
1662                 lrc = 243;
1663                 if(prlc) printf(f,lrc);
1664                 }
1665                 dl = 5; fr = 2;
1666                 dl /= fr;
1667                 if(dl != 2.5){
1668                 lrc = 244;
1669                 if(prlc) printf(f,lrc);
1670                 }
1671                 dl = 5; dr = 2;
1672                 dl /= dr;
1673                 if(dl != 2.5){
1674                 lrc = 245;
1675                 if(prlc) printf(f,lrc);
1676                 }
1677    #endif
1678    cl = 5; cr = 2;
1679    cl %= cr;
1680    if(cl != 1){
1681      lrc = 246;
1682      if(prlc) printf(f,lrc);
1683    }
1684    cl = 5; sr = 2;
1685    cl %= sr;
1686    if(cl != 1){
1687      lrc = 247;
1688      if(prlc) printf(f,lrc);
1689    }
1690    cl = 5; ir = 2;
1691    cl %= ir;
1692    if(cl != 1){
1693      lrc = 248;
1694      if(prlc) printf(f,lrc);
1695    }
1696    cl = 5; lr = 2;
1697    cl %= lr;
1698    if(cl != 1){
1699      lrc = 249;
1700      if(prlc) printf(f,lrc);
1701    }
1702    cl = 5; ur = 2;
1703    cl %= ur;
1704    if(cl != 1){
1705      lrc = 250;
1706      if(prlc) printf(f,lrc);
1707    }
1708    sl = 5; cr = 2;
1709    sl %= cr;
1710    if(sl != 1){
1711      lrc = 251;
1712      if(prlc) printf(f,lrc);
1713    }
1714    sl = 5; sr = 2;
1715    sl %= sr;
1716    if(sl != 1){
1717      lrc = 252;
1718      if(prlc) printf(f,lrc);
1719    }
1720    sl = 5; ir = 2;
1721    sl %= ir;
1722    if(sl != 1){
1723      lrc = 253;
1724      if(prlc) printf(f,lrc);
1725    }
1726    sl = 5; lr = 2;
1727    sl %= lr;
1728    if(sl != 1){
1729      lrc = 254;
1730      if(prlc) printf(f,lrc);
1731    }
1732    sl = 5; ur = 2;
1733    sl %= ur;
1734    if(sl != 1){
1735      lrc = 255;
1736      if(prlc) printf(f,lrc);
1737    }
1738
1739    if(lrc != 0) {
1740      rc = 1;
1741      if(pd0->flgd != 0) printf(s714er,1);
1742    }
1743    return rc;
1744 }
1745
1746 /*********************************************************************************************
1747  the main loop that launches the sections
1748 *********************************************************************************************/
1749
1750 #ifndef NO_TYPELESS_STRUCT_PTR
1751         int section(int j,struct* pd0){
1752 #else
1753         int section(int j,void* pd0){
1754 #endif
1755         switch(j){
1756                 case 0: return s714(pd0);
1757         }
1758 }
1759
1760 #define cq_sections 1
1761
1762 /*
1763         C REFERENCE MANUAL (main)
1764 */
1765
1766 #ifndef NO_OLD_FUNC_DECL
1767 main(n,args)
1768 int n;
1769 char **args;
1770 {
1771 #else
1772 int main(int n,char **args) {
1773 #endif
1774
1775 int j;
1776 static struct defs d0, *pd0;
1777
1778    d0.flgs = 1;          /* These flags dictate            */
1779    d0.flgm = 1;          /*     the verbosity of           */
1780    d0.flgd = 1;          /*         the program.           */
1781    d0.flgl = 1;
1782
1783    pd0 = &d0;
1784
1785    for (j=0; j<cq_sections; j++) {
1786      d0.rrc=section(j,pd0);
1787      d0.crc=d0.crc+d0.rrc;
1788      if(d0.flgs != 0) printf("Section %s returned %d.\n",d0.rfs,d0.rrc);
1789    }
1790
1791    if(d0.crc == 0) printf("\nNo errors detected.\n");
1792    else printf("\nFailed.\n");
1793
1794    return d0.crc;
1795 }