manual.ps

a small program by Yuval Fisher that has gone a long way to revealing some of the secrets of fracal

%!PS-Adobe-2.0
%%Creator: dvips 5.479 Copyright 1986-92 Radical Eye Software
%%Title: code.dvi
%%Pages: 6 1
%%BoundingBox: 0 0 612 792
%%EndComments
%DVIPSCommandLine: dvips code -o
%%BeginProcSet: tex.pro
/TeXDict 250 dict def TeXDict begin /N{def}def /B{bind def}N /S{exch}N /X{S N}
B /TR{translate}N /isls false N /vsize 11 72 mul N /@rigin{isls{[0 -1 1 0 0 0]
concat}if 72 Resolution div 72 VResolution div neg scale isls{Resolution hsize
-72 div mul 0 TR}if Resolution VResolution vsize -72 div 1 add mul TR matrix
currentmatrix dup dup 4 get round 4 exch put dup dup 5 get round 5 exch put
setmatrix}N /@landscape{/isls true N}B /@manualfeed{statusdict /manualfeed
true put}B /@copies{/#copies X}B /FMat[1 0 0 -1 0 0]N /FBB[0 0 0 0]N /nn 0 N
/IE 0 N /ctr 0 N /df-tail{/nn 8 dict N nn begin /FontType 3 N /FontMatrix
fntrx N /FontBBox FBB N string /base X array /BitMaps X /BuildChar{
CharBuilder}N /Encoding IE N end dup{/foo setfont}2 array copy cvx N load 0 nn
put /ctr 0 N[}B /df{/sf 1 N /fntrx FMat N df-tail}B /dfs{div /sf X /fntrx[sf 0
0 sf neg 0 0]N df-tail}B /E{pop nn dup definefont setfont}B /ch-width{ch-data
dup length 5 sub get}B /ch-height{ch-data dup length 4 sub get}B /ch-xoff{128
ch-data dup length 3 sub get sub}B /ch-yoff{ch-data dup length 2 sub get 127
sub}B /ch-dx{ch-data dup length 1 sub get}B /ch-image{ch-data dup type
/stringtype ne{ctr get /ctr ctr 1 add N}if}B /id 0 N /rw 0 N /rc 0 N /gp 0 N
/cp 0 N /G 0 N /sf 0 N /CharBuilder{save 3 1 roll S dup /base get 2 index get
S /BitMaps get S get /ch-data X pop /ctr 0 N ch-dx 0 ch-xoff ch-yoff ch-height
sub ch-xoff ch-width add ch-yoff setcachedevice ch-width ch-height true[1 0 0
-1 -.1 ch-xoff sub ch-yoff .1 add]{ch-image}imagemask restore}B /D{/cc X dup
type /stringtype ne{]}if nn /base get cc ctr put nn /BitMaps get S ctr S sf 1
ne{dup dup length 1 sub dup 2 index S get sf div put}if put /ctr ctr 1 add N}
B /I{cc 1 add D}B /bop{userdict /bop-hook known{bop-hook}if /SI save N @rigin
0 0 moveto}N /eop{SI restore showpage userdict /eop-hook known{eop-hook}if}N
/@start{userdict /start-hook known{start-hook}if /VResolution X /Resolution X
1000 div /DVImag X /IE 256 array N 0 1 255{IE S 1 string dup 0 3 index put cvn
put}for 65781.76 div /vsize X 65781.76 div /hsize X}N /p{show}N /RMat[1 0 0 -1
0 0]N /BDot 260 string N /rulex 0 N /ruley 0 N /v{/ruley X /rulex X V}B /V
statusdict begin /product where{pop product dup length 7 ge{0 7 getinterval
(Display)eq}{pop false}ifelse}{false}ifelse end{{gsave TR -.1 -.1 TR 1 1 scale
rulex ruley false RMat{BDot}imagemask grestore}}{{gsave TR -.1 -.1 TR rulex
ruley scale 1 1 false RMat{BDot}imagemask grestore}}ifelse B /a{moveto}B
/delta 0 N /tail{dup /delta X 0 rmoveto}B /M{S p delta add tail}B /b{S p tail}
B /c{-4 M}B /d{-3 M}B /e{-2 M}B /f{-1 M}B /g{0 M}B /h{1 M}B /i{2 M}B /j{3 M}B
/k{4 M}B /w{0 rmoveto}B /l{p -4 w}B /m{p -3 w}B /n{p -2 w}B /o{p -1 w}B /q{p 1
w}B /r{p 2 w}B /s{p 3 w}B /t{p 4 w}B /x{0 S rmoveto}B /y{3 2 roll p a}B /bos{
/SS save N}B /eos{SS restore}B end
%%EndProcSet
TeXDict begin 40258431 52099146 1000 300 300 @start /Fa 4 117
df<00010003000600060006000C000C000C0018001800180030003000300060006000C000C000
C0018001800180030003000300060006000C000C000C0018001800180030003000300060006000
6000C000C00010297E9E15>61 D<0007E00000E00000E00001C00001C00001C00001C000038000
038000038000038001E7000717000C0F00180F00380E00300E00700E00700E00E01C00E01C00E0
1C00E01C00E03880E03880E038806078803199001E0E00131D7E9C16>100
D<01F0060C04040C0E180C1C001F000FE00FF003F80038201C7018F018F010803060601F800F12
7E9113>115 D<00C001C001C001C00380038003800380FFF00700070007000E000E000E000E00
1C001C001C001C00382038203840384018800F000C1A80990F>I E /Fb
2 16 df<400020C000606000C03001801803000C0600060C0003180001B00000E00000E00001B0
00031800060C000C06001803003001806000C0C0006040002013147A9320>2
D<03C00FF01FF83FFC7FFE7FFEFFFFFFFFFFFFFFFF7FFE7FFE3FFC1FF80FF003C010107E9115>
15 D E /Fc 25 121 df<7070F06004047C830C>46 D<0018007003F00C7000700070007000E0
00E000E000E000E000E001C001C001C001C001C001C003800380038003800380038007000780FF
F80D1C7C9B15>49 D<007E000183800201C00400E00400E00F00E00F00E01F00E01F00E00E00E0
0001E00001C0000380000380000700000E00001C0000380000600000C000018000030080060080
0801001001003FFF007FFE00FFFE00131C7E9B15>I<0000200000003000000070000000700000
00F0000000F0000001F00000037800000278000006780000047800000C780000087C0000183C00
00103C0000203C0000203C0000403C0000403E0000FFFE0000801E0001001E0001001E0002001E
0002000F0004000F0004000F001E001F00FF80FFF01C1D7F9C1F>65 D<0007F010001C0C300070
026000C001E0038000E0070000E00E0000600E0000601C0000403C000040380000407800000078
00000078000000F0000000F0000000F0000000F0000000F0000000F0000080F000010070000100
7000010038000200380004001C0004000C001800060020000380C000007F00001C1E7C9C1E>67
D<0FFFFC0000F8078000F001C000F000E000F0007000F0007000F0007801E0003801E0003801E0
003801E0003801E0003C01E0003803C0003803C0007803C0007803C0007803C0007003C000F007
8000E0078000E0078001C0078003800780078007800E000F001C000F007000FFFFC0001E1C7E9B
20>I<0FFFFFE000F801E000F000E000F0004000F0004000F0004000F0004001E0004001E04040
01E0400001E0400001E0C00001E1C00003FF800003C1800003C0800003C0800003C0800003C080
800780008007800080078001000780010007800300078006000F000E000F003E00FFFFFC001B1C
7E9B1C>I<0FF80007FC00F8000FC000BC000F8000BC00178000BC00178000BC00278000BC0027
80011E004F00011E004F00011E008F00011E008F00011E010F00010F010F00020F021E00020F02
1E00020F041E00020F041E000207881E000207901E000407903C000407A03C000407A03C000407
C03C000403C03C000403803C000C038078001E03007C00FF8307FF80261C7E9B26>77
D<0FFFFC0000F80F0000F0038000F003C000F001C000F001C000F001C001E003C001E003C001E0
03C001E0038001E0070001E00E0003C03C0003FFE00003C0000003C0000003C0000003C0000007
80000007800000078000000780000007800000078000000F0000000F800000FFF000001A1C7E9B
1C>80 D<003F0400C0CC0180380300380600180E00180E00180E00181E00101E00001F00000F80
000FF80007FF0003FF8001FFC0003FE00003E00001E00000E00000E04000E04000E04000E04000
C06001C0E00180F00300CC0E0083F800161E7E9C17>83 D<1FFFFFF03C07C0F030078030200780
20600780204007802040078020400F0020800F0020000F0000000F0000000F0000000F0000001E
0000001E0000001E0000001E0000001E0000001E0000003C0000003C0000003C0000003C000000
3C0000003C000000780000007C00001FFFE0001C1C7C9B1E>I<07F0001C18001E0C001C0E0018
0E00000E00000E0001FE000F0E001C1C00301C00701C00E01C40E01C40E03C40E05C80709D803F
0E0012127D9115>97 D<01F8071C0C1E181C38183000700070007000E000E000E0006000600470
08301018200FC00F127D9112>99 D<0003F00000F00000E00000E00000E00000E00000E00000E0
0001C00001C00001C000F1C0030DC00C03C01C0380380380300380700380700380700380E00700
E00700E00700600700600700700F00301E00186F00078FC0141D7D9C17>I<01F8070C0C061C07
3803300370037FFF7000E000E000E00060006002300430081C3007C010127E9112>I<00003800
3CCC00C69C018308038380070380070380070380070380070700030600038C0004F0000400000C
00000C00000FFE0007FF800FFFC01801C02000C06000E0C000C0C000C0600180200300180E0007
F000161C809215>103 D<07E00001E00001C00001C00001C00001C00001C00001C00003800003
8000038000038F8003B0C003C0E00780E00780E00700E00700E00700E00700E00E01C00E01C00E
01C00E01C00E01C00E01C01C03801E03C0FF9FF0141D7F9C17>I<00C001C001C0018000000000
000000000000000000001F80078003800700070007000700070007000E000E000E000E000E000E
001C001E00FF800A1D7F9C0C>I<07E001E001C001C001C001C001C001C0038003800380038003
8003800700070007000700070007000E000E000E000E000E000E001C001E00FF800B1D7F9C0C>
108 D<1F8FC0FC00079061060003E0760700078078070007807807000700700700070070070007
0070070007007007000E00E00E000E00E00E000E00E00E000E00E00E000E00E00E000E00E00E00
1C01C01C001E01E01E00FF8FF8FF8021127F9124>I<1F8F8007B0C003C0E00780E00780E00700
E00700E00700E00700E00E01C00E01C00E01C00E01C00E01C00E01C01C03801E03C0FF9FF01412
7F9117>I<00FC000307000E01801C01C03800C03000C07000E07000E07000E0E001C0E001C0E0
01C0600180600380700700380E001C180007E00013127E9115>I<0FC78003D86001E03003C038
03803803801803801C03801C03801C0700380700380700380700700700700700E00F01C00EC300
0E3C000E00000E00000E00001C00001C00001C00001C0000FF8000161A809117>I<FC1F803C07
801C0380380700380700380700380700380700380700700E00700E00700E00700E00701E00701E
00703C00305E001F9F8011127C9117>117 D<1FE3FC07C1E003818001C10001C20000E40000EC
00007800007000003800007800009C00011E00020E000407000C07003C0780FE1FF016127F9116
>120 D E /Fd 17 118 df<1C003E007F00FF80FF80FF807F003E001C0009097B8813>46
D<000E00001E00007E0007FE00FFFE00FFFE00F8FE0000FE0000FE0000FE0000FE0000FE0000FE
0000FE0000FE0000FE0000FE0000FE0000FE0000FE0000FE0000FE0000FE0000FE0000FE0000FE
0000FE0000FE0000FE0000FE0000FE0000FE0000FE0000FE0000FE0000FE007FFFFE7FFFFE7FFF
FE17277BA622>49 D<00FF800003FFF0000FFFFC001F03FE003800FF007C007F80FE003FC0FF00
3FC0FF003FE0FF001FE0FF001FE07E001FE03C003FE000003FE000003FC000003FC000007F8000
007F000000FE000000FC000001F8000003F0000003E00000078000000F0000001E0000003C00E0
007000E000E000E001C001C0038001C0070001C00FFFFFC01FFFFFC03FFFFFC07FFFFFC0FFFFFF
80FFFFFF80FFFFFF801B277DA622>I<000003800000000007C00000000007C0000000000FE000
0000000FE0000000000FE0000000001FF0000000001FF0000000003FF8000000003FF800000000
3FF80000000073FC0000000073FC00000000F3FE00000000E1FE00000000E1FE00000001C0FF00
000001C0FF00000003C0FF80000003807F80000007807FC0000007003FC0000007003FC000000E
003FE000000E001FE000001E001FF000001C000FF000001FFFFFF000003FFFFFF800003FFFFFF8
0000780007FC0000700003FC0000700003FC0000E00001FE0000E00001FE0001E00001FF0001C0
0000FF0001C00000FF00FFFE001FFFFEFFFE001FFFFEFFFE001FFFFE2F297EA834>65
D<FFFFFFF80000FFFFFFFF8000FFFFFFFFE00003FC001FF80003FC0007FC0003FC0001FE0003FC
0000FF0003FC00007F8003FC00003FC003FC00001FC003FC00001FE003FC00001FE003FC00000F
F003FC00000FF003FC00000FF003FC00000FF003FC00000FF803FC00000FF803FC00000FF803FC
00000FF803FC00000FF803FC00000FF803FC00000FF803FC00000FF803FC00000FF803FC00000F
F803FC00000FF003FC00000FF003FC00000FF003FC00001FE003FC00001FE003FC00001FC003FC
00003FC003FC00007F8003FC00007F0003FC0001FE0003FC0003FC0003FC001FF800FFFFFFFFE0
00FFFFFFFF8000FFFFFFFC00002D297DA835>68 D<FFFFFFFFE0FFFFFFFFE0FFFFFFFFE003FC00
1FE003FC0007F003FC0001F003FC0001F003FC0000F003FC00007003FC00007003FC00007003FC
01C07803FC01C03803FC01C03803FC01C03803FC03C00003FC03C00003FC0FC00003FFFFC00003
FFFFC00003FFFFC00003FC0FC00003FC03C00003FC03C00003FC01C00E03FC01C00E03FC01C00E
03FC01C01C03FC00001C03FC00001C03FC00001C03FC00003C03FC00003803FC00007803FC0000
F803FC0001F803FC0003F803FC001FF8FFFFFFFFF0FFFFFFFFF0FFFFFFFFF027297DA82D>I<FF
FE0000001FFFC0FFFE0000001FFFC0FFFF0000003FFFC003FF0000003FF00003FF0000003FF000
03BF80000077F00003BF80000077F000039FC00000E7F000039FC00000E7F000038FE00001C7F0
00038FE00001C7F0000387F0000387F0000387F0000387F0000387F0000387F0000383F8000707
F0000383F8000707F0000381FC000E07F0000381FC000E07F0000380FE001C07F0000380FE001C
07F0000380FF003807F00003807F003807F00003807F003807F00003803F807007F00003803F80
7007F00003801FC0E007F00003801FC0E007F00003800FE1C007F00003800FE1C007F00003800F
E1C007F000038007F38007F000038007F38007F000038003FF0007F000038003FF0007F0000380
01FE0007F000038001FE0007F000038000FC0007F000038000FC0007F000FFFE00FC01FFFFC0FF
FE007801FFFFC0FFFE007801FFFFC03A297DA841>77 D<FFFFFFF800FFFFFFFF00FFFFFFFFC003
FC003FE003FC000FF003FC0007F803FC0007FC03FC0003FC03FC0003FE03FC0003FE03FC0003FE
03FC0003FE03FC0003FE03FC0003FE03FC0003FE03FC0003FC03FC0007FC03FC0007F803FC000F
F003FC003FE003FFFFFF8003FFFFFE0003FC00000003FC00000003FC00000003FC00000003FC00
000003FC00000003FC00000003FC00000003FC00000003FC00000003FC00000003FC00000003FC
00000003FC00000003FC00000003FC000000FFFFF00000FFFFF00000FFFFF0000027297DA82F>
80 D<7FFFFFFFFFC07FFFFFFFFFC07FFFFFFFFFC07F803FC03FC07E003FC007C078003FC003C0
78003FC003C070003FC001C0F0003FC001E0F0003FC001E0E0003FC000E0E0003FC000E0E0003F
C000E0E0003FC000E0E0003FC000E000003FC0000000003FC0000000003FC0000000003FC00000
00003FC0000000003FC0000000003FC0000000003FC0000000003FC0000000003FC0000000003F
C0000000003FC0000000003FC0000000003FC0000000003FC0000000003FC0000000003FC00000
00003FC0000000003FC0000000003FC0000000003FC0000000003FC00000007FFFFFE000007FFF
FFE000007FFFFFE0002B287EA730>84 D<01FF800007FFF0000F81F8001FC07E001FC07E001FC0
3F000F803F8007003F8000003F8000003F8000003F80000FFF8000FFFF8007FC3F800FE03F803F
803F803F003F807F003F80FE003F80FE003F80FE003F80FE003F807E007F807F00DF803F839FFC
0FFF0FFC01FC03FC1E1B7E9A21>97 D<001FF80000FFFE0003F01F0007E03F800FC03F801F803F
803F801F007F800E007F0000007F000000FF000000FF000000FF000000FF000000FF000000FF00
0000FF0000007F0000007F0000007F8000003F8001C01F8001C00FC0038007E0070003F01E0000
FFFC00001FE0001A1B7E9A1F>99 D<003FE00001FFF80003F07E0007C01F000F801F801F800F80
3F800FC07F000FC07F0007C07F0007E0FF0007E0FF0007E0FFFFFFE0FFFFFFE0FF000000FF0000
00FF0000007F0000007F0000007F0000003F8000E01F8000E00FC001C007E0038003F81F0000FF
FE00001FF0001B1B7E9A20>101 D<00FF81F003FFE7F80FC1FE7C1F80FC7C1F007C383F007E10
7F007F007F007F007F007F007F007F007F007F007F007F003F007E001F007C001F80FC000FC1F8
001FFFE00018FF800038000000380000003C0000003E0000003FFFF8001FFFFF001FFFFF800FFF
FFC007FFFFE01FFFFFF03E0007F07C0001F8F80000F8F80000F8F80000F8F80000F87C0001F03C
0001E01F0007C00FC01F8003FFFE00007FF0001E287E9A22>103 D<FFE0000000FFE0000000FF