2 %%BoundingBox: 24 24 571 818
3 %%Title: Enscript Output
5 %%Creator: GNU enscript 1.6.4
6 %%CreationDate: Mon Apr 27 00:59:17 2009
7 %%Orientation: Portrait
9 %%DocumentMedia: A4 595 842 0 () ()
10 %%DocumentNeededResources: (atend)
13 %%BeginResource: procset Enscript-Prolog 1.6 4
18 /_S { % save current state
21 /_R { % restore from saved state
25 /S { % showpage protecting gstate
31 /MF { % fontname newfontname -> - make a new encoded font
35 /fontdict fontname findfont def
36 /newfont fontdict maxlength dict def
44 % copy to the new font dictionary
45 exch newfont 3 1 roll put
49 newfont /FontName newfontname put
51 % insert only valid encoding vectors
52 encoding_vector length 256 eq {
53 newfont /Encoding encoding_vector put
56 newfontname newfont definefont pop
59 /MF_PS { % fontname newfontname -> - make a new font preserving its enc
63 /fontdict fontname findfont def
64 /newfont fontdict maxlength dict def
72 % copy to the new font dictionary
73 exch newfont 3 1 roll put
77 newfont /FontName newfontname put
79 newfontname newfont definefont pop
82 /SF { % fontname width height -> - set a new font
87 [width 0 0 height 0 0] makefont setfont
90 /SUF { % fontname width height -> - set a new user font
95 /F-gs-user-font width height SF
98 /SUF_PS { % fontname width height -> - set a new user font preserving its enc
102 /F-gs-user-font MF_PS
103 /F-gs-user-font width height SF
109 /Box { % x y w h -> - define box path
110 /d_h exch def /d_w exch def /d_y exch def /d_x exch def
118 /bgs { % x y height blskip gray str -> - show string with bg color
127 x y blskip sub str stringwidth pop height Box
134 /bgcs { % x y height blskip red green blue str -> - show string with bg color
145 x y blskip sub str stringwidth pop height Box
146 red green blue setrgbcolor
153 /highlight_bars { % nlines lineheight output_y_margin gray -> -
160 % This 2 is just a magic number to sync highlight lines to text.
161 0 d_header_y ymarg sub 2 sub translate
163 /cw d_output_w cols div def
164 /nrows d_output_h ymarg 2 mul sub lineheight div cvi def
173 rn lineheight mul neg /yp exch def
174 rn nlines idiv 2 mod 0 eq {
175 % Draw highlight bar. 4 is just a magic indentation.
176 xp 4 add yp cw 8 sub lineheight neg Box fill
184 % Line highlight bar.
185 /line_highlight { % x y width height gray -> -
188 Box gray setgray fill
192 % Column separator lines.
196 0 d_footer_h translate
197 /cw d_output_w cols div def
200 0 d_output_h rlineto stroke
212 0 d_output_h neg rlineto
217 % Do the actual underlay drawing
220 ul_str true charpath stroke
230 d_page_h neg d_page_w atan rotate
234 /dw d_page_h dup mul d_page_w dup mul add sqrt def
235 ul_str stringwidth pop dw exch sub 2 div ul_h_ptsize -2 div moveto
240 /user_underlay { % - -> -
246 0 0 ul_h_ptsize 2 div sub moveto
252 /page_prefeed { % bool -> -
253 statusdict /prefeed known {
254 statusdict exch /prefeed exch put
260 % Wrapped line markers
261 /wrapped_line_mark { % x y charwith charheight type -> -
269 % Black boxes (like TeX does)
273 0 h rlineto w 2 div 0 rlineto 0 h neg rlineto
281 x w 2 div add y h 2 div add M
283 x w 4 div add y lineto stroke
285 x w 4 div add w 8 div add y h 4 div add M
286 x w 4 div add y lineto
287 w 4 div h 8 div rlineto stroke
298 /b4_Inc_state save def % Save state for cleanup
299 /dict_count countdictstack def % Count objects on dict stack
300 /op_count count 1 sub def % Count objects on operand stack
303 0 setgray 0 setlinecap
304 1 setlinewidth 0 setlinejoin
305 10 setmiterlimit [ ] 0 setdash newpath
306 /languagelevel where {
309 false setstrokeadjust false setoverprint
315 count op_count sub { pos } repeat % Clean up stacks
316 countdictstack dict_count sub { end } repeat
320 % Check PostScript language level.
321 /languagelevel where {
322 pop /gs_languagelevel languagelevel def
324 /gs_languagelevel 1 def
327 %%BeginResource: procset Enscript-Encoding-88591 1.6 4
329 /.notdef /.notdef /.notdef /.notdef
330 /.notdef /.notdef /.notdef /.notdef
331 /.notdef /.notdef /.notdef /.notdef
332 /.notdef /.notdef /.notdef /.notdef
333 /.notdef /.notdef /.notdef /.notdef
334 /.notdef /.notdef /.notdef /.notdef
335 /.notdef /.notdef /.notdef /.notdef
336 /.notdef /.notdef /.notdef /.notdef
337 /space /exclam /quotedbl /numbersign
338 /dollar /percent /ampersand /quoteright
339 /parenleft /parenright /asterisk /plus
340 /comma /hyphen /period /slash
341 /zero /one /two /three
342 /four /five /six /seven
343 /eight /nine /colon /semicolon
344 /less /equal /greater /question
351 /X /Y /Z /bracketleft
352 /backslash /bracketright /asciicircum /underscore
360 /bar /braceright /tilde /.notdef
361 /.notdef /.notdef /.notdef /.notdef
362 /.notdef /.notdef /.notdef /.notdef
363 /.notdef /.notdef /.notdef /.notdef
364 /.notdef /.notdef /.notdef /.notdef
365 /.notdef /.notdef /.notdef /.notdef
366 /.notdef /.notdef /.notdef /.notdef
367 /.notdef /.notdef /.notdef /.notdef
368 /.notdef /.notdef /.notdef /.notdef
369 /space /exclamdown /cent /sterling
370 /currency /yen /brokenbar /section
371 /dieresis /copyright /ordfeminine /guillemotleft
372 /logicalnot /hyphen /registered /macron
373 /degree /plusminus /twosuperior /threesuperior
374 /acute /mu /paragraph /bullet
375 /cedilla /onesuperior /ordmasculine /guillemotright
376 /onequarter /onehalf /threequarters /questiondown
377 /Agrave /Aacute /Acircumflex /Atilde
378 /Adieresis /Aring /AE /Ccedilla
379 /Egrave /Eacute /Ecircumflex /Edieresis
380 /Igrave /Iacute /Icircumflex /Idieresis
381 /Eth /Ntilde /Ograve /Oacute
382 /Ocircumflex /Otilde /Odieresis /multiply
383 /Oslash /Ugrave /Uacute /Ucircumflex
384 /Udieresis /Yacute /Thorn /germandbls
385 /agrave /aacute /acircumflex /atilde
386 /adieresis /aring /ae /ccedilla
387 /egrave /eacute /ecircumflex /edieresis
388 /igrave /iacute /icircumflex /idieresis
389 /eth /ntilde /ograve /oacute
390 /ocircumflex /otilde /odieresis /divide
391 /oslash /ugrave /uacute /ucircumflex
392 /udieresis /yacute /thorn /ydieresis
397 %%IncludeResource: font Courier-Bold
398 %%IncludeResource: font Courier
401 /Courier-Bold /HF-gs-font MF
402 /HF /HF-gs-font findfont [HFpt_w 0 0 HFpt_h 0 0] makefont def
403 /Courier /F-gs-font MF
406 % Pagedevice definitions:
407 gs_languagelevel 1 gt {
412 %%BeginResource: procset Enscript-Header-simple 1.6 4
414 /do_header { % print default simple header
416 d_header_x d_header_y HFpt_h 3 div add translate
420 5 0 moveto user_header_left_str show
422 d_header_w user_header_center_str stringwidth pop sub 2 div
423 0 moveto user_header_center_str show
425 d_header_w user_header_right_str stringwidth pop sub 5 sub
426 0 moveto user_header_right_str show
428 5 0 moveto fname show
429 45 0 rmoveto fmodstr show
430 45 0 rmoveto pagenumstr show
455 /fname (shabal_shorttest.log) def
457 /ftail (shabal_shorttest.log) def
458 % User defined strings:
459 /fmodstr (Mon Apr 27 00:58:21 2009) def
461 /user_header_p false def
462 /user_footer_p false def
468 (Test vectors for Shabal \(192 bits\):) s
472 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
474 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
476 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
478 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
482 ( 0F 70 6E CB 97 CF 4D CE 00 BF BB D2 FB 64 53 0C ) s
484 ( 32 87 0C B4 48 39 73 0D ) s
486 (Test vectors for Shabal \(192 bits\):) s
490 ( 61 62 63 64 65 66 67 68 69 6A 6B 6C 6D 6E 6F 70 ) s
492 ( 71 72 73 74 75 76 77 78 79 7A 2D 30 31 32 33 34 ) s
494 ( 35 36 37 38 39 2D 41 42 43 44 45 46 47 48 49 4A ) s
496 ( 4B 4C 4D 4E 4F 50 51 52 53 54 55 56 57 58 59 5A ) s
498 ( 2D 30 31 32 33 34 35 36 37 38 39 2D 61 62 63 64 ) s
500 ( 65 66 67 68 69 6A 6B 6C 6D 6E 6F 70 71 72 73 74 ) s
502 ( 75 76 77 78 79 7A ) s
506 ( 69 0F AE 79 22 6D 95 76 0A E8 FD B4 F5 8C 05 37 ) s
508 ( 11 17 56 55 7D 30 7B 15 ) s
510 (Test vectors for Shabal \(224 bits\):) s
514 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
516 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
518 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
520 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
524 ( 99 DD A6 14 F9 07 D2 E8 81 76 18 F7 30 69 6F 32 ) s
526 ( 00 AE CA 8B 5F 85 F4 25 43 BA 20 31 ) s
528 (Test vectors for Shabal \(224 bits\):) s
532 ( 61 62 63 64 65 66 67 68 69 6A 6B 6C 6D 6E 6F 70 ) s
534 ( 71 72 73 74 75 76 77 78 79 7A 2D 30 31 32 33 34 ) s
536 ( 35 36 37 38 39 2D 41 42 43 44 45 46 47 48 49 4A ) s
538 ( 4B 4C 4D 4E 4F 50 51 52 53 54 55 56 57 58 59 5A ) s
540 ( 2D 30 31 32 33 34 35 36 37 38 39 2D 61 62 63 64 ) s
542 ( 65 66 67 68 69 6A 6B 6C 6D 6E 6F 70 71 72 73 74 ) s
544 ( 75 76 77 78 79 7A ) s
548 ( C7 D6 2D 8D 2A 34 74 B4 F4 A9 D1 1A 52 DB 3D 43 ) s
550 ( 5B F1 58 CF 45 4C 5D 56 1D 71 25 F5 ) s
552 (Test vectors for Shabal \(256 bits\):) s
556 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
558 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
560 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
562 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
566 ( DA 8F 08 C0 2A 67 BA 9A 56 BD D0 79 8E 48 AE 07 ) s
568 ( 14 21 5E 09 3B 5B 85 06 49 A3 77 18 99 3F 54 A2 ) s
570 (Test vectors for Shabal \(256 bits\):) s
574 ( 61 62 63 64 65 66 67 68 69 6A 6B 6C 6D 6E 6F 70 ) s
576 ( 71 72 73 74 75 76 77 78 79 7A 2D 30 31 32 33 34 ) s
578 ( 35 36 37 38 39 2D 41 42 43 44 45 46 47 48 49 4A ) s
580 ( 4B 4C 4D 4E 4F 50 51 52 53 54 55 56 57 58 59 5A ) s
582 ( 2D 30 31 32 33 34 35 36 37 38 39 2D 61 62 63 64 ) s
584 ( 65 66 67 68 69 6A 6B 6C 6D 6E 6F 70 71 72 73 74 ) s
586 ( 75 76 77 78 79 7A ) s
590 ( B4 9F 34 BF 51 86 4C 30 53 3C C4 6C C2 54 2B DE ) s
592 ( C2 F9 6F D0 6F 5C 53 9A FF 6E AD 58 83 F7 32 7A ) s
600 /fname (shabal_shorttest.log) def
602 /ftail (shabal_shorttest.log) def
603 % User defined strings:
604 /fmodstr (Mon Apr 27 00:58:21 2009) def
606 /user_header_p false def
607 /user_footer_p false def
611 (Test vectors for Shabal \(384 bits\):) s
615 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
617 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
619 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
621 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
625 ( 9D DE 12 33 91 0D 85 DA 3A 5C 78 03 12 B1 11 C6 ) s
627 ( FC CA 1B 5D D2 55 37 03 5E E0 8E 3B 4E 1E 25 15 ) s
629 ( 4F 72 6A 63 84 E5 A8 F0 AF EA AB 4A C4 C0 2F 12 ) s
631 (Test vectors for Shabal \(384 bits\):) s
635 ( 61 62 63 64 65 66 67 68 69 6A 6B 6C 6D 6E 6F 70 ) s
637 ( 71 72 73 74 75 76 77 78 79 7A 2D 30 31 32 33 34 ) s
639 ( 35 36 37 38 39 2D 41 42 43 44 45 46 47 48 49 4A ) s
641 ( 4B 4C 4D 4E 4F 50 51 52 53 54 55 56 57 58 59 5A ) s
643 ( 2D 30 31 32 33 34 35 36 37 38 39 2D 61 62 63 64 ) s
645 ( 65 66 67 68 69 6A 6B 6C 6D 6E 6F 70 71 72 73 74 ) s
647 ( 75 76 77 78 79 7A ) s
651 ( 30 01 2C 0E 3E DC 46 0B D7 86 27 C2 C3 09 44 D2 ) s
653 ( A1 89 66 9A FA 2D 7A 97 13 EF 2F 77 4C 44 74 A4 ) s
655 ( 3A F1 CB CE C5 FA B4 24 8C 08 73 F0 38 FB EB A0 ) s
657 (Test vectors for Shabal \(512 bits\):) s
661 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
663 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
665 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
667 ( 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ) s
671 ( 15 80 16 C6 C8 1F 3F 0A 52 D9 8D 68 ED 2F 9E 8E ) s
673 ( 78 95 EF 23 CB A7 E2 BC 61 09 D8 A5 32 E6 C9 E6 ) s
675 ( A6 A5 01 97 9F B8 37 F0 4E C4 C6 20 E7 31 79 DC ) s
677 ( 82 AB B5 2B 32 CD AD B3 56 50 E2 9C 98 5E 30 22 ) s
679 (Test vectors for Shabal \(512 bits\):) s
683 ( 61 62 63 64 65 66 67 68 69 6A 6B 6C 6D 6E 6F 70 ) s
685 ( 71 72 73 74 75 76 77 78 79 7A 2D 30 31 32 33 34 ) s
687 ( 35 36 37 38 39 2D 41 42 43 44 45 46 47 48 49 4A ) s
689 ( 4B 4C 4D 4E 4F 50 51 52 53 54 55 56 57 58 59 5A ) s
691 ( 2D 30 31 32 33 34 35 36 37 38 39 2D 61 62 63 64 ) s
693 ( 65 66 67 68 69 6A 6B 6C 6D 6E 6F 70 71 72 73 74 ) s
695 ( 75 76 77 78 79 7A ) s
699 ( 67 7E 6F 7F 12 D7 0A F0 B3 35 66 2F 59 B5 68 51 ) s
701 ( F3 65 3E 66 64 7D 33 86 DF DA 01 43 25 4C C8 A5 ) s
703 ( DB 3E 21 94 06 8C 6F 71 59 7D 7B 60 98 4D 22 B4 ) s
705 ( 7A 1F 60 D9 1C A8 DF CB 17 5D 65 B9 73 59 CE CF ) s
712 %%DocumentNeededResources: font Courier-Bold Courier