DIRECTORY Basics, CD, CDBasics, CDBasicsInline, Imager, ImagerTransformation; CDBasicsImpl: CEDAR PROGRAM IMPORTS Basics, ImagerTransformation, CDBasicsInline EXPORTS CDBasics, CDBasicsInline = BEGIN Skip: PUBLIC PROC[CD.Rect] = { }; DecomposeRect: PUBLIC PROC [r, test: CD.Rect, inside, outside: PROC[CD.Rect]_Skip] = { IF r.x1™>Kšœ5™5Kšœ;™;Kšœ™Kšœ3˜3Kšœ˜K˜—š Ÿœžœ žœžœ žœ˜XKšœK™KKšœ5™5Kšœ>™>Kšœ1™1Kšœ9™9Kšœ5™5Kšœžœžœ ˜-Kšœžœžœ ˜,Kšžœžœžœ ˜%Kšœ žœ ˜Kšœ˜K˜—š Ÿ œžœžœ žœžœžœ˜PKšžœ˜Kšœ˜K˜—š Ÿœžœžœžœžœžœ˜pKšžœ8˜>Kšœ˜K˜—š Ÿœžœžœžœžœ˜mKšœ4™4Kšœ.™.Kšœ.™.Kšœ:™:Kšœ>™>Kšœ5™5Kšœ;™;Kšœ™Kšœžœžœ˜2Kšœžœžœ˜2Kšžœ žœžœ˜)šœžœžœ˜ Kš œžœžœ!žœžœžœ˜dKšœ˜—šœ˜K™——š Ÿœžœžœžœžœžœ˜wJšžœ;˜AJ˜—J˜š Ÿœžœžœ žœžœžœ˜XJšž˜Jšœ™JšžœA™GJ˜—K˜š Ÿœžœžœžœžœ žœ˜yJšœ:˜:JšœK˜KJšœ˜—K˜š Ÿœžœžœ žœžœ˜[Kšžœ(˜.Kšœ˜K˜—Kšœž œžœ žœžœžœ žœžœ ˜TKš œž œžœ žœžœ ˜