/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation.  All rights reserved. */
/* time: February 21, 1992 11:33:32 pm PST */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: RasterOpGreenbayImpl, module: RasterOpGreenbayImpl */ 
/* switches: cfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
#define XRM_BITLSHIFT(x, y) ((word)(x) << (word)(y))
#define XRM_BITAND(x, y) (((word)(x)) & ((word)(y)))
#define XRM_BITOR(x, y) (((word)(x)) | ((word)(y)))
#define XRM_BITRSHIFT(x, y) ((word)(x) >> (word)(y))
static char versionStamp[] = "@(#)mob_version [2546705687,3216475025] RasterOpGreenbayImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef struct {word f0, f1;} W2;
typedef W2 *W2Pt;
#define SOURCE(p, l) /* source p, l */
static void NoName_Q1392();
static void RasterOpGreenbayImpl_P0();
static void Pack_P60();
static void Unpack_P120();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\227\313\245\027\300\277\267\203\221\100\164\000\000"};
static struct {unsigned f; char r[16];} string2 = {851984, "\257\300\207\330\332\257\300\255\011\025\200\100\150\000\000"};
static struct {
   word f0[4]; word f4; word f5; word f6; 
   word f7; word f8; word f9[2]; 
   } globalframe = {
   {0}, (word) Unpack_P120, 0, (word) Pack_P60, 
   0, (word) RasterOpGreenbayImpl_P0, {0}
   };

static void NoName_Q1392()
   {
   register ptr gf_c0142 =  (ptr) &globalframe;
   word var_c9888;
   (void) XR_DeclareGlobalFrame((word) "RasterOpGreenbayImpl", &globalframe, (word) XR_GetTypeIndexS((word) (&string1)), (word) (
         ( (bPt) gf_c0142)+32)/* var_c7296 */ );
   var_c9888 = (word) XR_ExportInterface((word) "RasterOp", (word) XR_GetTypeIndexS((word) (&string2)), 8);
   (* (( (ptr) gf_c0142)+10)/* var_c9856 */  ) = var_c9888;
   (void) XR_ExportProcS(var_c9888, (word) (( (bPt) gf_c0142)+24)/* var_c7264 */ , 1310724);
   (void) XR_ExportProcS(var_c9888, (word) (( (bPt) gf_c0142)+16)/* var_c7232 */ , 1310980);
   }

static void RasterOpGreenbayImpl_P0(formal_c07, formal_c06)
   word formal_c07;
   word formal_c06;
   {
   /* RasterOpGreenbayImpl: */ 
   }

static void Pack_P60(dst_v2604, src_v2632, bitsPerSample_v2660, nSamples_v2688)
   W2 dst_v2604;
   word src_v2632;
   word bitsPerSample_v2660;
   word nSamples_v2688;
   {
   word p_v2884;
   word h_v2912;
   word g_v2940;
   word j_v2968 = 0;
   word count_v2996;
   word bps_v3024;
   word m_v3052;
   word bitsPerSample2_v3080;
   word bitsPerSample4_v3108;
   word bitsPerSample8_v3136;
   /* Pack: */ 
SOURCE(186, 1964)
SOURCE(317, 60)
   p_v2884 = dst_v2604.f0;
SOURCE(379, 37)
   h_v2912 = (word) Basics_BITSHIFT((*  (ptr) p_v2884 ), (dst_v2604.f1 - 32));
SOURCE(418, 21)
   g_v2940 = dst_v2604.f1;
SOURCE(503, 26)
   count_v2996 = nSamples_v2688;
SOURCE(531, 29)
   bps_v3024 = bitsPerSample_v2660;
SOURCE(562, 29)
   m_v3052 = ((word) XRM_BITLSHIFT(1, bps_v3024) - 1);
SOURCE(593, 54)
   bitsPerSample2_v3080 = (bitsPerSample_v2660 + bitsPerSample_v2660);
SOURCE(649, 56)
   bitsPerSample4_v3108 = (bitsPerSample2_v3080 + bitsPerSample2_v3080);
SOURCE(707, 56)
   bitsPerSample8_v3136 = (bitsPerSample4_v3108 + bitsPerSample4_v3108);
SOURCE(875, 863)
   lab_L100002: ;
   if ((count_v2996 >= 8)) {
      }
   else {
      goto lab_L100000;
      };
SOURCE(895, 703)
   {
      word var_c7328;
      var_c7328 = (32 - g_v2940);
      if ((var_c7328 >= bitsPerSample8_v3136)) {
SOURCE(946, 22)
         {
            word var_c7360;
            word w_v7156;
            word s_v7184;
            w_v7156 = h_v2912;
            s_v7184 = (* (( (ptr) src_v2632)+j_v2968) );
SOURCE(824, 48)
            {
               word var_c7424;
               word var_c7456;
               var_c7424 = (word) XRM_BITLSHIFT(w_v7156, bps_v3024);
               var_c7456 = (word) XRM_BITAND(s_v7184, m_v3052);
               var_c7360 = (word) XRM_BITOR(var_c7424, var_c7456);
               };
            h_v2912 = var_c7360;
            };
SOURCE(970, 24)
         {
            word var_c7488;
            word w_v7080;
            word s_v7108;
            w_v7080 = h_v2912;
            s_v7108 = (* (( (ptr) src_v2632)+(j_v2968 + 1)) );
SOURCE(824, 48)
            {
               word var_c7552;
               word var_c7584;
               var_c7552 = (word) XRM_BITLSHIFT(w_v7080, bps_v3024);
               var_c7584 = (word) XRM_BITAND(s_v7108, m_v3052);
               var_c7488 = (word) XRM_BITOR(var_c7552, var_c7584);
               };
            h_v2912 = var_c7488;
            };
SOURCE(996, 24)
         {
            word var_c7616;
            word w_v7004;
            word s_v7032;
            w_v7004 = h_v2912;
            s_v7032 = (* (( (ptr) src_v2632)+(j_v2968 + 2)) );
SOURCE(824, 48)
            {
               word var_c7680;
               word var_c7712;
               var_c7680 = (word) XRM_BITLSHIFT(w_v7004, bps_v3024);
               var_c7712 = (word) XRM_BITAND(s_v7032, m_v3052);
               var_c7616 = (word) XRM_BITOR(var_c7680, var_c7712);
               };
            h_v2912 = var_c7616;
            };
SOURCE(1022, 24)
         {
            word var_c7744;
            word w_v6928;
            word s_v6956;
            w_v6928 = h_v2912;
            s_v6956 = (* (( (ptr) src_v2632)+(j_v2968 + 3)) );
SOURCE(824, 48)
            {
               word var_c7808;
               word var_c7840;
               var_c7808 = (word) XRM_BITLSHIFT(w_v6928, bps_v3024);
               var_c7840 = (word) XRM_BITAND(s_v6956, m_v3052);
               var_c7744 = (word) XRM_BITOR(var_c7808, var_c7840);
               };
            h_v2912 = var_c7744;
            };
SOURCE(1048, 24)
         {
            word var_c7872;
            word w_v6852;
            word s_v6880;
            w_v6852 = h_v2912;
            s_v6880 = (* (( (ptr) src_v2632)+(j_v2968 + 4)) );
SOURCE(824, 48)
            {
               word var_c7936;
               word var_c7968;
               var_c7936 = (word) XRM_BITLSHIFT(w_v6852, bps_v3024);
               var_c7968 = (word) XRM_BITAND(s_v6880, m_v3052);
               var_c7872 = (word) XRM_BITOR(var_c7936, var_c7968);
               };
            h_v2912 = var_c7872;
            };
SOURCE(1074, 24)
         {
            word var_c8000;
            word w_v6776;
            word s_v6804;
            w_v6776 = h_v2912;
            s_v6804 = (* (( (ptr) src_v2632)+(j_v2968 + 5)) );
SOURCE(824, 48)
            {
               word var_c8064;
               word var_c8096;
               var_c8064 = (word) XRM_BITLSHIFT(w_v6776, bps_v3024);
               var_c8096 = (word) XRM_BITAND(s_v6804, m_v3052);
               var_c8000 = (word) XRM_BITOR(var_c8064, var_c8096);
               };
            h_v2912 = var_c8000;
            };
SOURCE(1100, 24)
         {
            word var_c8128;
            word w_v6700;
            word s_v6728;
            w_v6700 = h_v2912;
            s_v6728 = (* (( (ptr) src_v2632)+(j_v2968 + 6)) );
SOURCE(824, 48)
            {
               word var_c8192;
               word var_c8224;
               var_c8192 = (word) XRM_BITLSHIFT(w_v6700, bps_v3024);
               var_c8224 = (word) XRM_BITAND(s_v6728, m_v3052);
               var_c8128 = (word) XRM_BITOR(var_c8192, var_c8224);
               };
            h_v2912 = var_c8128;
            };
SOURCE(1126, 24)
         {
            word var_c8256;
            word w_v6624;
            word s_v6652;
            w_v6624 = h_v2912;
            s_v6652 = (* (( (ptr) src_v2632)+(j_v2968 + 7)) );
SOURCE(824, 48)
            {
               word var_c8320;
               word var_c8352;
               var_c8320 = (word) XRM_BITLSHIFT(w_v6624, bps_v3024);
               var_c8352 = (word) XRM_BITAND(s_v6652, m_v3052);
               var_c8256 = (word) XRM_BITOR(var_c8320, var_c8352);
               };
            h_v2912 = var_c8256;
            };
SOURCE(1152, 17)
         count_v2996 = (count_v2996 - 8);
SOURCE(1171, 9)
         j_v2968 = (j_v2968 + 8);
SOURCE(1182, 22)
         g_v2940 = (g_v2940 + bitsPerSample8_v3136);
         goto endif03;
         };
      if ((var_c7328 >= bitsPerSample4_v3108)) {
SOURCE(1232, 22)
         {
            word var_c8384;
            word w_v6548;
            word s_v6576;
            w_v6548 = h_v2912;
            s_v6576 = (* (( (ptr) src_v2632)+j_v2968) );
SOURCE(824, 48)
            {
               word var_c8448;
               word var_c8480;
               var_c8448 = (word) XRM_BITLSHIFT(w_v6548, bps_v3024);
               var_c8480 = (word) XRM_BITAND(s_v6576, m_v3052);
               var_c8384 = (word) XRM_BITOR(var_c8448, var_c8480);
               };
            h_v2912 = var_c8384;
            };
SOURCE(1256, 24)
         {
            word var_c8512;
            word w_v6472;
            word s_v6500;
            w_v6472 = h_v2912;
            s_v6500 = (* (( (ptr) src_v2632)+(j_v2968 + 1)) );
SOURCE(824, 48)
            {
               word var_c8576;
               word var_c8608;
               var_c8576 = (word) XRM_BITLSHIFT(w_v6472, bps_v3024);
               var_c8608 = (word) XRM_BITAND(s_v6500, m_v3052);
               var_c8512 = (word) XRM_BITOR(var_c8576, var_c8608);
               };
            h_v2912 = var_c8512;
            };
SOURCE(1282, 24)
         {
            word var_c8640;
            word w_v6396;
            word s_v6424;
            w_v6396 = h_v2912;
            s_v6424 = (* (( (ptr) src_v2632)+(j_v2968 + 2)) );
SOURCE(824, 48)
            {
               word var_c8704;
               word var_c8736;
               var_c8704 = (word) XRM_BITLSHIFT(w_v6396, bps_v3024);
               var_c8736 = (word) XRM_BITAND(s_v6424, m_v3052);
               var_c8640 = (word) XRM_BITOR(var_c8704, var_c8736);
               };
            h_v2912 = var_c8640;
            };
SOURCE(1308, 24)
         {
            word var_c8768;
            word w_v6320;
            word s_v6348;
            w_v6320 = h_v2912;
            s_v6348 = (* (( (ptr) src_v2632)+(j_v2968 + 3)) );
SOURCE(824, 48)
            {
               word var_c8832;
               word var_c8864;
               var_c8832 = (word) XRM_BITLSHIFT(w_v6320, bps_v3024);
               var_c8864 = (word) XRM_BITAND(s_v6348, m_v3052);
               var_c8768 = (word) XRM_BITOR(var_c8832, var_c8864);
               };
            h_v2912 = var_c8768;
            };
SOURCE(1334, 17)
         count_v2996 = (count_v2996 - 4);
SOURCE(1353, 9)
         j_v2968 = (j_v2968 + 4);
SOURCE(1364, 22)
         g_v2940 = (g_v2940 + bitsPerSample4_v3108);
         goto endif03;
         };
      if ((var_c7328 >= bitsPerSample2_v3080)) {
SOURCE(1414, 22)
         {
            word var_c8896;
            word w_v6244;
            word s_v6272;
            w_v6244 = h_v2912;
            s_v6272 = (* (( (ptr) src_v2632)+j_v2968) );
SOURCE(824, 48)
            {
               word var_c8960;
               word var_c8992;
               var_c8960 = (word) XRM_BITLSHIFT(w_v6244, bps_v3024);
               var_c8992 = (word) XRM_BITAND(s_v6272, m_v3052);
               var_c8896 = (word) XRM_BITOR(var_c8960, var_c8992);
               };
            h_v2912 = var_c8896;
            };
SOURCE(1438, 24)
         {
            word var_c9024;
            word w_v6168;
            word s_v6196;
            w_v6168 = h_v2912;
            s_v6196 = (* (( (ptr) src_v2632)+(j_v2968 + 1)) );
SOURCE(824, 48)
            {
               word var_c9088;
               word var_c9120;
               var_c9088 = (word) XRM_BITLSHIFT(w_v6168, bps_v3024);
               var_c9120 = (word) XRM_BITAND(s_v6196, m_v3052);
               var_c9024 = (word) XRM_BITOR(var_c9088, var_c9120);
               };
            h_v2912 = var_c9024;
            };
SOURCE(1464, 17)
         count_v2996 = (count_v2996 - 2);
SOURCE(1483, 9)
         j_v2968 = (j_v2968 + 2);
SOURCE(1494, 22)
         g_v2940 = (g_v2940 + bitsPerSample2_v3080);
         goto endif03;
         };
      if ((var_c7328 >= bps_v3024)) {
SOURCE(1533, 22)
         {
            word var_c9152;
            word w_v6092;
            word s_v6120;
            w_v6092 = h_v2912;
            s_v6120 = (* (( (ptr) src_v2632)+j_v2968) );
SOURCE(824, 48)
            {
               word var_c9216;
               word var_c9248;
               var_c9216 = (word) XRM_BITLSHIFT(w_v6092, bps_v3024);
               var_c9248 = (word) XRM_BITAND(s_v6120, m_v3052);
               var_c9152 = (word) XRM_BITOR(var_c9216, var_c9248);
               };
            h_v2912 = var_c9152;
            };
SOURCE(1557, 17)
         count_v2996 = (count_v2996 - 1);
SOURCE(1576, 9)
         j_v2968 = (j_v2968 + 1);
SOURCE(1587, 11)
         g_v2940 = (g_v2940 + bps_v3024);
         goto endif03;
         };
SOURCE(1614, 4)
      goto lab_L100001;
      endif03: ;
      };
SOURCE(1685, 53)
   if ((g_v2940 == 32)) {
SOURCE(1703, 8)
      (*  (ptr) p_v2884 ) = h_v2912;
SOURCE(1713, 18)
      p_v2884 = (p_v2884 + 4);
SOURCE(1733, 5)
      g_v2940 = 0;
      };
   goto lab_L100002;
   lab_L100000: ;
   lab_L100001: ;
SOURCE(1752, 309)
   lab_L100020: ;
   if ((j_v2968 != nSamples_v2688)) {
      }
   else {
      goto lab_L100018;
      };
SOURCE(1774, 273)
   {
      word var_c9280;
      var_c9280 = (32 - g_v2940);
      if ((var_c9280 >= bps_v3024)) {
SOURCE(1804, 22)
         {
            word var_c9312;
            word w_v6016;
            word s_v6044;
            w_v6016 = h_v2912;
            s_v6044 = (* (( (ptr) src_v2632)+j_v2968) );
SOURCE(824, 48)
            {
               word var_c9376;
               word var_c9408;
               var_c9376 = (word) XRM_BITLSHIFT(w_v6016, bps_v3024);
               var_c9408 = (word) XRM_BITAND(s_v6044, m_v3052);
               var_c9312 = (word) XRM_BITOR(var_c9376, var_c9408);
               };
            h_v2912 = var_c9312;
            };
SOURCE(1828, 11)
         g_v2940 = (g_v2940 + bps_v3024);
         }
      else {
         if ((var_c9280 == 0)) {
SOURCE(1853, 8)
            (*  (ptr) p_v2884 ) = h_v2912;
SOURCE(1863, 18)
            p_v2884 = (p_v2884 + 4);
SOURCE(1883, 10)
            h_v2912 = (* (( (ptr) src_v2632)+j_v2968) );
SOURCE(1895, 7)
            g_v2940 = bps_v3024;
            }
         else {
SOURCE(1918, 131)
            {
               word k_v3428;
SOURCE(1920, 27)
               k_v3428 = (word) XRM_BITAND((* (( (ptr) src_v2632)+j_v2968) ), m_v3052);
SOURCE(1949, 52)
               {
                  word var_c9440;
                  var_c9440 = ((word) XRM_BITLSHIFT(h_v2912, (32 - g_v2940)) + (word) XRM_BITRSHIFT(k_v3428, ((bps_v3024 + g_v2940) - 32)));
                  (*  (ptr) p_v2884 ) = var_c9440;
                  };
SOURCE(2003, 18)
               p_v2884 = (p_v2884 + 4);
SOURCE(2023, 5)
               h_v2912 = k_v3428;
SOURCE(2030, 17)
               g_v2940 = ((g_v2940 + bps_v3024) - 32);
               };
            };
         };
      };
SOURCE(2052, 9)
   j_v2968 = (j_v2968 + 1);
   goto lab_L100020;
   lab_L100018: ;
SOURCE(2072, 78)
   if ((g_v2940 != 0)) {
SOURCE(2088, 62)
      {
         word var_c9472;
         {
            word var_c9504;
            word var_c0143;
            var_c9504 = ((word) XRM_BITLSHIFT(1, (32 - g_v2940)) - 1);
            var_c0143 = (word) XRM_BITAND((*  (ptr) p_v2884 ), var_c9504);
            var_c9472 = ((word) XRM_BITLSHIFT(h_v2912, (32 - g_v2940)) + var_c0143);
            };
         (*  (ptr) p_v2884 ) = var_c9472;
         };
      };
   }

static void Unpack_P120(dst_v2760, src_v2788, bitsPerSample_v2816, nSamples_v2844)
   word dst_v2760;
   W2 src_v2788;
   word bitsPerSample_v2816;
   word nSamples_v2844;
   {
   /* Unpack: */ 
SOURCE(2159, 3466)
   if ((nSamples_v2844 == 0)) {
      }
   else {
      if ((bitsPerSample_v2816 == 1)) {
SOURCE(2356, 1453)
         {
            word wordPointer_v3472;
            word srcp_v3500;
            word bit_v3528;
            word word_v3556 = 0;
            word count_v3584;
SOURCE(2358, 45)
            wordPointer_v3472 = (word) dst_v2760;
SOURCE(2405, 37)
            srcp_v3500 = src_v2788.f0;
SOURCE(2444, 23)
            bit_v3528 = src_v2788.f1;
SOURCE(2485, 26)
            count_v3584 = nSamples_v2844;
SOURCE(2513, 223)
            if ((bit_v3528 != 0)) {
SOURCE(2529, 28)
               word_v3556 = (word) XRM_BITLSHIFT((*  (ptr) srcp_v3500 ), bit_v3528);
SOURCE(2559, 24)
               srcp_v3500 = (srcp_v3500 + 4);
SOURCE(2585, 151)
               lab_L100024: ;
               if ( ( (count_v3584 != 0) ? (bit_v3528 != 32) : 0 ) ) {
                  }
               else {
                  goto lab_L100022;
                  };
SOURCE(2614, 37)
               (*  (ptr) wordPointer_v3472 ) = (word) XRM_BITRSHIFT(word_v3556, 31);
SOURCE(2653, 15)
               count_v3584 = (count_v3584 - 1);
SOURCE(2670, 11)
               bit_v3528 = (bit_v3528 + 1);
SOURCE(2683, 13)
               word_v3556 = (word_v3556 << 1);
SOURCE(2698, 38)
               wordPointer_v3472 = (wordPointer_v3472 + 4);
               goto lab_L100024;
               lab_L100022: ;
               };
SOURCE(2750, 9)
            bit_v3528 = 32;
SOURCE(2761, 818)
            lab_L100027: ;
            if ((count_v3584 >= 32)) {
               }
            else {
               goto lab_L100025;
               };
            {
               word a_v3652;
               word lp_v3680;
               word b_v3708;
SOURCE(2780, 64)
               a_v3652 = wordPointer_v3472;
SOURCE(2846, 67)
               lp_v3680 = srcp_v3500;
SOURCE(2915, 39)
               b_v3708 = (*  (ptr) lp_v3680 );
SOURCE(2956, 13)
               (*  (ptr) a_v3652 ) = ((int)b_v3708<0);
SOURCE(2973, 13)
               (* (( (ptr) a_v3652)+1) ) = (((unsigned)b_v3708 << 1) >> 31);
SOURCE(2990, 13)
               (* (( (ptr) a_v3652)+2) ) = (((unsigned)b_v3708 << 2) >> 31);
SOURCE(3007, 11)
               (* (( (ptr) a_v3652)+3) ) = (((unsigned)b_v3708 << 3) >> 31);
SOURCE(3022, 13)
               (* (( (ptr) a_v3652)+4) ) = (((unsigned)b_v3708 << 4) >> 31);
SOURCE(3039, 13)
               (* (( (ptr) a_v3652)+5) ) = (((unsigned)b_v3708 << 5) >> 31);
SOURCE(3056, 13)
               (* (( (ptr) a_v3652)+6) ) = (((unsigned)b_v3708 << 6) >> 31);
SOURCE(3073, 11)
               (* (( (ptr) a_v3652)+7) ) = (((unsigned)b_v3708 << 7) >> 31);
SOURCE(3088, 13)
               (* (( (ptr) a_v3652)+8) ) = (((unsigned)b_v3708 << 8) >> 31);
SOURCE(3105, 13)
               (* (( (ptr) a_v3652)+9) ) = (((unsigned)b_v3708 << 9) >> 31);
SOURCE(3122, 13)
               (* (( (ptr) a_v3652)+10) ) = (((unsigned)b_v3708 << 10) >> 31);
SOURCE(3137, 13)
               (* (( (ptr) a_v3652)+11) ) = (((unsigned)b_v3708 << 11) >> 31);
SOURCE(3152, 13)
               (* (( (ptr) a_v3652)+12) ) = (((unsigned)b_v3708 << 12) >> 31);
SOURCE(3167, 13)
               (* (( (ptr) a_v3652)+13) ) = (((unsigned)b_v3708 << 13) >> 31);
SOURCE(3182, 13)
               (* (( (ptr) a_v3652)+14) ) = (((unsigned)b_v3708 << 14) >> 31);
SOURCE(3197, 13)
               (* (( (ptr) a_v3652)+15) ) = (((unsigned)b_v3708 << 15) >> 31);
SOURCE(3212, 13)
               (* (( (ptr) a_v3652)+16) ) = (((unsigned)b_v3708 << 16) >> 31);
SOURCE(3227, 13)
               (* (( (ptr) a_v3652)+17) ) = (((unsigned)b_v3708 << 17) >> 31);
SOURCE(3242, 13)
               (* (( (ptr) a_v3652)+18) ) = (((unsigned)b_v3708 << 18) >> 31);
SOURCE(3257, 13)
               (* (( (ptr) a_v3652)+19) ) = (((unsigned)b_v3708 << 19) >> 31);
SOURCE(3272, 13)
               (* (( (ptr) a_v3652)+20) ) = (((unsigned)b_v3708 << 20) >> 31);
SOURCE(3287, 13)
               (* (( (ptr) a_v3652)+21) ) = (((unsigned)b_v3708 << 21) >> 31);
SOURCE(3302, 13)
               (* (( (ptr) a_v3652)+22) ) = (((unsigned)b_v3708 << 22) >> 31);
SOURCE(3317, 13)
               (* (( (ptr) a_v3652)+23) ) = (((unsigned)b_v3708 << 23) >> 31);
SOURCE(3332, 13)
               (* (( (ptr) a_v3652)+24) ) = (((unsigned)b_v3708 << 24) >> 31);
SOURCE(3347, 13)
               (* (( (ptr) a_v3652)+25) ) = (((unsigned)b_v3708 << 25) >> 31);
SOURCE(3362, 13)
               (* (( (ptr) a_v3652)+26) ) = (((unsigned)b_v3708 << 26) >> 31);
SOURCE(3377, 13)
               (* (( (ptr) a_v3652)+27) ) = (((unsigned)b_v3708 << 27) >> 31);
SOURCE(3392, 13)
               (* (( (ptr) a_v3652)+28) ) = (((unsigned)b_v3708 << 28) >> 31);
SOURCE(3407, 13)
               (* (( (ptr) a_v3652)+29) ) = (((unsigned)b_v3708 << 29) >> 31);
SOURCE(3422, 13)
               (* (( (ptr) a_v3652)+30) ) = (((unsigned)b_v3708 << 30) >> 31);
SOURCE(3437, 13)
               (* (( (ptr) a_v3652)+31) ) = (b_v3708 & 1);
SOURCE(3452, 55)
               wordPointer_v3472 = (wordPointer_v3472 + 128);
SOURCE(3509, 18)
               count_v3584 = (count_v3584 - 32);
SOURCE(3529, 50)
               srcp_v3500 = (srcp_v3500 + 4);
               };
            goto lab_L100027;
            lab_L100025: ;
SOURCE(3590, 208)
            lab_L100030: ;
            if ((count_v3584 != 0)) {
               }
            else {
               goto lab_L100028;
               };
SOURCE(3607, 66)
            if ((bit_v3528 == 32)) {
SOURCE(3626, 7)
               bit_v3528 = 0;
SOURCE(3635, 12)
               word_v3556 = (*  (ptr) srcp_v3500 );
SOURCE(3649, 24)
               srcp_v3500 = (srcp_v3500 + 4);
               };
SOURCE(3676, 37)
            (*  (ptr) wordPointer_v3472 ) = (word) XRM_BITRSHIFT(word_v3556, 31);
SOURCE(3715, 15)
            count_v3584 = (count_v3584 - 1);
SOURCE(3732, 13)
            word_v3556 = (word_v3556 << 1);
SOURCE(3747, 38)
            wordPointer_v3472 = (wordPointer_v3472 + 4);
SOURCE(3787, 11)
            bit_v3528 = (bit_v3528 + 1);
            goto lab_L100030;
            lab_L100028: ;
            };
         }
      else {
         if ( ( (bitsPerSample_v2816 == 8) ? ((src_v2788.f1 & 7) == 0) : 0 ) ) {
SOURCE(3863, 1113)
            {
               word wordPointer_v4016;
               word srcp_v4072;
               word byte_v4100;
               word count_v4128;
SOURCE(3865, 45)
               wordPointer_v4016 = (word) dst_v2760;
SOURCE(4044, 78)
               srcp_v4072 = src_v2788.f0;
SOURCE(4124, 26)
               byte_v4100 = (src_v2788.f1 >> 3);
SOURCE(4152, 26)
               count_v4128 = nSamples_v2844;
SOURCE(4180, 228)
               if ((byte_v4100 != 0)) {
SOURCE(4197, 135)
                  lab_L100033: ;
                  if ( ( (count_v4128 != 0) ? (byte_v4100 != 8) : 0 ) ) {
                     }
                  else {
                     goto lab_L100031;
                     };
SOURCE(4233, 25)
                  (*  (ptr) wordPointer_v4016 ) = (word) (* (( (bPt) srcp_v4072)+byte_v4100) );
SOURCE(4260, 38)
                  wordPointer_v4016 = (wordPointer_v4016 + 4);
SOURCE(4300, 15)
                  byte_v4100 = (byte_v4100 + 1);
SOURCE(4317, 15)
                  count_v4128 = (count_v4128 - 1);
                  goto lab_L100033;
                  lab_L100031: ;
SOURCE(4343, 55)
                  srcp_v4072 = (srcp_v4072 + 8);
SOURCE(4400, 8)
                  byte_v4100 = 0;
                  };
SOURCE(4413, 425)
               lab_L100036: ;
               if ((count_v4128 >= 8)) {
                  }
               else {
                  goto lab_L100034;
                  };
               {
                  word a_v4268;
                  W2 b_v4296;
SOURCE(4439, 71)
                  a_v4268 = wordPointer_v4016;
SOURCE(4512, 46)
                  b_v4296 = (*  (W2Pt) srcp_v4072 );
SOURCE(4560, 13)
                  (*  (ptr) a_v4268 ) = (*  (bPt) &b_v4296 );
SOURCE(4577, 13)
                  (* (( (ptr) a_v4268)+1) ) = (* (( (bPt) &b_v4296)+1) );
SOURCE(4594, 13)
                  (* (( (ptr) a_v4268)+2) ) = (* (( (bPt) &b_v4296)+2) );
SOURCE(4611, 11)
                  (* (( (ptr) a_v4268)+3) ) = (* (( (bPt) &b_v4296)+3) );
SOURCE(4626, 13)
                  (* (( (ptr) a_v4268)+4) ) = (* (( (bPt) &b_v4296)+4) );
SOURCE(4643, 13)
                  (* (( (ptr) a_v4268)+5) ) = (* (( (bPt) &b_v4296)+5) );
SOURCE(4660, 13)
                  (* (( (ptr) a_v4268)+6) ) = (* (( (bPt) &b_v4296)+6) );
SOURCE(4677, 11)
                  (* (( (ptr) a_v4268)+7) ) = (* (( (bPt) &b_v4296)+7) );
SOURCE(4692, 62)
                  wordPointer_v4016 = (wordPointer_v4016 + 32);
SOURCE(4756, 25)
                  count_v4128 = (count_v4128 - 8);
SOURCE(4783, 55)
                  srcp_v4072 = (srcp_v4072 + 8);
                  };
               goto lab_L100036;
               lab_L100034: ;
SOURCE(4849, 116)
               lab_L100039: ;
               if ((count_v4128 != 0)) {
                  }
               else {
                  goto lab_L100037;
                  };
SOURCE(4866, 25)
               (*  (ptr) wordPointer_v4016 ) = (word) (* (( (bPt) srcp_v4072)+byte_v4100) );
SOURCE(4893, 38)
               wordPointer_v4016 = (wordPointer_v4016 + 4);
SOURCE(4933, 15)
               byte_v4100 = (byte_v4100 + 1);
SOURCE(4950, 15)
               count_v4128 = (count_v4128 - 1);
               goto lab_L100039;
               lab_L100037: ;
               };
            }
         else {
SOURCE(4990, 649)
            {
               word m_v4496;
               word p_v4524;
               word h_v4552;
               word g_v4580;
SOURCE(4992, 39)
               m_v4496 = ((word) XRM_BITLSHIFT(1, bitsPerSample_v2816) - 1);
SOURCE(5033, 60)
               p_v4524 = src_v2788.f0;
SOURCE(5095, 14)
               h_v4552 = (*  (ptr) p_v4524 );
SOURCE(5111, 24)
               g_v4580 = (32 - src_v2788.f1);
SOURCE(5182, 443)
               {
                  register word j_v4672 = 0;
                  register word noName_c9536;
                  noName_c9536 = nSamples_v2844;
                  if ((j_v4672 >= noName_c9536)) {
                     goto lab_L100040;
                     };
                  lab_L100043: ;
SOURCE(5218, 407)
                  {
                     word var_c9568;
                     var_c9568 = g_v4580;
                     if (( (int)var_c9568 >=  (int)bitsPerSample_v2816)) {
SOURCE(5254, 49)
                        {
                           word var_c9600;
                           {
/*1*/   word var_c9632;
/*1*/   var_c9632 = (word) XRM_BITRSHIFT(h_v4552, (g_v4580 - bitsPerSample_v2816));
/*1*/   var_c9600 = (word) XRM_BITAND(m_v4496, var_c9632);
/*1*/   };
                           (* (( (ptr) dst_v2760)+j_v4672) ) = var_c9600;
                           };
SOURCE(5305, 21)
                        g_v4580 = (g_v4580 - bitsPerSample_v2816);
                        }
                     else {
                        if (( (int)var_c9568 ==  (int)0)) {
SOURCE(5338, 18)
                           p_v4524 = (p_v4524 + 4);
SOURCE(5358, 8)
                           h_v4552 = (*  (ptr) p_v4524 );
SOURCE(5368, 51)
                           {
/*1*/   word var_c9664;
/*1*/   {
/*1*/      word var_c9696;
/*1*/      var_c9696 = (word) XRM_BITRSHIFT(h_v4552, (32 - bitsPerSample_v2816));
/*1*/      var_c9664 = (word) XRM_BITAND(m_v4496, var_c9696);
/*1*/      };
/*1*/   (* (( (ptr) dst_v2760)+j_v4672) ) = var_c9664;
/*1*/   };
SOURCE(5421, 23)
                           g_v4580 = (32 - bitsPerSample_v2816);
                           }
                        else {
SOURCE(5460, 167)
                           {
/*1*/   word k_v4716;
SOURCE(5462, 14)
/*1*/   k_v4716 = (* (( (ptr) p_v4524)+1) );
SOURCE(5478, 91)
/*1*/   {
/*1*/      word var_c9728;
/*1*/      {
/*1*/         word var_c9760;
/*1*/         {
/*1*/            word var_c9792;
/*1*/            word var_c9824;
/*1*/            var_c9792 = (word) XRM_BITLSHIFT(h_v4552, (bitsPerSample_v2816 - g_v4580));
/*1*/            var_c9824 = (word) XRM_BITRSHIFT(k_v4716, ((g_v4580 + 32) - bitsPerSample_v2816));
/*1*/            var_c9760 = (word) XRM_BITOR(var_c9792, var_c9824);
/*1*/            };
/*1*/         var_c9728 = (word) XRM_BITAND(m_v4496, var_c9760);
/*1*/         };
/*1*/      (* (( (ptr) dst_v2760)+j_v4672) ) = var_c9728;
/*1*/      };
SOURCE(5571, 5)
/*1*/   h_v4552 = k_v4716;
SOURCE(5578, 18)
/*1*/   p_v4524 = (p_v4524 + 4);
SOURCE(5598, 27)
/*1*/   g_v4580 = ((g_v4580 + 32) - bitsPerSample_v2816);
/*1*/   };
                           };
                        };
                     };
                  j_v4672 = (j_v4672 + 1);
                  if ((j_v4672 < noName_c9536)) {
                     goto lab_L100043;
                     };
                  lab_L100040: ;
                  };
               };
            };
         };
      };
   }

/* file: RasterOpGreenbayImpl, module: RasterOpGreenbayImpl, compiled at: February 21, 1992 11:33:32 pm PST */ 
extern void XR_install_RasterOpGreenbayImpl() {
   NoName_Q1392();
   }
extern void XR_run_RasterOpGreenbayImpl() { XR_Start(&globalframe); }