/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1993 by Xerox Corporation.  All rights reserved. */
/* time: October 28, 1993 1:03:29 pm PDT */
/* C2C version: April 20, 1993 (sun4) */
/* ref-counting: off */
/* file: ImagerFourColorContextImpl, module: ImagerFourColorContextImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob_version [3802533672,2747246496] ImagerFourColorContextImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {W8 f; W8 r;} W16;
typedef struct {W16 f; word r;} W17;
typedef W16 *W16Pt;
typedef struct {word f0, f1;} W2;
typedef struct {word f0, f1, f2, f3;} W4;
typedef W4 *W4Pt;
typedef struct {word f0, f1, f2;} W3;
typedef W3 *W3Pt;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {W8 f; W6 r;} W14;
typedef W2 *W2Pt;
#define SOURCE(p, l) /* source p, l */
#define SGNCK(i) ((int) (word) (i) < 0 ? XR_RaiseArithmeticFault(): i )
static float fc23 = 1.0;
static float fc24 = 0.0;
static float fc25 = 2.0;
static float fc26 = 3.0;
static float fc27 = 2000.0;
#define MAX(cast, x, y)  ( ( cast x) > ( cast y) ? (x) : (y) )
static void NoName_Q1404();
static void ImagerFourColorContextImpl_P0();
static word Create_P60();
static void SetBitmaps_P120();
static void MySetColor_P180();
static word TranslateHalftoneProperties_P240();
static void MySetHalftoneProperties_P300();
static void MyMaskBoxes_P360();
static void MyMaskBitmap_P420();
static void Box_P876();
static void MyMaskRawBitmaps_P480();
static struct {unsigned f; char r[4];} string1 = {131076, "\216\251\000"};
static struct {unsigned f; char r[4];} string2 = {65537, "\001\000\000"};
static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\241\011\366\176\300\127\130\105\301\100\274\000\000"};
static struct {unsigned f; char r[4];} string4 = {131074, "\003\016\000"};
static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\342\246\017\050\300\243\277\247\240\100\200\000\000"};
static struct {unsigned f; char r[4];} string6 = {196611, "\004@\377"};
static struct {unsigned f; char r[44];} string7 = {2752556, "\260\006\005\146\151\162\163\164\257\300\236\211\262\021\300\215\235\324\340\101\034\005\004\162\145\163\164\214\257\300\236\211\262\021\300\215\235\324\340\101\034\261\000"};
static struct {unsigned f; char r[4];} string8 = {131074, "\004)\000"};
static struct {unsigned f; char r[12];} string9 = {589836, "FourColor\000\000"};
static struct {unsigned f; char r[16];} string10 = {917520, "FourColorPrint\000"};
static struct {unsigned f; char r[16];} string11 = {851984, "\257\300\342\246\017\050\300\243\277\247\240\100\164\000\000"};
static struct {unsigned f; char r[12];} string12 = {655370, "\006\003\024\001\030\001\100\120\004\003\000"};
static struct {unsigned f; char r[16];} string13 = {851984, "\257\300\241\011\366\176\300\127\130\105\301\100\150\000\000"};
static struct {unsigned f; char r[16];} string14 = {851984, "\257\300\362\033\246\002\300\160\342\266\057\100\150\000\000"};
static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\254\224\163\216\300\143\061\230\115\100\150\000\000"};
static struct {unsigned f; char r[16];} string16 = {851984, "\257\300\166\344\362\325\300\124\127\204\375\100\150\000\000"};
static struct {unsigned f; char r[16];} string17 = {851984, "\257\300\116\270\002\066\300\261\361\371\343\100\150\000\000"};
static struct {unsigned f; char r[16];} string18 = {851984, "\257\300\067\246\211\216\300\354\224\134\067\100\150\000\000"};
static struct {unsigned f; char r[16];} string19 = {851984, "\257\300\213\226\301\143\300\072\355\320\373\100\150\000\000"};
static struct {unsigned f; char r[16];} string20 = {851984, "\257\300\342\102\054\110\300\232\020\205\150\100\150\000\000"};
static struct {
   word f0[4]; word f4; word f5[17]; word f22; 
   word f23; word f24; word f25; word f26; 
   word f27; word f28; word f29; word f30; 
   word f31; word f32; word f33; word f34; 
   word f35; word f36; word f37; word f38; 
   word f39[2]; word f41; word f42; word f43; 
   word f44[8]; 
   } globalframe = {
   {0}, (word) 8000, {0}, (word) MyMaskRawBitmaps_P480, 
   0, (word) MyMaskBitmap_P420, 0, (word) MyMaskBoxes_P360, 
   0, (word) MySetHalftoneProperties_P300, 0, (word) TranslateHalftoneProperties_P240, 
   0, (word) MySetColor_P180, 0, (word) SetBitmaps_P120, 
   0, (word) Create_P60, 0, (word) ImagerFourColorContextImpl_P0, 
   {0}, (word) 1, (word) 2, (word) 3, 
   {0}
   };

static void NoName_Q1404()
   {
   register ptr gf_c0101 =  (ptr) &globalframe;
   word var_c22320;
   (* (( (ptr) gf_c0101)+7) ) = (word) XR_GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf_c0101)+10) ) = (word) XR_GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf_c0101)+16) ) = (word) XR_GetTypeIndex((word) &string5, 0, (word) &string6);
   (* (( (ptr) gf_c0101)+17) ) = (word) XR_GetTypeIndex((word) &string7, 0, (word) &string8);
   (*  (ptr) (( (bPt) gf_c0101)+80) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0101)+7) ), (word) &string9);
   (*  (ptr) (( (bPt) gf_c0101)+84) ) = (word) XR_GetRefLiteral((* (( (ptr) gf_c0101)+7) ), (word) &string10);
   (void) XR_DeclareGlobalFrame((word) "ImagerFourColorContextImpl", &globalframe, (word) XR_GetTypeIndex((word) &string11, 0, (word) &string12)
      , (word) (( (bPt) gf_c0101)+152)/* var_c21392 */ );
   var_c22320 = (word) XR_ImportInterface((word) "ImagerDevice", (word) XR_GetTypeIndexS((word) (&string13)), 2);
   (* (( (ptr) gf_c0101)+46)/* var_c21712 */  ) = var_c22320;
   (void) XR_ImportProcS(var_c22320, 69730569);
   var_c22320 = (word) XR_ImportInterface((word) "ImagerDeviceColor", (word) XR_GetTypeIndexS((word) (&string14)), 14);
   (* (( (ptr) gf_c0101)+48)/* var_c21808 */  ) = var_c22320;
   (void) XR_ImportProcS(var_c22320, 67371265);
   var_c22320 = (word) XR_ImportInterface((word) "ImagerMaskCache", (word) XR_GetTypeIndexS((word) (&string15)), 21);
   (* (( (ptr) gf_c0101)+45)/* var_c21584 */  ) = var_c22320;
   (void) XR_ImportProcS(var_c22320, 67375105);
   (void) XR_ImportProcS(var_c22320, 4460802);
   var_c22320 = (word) XR_ImportInterface((word) "ImagerPrintColor", (word) XR_GetTypeIndexS((word) (&string16)), 4);
   (* (( (ptr) gf_c0101)+47)/* var_c21744 */  ) = var_c22320;
   (void) XR_ImportProcS(var_c22320, 1835780);
   (void) XR_ImportProcS(var_c22320, 786947);
   (void) XR_ImportProcS(var_c22320, 524546);
   (void) XR_ImportProcS(var_c22320, 68157444);
   var_c22320 = (word) XR_ImportInterface((word) "ImagerPrintColorPrivate", (word) XR_GetTypeIndexS((word) (&string17)), 1);
   (* (( (ptr) gf_c0101)+49)/* var_c21840 */  ) = var_c22320;
   (void) XR_ImportProcS(var_c22320, 524290);
   var_c22320 = (word) XR_ImportInterface((word) "ImagerRaster", (word) XR_GetTypeIndexS((word) (&string18)), 13);
   (* (( (ptr) gf_c0101)+44)/* var_c21520 */  ) = var_c22320;
   (void) XR_ImportProcS(var_c22320, 1312514);
   (void) XR_ImportProcS(var_c22320, 67371521);
   (void) XR_ImportProcS(var_c22320, 68419845);
   (void) XR_ImportProcS(var_c22320, 67371009);
   var_c22320 = (word) XR_ImportInterface((word) "ImagerSample", (word) XR_GetTypeIndexS((word) (&string19)), 60);
   (* (( (ptr) gf_c0101)+50)/* var_c22224 */  ) = var_c22320;
   (void) XR_ImportProcS(var_c22320, 798979);
   (void) XR_ImportProcS(var_c22320, 2370822);
   var_c22320 = (word) XR_ExportInterface((word) "ImagerFourColorContext", (word) XR_GetTypeIndexS((word) (&string20)), 2);
   (* (( (ptr) gf_c0101)+51)/* var_c22352 */  ) = var_c22320;
   (void) XR_ExportProcS(var_c22320, (word) (( (bPt) gf_c0101)+144)/* var_c21360 */ , 70516744, (word) "Create");
   (void) XR_ExportProcS(var_c22320, (word) (( (bPt) gf_c0101)+136)/* var_c21328 */ , 1310978, (word) "SetBitmaps");
   }

static void ImagerFourColorContextImpl_P0(formal_c029, formal_c025)
   word formal_c029;
   word formal_c025;
   {
   register ptr gf_c22384 =  (ptr) &globalframe;
   /* ImagerFourColorContextImpl: */ 
SOURCE(905, 6035)
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
   /* moved to installation proc */ 
SOURCE(6506, 232)
   {
      word var_c21488;
      var_c21488 = XR_NewObject(60, (* (( (ptr) gf_c22384)+10) ));
      (*  (ptr) var_c21488 ) = (word) (( (bPt) gf_c22384)+128)/* var_c21296 */ ;
      (* (( (ptr) var_c21488)+1) ) = XR_CheckProc(0);
      (* (( (ptr) var_c21488)+2) ) = (word) (( (bPt) gf_c22384)+112)/* var_c21232 */ ;
      (* (( (ptr) var_c21488)+3) ) = (word) (( (bPt) gf_c22384)+104)/* var_c21200 */ ;
      (* (( (ptr) var_c21488)+4) ) = XR_CheckProc(0);
      (* (( (ptr) var_c21488)+5) ) = (word) (( (bPt) gf_c22384)+96)/* var_c21168 */ ;
      (* (( (ptr) var_c21488)+6) ) = XR_CheckProc(0);
      (* (( (ptr) var_c21488)+7) ) = (word) (( (bPt) gf_c22384)+88)/* var_c21136 */ ;
      (* (( (ptr) var_c21488)+8) ) = XR_CheckProc(0);
      (* (( (ptr) var_c21488)+9) ) = XR_CheckProc(0);
      (* (( (ptr) var_c21488)+10) ) = XR_CheckProc(0);
      (* (( (ptr) var_c21488)+11) ) = XR_CheckProc(0);
      (* (( (ptr) var_c21488)+12) ) = XR_CheckProc(0);
      (* (( (ptr) var_c21488)+13) ) = XR_CheckProc(0);
      (* (( (ptr) gf_c22384)+5)/* deviceClass_v3560 */  ) = var_c21488;
      };
SOURCE(6741, 78)
   {
      word pd21;
      pd21 = (* (( (ptr) (* (( (ptr) gf_c22384)+44)/* var_c21520 */  ))+4) );
      (* (( (ptr) gf_c22384)+6)/* contextClass_v3588 */  ) = (word) ( *( (fPt) ((*  (ptr) pd21 ))))((* ((( (ptr) gf_c22384)+20)
         ) ), pd21);
      };
SOURCE(6822, 118)
   {
      W17 var_c028;
      W16 var_c21552;
      (*  (ptr) (word) &var_c028 ) = (* (( (ptr) gf_c22384)+21) );
      {
         word idx22;
         (*  (ptr) &var_c21552 ) = (
            idx22 = (* (( (ptr) gf_c22384)+4)/* fontCacheMaxSize_v3308 */  ),
            SGNCK(idx22)
            );
         };
      (* (( (ptr) &var_c21552)+1) ) = XR_CheckProc(0);
      (* (( (ptr) &var_c21552)+2) ) = (*  (ptr) &fc23 );
      (* (( (ptr) &var_c21552)+3) ) = (*  (ptr) &fc24 );
      (* (( (ptr) &var_c21552)+4) ) = (*  (ptr) &fc25 );
      (* (( (ptr) &var_c21552)+5) ) = (*  (ptr) &fc26 );
      (* (( (ptr) &var_c21552)+6) ) = (*  (ptr) &fc24 );
      (* (( (ptr) &var_c21552)+7) ) = (*  (ptr) &fc27 );
      (* (( (ptr) &var_c21552)+8) ) = (*  (ptr) &fc23 );
      (* (( (ptr) &var_c21552)+9) ) = (*  (ptr) &fc24 );
      (* (( (ptr) &var_c21552)+10) ) = (*  (ptr) &fc24 );
      (* (( (ptr) &var_c21552)+11) ) = (*  (ptr) &fc24 );
      (* (( (ptr) &var_c21552)+12) ) = (*  (ptr) &fc24 );
      (* (( (ptr) &var_c21552)+13) ) = 0;
      (* (( (ptr) &var_c21552)+14) ) = 0;
      (* (( (ptr) &var_c21552)+15) ) = 0;
      (*  (W16Pt) (( (ptr) (word) &var_c028) + 1) ) = (var_c21552
      );
      {
         word pd28;
         pd28 = (* (( (ptr) (* (( (ptr) gf_c22384)+45)/* var_c21584 */  ))+21) );
         (void) ( *( (fPt) ((*  (ptr) pd28 ))))((word) (&var_c028), pd28);
         };
      };
   }

static word Create_P60(deviceSpaceSize_v3800, scanMode_v3828, surfaceUnitsPerInch_v3856, logicalDevice_v3884, halftoneProperties_v3912, correction_v3940, interpolate_v3968, bitmaps_v3996)
   W2 deviceSpaceSize_v3800;
   word scanMode_v3828;
   W2 surfaceUnitsPerInch_v3856;
   word logicalDevice_v3884;
   word halftoneProperties_v3912;
   word correction_v3940;
   word interpolate_v3968;
   W4 bitmaps_v3996;
   {
   register ptr gf_c22416 =  (ptr) &globalframe;
   word var_c4056;
   W4 box_v4956;
   word data_v4984;
   word deviceParm_v5012;
   word context_v5040;
   word device_v5068;
   /* Create: */ 
SOURCE(1661, 1528)
SOURCE(2010, 64)
   {
      word map_v21088;
      map_v21088 = bitmaps_v3996.f0;
      box_v4956 = (*  (W4Pt) map_v21088 );
      };
SOURCE(2076, 75)
   data_v4984 = XR_NewObject(32, (* (( (ptr) gf_c22416)+16) ));
   (*  (W4Pt) data_v4984 ) = bitmaps_v3996;
SOURCE(2153, 283)
   {
      word var_c21680;
      {
         word pd29;
         pd29 = (* (( (ptr) (* (( (ptr) gf_c22416)+45)/* var_c21584 */  ))+20) );
         var_c21680 = (word) ( *( (fPt) ((*  (ptr) pd29 ))))((* ((( (ptr) gf_c22416)+21)) ), pd29);
         };
      {
         word pd30;
         word idx31;
         word idx32;
         pd30 = (* (( (ptr) (* (( (ptr) gf_c22416)+46)/* var_c21712 */  ))+5) );
         deviceParm_v5012 = (word) ( *( (fPt) ((*  (ptr) pd30 ))))((* (( (ptr) gf_c22416)+5)/* deviceClass_v3560 */  ), (
               idx31 = (word) deviceSpaceSize_v3800.f0,
               SGNCK(idx31)
               ), (
               idx32 = (word) deviceSpaceSize_v3800.f1,
               SGNCK(idx32)
               ), scanMode_v3828, surfaceUnitsPerInch_v3856, 1
            , var_c21680, 0, 0, pd30);
         };
      };
SOURCE(2438, 147)
   {
      word pd33;
      pd33 = (* (( (ptr) (* (( (ptr) gf_c22416)+44)/* var_c21520 */  ))+5) );
      context_v5040 = (word) ( *( (fPt) ((*  (ptr) pd33 ))))((* (( (ptr) gf_c22416)+6)/* contextClass_v3588 */  ), (* (( (ptr) gf_c22416)+5)
         /* deviceClass_v3560 */  ), deviceParm_v5012, data_v4984, 0, pd33);
      };
SOURCE(2587, 61)
   {
      word pd34;
      pd34 = (* (( (ptr) (* (( (ptr) gf_c22416)+44)/* var_c21520 */  ))+6) );
      device_v5068 = (word) ( *( (fPt) ((*  (ptr) pd34 ))))(context_v5040, pd34);
      };
SOURCE(2650, 61)
   {
      word pd35;
      pd35 = (* (( (ptr) (* (( (ptr) gf_c22416)+44)/* var_c21520 */  ))+11) );
      (void) ( *( (fPt) ((*  (ptr) pd35 ))))(context_v5040, box_v4956, pd35);
      };
SOURCE(2713, 448)
   {
      register word t_v5112 = 0;
      lab_L100004: ;
      {
         word deviceColorData_v5156;
SOURCE(2738, 207)
         {
            word pd36;
            pd36 = (* (( (ptr) (* (( (ptr) gf_c22416)+47)/* var_c21744 */  ))+4) );
            deviceColorData_v5156 = (word) ( *( (fPt) ((*  (ptr) pd36 ))))(logicalDevice_v3884, halftoneProperties_v3912, correction_v3940, interpolate_v3968, pd36)
            ;
            };
SOURCE(2947, 111)
         {
            word var_c21776;
            {
               word pd37;
               pd37 = (* (( (ptr) (* (( (ptr) gf_c22416)+48)/* var_c21808 */  ))+5) );
               var_c21776 = (word) ( *( (fPt) ((*  (ptr) pd37 ))))(device_v5068, pd37);
               };
            {
               word pd38;
               pd38 = (* (( (ptr) (* (( (ptr) gf_c22416)+49)/* var_c21840 */  ))+4) );
               (void) ( *( (fPt) ((*  (ptr) pd38 ))))(deviceColorData_v5156, var_c21776, pd38);
               };
            };
SOURCE(3060, 58)
         {
            word pd39;
            pd39 = (* (( (ptr) (* (( (ptr) gf_c22416)+47)/* var_c21744 */  ))+5) );
            (void) ( *( (fPt) ((*  (ptr) pd39 ))))(deviceColorData_v5156, (* ((( (ptr) gf_c22416)+40)/* var_c21456 */ +t_v5112) ), pd39)
            ;
            };
SOURCE(3120, 41)
         (* ((( (ptr) data_v4984)+4)+t_v5112) ) = deviceColorData_v5156;
         };
      if ((t_v5112 >= 3)) {
         goto lab_L100001;
         };
      t_v5112 = (t_v5112 + 1);
      goto lab_L100004;
      lab_L100001: ;
      };
SOURCE(3172, 17)
   return(context_v5040);
   }

static void SetBitmaps_P120(context_v4116, bitmaps_v4144)
   word context_v4116;
   W4 bitmaps_v4144;
   {
   register ptr gf_c22448 =  (ptr) &globalframe;
   word device_v5200;
   word data_v5228;
   W4 box_v5256;
   /* SetBitmaps: */ 
SOURCE(3193, 381)
SOURCE(3295, 61)
   {
      word pd40;
      pd40 = (* (( (ptr) (* (( (ptr) gf_c22448)+44)/* var_c21520 */  ))+6) );
      device_v5200 = (word) ( *( (fPt) ((*  (ptr) pd40 ))))(context_v4116, pd40);
      };
SOURCE(3358, 32)
   data_v5228 = XR_Narrow((* (( (ptr) device_v5200)+7) ), (* (( (ptr) gf_c22448)+16) ));
SOURCE(3392, 64)
   {
      word map_v21040;
      map_v21040 = bitmaps_v4144.f0;
      box_v5256 = (*  (W4Pt) map_v21040 );
      };
SOURCE(3458, 61)
   {
      word pd41;
      pd41 = (* (( (ptr) (* (( (ptr) gf_c22448)+44)/* var_c21520 */  ))+11) );
      (void) ( *( (fPt) ((*  (ptr) pd41 ))))(context_v4116, box_v5256, pd41);
      };
SOURCE(3521, 53)
   {
      register word t_v5300 = 0;
      lab_L100009: ;
SOURCE(3546, 28)
      (* (( (ptr) data_v5228)+t_v5300) ) = (* (( (ptr) &bitmaps_v4144)+t_v5300) );
      if ((t_v5300 >= 3)) {
         goto lab_L100006;
         };
      t_v5300 = (t_v5300 + 1);
      goto lab_L100009;
      lab_L100006: ;
      };
   }

static void MySetColor_P180(device_v4220, color_v4248, viewToDevice_v4276)
   word device_v4220;
   word color_v4248;
   word viewToDevice_v4276;
   {
   register ptr gf_c22480 =  (ptr) &globalframe;
   word data_v5344;
   word constant_v5372 = 1;
   word allowFunnyBoxes_v5400 = 1;
   word allRasterSampleMaps_v5428 = 1;
   /* MySetColor: */ 
SOURCE(3588, 781)
SOURCE(3683, 32)
   data_v5344 = XR_Narrow((* (( (ptr) device_v4220)+7) ), (* (( (ptr) gf_c22480)+16) ));
SOURCE(3804, 406)
   {
      register word t_v5472 = 0;
      lab_L100013: ;
      {
         word deviceColorData_v5516;
         word var_c21904;
SOURCE(3829, 75)
         deviceColorData_v5516 = (* ((( (ptr) data_v5344)+4)+t_v5472) );
SOURCE(3906, 73)
         {
            word pd42;
            pd42 = (* (( (ptr) (* (( (ptr) gf_c22480)+47)/* var_c21744 */  ))+6) );
            (void) ( *( (fPt) ((*  (ptr) pd42 ))))(deviceColorData_v5516, color_v4248, viewToDevice_v4276, pd42);
            };
SOURCE(3981, 56)
         if (((* (( (ptr) deviceColorData_v5516)+10) ) != 1)) {
SOURCE(4021, 16)
            constant_v5372 = 0;
            };
SOURCE(4039, 68)
         if (((* (( (ptr) deviceColorData_v5516)+10) ) >= 3)) {
SOURCE(4084, 23)
            allowFunnyBoxes_v5400 = 0;
            };
SOURCE(4109, 101)
         var_c21904 = (* (( (ptr) data_v5344)+t_v5472) );
         if ( ( (var_c21904 == 0) ?  ! 1 :  ! ((* (( (ptr) var_c21904)+6) ) == 0) ) ) {
SOURCE(4175, 35)
            allRasterSampleMaps_v5428 = 0;
            };
         };
      if ((t_v5472 >= 3)) {
         goto lab_L100010;
         };
      t_v5472 = (t_v5472 + 1);
      goto lab_L100013;
      lab_L100010: ;
      };
SOURCE(4212, 157)
   (*  (ptr) (* (( (ptr) device_v4220)+6) ) ) = ((word) (((word) (((word) (((word)  (unsigned) (allowFunnyBoxes_v5400 & 1) << 1) + 
    (unsigned) (allowFunnyBoxes_v5400 & 1)) << 2) +  (unsigned) (constant_v5372 & 1)) << 1) +  (unsigned) ((0 != constant_v5372) && (0 != allRasterSampleMaps_v5428))) << 27);
   }

static word TranslateHalftoneProperties_P240(h_v4336)
   word h_v4336;
   {
   register ptr gf_c22512 =  (ptr) &globalframe;
   word var_c4380;
   /* TranslateHalftoneProperties: */ 
SOURCE(4375, 267)
SOURCE(4489, 153)
   if ((h_v4336 == 0)) {
      return(0);
      }
   else {
      {
         word var_c22000;
         word var_c22032;
         var_c22000 = (word) TranslateHalftoneProperties_P240((* ((( (ptr) h_v4336)+6)) ));
         var_c22032 = XR_NewObject(24, (* (( (ptr) gf_c22512)+17) ));
         (*  (ptr) var_c22032 ) = (*  (ptr) h_v4336 );
         (* (( (ptr) var_c22032)+1) ) = (* (( (ptr) h_v4336)+1) );
         (*  (W3Pt) (( (ptr) var_c22032)+2) ) = (*  (W3Pt) (( (ptr) h_v4336)+2) );
         (* (( (ptr) var_c22032)+5) ) = var_c22000;
         return(var_c22032);
         };
      };
   }

static void MySetHalftoneProperties_P300(device_v4440, halftoneProperties_v4468)
   word device_v4440;
   word halftoneProperties_v4468;
   {
   register ptr gf_c22544 =  (ptr) &globalframe;
   word data_v5560;
   word h_v5588;
   /* MySetHalftoneProperties: */ 
SOURCE(4646, 313)
SOURCE(4762, 32)
   data_v5560 = XR_Narrow((* (( (ptr) device_v4440)+7) ), (* (( (ptr) gf_c22544)+16) ));
SOURCE(4796, 82)
   h_v5588 = (word) TranslateHalftoneProperties_P240(halftoneProperties_v4468);
SOURCE(4880, 79)
   {
      register word which_v5632 = 0;
      lab_L100017: ;
SOURCE(4909, 50)
      (* (( (ptr) (* ((( (ptr) data_v5560)+4)+which_v5632) ))+1) ) = h_v5588;
      if ((which_v5632 >= 3)) {
         goto lab_L100014;
         };
      which_v5632 = (which_v5632 + 1);
      goto lab_L100017;
      lab_L100014: ;
      };
   }

static void MyMaskBoxes_P360(device_v4528, bounds_v4556, boxes_v4584)
   word device_v4528;
   W4 bounds_v4556;
   word boxes_v4584;
   {
   register ptr gf_c22576 =  (ptr) &globalframe;
   word data_v5676;
   /* MyMaskBoxes: */ 
SOURCE(4974, 246)
SOURCE(5066, 32)
   data_v5676 = XR_Narrow((* (( (ptr) device_v4528)+7) ), (* (( (ptr) gf_c22576)+16) ));
SOURCE(5100, 120)
   {
      register word which_v5720 = 0;
      lab_L100021: ;
SOURCE(5129, 91)
      {
         word pd43;
         pd43 = (* (( (ptr) (* (( (ptr) gf_c22576)+47)/* var_c21744 */  ))+7) );
         (void) ( *( (fPt) ((*  (ptr) pd43 ))))((* (( (ptr) data_v5676)+which_v5720) ), (* ((( (ptr) data_v5676)+4)+which_v5720) ), bounds_v4556, boxes_v4584, pd43)
         ;
         };
      if ((which_v5720 >= 3)) {
         goto lab_L100018;
         };
      which_v5720 = (which_v5720 + 1);
      goto lab_L100021;
      lab_L100018: ;
      };
   }

static void MyMaskBitmap_P420(device_v4644, formal_c0115, formal_c0116, bounds_v4728, boxes_v4756)
   word device_v4644;
   word formal_c0115;
   W2 formal_c0116;
   W4 bounds_v4728;
   word boxes_v4756;
   {
   W14 var_c22608;
   /* declaration of bitmap_v4672 skipped */ 
   /* declaration of delta_v4700 skipped */ 
   register ptr gf_c22640 =  (ptr) &globalframe;
   /* declaration of var_c22064 skipped */ 
   /* declaration of data_v5764 skipped */ 
   /* declaration of function_v5792 skipped */ 
   (* (( (ptr) &var_c22608)+4)/* bitmap_v4672 */  ) = formal_c0115;
   (*  (W2Pt) (( (ptr) &var_c22608)+5)/* delta_v4700 */  ) = formal_c0116;
   /* MyMaskBitmap: */ 
SOURCE(5235, 714)
   {
      word tmpAddr44;
      tmpAddr44 = (word) (( (ptr) &var_c22608)+7)/* var_c22064 */ ;
      (*  (ptr) tmpAddr44 ) = ( ((word)  (fPt) Box_P876) );
      (* (( (ptr) tmpAddr44) + 1) ) = 1;
      };
SOURCE(5375, 32)
   (* (( (ptr) &var_c22608)+9)/* data_v5764 */  ) = XR_Narrow((* (( (ptr) device_v4644)+7) ), (* (( (ptr) gf_c22640)+16) ));
SOURCE(5409, 66)
   XR_FillWords(&(* (W4Pt) ((( (ptr) &var_c22608)+10)/* function_v5792 */ )), 4, 0);
SOURCE(5703, 207)
   {
      register word t_v5880 = 0;
      lab_L100025: ;
SOURCE(5728, 48)
      if (((* (( (ptr) (* ((( (ptr) (* (( (ptr) &var_c22608)+9)/* data_v5764 */  ))+4)+t_v5880) ))+10) ) != 1)) {
SOURCE(5776, 5)
         (void) XR_RaiseUnnamedError();
         };
SOURCE(5783, 127)
      {
         word var_c22128;
         var_c22128 = (* (( (ptr) (* ((( (ptr) (* (( (ptr) &var_c22608)+9)/* data_v5764 */  ))+4)+t_v5880) ))+11) );
         switch (var_c22128) {
            case 0: 
               break;
            case 2: 
SOURCE(5843, 24)
               (* ((( (ptr) &var_c22608)+10)/* function_v5792 */ +t_v5880) ) = 4;
               break;
            case 1: 
SOURCE(5879, 31)
               (* ((( (ptr) &var_c22608)+10)/* function_v5792 */ +t_v5880) ) = 3;
               break;
            default: 
SOURCE(5923, 5)
               (void) XR_RaiseUnnamedError();
               break;
            };
         };
      if ((t_v5880 >= 3)) {
         goto lab_L100022;
         };
      t_v5880 = (t_v5880 + 1);
      goto lab_L100025;
      lab_L100022: ;
      };
SOURCE(5939, 10)
   (void) ( *( (fPt) ((*  (ptr) boxes_v4756 ))))((word) ((( (bPt) &var_c22608)+28)/* var_c22064 */ ), boxes_v4756);
   }

static void Box_P876(box_v20092, formal_c22704)
   W4 box_v20092;
   word formal_c22704;
   {
   register ptr gf_c22672 =  (ptr) &globalframe;
   formal_c22704 = (formal_c22704 - 28);
   /* Box: */ 
SOURCE(5477, 212)
SOURCE(5499, 190)
   {
      register word t_v5924 = 0;
      lab_L100029: ;
SOURCE(5524, 165)
      {
         W2 var_c22160;
         W2 var_c22192;
         var_c22160.f0 = (box_v20092.f0 - (* (( (ptr) formal_c22704)+5) ));
         var_c22160.f1 = (box_v20092.f1 - (* (( (ptr) formal_c22704)+6) ));
         {
            word x45;
            var_c22192.f0 = (x45 = (box_v20092.f2 - box_v20092.f0),
               MAX((int)(word), x45, 0));
            };
         {
            word x46;
            var_c22192.f1 = (x46 = (box_v20092.f3 - box_v20092.f1),
               MAX((int)(word), x46, 0));
            };
         {
            word pd47;
            pd47 = (* (( (ptr) (* (( (ptr) gf_c22672)+50)/* var_c22224 */  ))+49) );
            (void) ( *( (fPt) ((*  (ptr) pd47 ))))((* (( (ptr) (* (( (ptr) formal_c22704)+9) ))+t_v5924) ), (* (( (ptr) formal_c22704)+4)
                ), (*  (W2Pt) &box_v20092 ), var_c22160, var_c22192, (* ((( (ptr) formal_c22704)+10)+t_v5924) ), pd47);
            };
         };
      if ((t_v5924 >= 3)) {
         goto lab_L100026;
         };
      t_v5924 = (t_v5924 + 1);
      goto lab_L100029;
      lab_L100026: ;
      };
   }

static void MyMaskRawBitmaps_P480(device_v4816, list_v4844)
   word device_v4816;
   word list_v4844;
   {
   register ptr gf_c22736 =  (ptr) &globalframe;
   word data_v5968;
   word function_v5996 = 0;
   /* MyMaskRawBitmaps: */ 
SOURCE(5955, 537)
SOURCE(6054, 32)
   data_v5968 = XR_Narrow((* (( (ptr) device_v4816)+7) ), (* (( (ptr) gf_c22736)+16) ));
SOURCE(6136, 356)
   {
      register word t_v6040 = 0;
      lab_L100033: ;
      {
         word local_v6084;
SOURCE(6161, 62)
         local_v6084 = (* (( (ptr) data_v5968)+t_v6040) );
         if ((local_v6084 == 0)) {
            goto lab_L100034;
            };
         if (((* (( (ptr) local_v6084)+6) ) == 0)) {
            goto lab_L100034;
            };
         (void) XR_RaiseError(XR_NarrowFault, 0);
         lab_L100034: ;
SOURCE(6225, 48)
         if (((* (( (ptr) (* ((( (ptr) data_v5968)+4)+t_v6040) ))+10) ) != 1)) {
SOURCE(6273, 5)
            (void) XR_RaiseUnnamedError();
            };
SOURCE(6280, 121)
         {
            word var_c22288;
            var_c22288 = (* (( (ptr) (* ((( (ptr) data_v5968)+4)+t_v6040) ))+11) );
            switch (var_c22288) {
               case 0: 
                  break;
               case 2: 
SOURCE(6340, 21)
                  function_v5996 = 4;
                  break;
               case 1: 
SOURCE(6373, 28)
                  function_v5996 = 3;
                  break;
               default: 
SOURCE(6414, 5)
                  (void) XR_RaiseUnnamedError();
                  break;
               };
            };
SOURCE(6421, 71)
         {
            word pd48;
            pd48 = (* (( (ptr) (* (( (ptr) gf_c22736)+50)/* var_c22224 */  ))+53) );
            (void) ( *( (fPt) ((*  (ptr) pd48 ))))(local_v6084, list_v4844, function_v5996, pd48);
            };
         };
      if ((t_v6040 >= 3)) {
         goto lab_L100030;
         };
      t_v6040 = (t_v6040 + 1);
      goto lab_L100033;
      lab_L100030: ;
      };
   }

/* file: ImagerFourColorContextImpl, module: ImagerFourColorContextImpl, compiled at: October 28, 1993 1:03:29 pm PDT */ 
extern void XR_install_ImagerFourColorContextImpl() {
   NoName_Q1404();
   }
extern void XR_run_ImagerFourColorContextImpl() { XR_Start(&globalframe); }