/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation.  All rights reserved. */
/* time: February 27, 1992 5:57:31 pm PST */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: TEditDocuments3Impl, module: TEditDocuments3Impl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [2874656061,2436322985] TEditDocuments3Impl";
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;} W7;
typedef struct {word f0, f1;} W2;
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {W8 f; word r;} W9;
typedef W9 *W9Pt;
typedef W2 *W2Pt;
typedef struct {unsigned u1:5, f:1, u2:2;} * P1x5b;
typedef struct {unsigned u1:6, f:1, u2:1;} * P1x6b;
#define SOURCE(p, l) /* source p, l */
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR←RaiseBoundsFault()) : (idx) )
static void NoName←Q5700();
static void TEditDocuments3Impl←P0();
static word ForkViewerOp2←P180();
static word ForkViewerOp←P240();
static void StackBase←P300();
static word NoName←Q5760();
static word NoName←Q5820();
static void PreReset←P420();
static void Reset←P480();
static void ResetOp←P540();
static void inner←P4044();
static void Save←P600();
static void SaveViewer←P660();
static void SaveOp←P720();
static void PreClear←P780();
static void Clear←P840();
static void EmptyOp←P900();
static void NewOp←P960();
static void NewButton←P1020();
static void CloseAndNewOp←P1080();
static void Store←P1140();
static void StoreOp←P1200();
static void PreviousFile←P1260();
static void LoadPreviousOp←P1320();
static void OpenPreviousOp←P1380();
static void CloseAndOpenPreviousOp←P1440();
static void AnonymousLoadImpl←P1500();
static void AnonymousLoadImplOp←P1560();
static void AnonymousLoad←P1620();
static void AnonymousLoadOp←P1680();
static void AnonymousLoadIt←P1740();
static void PreGet←P1800();
static void Get←P1860();
static void LoadOp←P1920();
static void LoadIt←P1980();
static void OpenOp←P2040();
static void OpenIt←P2100();
static void CloseAndOpenOp←P2160();
static void CloseAndOpenIt←P2220();
static void GetImpl←P2280();
static void LoadImplOp←P2340();
static void LoadItImpl←P2400();
static void OpenImplOp←P2460();
static void OpenItImpl←P2520();
static void CloseAndOpenImplOp←P2580();
static void CloseAndOpenItImpl←P2640();
static void OpenButton←P2700();
static void Normalize←P2760();
static void Position←P2820();
static void JumpToPrevious←P2880();
static void PrevPlaceOp←P2940();
static void Reselect←P3000();
static void ReselectOp←P3060();
static void Find←P3120();
static void FindDef←P3180();
static void FindWord←P3240();
static void FewerLevels←P3300();
static void MoreLevels←P3360();
static void AllLevels←P3420();
static void FirstLevelOnly←P3480();
static void FewerLines←P3540();
static void MoreLines←P3600();
static void AllLines←P3660();
static void FirstLineOnly←P3720();
static void Time←P3780();
static void Split←P3840();
static void NoName←Q5880();
static void NoName←Q5940();
static word NoName←Q6000();
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\343\357\262\137\300\144\166\356\317\100\274\000\000"};
static struct {unsigned f; char r[4];} string4 = {196611, "\004H\007"};
static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\165\053\345\211\300\333\235\216\021\100\310\000\000"};
static struct {unsigned f; char r[4];} string6 = {131074, "\004\005\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\343\357\262\137\300\144\166\356\317\100\164\000\000"};
static struct {unsigned f; char r[16];} string8 = {851981, "\006\005\000\001\004\001\054\001\070\001\100\114\001\000\000"};
static struct {unsigned f; char r[4];} string9 = {65540, "\242\000\000"};
static struct {unsigned f; char r[16];} string10 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[16];} string11 = {851984, "\257\300\253\127\305\075\300\221\067\126\251\100\340\000\000"};
static struct {unsigned f; char r[4];} string12 = {131074, "\003\001\000"};
static struct {unsigned f; char r[16];} string13 = {851984, "\257\300\253\127\305\075\300\221\067\126\251\100\370\000\000"};
static struct {unsigned f; char r[4];} string14 = {131074, "\004\006\000"};
static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\113\175\243\331\300\252\247\212\133\100\164\000\000"};
static struct {unsigned f; char r[36];} string16 = {2162721, "\006\014\000\001\060\001\064\001\070\001\074\001\100\100\001\100\124\001\100\130\001\100\134\001\100\140\001\100\144\001\100\150\001\000\000"};
static struct {unsigned f; char r[12];} string17 = {720908, "YellowStore"};
static struct {unsigned f; char r[12];} string18 = {589836, "BlueStore\000\000"};
static struct {unsigned f; char r[16];} string19 = {786448, "LoadPrevious\000\000\000"};
static struct {unsigned f; char r[16];} string20 = {786448, "OpenPrevious\000\000\000"};
static struct {unsigned f; char r[24];} string21 = {1310744, "CloseAndOpenPrevious\000\000\000"};
static struct {unsigned f; char r[20];} string22 = {1114132, "AnonymousLoadImpl\000\000"};
static struct {unsigned f; char r[16];} string23 = {851984, "AnonymousLoad\000\000"};
static struct {unsigned f; char r[8];} string24 = {262152, "Load\000\000\000"};
static struct {unsigned f; char r[8];} string25 = {262152, "Open\000\000\000"};
static struct {unsigned f; char r[16];} string26 = {786448, "CloseAndOpen\000\000\000"};
static struct {unsigned f; char r[12];} string27 = {524300, "LoadImpl\000\000\000"};
static struct {unsigned f; char r[12];} string28 = {524300, "OpenImpl\000\000\000"};
static struct {unsigned f; char r[20];} string29 = {1048596, "CloseAndOpenImpl\000\000\000"};
static struct {unsigned f; char r[12];} string30 = {589836, "PrevPlace\000\000"};
static struct {unsigned f; char r[12];} string31 = {524300, "Reselect\000\000\000"};
static struct {unsigned f; char r[12];} string32 = {524300, "RedStore\000\000\000"};
static struct {unsigned f; char r[12];} string33 = {720908, "CloseAndNew"};
static struct {unsigned f; char r[4];} string34 = {196612, "New"};
static struct {unsigned f; char r[8];} string35 = {327688, "Empty\000\000"};
static struct {unsigned f; char r[12];} string36 = {524300, "BlueSave\000\000\000"};
static struct {unsigned f; char r[24];} string37 = {1507352, "Confirm clearing viewer"};
static struct {unsigned f; char r[24];} string38 = {1376280, "Confirm reloading of \000\000"};
static struct {unsigned f; char r[8];} string39 = {327688, "Reset\000\000"};
static struct {unsigned f; char r[12];} string40 = {524300, "ResetLoc\000\000\000"};
static struct {unsigned f; char r[12];} string41 = {655372, "YellowSave\000"};
static struct {unsigned f; char r[8];} string42 = {458760, "RedSave"};
static struct {unsigned f; char r[84];} string43 = {5308500, "Click LEFT to empty this viewer, MIDDLE to make new viewer, RIGHT for close & new\000\000"};
static struct {unsigned f; char r[24];} string44 = {1507352, "Clear would lose edits."};
static struct {unsigned f; char r[80];} string45 = {5177424, "Click LEFT to load in this viewer, MIDDLE for new viewer, RIGHT for close & new"};
static struct {unsigned f; char r[20];} string46 = {1048596, "NormalizeToStart\000\000\000"};
static struct {unsigned f; char r[20];} string47 = {1048596, "NormalizeToCaret\000\000\000"};
static struct {unsigned f; char r[16];} string48 = {917520, "NormalizeToEnd\000"};
static struct {unsigned f; char r[28];} string49 = {1638428, "PositionIncludingComments\000\000"};
static struct {unsigned f; char r[12];} string50 = {524300, "Position\000\000\000"};
static struct {unsigned f; char r[32];} string51 = {1835040, "MsgPositionIncludingComments\000\000\000"};
static struct {unsigned f; char r[12];} string52 = {720908, "MsgPosition"};
static struct {unsigned f; char r[32];} string53 = {1966112, "StuffPositionIncludingComments\000"};
static struct {unsigned f; char r[16];} string54 = {851984, "StuffPosition\000\000"};
static struct {unsigned f; char r[16];} string55 = {983056, "PositionHistory"};
static struct {unsigned f; char r[12];} string56 = {589836, "BlueReset\000\000"};
static struct {unsigned f; char r[28];} string57 = {1572892, "No previous place saved.\000\000\000"};
static struct {unsigned f; char r[20];} string58 = {1048596, "SelectionHistory\000\000\000"};
static struct {unsigned f; char r[12];} string59 = {720908, "YellowReset"};
static struct {unsigned f; char r[20];} string60 = {1245204, "No saved selection."};
static struct {unsigned f; char r[20];} string61 = {1048596, "FindNextCaseless\000\000\000"};
static struct {unsigned f; char r[12];} string62 = {524300, "FindNext\000\000\000"};
static struct {unsigned f; char r[16];} string63 = {983056, "FindAnyCaseless"};
static struct {unsigned f; char r[8];} string64 = {458760, "FindAny"};
static struct {unsigned f; char r[20];} string65 = {1048596, "FindPrevCaseless\000\000\000"};
static struct {unsigned f; char r[12];} string66 = {524300, "FindPrev\000\000\000"};
static struct {unsigned f; char r[20];} string67 = {1245204, "FindNextDefCaseless"};
static struct {unsigned f; char r[12];} string68 = {720908, "FindNextDef"};
static struct {unsigned f; char r[20];} string69 = {1179668, "FindAnyDefCaseless\000"};
static struct {unsigned f; char r[12];} string70 = {655372, "FindAnyDef\000"};
static struct {unsigned f; char r[20];} string71 = {1245204, "FindPrevDefCaseless"};
static struct {unsigned f; char r[12];} string72 = {720908, "FindPrevDef"};
static struct {unsigned f; char r[24];} string73 = {1310744, "FindNextWordCaseless\000\000\000"};
static struct {unsigned f; char r[16];} string74 = {786448, "FindNextWord\000\000\000"};
static struct {unsigned f; char r[20];} string75 = {1245204, "FindAnyWordCaseless"};
static struct {unsigned f; char r[12];} string76 = {720908, "FindAnyWord"};
static struct {unsigned f; char r[24];} string77 = {1310744, "FindPrevWordCaseless\000\000\000"};
static struct {unsigned f; char r[16];} string78 = {786448, "FindPrevWord\000\000\000"};
static struct {unsigned f; char r[12];} string79 = {720908, "FewerLevels"};
static struct {unsigned f; char r[12];} string80 = {655372, "MoreLevels\000"};
static struct {unsigned f; char r[12];} string81 = {589836, "AllLevels\000\000"};
static struct {unsigned f; char r[16];} string82 = {917520, "FirstLevelOnly\000"};
static struct {unsigned f; char r[12];} string83 = {655372, "FewerLines\000"};
static struct {unsigned f; char r[12];} string84 = {589836, "MoreLines\000\000"};
static struct {unsigned f; char r[12];} string85 = {524300, "AllLines\000\000\000"};
static struct {unsigned f; char r[16];} string86 = {851984, "FirstLineOnly\000\000"};
static struct {unsigned f; char r[8];} string87 = {262152, "Time\000\000\000"};
static struct {unsigned f; char r[12];} string88 = {524300, "RedSplit\000\000\000"};
static struct {unsigned f; char r[12];} string89 = {720908, "YellowSplit"};
static struct {unsigned f; char r[12];} string90 = {589836, "BlueSplit\000\000"};
static struct {unsigned f; char r[12];} string91 = {524300, "RedReset\000\000\000"};
static struct {unsigned f; char r[16];} string92 = {851984, "\257\300\253\127\305\075\300\221\067\126\251\100\164\000\000"};
static struct {unsigned f; char r[12];} string93 = {655370, "\006\001\100\100\010\000\004\100\113\001\000"};
static struct {unsigned f; char r[16];} string94 = {851984, "\257\300\263\272\165\301\300\364\117\256\374\100\150\000\000"};
static struct {unsigned f; char r[16];} string95 = {851984, "\257\300\074\270\063\045\300\023\342\016\224\100\150\000\000"};
static struct {unsigned f; char r[16];} string96 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string97 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[16];} string98 = {851984, "\257\300\343\357\262\137\300\144\166\356\317\100\150\000\000"};
static struct {unsigned f; char r[20];} string99 = {1413833833, "tDocumentPrivate"};
static struct {unsigned f; char r[16];} string100 = {851984, "\257\300\165\053\345\211\300\333\235\216\021\100\150\000\000"};
static struct {unsigned f; char r[16];} string101 = {851984, "\257\300\013\141\323\354\300\341\005\243\127\100\150\000\000"};
static struct {unsigned f; char r[16];} string102 = {851984, "\257\300\255\037\131\057\300\313\250\372\104\100\150\000\000"};
static struct {unsigned f; char r[16];} string103 = {851984, "\257\300\343\112\327\166\300\041\341\335\211\100\150\000\000"};
static struct {unsigned f; char r[16];} string104 = {851984, "\257\300\042\224\360\026\300\243\254\175\360\100\150\000\000"};
static struct {unsigned f; char r[16];} string105 = {851984, "\257\300\312\253\314\243\300\267\126\271\104\100\150\000\000"};
static struct {unsigned f; char r[16];} string106 = {851984, "\257\300\304\277\342\227\300\257\071\007\130\100\150\000\000"};
static struct {unsigned f; char r[16];} string107 = {851984, "\257\300\354\332\367\333\300\361\203\205\173\100\150\000\000"};
static struct {unsigned f; char r[16];} string108 = {851984, "\257\300\045\005\337\143\300\252\356\334\244\100\150\000\000"};
static struct {
   word f0[91]; word f91; word f92; word f93; 
   word f94; word f95; word f96; word f97; 
   word f98; word f99; word f100; word f101; 
   word f102; word f103; word f104; word f105; 
   word f106; word f107; word f108; word f109; 
   word f110; word f111; word f112; word f113; 
   word f114; word f115; word f116; word f117; 
   word f118; word f119; word f120; word f121; 
   word f122; word f123; word f124; word f125; 
   word f126; word f127; word f128; word f129; 
   word f130; word f131; word f132; word f133; 
   word f134; word f135; word f136; word f137; 
   word f138; word f139; word f140; word f141; 
   word f142; word f143; word f144; word f145; 
   word f146; word f147; word f148; word f149; 
   word f150; word f151; word f152; word f153; 
   word f154; word f155; word f156; word f157; 
   word f158; word f159; word f160; word f161; 
   word f162; word f163; word f164; word f165; 
   word f166; word f167; word f168; word f169; 
   word f170; word f171; word f172; word f173; 
   word f174; word f175; word f176; word f177; 
   word f178; word f179; word f180; word f181; 
   word f182; word f183; word f184; word f185; 
   word f186; word f187; word f188; word f189; 
   word f190; word f191; word f192; word f193; 
   word f194; word f195; word f196; word f197; 
   word f198; word f199; word f200; word f201; 
   word f202; word f203; word f204; word f205; 
   word f206; word f207; word f208; word f209; 
   word f210; word f211; word f212; word f213; 
   word f214[16]; 
   } globalframe = {
   {0}, (word) Split←P3840, 0, (word) Time←P3780, 
   0, (word) FirstLineOnly←P3720, 0, (word) AllLines←P3660, 
   0, (word) MoreLines←P3600, 0, (word) FewerLines←P3540, 
   0, (word) FirstLevelOnly←P3480, 0, (word) AllLevels←P3420, 
   0, (word) MoreLevels←P3360, 0, (word) FewerLevels←P3300, 
   0, (word) FindWord←P3240, 0, (word) FindDef←P3180, 
   0, (word) Find←P3120, 0, (word) ReselectOp←P3060, 
   0, (word) Reselect←P3000, 0, (word) PrevPlaceOp←P2940, 
   0, (word) JumpToPrevious←P2880, 0, (word) Position←P2820, 
   0, (word) Normalize←P2760, 0, (word) OpenButton←P2700, 
   0, (word) CloseAndOpenItImpl←P2640, 0, (word) CloseAndOpenImplOp←P2580, 
   0, (word) OpenItImpl←P2520, 0, (word) OpenImplOp←P2460, 
   0, (word) LoadItImpl←P2400, 0, (word) LoadImplOp←P2340, 
   0, (word) GetImpl←P2280, 0, (word) CloseAndOpenIt←P2220, 
   0, (word) CloseAndOpenOp←P2160, 0, (word) OpenIt←P2100, 
   0, (word) OpenOp←P2040, 0, (word) LoadIt←P1980, 
   0, (word) LoadOp←P1920, 0, (word) Get←P1860, 
   0, (word) PreGet←P1800, 0, (word) AnonymousLoadIt←P1740, 
   0, (word) AnonymousLoadOp←P1680, 0, (word) AnonymousLoad←P1620, 
   0, (word) AnonymousLoadImplOp←P1560, 0, (word) AnonymousLoadImpl←P1500, 
   0, (word) CloseAndOpenPreviousOp←P1440, 0, (word) OpenPreviousOp←P1380, 
   0, (word) LoadPreviousOp←P1320, 0, (word) PreviousFile←P1260, 
   0, (word) StoreOp←P1200, 0, (word) Store←P1140, 
   0, (word) CloseAndNewOp←P1080, 0, (word) NewButton←P1020, 
   0, (word) NewOp←P960, 0, (word) EmptyOp←P900, 
   0, (word) Clear←P840, 0, (word) PreClear←P780, 
   0, (word) SaveOp←P720, 0, (word) SaveViewer←P660, 
   0, (word) Save←P600, 0, (word) ResetOp←P540, 
   0, (word) Reset←P480, 0, (word) PreReset←P420, 
   0, (word) StackBase←P300, 0, (word) ForkViewerOp←P240, 
   0, (word) ForkViewerOp2←P180, 0, (word) TEditDocuments3Impl←P0, 
   {0}
   };

static void NoName←Q5700()
   {
   register ptr gf←c0492 =  (ptr) &globalframe;
   word var←c38528;
   (* (( (ptr) gf←c0492)+4) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf←c0492)+7) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf←c0492)+8) ) = (word) XR←GetTypeIndex((word) &string5, 0, (word) &string6);
   (* (( (ptr) gf←c0492)+9) ) = (word) XR←GetTypeIndex((word) &string7, 0, (word) &string8);
   (* (( (ptr) gf←c0492)+10) ) = (word) XR←GetTypeIndexS((word) (&string9));
   (* (( (ptr) gf←c0492)+11) ) = (word) XR←GetTypeIndex((word) &string10, 0, (word) &string2);
   (* (( (ptr) gf←c0492)+13) ) = (word) XR←GetTypeIndex((word) &string11, 0, (word) &string12);
   (* (( (ptr) gf←c0492)+14) ) = (word) XR←GetTypeIndex((word) &string13, 0, (word) &string14);
   (* (( (ptr) gf←c0492)+15) ) = (word) XR←GetTypeIndex((word) &string15, 0, (word) &string16);
   (*  (ptr) (( (bPt) gf←c0492)+64) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string17);
   (*  (ptr) (( (bPt) gf←c0492)+68) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string18);
   (*  (ptr) (( (bPt) gf←c0492)+72) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string19);
   (*  (ptr) (( (bPt) gf←c0492)+76) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string20);
   (*  (ptr) (( (bPt) gf←c0492)+80) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string21);
   (*  (ptr) (( (bPt) gf←c0492)+84) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string22);
   (*  (ptr) (( (bPt) gf←c0492)+88) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string23);
   (*  (ptr) (( (bPt) gf←c0492)+92) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string24);
   (*  (ptr) (( (bPt) gf←c0492)+96) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string25);
   (*  (ptr) (( (bPt) gf←c0492)+100) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string26);
   (*  (ptr) (( (bPt) gf←c0492)+104) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string27);
   (*  (ptr) (( (bPt) gf←c0492)+108) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string28);
   (*  (ptr) (( (bPt) gf←c0492)+112) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string29);
   (*  (ptr) (( (bPt) gf←c0492)+116) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string30);
   (*  (ptr) (( (bPt) gf←c0492)+120) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string31);
   (*  (ptr) (( (bPt) gf←c0492)+124) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string32);
   (*  (ptr) (( (bPt) gf←c0492)+128) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string33);
   (*  (ptr) (( (bPt) gf←c0492)+132) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string34);
   (*  (ptr) (( (bPt) gf←c0492)+136) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string35);
   (*  (ptr) (( (bPt) gf←c0492)+140) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string36);
   (*  (ptr) (( (bPt) gf←c0492)+144) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+11) ), (word) &string37);
   (*  (ptr) (( (bPt) gf←c0492)+148) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+11) ), (word) &string38);
   (*  (ptr) (( (bPt) gf←c0492)+152) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+11) ), (word) &string39);
   (*  (ptr) (( (bPt) gf←c0492)+156) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string40);
   (*  (ptr) (( (bPt) gf←c0492)+160) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string41);
   (*  (ptr) (( (bPt) gf←c0492)+164) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string42);
   (*  (ptr) (( (bPt) gf←c0492)+168) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+11) ), (word) &string43);
   (*  (ptr) (( (bPt) gf←c0492)+172) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+11) ), (word) &string44);
   (*  (ptr) (( (bPt) gf←c0492)+176) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+11) ), (word) &string45);
   (*  (ptr) (( (bPt) gf←c0492)+180) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string46);
   (*  (ptr) (( (bPt) gf←c0492)+184) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string47);
   (*  (ptr) (( (bPt) gf←c0492)+188) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string48);
   (*  (ptr) (( (bPt) gf←c0492)+192) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string49);
   (*  (ptr) (( (bPt) gf←c0492)+196) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string50);
   (*  (ptr) (( (bPt) gf←c0492)+200) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string51);
   (*  (ptr) (( (bPt) gf←c0492)+204) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string52);
   (*  (ptr) (( (bPt) gf←c0492)+208) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string53);
   (*  (ptr) (( (bPt) gf←c0492)+212) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string54);
   (*  (ptr) (( (bPt) gf←c0492)+216) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string55);
   (*  (ptr) (( (bPt) gf←c0492)+220) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string56);
   (*  (ptr) (( (bPt) gf←c0492)+224) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+11) ), (word) &string57);
   (*  (ptr) (( (bPt) gf←c0492)+228) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string58);
   (*  (ptr) (( (bPt) gf←c0492)+232) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string59);
   (*  (ptr) (( (bPt) gf←c0492)+236) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+11) ), (word) &string60);
   (*  (ptr) (( (bPt) gf←c0492)+240) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string61);
   (*  (ptr) (( (bPt) gf←c0492)+244) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string62);
   (*  (ptr) (( (bPt) gf←c0492)+248) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string63);
   (*  (ptr) (( (bPt) gf←c0492)+252) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string64);
   (*  (ptr) (( (bPt) gf←c0492)+256) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string65);
   (*  (ptr) (( (bPt) gf←c0492)+260) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string66);
   (*  (ptr) (( (bPt) gf←c0492)+264) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string67);
   (*  (ptr) (( (bPt) gf←c0492)+268) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string68);
   (*  (ptr) (( (bPt) gf←c0492)+272) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string69);
   (*  (ptr) (( (bPt) gf←c0492)+276) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string70);
   (*  (ptr) (( (bPt) gf←c0492)+280) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string71);
   (*  (ptr) (( (bPt) gf←c0492)+284) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string72);
   (*  (ptr) (( (bPt) gf←c0492)+288) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string73);
   (*  (ptr) (( (bPt) gf←c0492)+292) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string74);
   (*  (ptr) (( (bPt) gf←c0492)+296) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string75);
   (*  (ptr) (( (bPt) gf←c0492)+300) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string76);
   (*  (ptr) (( (bPt) gf←c0492)+304) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string77);
   (*  (ptr) (( (bPt) gf←c0492)+308) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string78);
   (*  (ptr) (( (bPt) gf←c0492)+312) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string79);
   (*  (ptr) (( (bPt) gf←c0492)+316) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string80);
   (*  (ptr) (( (bPt) gf←c0492)+320) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string81);
   (*  (ptr) (( (bPt) gf←c0492)+324) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string82);
   (*  (ptr) (( (bPt) gf←c0492)+328) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string83);
   (*  (ptr) (( (bPt) gf←c0492)+332) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string84);
   (*  (ptr) (( (bPt) gf←c0492)+336) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string85);
   (*  (ptr) (( (bPt) gf←c0492)+340) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string86);
   (*  (ptr) (( (bPt) gf←c0492)+344) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string87);
   (*  (ptr) (( (bPt) gf←c0492)+348) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string88);
   (*  (ptr) (( (bPt) gf←c0492)+352) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string89);
   (*  (ptr) (( (bPt) gf←c0492)+356) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string90);
   (*  (ptr) (( (bPt) gf←c0492)+360) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0492)+4) ), (word) &string91);
   (void) XR←DeclareGlobalFrame((word) "TEditDocuments3Impl", &globalframe, (word) XR←GetTypeIndex((word) &string92, 0, (word) &string93)
      , (word) (( (bPt) gf←c0492)+852)/* var←c35072 */ );
   var←c38528 = (word) XR←ImportInterface((word) "InputFocus", (word) XR←GetTypeIndexS((word) (&string94)), 6);
   (* (( (ptr) gf←c0492)+224)/* var←c36000 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 524546);
   (void) XR←ImportProcS(var←c38528, 67108864);
   var←c38528 = (word) XR←ImportInterface((word) "MessageWindow", (word) XR←GetTypeIndexS((word) (&string95)), 7);
   (* (( (ptr) gf←c0492)+219)/* var←c35520 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 512);
   (void) XR←ImportProcS(var←c38528, 0);
   (void) XR←ImportProcS(var←c38528, 524546);
   var←c38528 = (word) XR←ImportInterface((word) "Process", (word) XR←GetTypeIndexS((word) (&string96)), 22);
   (* (( (ptr) gf←c0492)+226)/* var←c36288 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 526081);
   var←c38528 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string97)), 43);
   (* (( (ptr) gf←c0492)+218)/* var←c35488 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 67633666);
   var←c38528 = (word) XR←ImportInterface((word) "TEditDocument", (word) XR←GetTypeIndexS((word) (&string98)), 6);
   (* (( (ptr) gf←c0492)+221)/* var←c35712 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 262657);
   (void) XR←ImportProcS(var←c38528, 68157700);
   var←c38528 = (word) XR←ImportInterface((word) &string99, (word) XR←GetTypeIndexS((word) (&string100)), 67);
   (* (( (ptr) gf←c0492)+225)/* var←c36128 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 67638530);
   (void) XR←ImportProcS(var←c38528, 67900163);
   (void) XR←ImportProcS(var←c38528, 67901699);
   (void) XR←ImportProcS(var←c38528, 67637506);
   (void) XR←ImportProcS(var←c38528, 68161284);
   (void) XR←ImportProcS(var←c38528, 68163332);
   (void) XR←ImportProcS(var←c38528, 530946);
   (void) XR←ImportProcS(var←c38528, 269057);
   (void) XR←ImportProcS(var←c38528, 269825);
   (void) XR←ImportProcS(var←c38528, 269569);
   (void) XR←ImportProcS(var←c38528, 269313);
   (void) XR←ImportProcS(var←c38528, 1322757);
   (void) XR←ImportProcS(var←c38528, 532738);
   (void) XR←ImportProcS(var←c38528, 265217);
   (void) XR←ImportProcS(var←c38528, 264705);
   (void) XR←ImportProcS(var←c38528, 264449);
   (void) XR←ImportProcS(var←c38528, 68166147);
   var←c38528 = (word) XR←ImportInterface((word) "TEditInput", (word) XR←GetTypeIndexS((word) (&string101)), 44);
   (* (( (ptr) gf←c0492)+215)/* var←c35104 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 67378433);
   (void) XR←ImportProcS(var←c38528, 789507);
   (void) XR←ImportProcS(var←c38528, 530690);
   var←c38528 = (word) XR←ImportInterface((word) "TEditScrolling", (word) XR←GetTypeIndexS((word) (&string102)), 3);
   (* (( (ptr) gf←c0492)+228)/* var←c37952 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 1049092);
   var←c38528 = (word) XR←ImportInterface((word) "TEditSelection", (word) XR←GetTypeIndexS((word) (&string103)), 68);
   (* (( (ptr) gf←c0492)+227)/* var←c37920 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 1316101);
   var←c38528 = (word) XR←ImportInterface((word) "TextNode", (word) XR←GetTypeIndexS((word) (&string104)), 34);
   (* (( (ptr) gf←c0492)+222)/* var←c35872 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 135270404);
   (void) XR←ImportProcS(var←c38528, 68162307);
   var←c38528 = (word) XR←ImportInterface((word) "ViewerForkers", (word) XR←GetTypeIndexS((word) (&string105)), 2);
   (* (( (ptr) gf←c0492)+217)/* var←c35264 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 786691);
   var←c38528 = (word) XR←ImportInterface((word) "ViewerGroupLocks", (word) XR←GetTypeIndexS((word) (&string106)), 2);
   (* (( (ptr) gf←c0492)+220)/* var←c35648 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 524546);
   var←c38528 = (word) XR←ImportInterface((word) "ViewerOps", (word) XR←GetTypeIndexS((word) (&string107)), 43);
   (* (( (ptr) gf←c0492)+223)/* var←c35936 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 67375105);
   (void) XR←ImportProcS(var←c38528, 1051652);
   (void) XR←ImportProcS(var←c38528, 67639554);
   (void) XR←ImportProcS(var←c38528, 792579);
   var←c38528 = (word) XR←ImportInterface((word) "ViewerTools", (word) XR←GetTypeIndexS((word) (&string108)), 12);
   (* (( (ptr) gf←c0492)+216)/* var←c35200 */  ) = var←c38528;
   (void) XR←ImportProcS(var←c38528, 67109888);
   var←c38528 = (word) XR←ExportInterface((word) &string99, (word) XR←GetTypeIndexS((word) (&string100)), 67);
   (* (( (ptr) gf←c0492)+229)/* var←c38560 */  ) = var←c38528;
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+476)/* var←c33568 */ , 1312005);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+492)/* var←c33632 */ , 1312261);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+820)/* var←c34944 */ , 1320965);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+812)/* var←c34912 */ , 1321221);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+796)/* var←c34848 */ , 1321477);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+772)/* var←c34752 */ , 1321733);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+764)/* var←c34720 */ , 1321989);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+740)/* var←c34624 */ , 1322245);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+724)/* var←c34560 */ , 1322501);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+708)/* var←c34496 */ , 1323013);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+636)/* var←c34208 */ , 1323269);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+572)/* var←c33952 */ , 1323525);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+636)/* var←c34208 */ , 1323781);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+628)/* var←c34176 */ , 1324037);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+676)/* var←c34368 */ , 1324293);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+660)/* var←c34304 */ , 1324549);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+516)/* var←c33728 */ , 1324805);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+508)/* var←c33696 */ , 1325061);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+500)/* var←c33664 */ , 1325317);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+460)/* var←c33504 */ , 1325573);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+452)/* var←c33472 */ , 1325829);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+444)/* var←c33440 */ , 1326085);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+372)/* var←c33152 */ , 1326341);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+364)/* var←c33120 */ , 1326597);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+436)/* var←c33408 */ , 1326853);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+428)/* var←c33376 */ , 1327109);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+420)/* var←c33344 */ , 1327365);
   (void) XR←ExportProcS(var←c38528, (word) (( (bPt) gf←c0492)+412)/* var←c33312 */ , 1327621);
   }

static void TEditDocuments3Impl←P0(formal←c089, formal←c088)
   word formal←c089;
   word formal←c088;
   {
   register ptr gf←c38592 =  (ptr) &globalframe;
   /* TEditDocuments3Impl: */ 
SOURCE(1090, 11121)
SOURCE(11341, 28)
SOURCE(1646, 29)
   {
      word pd109;
      pd109 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd109 ))))((* (( (ptr) gf←c38592)+90) ), (word) (( (bPt) gf←c38592)+804)/* var←c34880 */ , 1, pd109)
      ;
      };
SOURCE(11371, 31)
SOURCE(1646, 29)
   {
      word pd110;
      pd110 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd110 ))))((* (( (ptr) gf←c38592)+58) ), (word) (( (bPt) gf←c38592)+804)/* var←c34880 */ , 1, pd110)
      ;
      };
SOURCE(11404, 29)
SOURCE(1646, 29)
   {
      word pd111;
      pd111 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd111 ))))((* (( (ptr) gf←c38592)+55) ), (word) (( (bPt) gf←c38592)+804)/* var←c34880 */ , 1, pd111)
      ;
      };
SOURCE(11435, 26)
SOURCE(1646, 29)
   {
      word pd112;
      pd112 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd112 ))))((* (( (ptr) gf←c38592)+41) ), (word) (( (bPt) gf←c38592)+780)/* var←c34784 */ , 1, pd112)
      ;
      };
SOURCE(11463, 29)
SOURCE(1646, 29)
   {
      word pd113;
      pd113 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd113 ))))((* (( (ptr) gf←c38592)+40) ), (word) (( (bPt) gf←c38592)+780)/* var←c34784 */ , 1, pd113)
      ;
      };
SOURCE(11494, 27)
SOURCE(1646, 29)
   {
      word pd114;
      pd114 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd114 ))))((* (( (ptr) gf←c38592)+35) ), (word) (( (bPt) gf←c38592)+780)/* var←c34784 */ , 1, pd114)
      ;
      };
SOURCE(11523, 25)
SOURCE(1646, 29)
   {
      word pd115;
      pd115 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd115 ))))((* (( (ptr) gf←c38592)+34) ), (word) (( (bPt) gf←c38592)+756)/* var←c34688 */ , 1, pd115)
      ;
      };
SOURCE(11550, 21)
SOURCE(1646, 29)
   {
      word pd116;
      pd116 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd116 ))))((* (( (ptr) gf←c38592)+33) ), (word) (( (bPt) gf←c38592)+748)/* var←c34656 */ , 1, pd116)
      ;
      };
SOURCE(11573, 37)
SOURCE(1646, 29)
   {
      word pd117;
      pd117 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd117 ))))((* (( (ptr) gf←c38592)+32) ), (word) (( (bPt) gf←c38592)+732)/* var←c34592 */ , 1, pd117)
      ;
      };
SOURCE(11612, 28)
SOURCE(1646, 29)
   {
      word pd118;
      pd118 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd118 ))))((* (( (ptr) gf←c38592)+31) ), (word) (( (bPt) gf←c38592)+716)/* var←c34528 */ , 1, pd118)
      ;
      };
SOURCE(11642, 31)
SOURCE(1646, 29)
   {
      word pd119;
      pd119 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd119 ))))((* (( (ptr) gf←c38592)+16) ), (word) (( (bPt) gf←c38592)+716)/* var←c34528 */ , 1, pd119)
      ;
      };
SOURCE(11675, 29)
SOURCE(1646, 29)
   {
      word pd120;
      pd120 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd120 ))))((* (( (ptr) gf←c38592)+17) ), (word) (( (bPt) gf←c38592)+716)/* var←c34528 */ , 1, pd120)
      ;
      };
SOURCE(11706, 39)
SOURCE(1646, 29)
   {
      word pd121;
      pd121 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd121 ))))((* (( (ptr) gf←c38592)+18) ), (word) (( (bPt) gf←c38592)+700)/* var←c34464 */ , 1, pd121)
      ;
      };
SOURCE(11747, 39)
SOURCE(1646, 29)
   {
      word pd122;
      pd122 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd122 ))))((* (( (ptr) gf←c38592)+19) ), (word) (( (bPt) gf←c38592)+692)/* var←c34432 */ , 1, pd122)
      ;
      };
SOURCE(11788, 55)
SOURCE(1646, 29)
   {
      word pd123;
      pd123 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd123 ))))((* (( (ptr) gf←c38592)+20) ), (word) (( (bPt) gf←c38592)+684)/* var←c34400 */ , 1, pd123)
      ;
      };
SOURCE(11845, 49)
SOURCE(1646, 29)
   {
      word pd124;
      pd124 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd124 ))))((* (( (ptr) gf←c38592)+21) ), (word) (( (bPt) gf←c38592)+668)/* var←c34336 */ , 1, pd124)
      ;
      };
SOURCE(11896, 41)
SOURCE(1646, 29)
   {
      word pd125;
      pd125 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd125 ))))((* (( (ptr) gf←c38592)+22) ), (word) (( (bPt) gf←c38592)+652)/* var←c34272 */ , 1, pd125)
      ;
      };
SOURCE(11939, 23)
SOURCE(1646, 29)
   {
      word pd126;
      pd126 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd126 ))))((* (( (ptr) gf←c38592)+23) ), (word) (( (bPt) gf←c38592)+620)/* var←c34144 */ , 1, pd126)
      ;
      };
SOURCE(11964, 23)
SOURCE(1646, 29)
   {
      word pd127;
      pd127 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd127 ))))((* (( (ptr) gf←c38592)+24) ), (word) (( (bPt) gf←c38592)+604)/* var←c34080 */ , 1, pd127)
      ;
      };
SOURCE(11989, 39)
SOURCE(1646, 29)
   {
      word pd128;
      pd128 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd128 ))))((* (( (ptr) gf←c38592)+25) ), (word) (( (bPt) gf←c38592)+588)/* var←c34016 */ , 1, pd128)
      ;
      };
SOURCE(12030, 31)
SOURCE(1646, 29)
   {
      word pd129;
      pd129 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd129 ))))((* (( (ptr) gf←c38592)+26) ), (word) (( (bPt) gf←c38592)+564)/* var←c33920 */ , 1, pd129)
      ;
      };
SOURCE(12063, 31)
SOURCE(1646, 29)
   {
      word pd130;
      pd130 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd130 ))))((* (( (ptr) gf←c38592)+27) ), (word) (( (bPt) gf←c38592)+548)/* var←c33856 */ , 1, pd130)
      ;
      };
SOURCE(12096, 47)
SOURCE(1646, 29)
   {
      word pd131;
      pd131 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd131 ))))((* (( (ptr) gf←c38592)+28) ), (word) (( (bPt) gf←c38592)+532)/* var←c33792 */ , 1, pd131)
      ;
      };
SOURCE(12145, 33)
SOURCE(1646, 29)
   {
      word pd132;
      pd132 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd132 ))))((* (( (ptr) gf←c38592)+29) ), (word) (( (bPt) gf←c38592)+484)/* var←c33600 */ , 1, pd132)
      ;
      };
SOURCE(12180, 31)
SOURCE(1646, 29)
   {
      word pd133;
      pd133 = (* (( (ptr) (* (( (ptr) gf←c38592)+215)/* var←c35104 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd133 ))))((* (( (ptr) gf←c38592)+30) ), (word) (( (bPt) gf←c38592)+468)/* var←c33536 */ , 1, pd133)
      ;
      };
   }

static word ForkViewerOp2←P180(proc←v5428, parent←v5456)
   word proc←v5428;
   word parent←v5456;
   {
   register ptr gf←c38624 =  (ptr) &globalframe;
   word var←c5588;
   /* ForkViewerOp2: */ 
SOURCE(1681, 255)
SOURCE(1788, 23)
   (*  (ptr) (* (( (ptr) (* (( (ptr) gf←c38624)+215)/* var←c35104 */  ))+12) ) ) = 1;
SOURCE(1813, 106)
   {
      word var←c35136;
      {
         word var←c35168;
         word var←c35232;
         {
            word pd134;
            pd134 = (* (( (ptr) (* (( (ptr) gf←c38624)+216)/* var←c35200 */  ))+8) );
            var←c35168 = (word) ( *( (fPt) ((*  (ptr) pd134 ))))(pd134);
            };
         var←c35232 = XR←NewObject(12, (* (( (ptr) gf←c38624)+14) ));
         (*  (ptr) var←c35232 ) = XR←CheckProc(proc←v5428);
         (* (( (ptr) var←c35232)+1) ) = parent←v5456;
         (* (( (ptr) var←c35232)+2) ) = var←c35168;
         var←c35136 = var←c35232;
         };
      {
         word pd135;
         pd135 = (* (( (ptr) (* (( (ptr) gf←c38624)+217)/* var←c35264 */  ))+5) );
         (void) ( *( (fPt) ((*  (ptr) pd135 ))))(parent←v5456, (word) (( (bPt) gf←c38624)+828)/* var←c34976 */ , var←c35136, pd135)
         ;
         };
      };
SOURCE(1921, 15)
   return(0);
   }

static word ForkViewerOp←P240(proc←v5648, parent←v5676)
   word proc←v5648;
   word parent←v5676;
   {
   register ptr gf←c38656 =  (ptr) &globalframe;
   word var←c5780;
   /* ForkViewerOp: */ 
SOURCE(1940, 187)
SOURCE(1940, 187)
   var←c5780 = 0;
SOURCE(2032, 23)
   (*  (ptr) (* (( (ptr) (* (( (ptr) gf←c38656)+215)/* var←c35104 */  ))+12) ) ) = 1;
SOURCE(2057, 70)
   {
      word var←c35296;
      {
         word var←c35328;
         var←c35328 = XR←NewObject(8, (* (( (ptr) gf←c38656)+13) ));
         (*  (ptr) var←c35328 ) = XR←CheckProc(proc←v5648);
         (* (( (ptr) var←c35328)+1) ) = parent←v5676;
         var←c35296 = var←c35328;
         };
      {
         word pd136;
         pd136 = (* (( (ptr) (* (( (ptr) gf←c38656)+217)/* var←c35264 */  ))+5) );
         (void) ( *( (fPt) ((*  (ptr) pd136 ))))(parent←v5676, (word) (( (bPt) gf←c38656)+828)/* var←c34976 */ , var←c35296, pd136)
         ;
         };
      };
SOURCE(1940, 187)
   return(var←c5780);
   }

static void StackBase←P300(data←v15740)
   word data←v15740;
   {
   W7 var←c38688;
   register ptr gf←c38720 =  (ptr) &globalframe;
   /* StackBase: */ 
SOURCE(2310, 208)
SOURCE(2348, 170)
   {
      word var←c35360;
      word var←c35392;
      var←c35360 = data←v15740;
      if ((var←c35360 == 0)) {
         goto lab←L100000;
         };
      var←c35392 = XR←GetReferentType(var←c35360);
      if (((* (( (ptr) gf←c38720)+13) ) == var←c35392)) {
         {
            word data1←v6964;
            data1←v6964 = var←c35360;
SOURCE(2392, 37)
SOURCE(2392, 37)
            {
               /* declaration of var←c01 skipped */ 
               /* declaration of var←c02 skipped */ 
               var←c38688.f4/* var←c01 */  = (* (( (ptr) data1←v6964)+1) );
               var←c38688.f5/* var←c02 */  = (*  (ptr) data1←v6964 );
               {
                  word var←c03;
                  {
                     word var←c0559;
                     var←c0559 = (word) &var←c38688;
                     var←c03 = (word) XR←Enable(( ((word)  (fPt) NoName←Q5820) ), ( ((word)  (fPt) NoName←Q5940) ), var←c0559);
                     };
                  /* removed trivial cond node */ 
                  };
               };
            };
         }
      else {
         if (((* (( (ptr) gf←c38720)+14) ) == var←c35392)) {
            {
               word data2←v7020;
               data2←v7020 = var←c35360;
SOURCE(2465, 53)
SOURCE(2465, 53)
               {
                  /* declaration of var←c04 skipped */ 
                  /* declaration of var←c05 skipped */ 
                  /* declaration of var←c06 skipped */ 
                  var←c38688.f4/* var←c04 */  = (* (( (ptr) data2←v7020)+1) );
                  var←c38688.f5/* var←c05 */  = (* (( (ptr) data2←v7020)+2) );
                  var←c38688.f6/* var←c06 */  = (*  (ptr) data2←v7020 );
                  {
                     word var←c07;
                     {
                        word var←c0560;
                        var←c0560 = (word) &var←c38688;
                        var←c07 = (word) XR←Enable(( ((word)  (fPt) NoName←Q5760) ), ( ((word)  (fPt) NoName←Q5880) ), var←c0560);
                        };
                     /* removed trivial cond node */ 
                     };
                  };
               };
            }
         else {
            lab←L100000: ;
            };
         };
      };
   }

static word NoName←Q5760(formal←c0497)
   word formal←c0497;
   {
SOURCE(2465, 53)
   {
      word pd137;
      pd137 = (* (( (ptr) formal←c0497)+6) );
      (void) ( *( (fPt) ((*  (ptr) pd137 ))))((* (( (ptr) formal←c0497)+4) ), (* (( (ptr) formal←c0497)+5) ), pd137);
      };
   return(0);
   }

static word NoName←Q5820(formal←c0498)
   word formal←c0498;
   {
SOURCE(2392, 37)
   {
      word pd138;
      pd138 = (* (( (ptr) formal←c0498)+5) );
      (void) ( *( (fPt) ((*  (ptr) pd138 ))))((* ((( (ptr) formal←c0498)+4)) ), pd138);
      };
   return(0);
   }

static void PreReset←P420(parent←v15800, clientData←v15828, mouseButton←v15856, shift←v15884, control←v15912)
   word parent←v15800;
   word clientData←v15828;
   word mouseButton←v15856;
   word shift←v15884;
   word control←v15912;
   {
   register ptr gf←c38752 =  (ptr) &globalframe;
   /* PreReset: */ 
SOURCE(2774, 215)
SOURCE(2811, 178)
   {
      word var←c35424;
      var←c35424 = parent←v15800;
      if ((var←c35424 == 0)) {
         goto lab←L100009;
         };
      if (1) {
         {
            word viewer←v7076;
            viewer←v7076 = var←c35424;
SOURCE(2853, 136)
            {
               word var←c35456;
               {
                  word pd139;
                  if (((* (( (ptr) viewer←v7076)+14) ) == 0)) {
                     var←c35456 = (* (( (ptr) gf←c38752)+36) );
                     }
                  else {
                     pd139 = (* (( (ptr) (* (( (ptr) gf←c38752)+218)/* var←c35488 */  ))+6) );
                     var←c35456 = (word) ( *( (fPt) ((*  (ptr) pd139 ))))((* (( (ptr) gf←c38752)+37) ), (* (( (ptr) viewer←v7076)+14) ), pd139)
                     ;
                     };
                  };
               {
                  word pd140;
                  pd140 = (* (( (ptr) (* (( (ptr) gf←c38752)+219)/* var←c35520 */  ))+5) );
                  (void) ( *( (fPt) ((*  (ptr) pd140 ))))(var←c35456, 1, pd140);
                  };
               };
            };
         }
      else {
         lab←L100009: ;
         };
      };
   }

static void Reset←P480(parent←v15972, clientData←v16000, mouseButton←v16028, shift←v16056, control←v16084)
   word parent←v15972;
   word clientData←v16000;
   word mouseButton←v16028;
   word shift←v16056;
   word control←v16084;
   {
   register ptr gf←c38784 =  (ptr) &globalframe;
   /* Reset: */ 
SOURCE(3004, 130)
SOURCE(3038, 21)
   {
      word pd141;
      pd141 = (* (( (ptr) (* (( (ptr) gf←c38784)+219)/* var←c35520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd141 ))))(pd141);
      };
SOURCE(3061, 73)
   {
      word viewer←v33044;
      word atom←v33072;
      viewer←v33044 = parent←v15972;
      {
         word var←c35552;
         var←c35552 = mouseButton←v16028;
         switch (var←c35552) {
            case 0: 
               atom←v33072 = (* (( (ptr) gf←c38784)+90) );
               break;
            case 1: 
               atom←v33072 = (* (( (ptr) gf←c38784)+58) );
               break;
            case 2: 
               atom←v33072 = (* (( (ptr) gf←c38784)+55) );
               break;
            default: 
               atom←v33072 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c35584;
         var←c35584 = XR←Narrow(viewer←v33044, (* (( (ptr) gf←c38784)+15) ));
         {
            word pd142;
            pd142 = (* (( (ptr) (* (( (ptr) gf←c38784)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd142 ))))(var←c35584, atom←v33072, pd142);
            };
         };
      };
   }

static void ResetOp←P540(formal←c0127, formal←c0566)
   word formal←c0127;
   word formal←c0566;
   {
   W7 var←c38816;
   /* declaration of viewer←v16144 skipped */ 
   register ptr gf←c38848 =  (ptr) &globalframe;
   word recordAtom←v16188;
   word quit←v16216;
   /* declaration of var←c35616 skipped */ 
   var←c38816.f4/* viewer←v16144 */  = formal←c0566;
   /* ResetOp: */ 
SOURCE(3140, 1055)
   {
      word tmpAddr143;
      tmpAddr143 = (word) (( (ptr) &var←c38816)+5)/* var←c35616 */ ;
      (*  (ptr) tmpAddr143 ) = ( ((word)  (fPt) inner←P4044) );
      (* (( (ptr) tmpAddr143) + 1) ) = 1;
      };
SOURCE(3140, 1055)
   recordAtom←v16188 = 1;
SOURCE(3140, 1055)
   quit←v16216 = 0;
SOURCE(4133, 62)
   {
      word pd144;
      pd144 = (* (( (ptr) (* (( (ptr) gf←c38848)+220)/* var←c35648 */  ))+5) );
      (void) ( *( (fPt) ((*  (ptr) pd144 ))))((word) (( (bPt) &var←c38816)+20)/* var←c35616 */ , var←c38816.f4/* viewer←v16144 */ , pd144)
      ;
      };
   /* removed tail goto */ 
   (*  (ptr) formal←c0127 ) = recordAtom←v16188;
   (* (( (ptr) formal←c0127)+1) ) = quit←v16216;
   return;
   }

static void inner←P4044(formal←c38912)
   word formal←c38912;
   {
   register ptr gf←c38880 =  (ptr) &globalframe;
   formal←c38912 = (formal←c38912 - 20);
   /* inner: */ 
SOURCE(3176, 939)
SOURCE(3192, 379)
   {
      register word v←v7180;
      v←v7180 = (* (( (ptr) formal←c38912)+4) );
      lab←L100014: ;
      if ((v←v7180 != 0)) {
         }
      else {
         goto lab←L100011;
         };
SOURCE(3240, 295)
      {
         word var←c35680;
         var←c35680 = (* (( (ptr) v←v7180)+26) );
         if ((var←c35680 == 0)) {
            goto lab←L100015;
            };
         if (((* (( (ptr) gf←c38880)+9) ) == XR←GetReferentType(var←c35680))) {
            {
               word tdd←v7224;
               tdd←v7224 = var←c35680;
SOURCE(3306, 44)
               {
                  word var←c35744;
                  word pd145;
                  pd145 = (* (( (ptr) (* (( (ptr) gf←c38880)+221)/* var←c35712 */  ))+5) );
                  var←c35744 = (word) ( *( (fPt) ((*  (ptr) pd145 ))))(tdd←v7224, (* (( (ptr) gf←c38880)+38) ), 0, 0, pd145);
                  };
SOURCE(3352, 90)
               {
                  word var←c35776;
                  {
                     word var←c35808;
                     word var←c35904;
                     {
                        word var←c35840;
                        W2 var←c0561;
                        {
                           word limit146;
                           var←c35840 = (* (( (ptr) tdd←v7224)+1) );
                           var←c0561 = (*  (W2Pt) (( (W9Pt) (( (ptr) var←c35840)+3))+(
/*1*/      limit146 = (* (( (ptr) var←c35840)+2) ),
/*1*/      BCK(0, limit146)
/*1*/      )) );
                           };
                        {
                           word pd147;
                           pd147 = (* (( (ptr) (* (( (ptr) gf←c38880)+222)/* var←c35872 */  ))+23) );
                           var←c35808 = (word) ( *( (fPt) ((*  (ptr) pd147 ))))(var←c0561, 1, 0, pd147);
                           };
                        };
                     var←c35904 = XR←NewObject(4, (* (( (ptr) gf←c38880)+10) ));
                     (*  (ptr) var←c35904 ) = var←c35808;
                     var←c35776 = var←c35904;
                     };
                  {
                     word pd148;
                     pd148 = (* (( (ptr) (* (( (ptr) gf←c38880)+223)/* var←c35936 */  ))+28) );
                     (void) ( *( (fPt) ((*  (ptr) pd148 ))))(v←v7180, (* (( (ptr) gf←c38880)+39) ), var←c35776, pd148);
                     };
                  };
SOURCE(3444, 19)
               ((P1x5b) (( (bPt) v←v7180) + 76))->f = 1;
SOURCE(3510, 25)
               {
                  word pd149;
                  pd149 = (* (( (ptr) (* (( (ptr) gf←c38880)+221)/* var←c35712 */  ))+6) );
                  (void) ( *( (fPt) ((*  (ptr) pd149 ))))(tdd←v7224, pd149);
                  };
               };
            }
         else {
            lab←L100015: ;
            };
         };
SOURCE(3549, 22)
      if (((* (( (ptr) v←v7180)+21) ) == (* (( (ptr) formal←c38912)+4) ))) {
SOURCE(3571, 4)
         goto lab←L100012;
         };
      v←v7180 = (* (( (ptr) v←v7180)+21) );
      goto lab←L100014;
      lab←L100011: ;
      lab←L100012: ;
      };
SOURCE(3586, 529)
   {
      register word v←v7268;
      v←v7268 = (* (( (ptr) formal←c38912)+4) );
      lab←L100019: ;
      if ((v←v7268 != 0)) {
         }
      else {
         goto lab←L100016;
         };
SOURCE(3634, 433)
      {
         word var←c35968;
         var←c35968 = (* (( (ptr) v←v7268)+26) );
         if ((var←c35968 == 0)) {
            goto lab←L100020;
            };
         if (((* (( (ptr) gf←c38880)+9) ) == XR←GetReferentType(var←c35968))) {
            {
               word tdd←v7312;
               tdd←v7312 = var←c35968;
SOURCE(3700, 69)
               {
                  word pd150;
                  pd150 = (* (( (ptr) (* (( (ptr) gf←c38880)+224)/* var←c36000 */  ))+4) );
                  if (((*  (ptr) ( *( (fPt) ((*  (ptr) pd150 ))))(pd150) ) == v←v7268)) {
SOURCE(3743, 26)
                     {
                        word pd151;
                        pd151 = (* (( (ptr) (* (( (ptr) gf←c38880)+224)/* var←c36000 */  ))+5) );
                        (void) ( *( (fPt) ((*  (ptr) pd151 ))))(0, 0, pd151);
                        };
                     };
                  };
SOURCE(3771, 296)
               {
                  word var←c36032;
                  {
                     word pd152;
                     pd152 = (* (( (ptr) (* (( (ptr) gf←c38880)+223)/* var←c35936 */  ))+29) );
                     var←c36032 = (word) ( *( (fPt) ((*  (ptr) pd152 ))))(v←v7268, (* (( (ptr) gf←c38880)+39) ), pd152);
                     };
                  if ((var←c36032 == 0)) {
                     goto lab←L100021;
                     };
                  if (((* (( (ptr) gf←c38880)+10) ) == XR←GetReferentType(var←c36032))) {
                     {
                        word locRef←v7356;
                        locRef←v7356 = var←c36032;
                        {
                           W2 var←c36096;
SOURCE(3843, 15)
                           {
/*1*/   word pd153;
/*1*/   pd153 = (* (( (ptr) (*  (ptr) v←v7268 ))+8) );
/*1*/   (void) ( *( (fPt) ((*  (ptr) pd153 ))))(v←v7268, pd153);
/*1*/   };
SOURCE(3860, 32)
                           ((P1x6b) (( (bPt) v←v7268) + 76))->f = 0;
                           ((P1x5b) (( (bPt) v←v7268) + 76))->f = 0;
SOURCE(3894, 44)
                           {
/*1*/   word var←c36064;
/*1*/   word pd154;
/*1*/   pd154 = (* (( (ptr) (* (( (ptr) gf←c38880)+221)/* var←c35712 */  ))+5) );
/*1*/   var←c36064 = (word) ( *( (fPt) ((*  (ptr) pd154 ))))(tdd←v7312, (* (( (ptr) gf←c38880)+38) ), 0, 0, pd154);
/*1*/   };
SOURCE(3940, 100)
                           {
/*1*/   word pd156;
/*1*/   {
/*1*/      word pd155;
/*1*/      pd155 = (* (( (ptr) (* (( (ptr) gf←c38880)+222)/* var←c35872 */  ))+20) );
/*1*/      (void) ( *( (fPt) ((*  (ptr) pd155 ))))((word) &var←c36096, (*  (ptr) tdd←v7312 ), (*  (ptr) locRef←v7356 ), 1, 0, pd155)
/*1*/      ;
/*1*/      };
/*1*/   pd156 = (* (( (ptr) (* (( (ptr) gf←c38880)+225)/* var←c36128 */  ))+38) );
/*1*/   if ((0 == (word) ( *( (fPt) ((*  (ptr) pd156 ))))(v←v7268, var←c36096, 0, pd156))) {
SOURCE(4011, 29)
/*1*/      {
/*1*/         word pd157;
/*1*/         pd157 = (* (( (ptr) (* (( (ptr) gf←c38880)+223)/* var←c35936 */  ))+16) );
/*1*/         (void) ( *( (fPt) ((*  (ptr) pd157 ))))(v←v7268, 0, 1, 0, pd157);
/*1*/         };
/*1*/      };
/*1*/   };
SOURCE(4042, 25)
                           {
/*1*/   word pd158;
/*1*/   pd158 = (* (( (ptr) (* (( (ptr) gf←c38880)+221)/* var←c35712 */  ))+6) );
/*1*/   (void) ( *( (fPt) ((*  (ptr) pd158 ))))(tdd←v7312, pd158);
/*1*/   };
                           };
                        };
                     }
                  else {
                     lab←L100021: ;
                     };
                  };
               };
            }
         else {
            lab←L100020: ;
            };
         };
SOURCE(4093, 22)
      if (((* (( (ptr) v←v7268)+21) ) == (* (( (ptr) formal←c38912)+4) ))) {
SOURCE(4115, 4)
         goto lab←L100017;
         };
      v←v7268 = (* (( (ptr) v←v7268)+21) );
      goto lab←L100019;
      lab←L100016: ;
      lab←L100017: ;
      };
   }

static void Save←P600(parent←v16276, clientData←v16304, mouseButton←v16332, shift←v16360, control←v16388)
   word parent←v16276;
   word clientData←v16304;
   word mouseButton←v16332;
   word shift←v16360;
   word control←v16388;
   {
   register ptr gf←c38944 =  (ptr) &globalframe;
   /* Save: */ 
SOURCE(4201, 126)
SOURCE(4234, 21)
   {
      word pd159;
      pd159 = (* (( (ptr) (* (( (ptr) gf←c38944)+219)/* var←c35520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd159 ))))(pd159);
      };
SOURCE(4257, 70)
   {
      word viewer←v32968;
      word atom←v32996;
      viewer←v32968 = parent←v16276;
      {
         word var←c36160;
         var←c36160 = mouseButton←v16332;
         switch (var←c36160) {
            case 0: 
               atom←v32996 = (* (( (ptr) gf←c38944)+41) );
               break;
            case 1: 
               atom←v32996 = (* (( (ptr) gf←c38944)+40) );
               break;
            case 2: 
               atom←v32996 = (* (( (ptr) gf←c38944)+35) );
               break;
            default: 
               atom←v32996 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c36192;
         var←c36192 = XR←Narrow(viewer←v32968, (* (( (ptr) gf←c38944)+15) ));
         {
            word pd160;
            pd160 = (* (( (ptr) (* (( (ptr) gf←c38944)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd160 ))))(var←c36192, atom←v32996, pd160);
            };
         };
      };
   }

static void SaveViewer←P660(viewer←v6348)
   word viewer←v6348;
   {
   register ptr gf←c38976 =  (ptr) &globalframe;
   /* SaveViewer: */ 
SOURCE(4333, 72)
SOURCE(4371, 34)
   {
      word var←c36224;
      word pd161;
      pd161 = (* (( (ptr) (* (( (ptr) gf←c38976)+223)/* var←c35936 */  ))+20) );
      var←c36224 = (word) ( *( (fPt) ((*  (ptr) pd161 ))))(viewer←v6348, pd161);
      };
   }

static void SaveOp←P720(formal←c0164, viewer←v16448)
   word formal←c0164;
   word viewer←v16448;
   {
   register ptr gf←c39008 =  (ptr) &globalframe;
   word recordAtom←v16492;
   word quit←v16520;
   /* SaveOp: */ 
SOURCE(4409, 201)
SOURCE(4409, 201)
   recordAtom←v16492 = 1;
SOURCE(4409, 201)
   quit←v16520 = 0;
SOURCE(4444, 23)
   (*  (ptr) (* (( (ptr) (* (( (ptr) gf←c39008)+215)/* var←c35104 */  ))+12) ) ) = 1;
SOURCE(4469, 122)
   if ( ( ( ! ((* (( (bPt) viewer←v16448)+77) ) & 020)) ?  ( ((* (( (bPt) viewer←v16448)+76) ) & 02) ? 1 : (((unsigned)(* (( (bPt) viewer←v16448)+76)
    ) << 29) >> 31) )  : 0 ) ) {
SOURCE(4547, 44)
      {
         W2 var←c36256;
         {
            W2 var←c0160;
            word var←c0159;
            var←c0159 = XR←ExtensionAlloc(5);
            {
               word tmpAddr162;
               tmpAddr162 = (word) var←c0159;
               (*  (ptr) tmpAddr162 ) = ( ((word)  (fPt) NoName←Q6000) );
               (* (( (ptr) tmpAddr162) + 1) ) = 0;
               (* (( (ptr) tmpAddr162) + 2) ) = (word) (( (bPt) gf←c39008)+788)/* var←c34816 */ ;
               (* (( (ptr) tmpAddr162) + 3) ) = 0;
               (* (( (ptr) tmpAddr162) + 4) ) = viewer←v16448;
               };
            (void) XR←Fork((word) &var←c0160, var←c0159);
            var←c36256 = var←c0160;
            };
         {
            word pd163;
            pd163 = (* (( (ptr) (* (( (ptr) gf←c39008)+226)/* var←c36288 */  ))+11) );
            (void) ( *( (fPt) ((*  (ptr) pd163 ))))(var←c36256, pd163);
            };
         };
      };
SOURCE(4596, 14)
   recordAtom←v16492 = 0;
   quit←v16520 = 0;
   /* removed tail goto */ 
   (*  (ptr) formal←c0164 ) = recordAtom←v16492;
   (* (( (ptr) formal←c0164)+1) ) = quit←v16520;
   return;
   }

static void PreClear←P780(parent←v16580, clientData←v16608, mouseButton←v16636, shift←v16664, control←v16692)
   word parent←v16580;
   word clientData←v16608;
   word mouseButton←v16636;
   word shift←v16664;
   word control←v16692;
   {
   register ptr gf←c39040 =  (ptr) &globalframe;
   /* PreClear: */ 
SOURCE(4616, 169)
SOURCE(4653, 132)
   {
      word pd164;
      pd164 = (* (( (ptr) (* (( (ptr) gf←c39040)+219)/* var←c35520 */  ))+5) );
      (void) ( *( (fPt) ((*  (ptr) pd164 ))))((* (( (ptr) gf←c39040)+42) ), 1, pd164);
      };
   }

static void Clear←P840(parent←v16752, clientData←v16780, mouseButton←v16808, shift←v16836, control←v16864)
   word parent←v16752;
   word clientData←v16780;
   word mouseButton←v16808;
   word shift←v16836;
   word control←v16864;
   {
   register ptr gf←c39072 =  (ptr) &globalframe;
   /* Clear: */ 
SOURCE(4791, 98)
SOURCE(4825, 64)
   {
      word viewer←v32892;
      word atom←v32920;
      viewer←v32892 = parent←v16752;
      {
         word var←c36320;
         var←c36320 = mouseButton←v16808;
         switch (var←c36320) {
            case 0: 
               atom←v32920 = (* (( (ptr) gf←c39072)+34) );
               break;
            case 1: 
               atom←v32920 = (* (( (ptr) gf←c39072)+33) );
               break;
            case 2: 
               atom←v32920 = (* (( (ptr) gf←c39072)+32) );
               break;
            default: 
               atom←v32920 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c36352;
         var←c36352 = XR←Narrow(viewer←v32892, (* (( (ptr) gf←c39072)+15) ));
         {
            word pd165;
            pd165 = (* (( (ptr) (* (( (ptr) gf←c39072)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd165 ))))(var←c36352, atom←v32920, pd165);
            };
         };
      };
   }

static void EmptyOp←P900(formal←c0182, viewer←v16924)
   word formal←c0182;
   word viewer←v16924;
   {
   register ptr gf←c39104 =  (ptr) &globalframe;
   word recordAtom←v16968;
   word quit←v16996;
   /* EmptyOp: */ 
SOURCE(4895, 189)
SOURCE(4895, 189)
   recordAtom←v16968 = 1;
SOURCE(4895, 189)
   quit←v16996 = 0;
SOURCE(4931, 134)
   if ((* (( (bPt) viewer←v16924)+76) ) & 04) {
SOURCE(4959, 53)
      {
         word pd166;
         pd166 = (* (( (ptr) (* (( (ptr) gf←c39104)+219)/* var←c35520 */  ))+5) );
         (void) ( *( (fPt) ((*  (ptr) pd166 ))))((* (( (ptr) gf←c39104)+43) ), 1, pd166);
         };
SOURCE(5014, 21)
      {
         word pd167;
         pd167 = (* (( (ptr) (* (( (ptr) gf←c39104)+219)/* var←c35520 */  ))+6) );
         (void) ( *( (fPt) ((*  (ptr) pd167 ))))(pd167);
         };
      }
   else {
SOURCE(5046, 19)
      {
         word pd168;
         pd168 = (* (( (ptr) (* (( (ptr) gf←c39104)+225)/* var←c36128 */  ))+13) );
         (void) ( *( (fPt) ((*  (ptr) pd168 ))))(viewer←v16924, pd168);
         };
      };
SOURCE(5070, 14)
   recordAtom←v16968 = 0;
   quit←v16996 = 0;
   /* removed tail goto */ 
   (*  (ptr) formal←c0182 ) = recordAtom←v16968;
   (* (( (ptr) formal←c0182)+1) ) = quit←v16996;
   return;
   }

static void NewOp←P960(formal←c0186, viewer←v17056)
   word formal←c0186;
   word viewer←v17056;
   {
   register ptr gf←c39136 =  (ptr) &globalframe;
   word recordAtom←v17100;
   word quit←v17128;
   /* NewOp: */ 
SOURCE(5090, 68)
SOURCE(5090, 68)
   recordAtom←v17100 = 1;
SOURCE(5090, 68)
   quit←v17128 = 0;
SOURCE(5124, 17)
   {
      word pd169;
      pd169 = (* (( (ptr) (* (( (ptr) gf←c39136)+225)/* var←c36128 */  ))+14) );
      (void) ( *( (fPt) ((*  (ptr) pd169 ))))(viewer←v17056, pd169);
      };
SOURCE(5143, 15)
   recordAtom←v17100 = 0;
   quit←v17128 = 0;
   /* removed tail goto */ 
   (*  (ptr) formal←c0186 ) = recordAtom←v17100;
   (* (( (ptr) formal←c0186)+1) ) = quit←v17128;
   return;
   }

static void NewButton←P1020(parent←v17188, clientData←v17216, mouseButton←v17244, shift←v17272, control←v17300)
   word parent←v17188;
   word clientData←v17216;
   word mouseButton←v17244;
   word shift←v17272;
   word control←v17300;
   {
   register ptr gf←c39168 =  (ptr) &globalframe;
   /* NewButton: */ 
SOURCE(5162, 56)
SOURCE(5203, 15)
   {
      word pd170;
      pd170 = (* (( (ptr) (* (( (ptr) gf←c39168)+225)/* var←c36128 */  ))+14) );
      (void) ( *( (fPt) ((*  (ptr) pd170 ))))(0, pd170);
      };
   }

static void CloseAndNewOp←P1080(formal←c0195, viewer←v17360)
   word formal←c0195;
   word viewer←v17360;
   {
   register ptr gf←c39200 =  (ptr) &globalframe;
   word recordAtom←v17404;
   word quit←v17432;
   /* CloseAndNewOp: */ 
SOURCE(5222, 84)
SOURCE(5222, 84)
   recordAtom←v17404 = 1;
SOURCE(5222, 84)
   quit←v17432 = 0;
SOURCE(5264, 25)
   {
      word pd171;
      pd171 = (* (( (ptr) (* (( (ptr) gf←c39200)+225)/* var←c36128 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd171 ))))(viewer←v17360, pd171);
      };
SOURCE(5291, 15)
   recordAtom←v17404 = 0;
   quit←v17432 = 0;
   /* removed tail goto */ 
   (*  (ptr) formal←c0195 ) = recordAtom←v17404;
   (* (( (ptr) formal←c0195)+1) ) = quit←v17432;
   return;
   }

static void Store←P1140(parent←v17492, clientData←v17520, mouseButton←v17548, shift←v17576, control←v17604)
   word parent←v17492;
   word clientData←v17520;
   word mouseButton←v17548;
   word shift←v17576;
   word control←v17604;
   {
   register ptr gf←c39232 =  (ptr) &globalframe;
   /* Store: */ 
SOURCE(5310, 131)
SOURCE(5345, 21)
   {
      word pd172;
      pd172 = (* (( (ptr) (* (( (ptr) gf←c39232)+219)/* var←c35520 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd172 ))))(pd172);
      };
SOURCE(5368, 73)
   {
      word viewer←v32816;
      word atom←v32844;
      viewer←v32816 = parent←v17492;
      {
         word var←c36384;
         var←c36384 = mouseButton←v17548;
         switch (var←c36384) {
            case 0: 
               atom←v32844 = (* (( (ptr) gf←c39232)+31) );
               break;
            case 1: 
               atom←v32844 = (* (( (ptr) gf←c39232)+16) );
               break;
            case 2: 
               atom←v32844 = (* (( (ptr) gf←c39232)+17) );
               break;
            default: 
               atom←v32844 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c36416;
         var←c36416 = XR←Narrow(viewer←v32816, (* (( (ptr) gf←c39232)+15) ));
         {
            word pd173;
            pd173 = (* (( (ptr) (* (( (ptr) gf←c39232)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd173 ))))(var←c36416, atom←v32844, pd173);
            };
         };
      };
   }

static void StoreOp←P1200(formal←c0209, viewer←v17664)
   word formal←c0209;
   word viewer←v17664;
   {
   register ptr gf←c39264 =  (ptr) &globalframe;
   word recordAtom←v17708;
   word quit←v17736;
   /* StoreOp: */ 
SOURCE(5447, 80)
SOURCE(5447, 80)
   recordAtom←v17708 = 1;
SOURCE(5447, 80)
   quit←v17736 = 0;
SOURCE(5483, 44)
   {
      word var←c36480;
      var←c36480 = (word) ForkViewerOp2←P180((* (( (ptr) (* (( (ptr) gf←c39264)+225)/* var←c36128 */  ))+37) ), viewer←v17664);
      recordAtom←v17708 = var←c36480;
      quit←v17736 = 0;
      /* removed tail goto */ 
      };
   (*  (ptr) formal←c0209 ) = recordAtom←v17708;
   (* (( (ptr) formal←c0209)+1) ) = quit←v17736;
   return;
   }

static void PreviousFile←P1260(parent←v17796, clientData←v17824, mouseButton←v17852, shift←v17880, control←v17908)
   word parent←v17796;
   word clientData←v17824;
   word mouseButton←v17852;
   word shift←v17880;
   word control←v17908;
   {
   register ptr gf←c39296 =  (ptr) &globalframe;
   /* PreviousFile: */ 
SOURCE(5531, 156)
SOURCE(5573, 23)
   {
      word pd174;
      pd174 = (* (( (ptr) (* (( (ptr) gf←c39296)+225)/* var←c36128 */  ))+51) );
      (void) ( *( (fPt) ((*  (ptr) pd174 ))))(parent←v17796, 0, 0, 0, 0, pd174);
      };
SOURCE(5598, 89)
   {
      word viewer←v32740;
      word atom←v32768;
      viewer←v32740 = parent←v17796;
      {
         word var←c36512;
         var←c36512 = mouseButton←v17852;
         switch (var←c36512) {
            case 0: 
               atom←v32768 = (* (( (ptr) gf←c39296)+18) );
               break;
            case 1: 
               atom←v32768 = (* (( (ptr) gf←c39296)+19) );
               break;
            case 2: 
               atom←v32768 = (* (( (ptr) gf←c39296)+20) );
               break;
            default: 
               atom←v32768 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c36544;
         var←c36544 = XR←Narrow(viewer←v32740, (* (( (ptr) gf←c39296)+15) ));
         {
            word pd175;
            pd175 = (* (( (ptr) (* (( (ptr) gf←c39296)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd175 ))))(var←c36544, atom←v32768, pd175);
            };
         };
      };
   }

static void LoadPreviousOp←P1320(formal←c0223, viewer←v17968)
   word formal←c0223;
   word viewer←v17968;
   {
   register ptr gf←c39328 =  (ptr) &globalframe;
   word recordAtom←v18012;
   word quit←v18040;
   /* LoadPreviousOp: */ 
SOURCE(5693, 90)
SOURCE(5693, 90)
   recordAtom←v18012 = 1;
SOURCE(5693, 90)
   quit←v18040 = 0;
SOURCE(5736, 47)
   {
      word var←c36608;
      var←c36608 = (word) ForkViewerOp←P240((* (( (ptr) (* (( (ptr) gf←c39328)+225)/* var←c36128 */  ))+32) ), viewer←v17968);
      recordAtom←v18012 = var←c36608;
      quit←v18040 = 0;
      /* removed tail goto */ 
      };
   (*  (ptr) formal←c0223 ) = recordAtom←v18012;
   (* (( (ptr) formal←c0223)+1) ) = quit←v18040;
   return;
   }

static void OpenPreviousOp←P1380(formal←c0228, viewer←v18100)
   word formal←c0228;
   word viewer←v18100;
   {
   register ptr gf←c39360 =  (ptr) &globalframe;
   word recordAtom←v18144;
   word quit←v18172;
   /* OpenPreviousOp: */ 
SOURCE(5789, 90)
SOURCE(5789, 90)
   recordAtom←v18144 = 1;
SOURCE(5789, 90)
   quit←v18172 = 0;
SOURCE(5832, 47)
   {
      word var←c36672;
      var←c36672 = (word) ForkViewerOp←P240((* (( (ptr) (* (( (ptr) gf←c39360)+225)/* var←c36128 */  ))+33) ), viewer←v18100);
      recordAtom←v18144 = var←c36672;
      quit←v18172 = 0;
      /* removed tail goto */ 
      };
   (*  (ptr) formal←c0228 ) = recordAtom←v18144;
   (* (( (ptr) formal←c0228)+1) ) = quit←v18172;
   return;
   }

static void CloseAndOpenPreviousOp←P1440(formal←c0233, viewer←v18232)
   word formal←c0233;
   word viewer←v18232;
   {
   register ptr gf←c39392 =  (ptr) &globalframe;
   word recordAtom←v18276;
   word quit←v18304;
   /* CloseAndOpenPreviousOp: */ 
SOURCE(5885, 106)
SOURCE(5885, 106)
   recordAtom←v18276 = 1;
SOURCE(5885, 106)
   quit←v18304 = 0;
SOURCE(5936, 55)
   {
      word var←c36736;
      var←c36736 = (word) ForkViewerOp←P240((* (( (ptr) (* (( (ptr) gf←c39392)+225)/* var←c36128 */  ))+34) ), viewer←v18232);
      recordAtom←v18276 = var←c36736;
      quit←v18304 = 0;
      /* removed tail goto */ 
      };
   (*  (ptr) formal←c0233 ) = recordAtom←v18276;
   (* (( (ptr) formal←c0233)+1) ) = quit←v18304;
   return;
   }

static void AnonymousLoadImpl←P1500(parent←v18364, clientData←v18392, mouseButton←v18420, shift←v18448, control←v18476)
   word parent←v18364;
   word clientData←v18392;
   word mouseButton←v18420;
   word shift←v18448;
   word control←v18476;
   {
   register ptr gf←c39424 =  (ptr) &globalframe;
   /* AnonymousLoadImpl: */ 
SOURCE(5997, 76)
SOURCE(6043, 30)
   {
      word viewer←v32692;
      viewer←v32692 = parent←v18364;
SOURCE(1513, 46)
      {
         word var←c36768;
         var←c36768 = XR←Narrow(viewer←v32692, (* (( (ptr) gf←c39424)+15) ));
         {
            word pd176;
            pd176 = (* (( (ptr) (* (( (ptr) gf←c39424)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd176 ))))(var←c36768, (* (( (ptr) gf←c39424)+21) ), pd176);
            };
         };
      };
   }

static void AnonymousLoadImplOp←P1560(formal←c0245, viewer←v18536)
   word formal←c0245;
   word viewer←v18536;
   {
   register ptr gf←c39456 =  (ptr) &globalframe;
   word recordAtom←v18580;
   word quit←v18608;
   /* AnonymousLoadImplOp: */ 
SOURCE(6079, 100)
SOURCE(6079, 100)
   recordAtom←v18580 = 1;
SOURCE(6079, 100)
   quit←v18608 = 0;
SOURCE(6127, 52)
   {
      word var←c36832;
      var←c36832 = (word) ForkViewerOp←P240((* (( (ptr) (* (( (ptr) gf←c39456)+225)/* var←c36128 */  ))+31) ), viewer←v18536);
      recordAtom←v18580 = var←c36832;
      quit←v18608 = 0;
      /* removed tail goto */ 
      };
   (*  (ptr) formal←c0245 ) = recordAtom←v18580;
   (* (( (ptr) formal←c0245)+1) ) = quit←v18608;
   return;
   }

static void AnonymousLoad←P1620(parent←v18668, clientData←v18696, mouseButton←v18724, shift←v18752, control←v18780)
   word parent←v18668;
   word clientData←v18696;
   word mouseButton←v18724;
   word shift←v18752;
   word control←v18780;
   {
   register ptr gf←c39488 =  (ptr) &globalframe;
   /* AnonymousLoad: */ 
SOURCE(6185, 69)
SOURCE(6228, 26)
   {
      word viewer←v32644;
      viewer←v32644 = parent←v18668;
SOURCE(1513, 46)
      {
         word var←c36864;
         var←c36864 = XR←Narrow(viewer←v32644, (* (( (ptr) gf←c39488)+15) ));
         {
            word pd177;
            pd177 = (* (( (ptr) (* (( (ptr) gf←c39488)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd177 ))))(var←c36864, (* (( (ptr) gf←c39488)+22) ), pd177);
            };
         };
      };
   }

static void AnonymousLoadOp←P1680(formal←c0257, viewer←v18840)
   word formal←c0257;
   word viewer←v18840;
   {
   register ptr gf←c39520 =  (ptr) &globalframe;
   word recordAtom←v18884;
   word quit←v18912;
   /* AnonymousLoadOp: */ 
SOURCE(6260, 90)
SOURCE(6260, 90)
   recordAtom←v18884 = 1;
SOURCE(6260, 90)
   quit←v18912 = 0;
SOURCE(6304, 46)
   {
      word var←c36928;
      var←c36928 = (word) ForkViewerOp←P240((word) (( (bPt) gf←c39520)+644)/* var←c34240 */ , viewer←v18840);
      recordAtom←v18884 = var←c36928;
      quit←v18912 = 0;
      /* removed tail goto */ 
      };
   (*  (ptr) formal←c0257 ) = recordAtom←v18884;
   (* (( (ptr) formal←c0257)+1) ) = quit←v18912;
   return;
   }

static void AnonymousLoadIt←P1740(parent←v6408)
   word parent←v6408;
   {
   register ptr gf←c39552 =  (ptr) &globalframe;
   /* AnonymousLoadIt: */ 
SOURCE(6356, 68)
SOURCE(6399, 25)
   {
      word pd178;
      pd178 = (* (( (ptr) (* (( (ptr) gf←c39552)+225)/* var←c36128 */  ))+30) );
      (void) ( *( (fPt) ((*  (ptr) pd178 ))))(parent←v6408, 0, pd178);
      };
   }

static void PreGet←P1800(parent←v18972, clientData←v19000, mouseButton←v19028, shift←v19056, control←v19084)
   word parent←v18972;
   word clientData←v19000;
   word mouseButton←v19028;
   word shift←v19056;
   word control←v19084;
   {
   register ptr gf←c39584 =  (ptr) &globalframe;
   word viewer←v7412;
   /* PreGet: */ 
SOURCE(6430, 189)
SOURCE(6477, 31)
   viewer←v7412 = parent←v18972;
SOURCE(6510, 109)
   {
      word pd179;
      pd179 = (* (( (ptr) (* (( (ptr) gf←c39584)+219)/* var←c35520 */  ))+5) );
      (void) ( *( (fPt) ((*  (ptr) pd179 ))))((* (( (ptr) gf←c39584)+44) ), 1, pd179);
      };
   }

static void Get←P1860(parent←v19144, clientData←v19172, mouseButton←v19200, shift←v19228, control←v19256)
   word parent←v19144;
   word clientData←v19172;
   word mouseButton←v19200;
   word shift←v19228;
   word control←v19256;
   {
   register ptr gf←c39616 =  (ptr) &globalframe;
   /* Get: */ 
SOURCE(6625, 98)
SOURCE(6658, 65)
   {
      word viewer←v32568;
      word atom←v32596;
      viewer←v32568 = parent←v19144;
      {
         word var←c36960;
         var←c36960 = mouseButton←v19200;
         switch (var←c36960) {
            case 0: 
               atom←v32596 = (* (( (ptr) gf←c39616)+23) );
               break;
            case 1: 
               atom←v32596 = (* (( (ptr) gf←c39616)+24) );
               break;
            case 2: 
               atom←v32596 = (* (( (ptr) gf←c39616)+25) );
               break;
            default: 
               atom←v32596 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c36992;
         var←c36992 = XR←Narrow(viewer←v32568, (* (( (ptr) gf←c39616)+15) ));
         {
            word pd180;
            pd180 = (* (( (ptr) (* (( (ptr) gf←c39616)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd180 ))))(var←c36992, atom←v32596, pd180);
            };
         };
      };
   }

static void LoadOp←P1920(formal←c0278, viewer←v19316)
   word formal←c0278;
   word viewer←v19316;
   {
   register ptr gf←c39648 =  (ptr) &globalframe;
   word recordAtom←v19360;
   word quit←v19388;
   /* LoadOp: */ 
SOURCE(6729, 74)
SOURCE(6729, 74)
   recordAtom←v19360 = 1;
SOURCE(6729, 74)
   quit←v19388 = 0;
SOURCE(6764, 39)
   {
      word var←c37056;
      var←c37056 = (word) ForkViewerOp2←P180((word) (( (bPt) gf←c39648)+612)/* var←c34112 */ , viewer←v19316);
      recordAtom←v19360 = var←c37056;
      quit←v19388 = 0;
      /* removed tail goto */ 
      };
   (*  (ptr) formal←c0278 ) = recordAtom←v19360;
   (* (( (ptr) formal←c0278)+1) ) = quit←v19388;
   return;
   }

static void LoadIt←P1980(parent←v6468, fileName←v6496)
   word parent←v6468;
   word fileName←v6496;
   {
   register ptr gf←c39680 =  (ptr) &globalframe;
   /* LoadIt: */ 
SOURCE(6807, 96)
SOURCE(6863, 40)
   {
      word var←c37088;
      word pd181;
      pd181 = (* (( (ptr) (* (( (ptr) gf←c39680)+225)/* var←c36128 */  ))+27) );
      var←c37088 = (word) ( *( (fPt) ((*  (ptr) pd181 ))))(parent←v6468, fileName←v6496, 0, 0, pd181);
      };
   }

static void OpenOp←P2040(formal←c0286, viewer←v19448)
   word formal←c0286;
   word viewer←v19448;
   {
   register ptr gf←c39712 =  (ptr) &globalframe;
   word recordAtom←v19492;
   word quit←v19520;
   /* OpenOp: */ 
SOURCE(6909, 73)
SOURCE(6909, 73)
   recordAtom←v19492 = 1;
SOURCE(6909, 73)
   quit←v19520 = 0;
SOURCE(6944, 38)
   {
      word var←c37152;
      var←c37152 = (word) ForkViewerOp2←P180((word) (( (bPt) gf←c39712)+596)/* var←c34048 */ , viewer←v19448);
      recordAtom←v19492 = var←c37152;
      quit←v19520 = 0;
      /* removed tail goto */ 
      };
   (*  (ptr) formal←c0286 ) = recordAtom←v19492;
   (* (( (ptr) formal←c0286)+1) ) = quit←v19520;
   return;
   }

static void OpenIt←P2100(parent←v6556, fileName←v6584)
   word parent←v6556;
   word fileName←v6584;
   {
   register ptr gf←c39744 =  (ptr) &globalframe;
   /* OpenIt: */ 
SOURCE(6988, 161)
SOURCE(7044, 105)
   {
      word var←c37184;
      word pd182;
      pd182 = (* (( (ptr) (* (( (ptr) gf←c39744)+225)/* var←c36128 */  ))+19) );
      var←c37184 = (word) ( *( (fPt) ((*  (ptr) pd182 ))))(fileName←v6584,  ( (parent←v6556 != 0) ? (* (( (ptr) parent←v6556)+18)
          ) : 1 ) , parent←v6556, 0, pd182);
      };
   }

static void CloseAndOpenOp←P2160(formal←c0294, viewer←v19580)
   word formal←c0294;
   word viewer←v19580;
   {
   register ptr gf←c39776 =  (ptr) &globalframe;
   word recordAtom←v19624;
   word quit←v19652;
   /* CloseAndOpenOp: */ 
SOURCE(7155, 89)
SOURCE(7155, 89)
   recordAtom←v19624 = 1;
SOURCE(7155, 89)
   quit←v19652 = 0;
SOURCE(7198, 46)
   {
      word var←c37248;
      var←c37248 = (word) ForkViewerOp2←P180((word) (( (bPt) gf←c39776)+580)/* var←c33984 */ , viewer←v19580);
      recordAtom←v19624 = var←c37248;
      quit←v19652 = 0;
      /* removed tail goto */ 
      };
   (*  (ptr) formal←c0294 ) = recordAtom←v19624;
   (* (( (ptr) formal←c0294)+1) ) = quit←v19652;
   return;
   }

static void CloseAndOpenIt←P2220(parent←v6644, fileName←v6672)
   word parent←v6644;
   word fileName←v6672;
   {
   register ptr gf←c39808 =  (ptr) &globalframe;
   /* CloseAndOpenIt: */ 
SOURCE(7250, 105)
SOURCE(7314, 41)
   {
      word var←c37280;
      word pd183;
      pd183 = (* (( (ptr) (* (( (ptr) gf←c39808)+225)/* var←c36128 */  ))+21) );
      var←c37280 = (word) ( *( (fPt) ((*  (ptr) pd183 ))))(parent←v6644, fileName←v6672, pd183);
      };
   }

static void GetImpl←P2280(parent←v19712, clientData←v19740, mouseButton←v19768, shift←v19796, control←v19824)
   word parent←v19712;
   word clientData←v19740;
   word mouseButton←v19768;
   word shift←v19796;
   word control←v19824;
   {
   register ptr gf←c39840 =  (ptr) &globalframe;
   /* GetImpl: */ 
SOURCE(7362, 114)
SOURCE(7399, 77)
   {
      word viewer←v32492;
      word atom←v32520;
      viewer←v32492 = parent←v19712;
      {
         word var←c37312;
         var←c37312 = mouseButton←v19768;
         switch (var←c37312) {
            case 0: 
               atom←v32520 = (* (( (ptr) gf←c39840)+26) );
               break;
            case 1: 
               atom←v32520 = (* (( (ptr) gf←c39840)+27) );
               break;
            case 2: 
               atom←v32520 = (* (( (ptr) gf←c39840)+28) );
               break;
            default: 
               atom←v32520 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c37344;
         var←c37344 = XR←Narrow(viewer←v32492, (* (( (ptr) gf←c39840)+15) ));
         {
            word pd184;
            pd184 = (* (( (ptr) (* (( (ptr) gf←c39840)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd184 ))))(var←c37344, atom←v32520, pd184);
            };
         };
      };
   }

static void LoadImplOp←P2340(formal←c0311, viewer←v19884)
   word formal←c0311;
   word viewer←v19884;
   {
   register ptr gf←c39872 =  (ptr) &globalframe;
   word recordAtom←v19928;
   word quit←v19956;
   /* LoadImplOp: */ 
SOURCE(7482, 81)
SOURCE(7482, 81)
   recordAtom←v19928 = 1;
SOURCE(7482, 81)
   quit←v19956 = 0;
SOURCE(7521, 42)
   {
      word var←c37408;
      var←c37408 = (word) ForkViewerOp2←P180((word) (( (bPt) gf←c39872)+556)/* var←c33888 */ , viewer←v19884);
      recordAtom←v19928 = var←c37408;
      quit←v19956 = 0;
      /* removed tail goto */ 
      };
   (*  (ptr) formal←c0311 ) = recordAtom←v19928;
   (* (( (ptr) formal←c0311)+1) ) = quit←v19956;
   return;
   }

static void LoadItImpl←P2400(parent←v6732, fileName←v6760)
   word parent←v6732;
   word fileName←v6760;
   {
   register ptr gf←c39904 =  (ptr) &globalframe;
   /* LoadItImpl: */ 
SOURCE(7569, 104)
SOURCE(7629, 44)
   {
      word var←c37440;
      word pd185;
      pd185 = (* (( (ptr) (* (( (ptr) gf←c39904)+225)/* var←c36128 */  ))+29) );
      var←c37440 = (word) ( *( (fPt) ((*  (ptr) pd185 ))))(parent←v6732, fileName←v6760, 0, pd185);
      };
   }

static void OpenImplOp←P2460(formal←c0319, viewer←v20016)
   word formal←c0319;
   word viewer←v20016;
   {
   register ptr gf←c39936 =  (ptr) &globalframe;
   word recordAtom←v20060;
   word quit←v20088;
   /* OpenImplOp: */ 
SOURCE(7679, 81)
SOURCE(7679, 81)
   recordAtom←v20060 = 1;
SOURCE(7679, 81)
   quit←v20088 = 0;
SOURCE(7718, 42)
   {
      word var←c37504;
      var←c37504 = (word) ForkViewerOp2←P180((word) (( (bPt) gf←c39936)+540)/* var←c33824 */ , viewer←v20016);
      recordAtom←v20060 = var←c37504;
      quit←v20088 = 0;
      /* removed tail goto */ 
      };
   (*  (ptr) formal←c0319 ) = recordAtom←v20060;
   (* (( (ptr) formal←c0319)+1) ) = quit←v20088;
   return;
   }

static void OpenItImpl←P2520(parent←v6820, fileName←v6848)
   word parent←v6820;
   word fileName←v6848;
   {
   register ptr gf←c39968 =  (ptr) &globalframe;
   /* OpenItImpl: */ 
SOURCE(7766, 169)
SOURCE(7826, 109)
   {
      word var←c37536;
      word pd186;
      pd186 = (* (( (ptr) (* (( (ptr) gf←c39968)+225)/* var←c36128 */  ))+23) );
      var←c37536 = (word) ( *( (fPt) ((*  (ptr) pd186 ))))(fileName←v6848,  ( (parent←v6820 != 0) ? (* (( (ptr) parent←v6820)+18)
          ) : 1 ) , parent←v6820, pd186);
      };
   }

static void CloseAndOpenImplOp←P2580(formal←c0327, viewer←v20148)
   word formal←c0327;
   word viewer←v20148;
   {
   register ptr gf←c40000 =  (ptr) &globalframe;
   word recordAtom←v20192;
   word quit←v20220;
   /* CloseAndOpenImplOp: */ 
SOURCE(7941, 97)
SOURCE(7941, 97)
   recordAtom←v20192 = 1;
SOURCE(7941, 97)
   quit←v20220 = 0;
SOURCE(7988, 50)
   {
      word var←c37600;
      var←c37600 = (word) ForkViewerOp2←P180((word) (( (bPt) gf←c40000)+524)/* var←c33760 */ , viewer←v20148);
      recordAtom←v20192 = var←c37600;
      quit←v20220 = 0;
      /* removed tail goto */ 
      };
   (*  (ptr) formal←c0327 ) = recordAtom←v20192;
   (* (( (ptr) formal←c0327)+1) ) = quit←v20220;
   return;
   }

static void CloseAndOpenItImpl←P2640(parent←v6908, fileName←v6936)
   word parent←v6908;
   word fileName←v6936;
   {
   register ptr gf←c40032 =  (ptr) &globalframe;
   /* CloseAndOpenItImpl: */ 
SOURCE(8044, 113)
SOURCE(8112, 45)
   {
      word var←c37632;
      word pd187;
      pd187 = (* (( (ptr) (* (( (ptr) gf←c40032)+225)/* var←c36128 */  ))+25) );
      var←c37632 = (word) ( *( (fPt) ((*  (ptr) pd187 ))))(parent←v6908, fileName←v6936, pd187);
      };
   }

static void OpenButton←P2700(parent←v20280, clientData←v20308, mouseButton←v20336, shift←v20364, control←v20392)
   word parent←v20280;
   word clientData←v20308;
   word mouseButton←v20336;
   word shift←v20364;
   word control←v20392;
   {
   register ptr gf←c40064 =  (ptr) &globalframe;
   /* OpenButton: */ 
SOURCE(8163, 73)
SOURCE(8205, 31)
   {
      word var←c37664;
      var←c37664 = (word) ForkViewerOp2←P180((word) (( (bPt) gf←c40064)+596)/* var←c34048 */ , 0);
      };
   }

static void Normalize←P2760(parent←v20452, clientData←v20480, mouseButton←v20508, shift←v20536, control←v20564)
   word parent←v20452;
   word clientData←v20480;
   word mouseButton←v20508;
   word shift←v20536;
   word control←v20564;
   {
   register ptr gf←c40096 =  (ptr) &globalframe;
   /* Normalize: */ 
SOURCE(8242, 129)
SOURCE(8280, 91)
   {
      word viewer←v32416;
      word atom←v32444;
      viewer←v32416 = parent←v20452;
      {
         word var←c37696;
         var←c37696 = mouseButton←v20508;
         switch (var←c37696) {
            case 0: 
               atom←v32444 = (* (( (ptr) gf←c40096)+45) );
               break;
            case 1: 
               atom←v32444 = (* (( (ptr) gf←c40096)+46) );
               break;
            case 2: 
               atom←v32444 = (* (( (ptr) gf←c40096)+47) );
               break;
            default: 
               atom←v32444 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c37728;
         var←c37728 = XR←Narrow(viewer←v32416, (* (( (ptr) gf←c40096)+15) ));
         {
            word pd188;
            pd188 = (* (( (ptr) (* (( (ptr) gf←c40096)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd188 ))))(var←c37728, atom←v32444, pd188);
            };
         };
      };
   }

static void Position←P2820(parent←v20624, clientData←v20652, mouseButton←v20680, shift←v20708, control←v20736)
   word parent←v20624;
   word clientData←v20652;
   word mouseButton←v20680;
   word shift←v20708;
   word control←v20736;
   {
   register ptr gf←c40128 =  (ptr) &globalframe;
   /* Position: */ 
SOURCE(8377, 308)
SOURCE(8414, 271)
   {
      word viewer←v32340;
      word atom←v32368;
      viewer←v32340 = parent←v20624;
      {
         word var←c37760;
         var←c37760 = mouseButton←v20680;
         switch (var←c37760) {
            case 0: 
               if ((0 != shift←v20708)) {
                  atom←v32368 = (* (( (ptr) gf←c40128)+48) );
                  }
               else {
                  atom←v32368 = (* (( (ptr) gf←c40128)+49) );
                  };
               break;
            case 1: 
               if ((0 != shift←v20708)) {
                  atom←v32368 = (* (( (ptr) gf←c40128)+50) );
                  }
               else {
                  atom←v32368 = (* (( (ptr) gf←c40128)+51) );
                  };
               break;
            case 2: 
               if ((0 != shift←v20708)) {
                  atom←v32368 = (* (( (ptr) gf←c40128)+52) );
                  }
               else {
                  atom←v32368 = (* (( (ptr) gf←c40128)+53) );
                  };
               break;
            default: 
               atom←v32368 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c37792;
         var←c37792 = XR←Narrow(viewer←v32340, (* (( (ptr) gf←c40128)+15) ));
         {
            word pd189;
            pd189 = (* (( (ptr) (* (( (ptr) gf←c40128)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd189 ))))(var←c37792, atom←v32368, pd189);
            };
         };
      };
   }

static void JumpToPrevious←P2880(parent←v20796, clientData←v20824, mouseButton←v20852, shift←v20880, control←v20908)
   word parent←v20796;
   word clientData←v20824;
   word mouseButton←v20852;
   word shift←v20880;
   word control←v20908;
   {
   register ptr gf←c40160 =  (ptr) &globalframe;
   /* JumpToPrevious: */ 
SOURCE(8691, 64)
SOURCE(8733, 22)
   {
      word viewer←v32292;
      viewer←v32292 = parent←v20796;
SOURCE(1513, 46)
      {
         word var←c37824;
         var←c37824 = XR←Narrow(viewer←v32292, (* (( (ptr) gf←c40160)+15) ));
         {
            word pd190;
            pd190 = (* (( (ptr) (* (( (ptr) gf←c40160)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd190 ))))(var←c37824, (* (( (ptr) gf←c40160)+29) ), pd190);
            };
         };
      };
   }

static void PrevPlaceOp←P2940(formal←c0369, viewer←v20968)
   word formal←c0369;
   word viewer←v20968;
   {
   register ptr gf←c40192 =  (ptr) &globalframe;
   word recordAtom←v21012;
   word quit←v21040;
   word tdd←v7456;
   word prop←v7484;
   /* PrevPlaceOp: */ 
SOURCE(8758, 521)
SOURCE(8758, 521)
   recordAtom←v21012 = 1;
SOURCE(8758, 521)
   quit←v21040 = 0;
SOURCE(8798, 58)
   tdd←v7456 = XR←Narrow((* (( (ptr) viewer←v20968)+26) ), (* (( (ptr) gf←c40192)+9) ));
SOURCE(8858, 81)
   {
      word pd191;
      pd191 = (* (( (ptr) (* (( (ptr) gf←c40192)+223)/* var←c35936 */  ))+29) );
      prop←v7484 = XR←Narrow((word) ( *( (fPt) ((*  (ptr) pd191 ))))(viewer←v20968, (* (( (ptr) gf←c40192)+54) ), pd191), (* (( (ptr) gf←c40192)+8)
          ));
      };
SOURCE(8941, 242)
   if ( ( (tdd←v7456 != 0) ? (prop←v7484 != 0) : 0 ) ) {
SOURCE(8974, 209)
      {
         W2 loc←v7540;
         word var←c37856;
SOURCE(8976, 33)
         loc←v7540 = (*  (W2Pt) prop←v7484 );
SOURCE(9011, 56)
         {
            word limit192;
            var←c37856 = (* (( (ptr) tdd←v7456)+1) );
            if (XR←EqualWords(&loc←v7540, (( (W9Pt) (( (ptr) var←c37856)+3))+(
                     limit192 = (* (( (ptr) var←c37856)+2) ),
                     BCK(0, limit192)
                     )), 2)) {
SOURCE(9052, 15)
               loc←v7540 = (*  (W2Pt) (( (ptr) prop←v7484)+2) );
               };
            };
SOURCE(9069, 42)
         {
            word pd193;
            pd193 = (* (( (ptr) (* (( (ptr) gf←c40192)+225)/* var←c36128 */  ))+38) );
            if ((0 != (word) ( *( (fPt) ((*  (ptr) pd193 ))))(viewer←v20968, loc←v7540, 1, pd193))) {
SOURCE(9105, 6)
               goto lab←L100038;
               };
            };
SOURCE(9114, 69)
         {
            word tc194;
            word pd195;
            if ( ! XR←EqualWords(&loc←v7540, (( (ptr) prop←v7484)+2), 2)) {
               pd195 = (* (( (ptr) (* (( (ptr) gf←c40192)+225)/* var←c36128 */  ))+38) );
               tc194 =  (word) (0 != (word) ( *( (fPt) ((*  (ptr) pd195 ))))(viewer←v20968, (*  (W2Pt) (( (ptr) prop←v7484)+2) ), 1, pd195)
               );
               }
            else {
               tc194 =  (word) 0;
               };
            if (tc194) {
SOURCE(9176, 7)
               goto lab←L100038;
               };
            };
         };
      };
SOURCE(9186, 54)
   {
      word pd196;
      pd196 = (* (( (ptr) (* (( (ptr) gf←c40192)+219)/* var←c35520 */  ))+5) );
      (void) ( *( (fPt) ((*  (ptr) pd196 ))))((* (( (ptr) gf←c40192)+56) ), 1, pd196);
      };
SOURCE(9242, 21)
   {
      word pd197;
      pd197 = (* (( (ptr) (* (( (ptr) gf←c40192)+219)/* var←c35520 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd197 ))))(pd197);
      };
SOURCE(9265, 14)
   recordAtom←v21012 = 0;
   quit←v21040 = 0;
   /* removed tail goto */ 
   lab←L100038: ;
   (*  (ptr) formal←c0369 ) = recordAtom←v21012;
   (* (( (ptr) formal←c0369)+1) ) = quit←v21040;
   return;
   }

static void Reselect←P3000(parent←v21100, clientData←v21128, mouseButton←v21156, shift←v21184, control←v21212)
   word parent←v21100;
   word clientData←v21128;
   word mouseButton←v21156;
   word shift←v21184;
   word control←v21212;
   {
   register ptr gf←c40224 =  (ptr) &globalframe;
   /* Reselect: */ 
SOURCE(9285, 57)
SOURCE(9321, 21)
   {
      word viewer←v32244;
      viewer←v32244 = parent←v21100;
SOURCE(1513, 46)
      {
         word var←c37888;
         var←c37888 = XR←Narrow(viewer←v32244, (* (( (ptr) gf←c40224)+15) ));
         {
            word pd198;
            pd198 = (* (( (ptr) (* (( (ptr) gf←c40224)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd198 ))))(var←c37888, (* (( (ptr) gf←c40224)+30) ), pd198);
            };
         };
      };
   }

static void ReselectOp←P3060(formal←c0382, viewer←v21272)
   word formal←c0382;
   word viewer←v21272;
   {
   register ptr gf←c40256 =  (ptr) &globalframe;
   word recordAtom←v21316;
   word quit←v21344;
   word tdd←v7584;
   word prop←v7612;
   /* ReselectOp: */ 
SOURCE(9345, 459)
SOURCE(9345, 459)
   recordAtom←v21316 = 1;
SOURCE(9345, 459)
   quit←v21344 = 0;
SOURCE(9384, 58)
   tdd←v7584 = XR←Narrow((* (( (ptr) viewer←v21272)+26) ), (* (( (ptr) gf←c40256)+9) ));
SOURCE(9444, 86)
   {
      word pd199;
      pd199 = (* (( (ptr) (* (( (ptr) gf←c40256)+223)/* var←c35936 */  ))+29) );
      prop←v7612 = XR←Narrow((word) ( *( (fPt) ((*  (ptr) pd199 ))))(viewer←v21272, (* (( (ptr) gf←c40256)+57) ), pd199), (* (( (ptr) gf←c40256)+7)
          ));
      };
SOURCE(9532, 255)
   {
      word tc200;
      word pd201;
      if ( ( (tdd←v7584 != 0) ? (prop←v7612 != 0) : 0 ) ) {
         pd201 = (* (( (ptr) (* (( (ptr) gf←c40256)+215)/* var←c35104 */  ))+33) );
         tc200 =  (word) (0 != (word) ( *( (fPt) ((*  (ptr) pd201 ))))(prop←v7612, pd201));
         }
      else {
         tc200 =  (word) 0;
         };
      if (tc200) {
SOURCE(9603, 59)
         {
            word pd202;
            pd202 = (* (( (ptr) (* (( (ptr) gf←c40256)+227)/* var←c37920 */  ))+25) );
            (void) ( *( (fPt) ((*  (ptr) pd202 ))))(prop←v7612, 0, 0, 0, 1, pd202);
            };
SOURCE(9664, 41)
         {
            word pd203;
            pd203 = (* (( (ptr) (* (( (ptr) gf←c40256)+228)/* var←c37952 */  ))+6) );
            (void) ( *( (fPt) ((*  (ptr) pd203 ))))(viewer←v21272, 0, 0, 0, pd203);
            };
         }
      else {
SOURCE(9714, 49)
         {
            word pd204;
            pd204 = (* (( (ptr) (* (( (ptr) gf←c40256)+219)/* var←c35520 */  ))+5) );
            (void) ( *( (fPt) ((*  (ptr) pd204 ))))((* (( (ptr) gf←c40256)+59) ), 1, pd204);
            };
SOURCE(9765, 22)
         {
            word pd205;
            pd205 = (* (( (ptr) (* (( (ptr) gf←c40256)+219)/* var←c35520 */  ))+6) );
            (void) ( *( (fPt) ((*  (ptr) pd205 ))))(pd205);
            };
         };
      };
SOURCE(9790, 14)
   recordAtom←v21316 = 0;
   quit←v21344 = 0;
   /* removed tail goto */ 
   (*  (ptr) formal←c0382 ) = recordAtom←v21316;
   (* (( (ptr) formal←c0382)+1) ) = quit←v21344;
   return;
   }

static void Find←P3120(parent←v21404, clientData←v21432, mouseButton←v21460, shift←v21488, control←v21516)
   word parent←v21404;
   word clientData←v21432;
   word mouseButton←v21460;
   word shift←v21488;
   word control←v21516;
   {
   register ptr gf←c40288 =  (ptr) &globalframe;
   /* Find: */ 
SOURCE(9810, 255)
SOURCE(9843, 222)
   {
      word viewer←v32168;
      word atom←v32196;
      viewer←v32168 = parent←v21404;
      {
         word var←c37984;
         var←c37984 = mouseButton←v21460;
         switch (var←c37984) {
            case 0: 
               if ((0 != shift←v21488)) {
                  atom←v32196 = (* (( (ptr) gf←c40288)+60) );
                  }
               else {
                  atom←v32196 = (* (( (ptr) gf←c40288)+61) );
                  };
               break;
            case 1: 
               if ((0 != shift←v21488)) {
                  atom←v32196 = (* (( (ptr) gf←c40288)+62) );
                  }
               else {
                  atom←v32196 = (* (( (ptr) gf←c40288)+63) );
                  };
               break;
            case 2: 
               if ((0 != shift←v21488)) {
                  atom←v32196 = (* (( (ptr) gf←c40288)+64) );
                  }
               else {
                  atom←v32196 = (* (( (ptr) gf←c40288)+65) );
                  };
               break;
            default: 
               atom←v32196 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c38016;
         var←c38016 = XR←Narrow(viewer←v32168, (* (( (ptr) gf←c40288)+15) ));
         {
            word pd206;
            pd206 = (* (( (ptr) (* (( (ptr) gf←c40288)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd206 ))))(var←c38016, atom←v32196, pd206);
            };
         };
      };
   }

static void FindDef←P3180(parent←v21576, clientData←v21604, mouseButton←v21632, shift←v21660, control←v21688)
   word parent←v21576;
   word clientData←v21604;
   word mouseButton←v21632;
   word shift←v21660;
   word control←v21688;
   {
   register ptr gf←c40320 =  (ptr) &globalframe;
   /* FindDef: */ 
SOURCE(10071, 276)
SOURCE(10107, 240)
   {
      word viewer←v32092;
      word atom←v32120;
      viewer←v32092 = parent←v21576;
      {
         word var←c38048;
         var←c38048 = mouseButton←v21632;
         switch (var←c38048) {
            case 0: 
               if ((0 != shift←v21660)) {
                  atom←v32120 = (* (( (ptr) gf←c40320)+66) );
                  }
               else {
                  atom←v32120 = (* (( (ptr) gf←c40320)+67) );
                  };
               break;
            case 1: 
               if ((0 != shift←v21660)) {
                  atom←v32120 = (* (( (ptr) gf←c40320)+68) );
                  }
               else {
                  atom←v32120 = (* (( (ptr) gf←c40320)+69) );
                  };
               break;
            case 2: 
               if ((0 != shift←v21660)) {
                  atom←v32120 = (* (( (ptr) gf←c40320)+70) );
                  }
               else {
                  atom←v32120 = (* (( (ptr) gf←c40320)+71) );
                  };
               break;
            default: 
               atom←v32120 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c38080;
         var←c38080 = XR←Narrow(viewer←v32092, (* (( (ptr) gf←c40320)+15) ));
         {
            word pd207;
            pd207 = (* (( (ptr) (* (( (ptr) gf←c40320)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd207 ))))(var←c38080, atom←v32120, pd207);
            };
         };
      };
   }

static void FindWord←P3240(parent←v21748, clientData←v21776, mouseButton←v21804, shift←v21832, control←v21860)
   word parent←v21748;
   word clientData←v21776;
   word mouseButton←v21804;
   word shift←v21832;
   word control←v21860;
   {
   register ptr gf←c40352 =  (ptr) &globalframe;
   /* FindWord: */ 
SOURCE(10353, 283)
SOURCE(10390, 246)
   {
      word viewer←v32016;
      word atom←v32044;
      viewer←v32016 = parent←v21748;
      {
         word var←c38112;
         var←c38112 = mouseButton←v21804;
         switch (var←c38112) {
            case 0: 
               if ((0 != shift←v21832)) {
                  atom←v32044 = (* (( (ptr) gf←c40352)+72) );
                  }
               else {
                  atom←v32044 = (* (( (ptr) gf←c40352)+73) );
                  };
               break;
            case 1: 
               if ((0 != shift←v21832)) {
                  atom←v32044 = (* (( (ptr) gf←c40352)+74) );
                  }
               else {
                  atom←v32044 = (* (( (ptr) gf←c40352)+75) );
                  };
               break;
            case 2: 
               if ((0 != shift←v21832)) {
                  atom←v32044 = (* (( (ptr) gf←c40352)+76) );
                  }
               else {
                  atom←v32044 = (* (( (ptr) gf←c40352)+77) );
                  };
               break;
            default: 
               atom←v32044 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c38144;
         var←c38144 = XR←Narrow(viewer←v32016, (* (( (ptr) gf←c40352)+15) ));
         {
            word pd208;
            pd208 = (* (( (ptr) (* (( (ptr) gf←c40352)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd208 ))))(var←c38144, atom←v32044, pd208);
            };
         };
      };
   }

static void FewerLevels←P3300(parent←v21920, clientData←v21948, mouseButton←v21976, shift←v22004, control←v22032)
   word parent←v21920;
   word clientData←v21948;
   word mouseButton←v21976;
   word shift←v22004;
   word control←v22032;
   {
   register ptr gf←c40384 =  (ptr) &globalframe;
   /* FewerLevels: */ 
SOURCE(10644, 63)
SOURCE(10683, 24)
   {
      word viewer←v31968;
      viewer←v31968 = parent←v21920;
SOURCE(1513, 46)
      {
         word var←c38176;
         var←c38176 = XR←Narrow(viewer←v31968, (* (( (ptr) gf←c40384)+15) ));
         {
            word pd209;
            pd209 = (* (( (ptr) (* (( (ptr) gf←c40384)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd209 ))))(var←c38176, (* (( (ptr) gf←c40384)+78) ), pd209);
            };
         };
      };
   }

static void MoreLevels←P3360(parent←v22092, clientData←v22120, mouseButton←v22148, shift←v22176, control←v22204)
   word parent←v22092;
   word clientData←v22120;
   word mouseButton←v22148;
   word shift←v22176;
   word control←v22204;
   {
   register ptr gf←c40416 =  (ptr) &globalframe;
   /* MoreLevels: */ 
SOURCE(10711, 61)
SOURCE(10749, 23)
   {
      word viewer←v31920;
      viewer←v31920 = parent←v22092;
SOURCE(1513, 46)
      {
         word var←c38208;
         var←c38208 = XR←Narrow(viewer←v31920, (* (( (ptr) gf←c40416)+15) ));
         {
            word pd210;
            pd210 = (* (( (ptr) (* (( (ptr) gf←c40416)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd210 ))))(var←c38208, (* (( (ptr) gf←c40416)+79) ), pd210);
            };
         };
      };
   }

static void AllLevels←P3420(parent←v22264, clientData←v22292, mouseButton←v22320, shift←v22348, control←v22376)
   word parent←v22264;
   word clientData←v22292;
   word mouseButton←v22320;
   word shift←v22348;
   word control←v22376;
   {
   register ptr gf←c40448 =  (ptr) &globalframe;
   /* AllLevels: */ 
SOURCE(10776, 59)
SOURCE(10813, 22)
   {
      word viewer←v31872;
      viewer←v31872 = parent←v22264;
SOURCE(1513, 46)
      {
         word var←c38240;
         var←c38240 = XR←Narrow(viewer←v31872, (* (( (ptr) gf←c40448)+15) ));
         {
            word pd211;
            pd211 = (* (( (ptr) (* (( (ptr) gf←c40448)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd211 ))))(var←c38240, (* (( (ptr) gf←c40448)+80) ), pd211);
            };
         };
      };
   }

static void FirstLevelOnly←P3480(parent←v22436, clientData←v22464, mouseButton←v22492, shift←v22520, control←v22548)
   word parent←v22436;
   word clientData←v22464;
   word mouseButton←v22492;
   word shift←v22520;
   word control←v22548;
   {
   register ptr gf←c40480 =  (ptr) &globalframe;
   /* FirstLevelOnly: */ 
SOURCE(10839, 69)
SOURCE(10881, 27)
   {
      word viewer←v31824;
      viewer←v31824 = parent←v22436;
SOURCE(1513, 46)
      {
         word var←c38272;
         var←c38272 = XR←Narrow(viewer←v31824, (* (( (ptr) gf←c40480)+15) ));
         {
            word pd212;
            pd212 = (* (( (ptr) (* (( (ptr) gf←c40480)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd212 ))))(var←c38272, (* (( (ptr) gf←c40480)+81) ), pd212);
            };
         };
      };
   }

static void FewerLines←P3540(parent←v22608, clientData←v22636, mouseButton←v22664, shift←v22692, control←v22720)
   word parent←v22608;
   word clientData←v22636;
   word mouseButton←v22664;
   word shift←v22692;
   word control←v22720;
   {
   register ptr gf←c40512 =  (ptr) &globalframe;
   /* FewerLines: */ 
SOURCE(10913, 61)
SOURCE(10951, 23)
   {
      word viewer←v31776;
      viewer←v31776 = parent←v22608;
SOURCE(1513, 46)
      {
         word var←c38304;
         var←c38304 = XR←Narrow(viewer←v31776, (* (( (ptr) gf←c40512)+15) ));
         {
            word pd213;
            pd213 = (* (( (ptr) (* (( (ptr) gf←c40512)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd213 ))))(var←c38304, (* (( (ptr) gf←c40512)+82) ), pd213);
            };
         };
      };
   }

static void MoreLines←P3600(parent←v22780, clientData←v22808, mouseButton←v22836, shift←v22864, control←v22892)
   word parent←v22780;
   word clientData←v22808;
   word mouseButton←v22836;
   word shift←v22864;
   word control←v22892;
   {
   register ptr gf←c40544 =  (ptr) &globalframe;
   /* MoreLines: */ 
SOURCE(10978, 59)
SOURCE(11015, 22)
   {
      word viewer←v31728;
      viewer←v31728 = parent←v22780;
SOURCE(1513, 46)
      {
         word var←c38336;
         var←c38336 = XR←Narrow(viewer←v31728, (* (( (ptr) gf←c40544)+15) ));
         {
            word pd214;
            pd214 = (* (( (ptr) (* (( (ptr) gf←c40544)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd214 ))))(var←c38336, (* (( (ptr) gf←c40544)+83) ), pd214);
            };
         };
      };
   }

static void AllLines←P3660(parent←v22952, clientData←v22980, mouseButton←v23008, shift←v23036, control←v23064)
   word parent←v22952;
   word clientData←v22980;
   word mouseButton←v23008;
   word shift←v23036;
   word control←v23064;
   {
   register ptr gf←c40576 =  (ptr) &globalframe;
   /* AllLines: */ 
SOURCE(11041, 57)
SOURCE(11077, 21)
   {
      word viewer←v31680;
      viewer←v31680 = parent←v22952;
SOURCE(1513, 46)
      {
         word var←c38368;
         var←c38368 = XR←Narrow(viewer←v31680, (* (( (ptr) gf←c40576)+15) ));
         {
            word pd215;
            pd215 = (* (( (ptr) (* (( (ptr) gf←c40576)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd215 ))))(var←c38368, (* (( (ptr) gf←c40576)+84) ), pd215);
            };
         };
      };
   }

static void FirstLineOnly←P3720(parent←v23124, clientData←v23152, mouseButton←v23180, shift←v23208, control←v23236)
   word parent←v23124;
   word clientData←v23152;
   word mouseButton←v23180;
   word shift←v23208;
   word control←v23236;
   {
   register ptr gf←c40608 =  (ptr) &globalframe;
   /* FirstLineOnly: */ 
SOURCE(11102, 67)
SOURCE(11143, 26)
   {
      word viewer←v31632;
      viewer←v31632 = parent←v23124;
SOURCE(1513, 46)
      {
         word var←c38400;
         var←c38400 = XR←Narrow(viewer←v31632, (* (( (ptr) gf←c40608)+15) ));
         {
            word pd216;
            pd216 = (* (( (ptr) (* (( (ptr) gf←c40608)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd216 ))))(var←c38400, (* (( (ptr) gf←c40608)+85) ), pd216);
            };
         };
      };
   }

static void Time←P3780(parent←v23296, clientData←v23324, mouseButton←v23352, shift←v23380, control←v23408)
   word parent←v23296;
   word clientData←v23324;
   word mouseButton←v23352;
   word shift←v23380;
   word control←v23408;
   {
   register ptr gf←c40640 =  (ptr) &globalframe;
   /* Time: */ 
SOURCE(11173, 49)
SOURCE(11205, 17)
   {
      word viewer←v31584;
      viewer←v31584 = parent←v23296;
SOURCE(1513, 46)
      {
         word var←c38432;
         var←c38432 = XR←Narrow(viewer←v31584, (* (( (ptr) gf←c40640)+15) ));
         {
            word pd217;
            pd217 = (* (( (ptr) (* (( (ptr) gf←c40640)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd217 ))))(var←c38432, (* (( (ptr) gf←c40640)+86) ), pd217);
            };
         };
      };
   }

static void Split←P3840(parent←v23468, clientData←v23496, mouseButton←v23524, shift←v23552, control←v23580)
   word parent←v23468;
   word clientData←v23496;
   word mouseButton←v23524;
   word shift←v23552;
   word control←v23580;
   {
   register ptr gf←c40672 =  (ptr) &globalframe;
   /* Split: */ 
SOURCE(11227, 107)
SOURCE(11260, 74)
   {
      word viewer←v31508;
      word atom←v31536;
      viewer←v31508 = parent←v23468;
      {
         word var←c38464;
         var←c38464 = mouseButton←v23524;
         switch (var←c38464) {
            case 0: 
               atom←v31536 = (* (( (ptr) gf←c40672)+87) );
               break;
            case 1: 
               atom←v31536 = (* (( (ptr) gf←c40672)+88) );
               break;
            case 2: 
               atom←v31536 = (* (( (ptr) gf←c40672)+89) );
               break;
            default: 
               atom←v31536 = (
                  XR←RaiseUnnamedError(), 0
                  );
               break;
            };
         };
SOURCE(1513, 46)
      {
         word var←c38496;
         var←c38496 = XR←Narrow(viewer←v31508, (* (( (ptr) gf←c40672)+15) ));
         {
            word pd218;
            pd218 = (* (( (ptr) (* (( (ptr) gf←c40672)+215)/* var←c35104 */  ))+29) );
            (void) ( *( (fPt) ((*  (ptr) pd218 ))))(var←c38496, atom←v31536, pd218);
            };
         };
      };
   }

static void NoName←Q5880(formal←c0486, formal←c200004, formal←c200005, formal←c200006, formal←c200007)
   word formal←c0486;
   word formal←c200004;
   word formal←c200005;
   word formal←c200006;
   word formal←c200007;
   {
   if ((formal←c200005 == XR←Aborted)) {
SOURCE(2518, 9)
      (*  (ptr) formal←c0486 ) = 2;
      (* (( (ptr) formal←c0486)+1) ) = 3;
      return;
      };
   (*  (ptr) formal←c0486 ) = 0;
   (* (( (ptr) formal←c0486)+1) ) = 0;
   return;
   }

static void NoName←Q5940(formal←c0491, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
   word formal←c0491;
   word formal←c200000;
   word formal←c200001;
   word formal←c200002;
   word formal←c200003;
   {
   if ((formal←c200001 == XR←Aborted)) {
SOURCE(2429, 9)
      (*  (ptr) formal←c0491 ) = 2;
      (* (( (ptr) formal←c0491)+1) ) = 2;
      return;
      };
   (*  (ptr) formal←c0491 ) = 0;
   (* (( (ptr) formal←c0491)+1) ) = 0;
   return;
   }

static word NoName←Q6000(formal←c0161)
   word formal←c0161;
   {
   word var←c0163;
   word var←c0162;
   /* intermediary proc for a FORK, nArgs: 1, nRets: 0 */ 
   var←c0163 = (* (( (ptr) formal←c0161)+4) );
   var←c0162 = (* (( (ptr) formal←c0161)+2) );
   formal←c0161 = XR←ExtensionFree(formal←c0161);
   (void) ( *( (fPt) ((*  (ptr) var←c0162 ))))(var←c0163, var←c0162);
   return(0);
   }

/* file: TEditDocuments3Impl, module: TEditDocuments3Impl, compiled at: February 27, 1992 5:57:27 pm PST */ 
extern void XR←install←TEditDocuments3Impl() {
   NoName←Q5700();
   }
extern void XR←run←TEditDocuments3Impl() { XR←Start(&globalframe); }