1

%!PS-Adobe-2.0 EPSF-2.0

     2

%%Title: interrupt.fig

     3

%%Creator: fig2dev Version 3.2 Patchlevel 4

     4

%%CreationDate: Mon Aug  7 13:51:08 2006

     5

%%For: fp@jupiter (Florian Pose)

     6

%%BoundingBox: 0 0 538 278

     7

%%Magnification: 1.0000

     8

%%EndComments

     9

/MyAppDict 100 dict dup begin def

    10

/$F2psDict 200 dict def

    11

$F2psDict begin

    12

$F2psDict /mtrx matrix put

    13

/col-1 {0 setgray} bind def

    14

/col0 {0.000 0.000 0.000 srgb} bind def

    15

/col1 {0.000 0.000 1.000 srgb} bind def

    16

/col2 {0.000 1.000 0.000 srgb} bind def

    17

/col3 {0.000 1.000 1.000 srgb} bind def

    18

/col4 {1.000 0.000 0.000 srgb} bind def

    19

/col5 {1.000 0.000 1.000 srgb} bind def

    20

/col6 {1.000 1.000 0.000 srgb} bind def

    21

/col7 {1.000 1.000 1.000 srgb} bind def

    22

/col8 {0.000 0.000 0.560 srgb} bind def

    23

/col9 {0.000 0.000 0.690 srgb} bind def

    24

/col10 {0.000 0.000 0.820 srgb} bind def

    25

/col11 {0.530 0.810 1.000 srgb} bind def

    26

/col12 {0.000 0.560 0.000 srgb} bind def

    27

/col13 {0.000 0.690 0.000 srgb} bind def

    28

/col14 {0.000 0.820 0.000 srgb} bind def

    29

/col15 {0.000 0.560 0.560 srgb} bind def

    30

/col16 {0.000 0.690 0.690 srgb} bind def

    31

/col17 {0.000 0.820 0.820 srgb} bind def

    32

/col18 {0.560 0.000 0.000 srgb} bind def

    33

/col19 {0.690 0.000 0.000 srgb} bind def

    34

/col20 {0.820 0.000 0.000 srgb} bind def

    35

/col21 {0.560 0.000 0.560 srgb} bind def

    36

/col22 {0.690 0.000 0.690 srgb} bind def

    37

/col23 {0.820 0.000 0.820 srgb} bind def

    38

/col24 {0.500 0.190 0.000 srgb} bind def

    39

/col25 {0.630 0.250 0.000 srgb} bind def

    40

/col26 {0.750 0.380 0.000 srgb} bind def

    41

/col27 {1.000 0.500 0.500 srgb} bind def

    42

/col28 {1.000 0.630 0.630 srgb} bind def

    43

/col29 {1.000 0.750 0.750 srgb} bind def

    44

/col30 {1.000 0.880 0.880 srgb} bind def

    45

/col31 {1.000 0.840 0.000 srgb} bind def

    46

    47

end

    48

save

    49

newpath 0 278 moveto 0 0 lineto 538 0 lineto 538 278 lineto closepath clip newpath

    50

-12.2 386.3 translate

    51

1 -1 scale

    52

    53

% This junk string is used by the show operators

    54

/PATsstr 1 string def

    55

/PATawidthshow { 	% cx cy cchar rx ry string

    56

  % Loop over each character in the string

    57

  {  % cx cy cchar rx ry char

    58

    % Show the character

    59

    dup				% cx cy cchar rx ry char char

    60

    PATsstr dup 0 4 -1 roll put	% cx cy cchar rx ry char (char)

    61

    false charpath		% cx cy cchar rx ry char

    62

    /clip load PATdraw

    63

    % Move past the character (charpath modified the

    64

    % current point)

    65

    currentpoint			% cx cy cchar rx ry char x y

    66

    newpath

    67

    moveto			% cx cy cchar rx ry char

    68

    % Reposition by cx,cy if the character in the string is cchar

    69

    3 index eq {			% cx cy cchar rx ry

    70

      4 index 4 index rmoveto

    71

    } if

    72

    % Reposition all characters by rx ry

    73

    2 copy rmoveto		% cx cy cchar rx ry

    74

  } forall

    75

  pop pop pop pop pop		% -

    76

  currentpoint

    77

  newpath

    78

  moveto

    79

} bind def

    80

/PATcg {

    81

  7 dict dup begin

    82

    /lw currentlinewidth def

    83

    /lc currentlinecap def

    84

    /lj currentlinejoin def

    85

    /ml currentmiterlimit def

    86

    /ds [ currentdash ] def

    87

    /cc [ currentrgbcolor ] def

    88

    /cm matrix currentmatrix def

    89

  end

    90

} bind def

    91

% PATdraw - calculates the boundaries of the object and

    92

% fills it with the current pattern

    93

/PATdraw {			% proc

    94

  save exch

    95

    PATpcalc			% proc nw nh px py

    96

    5 -1 roll exec		% nw nh px py

    97

    newpath

    98

    PATfill			% -

    99

  restore

   100

} bind def

   101

% PATfill - performs the tiling for the shape

   102

/PATfill { % nw nh px py PATfill -

   103

  PATDict /CurrentPattern get dup begin

   104

    setfont

   105

    % Set the coordinate system to Pattern Space

   106

    PatternGState PATsg

   107

    % Set the color for uncolored pattezns

   108

    PaintType 2 eq { PATDict /PColor get PATsc } if

   109

    % Create the string for showing

   110

    3 index string		% nw nh px py str

   111

    % Loop for each of the pattern sources

   112

    0 1 Multi 1 sub {		% nw nh px py str source

   113

	% Move to the starting location

   114

	3 index 3 index		% nw nh px py str source px py

   115

	moveto			% nw nh px py str source

   116

	% For multiple sources, set the appropriate color

   117

	Multi 1 ne { dup PC exch get PATsc } if

   118

	% Set the appropriate string for the source

   119

	0 1 7 index 1 sub { 2 index exch 2 index put } for pop

   120

	% Loop over the number of vertical cells

   121

	3 index 		% nw nh px py str nh

   122

	{			% nw nh px py str

   123

	  currentpoint		% nw nh px py str cx cy

   124

	  2 index oldshow	% nw nh px py str cx cy

   125

	  YStep add moveto	% nw nh px py str

   126

	} repeat		% nw nh px py str

   127

    } for

   128

    5 { pop } repeat

   129

  end

   130

} bind def

   131

   132

% PATkshow - kshow with the current pattezn

   133

/PATkshow {			% proc string

   134

  exch bind			% string proc

   135

  1 index 0 get			% string proc char

   136

  % Loop over all but the last character in the string

   137

  0 1 4 index length 2 sub {

   138

				% string proc char idx

   139

    % Find the n+1th character in the string

   140

    3 index exch 1 add get	% string proc char char+1

   141

    exch 2 copy			% strinq proc char+1 char char+1 char

   142

    % Now show the nth character

   143

    PATsstr dup 0 4 -1 roll put	% string proc chr+1 chr chr+1 (chr)

   144

    false charpath		% string proc char+1 char char+1

   145

    /clip load PATdraw

   146

    % Move past the character (charpath modified the current point)

   147

    currentpoint newpath moveto

   148

    % Execute the user proc (should consume char and char+1)

   149

    mark 3 1 roll		% string proc char+1 mark char char+1

   150

    4 index exec		% string proc char+1 mark...

   151

    cleartomark			% string proc char+1

   152

  } for

   153

  % Now display the last character

   154

  PATsstr dup 0 4 -1 roll put	% string proc (char+1)

   155

  false charpath		% string proc

   156

  /clip load PATdraw

   157

  neewath

   158

  pop pop			% -

   159

} bind def

   160

% PATmp - the makepattern equivalent

   161

/PATmp {			% patdict patmtx PATmp patinstance

   162

  exch dup length 7 add		% We will add 6 new entries plus 1 FID

   163

  dict copy			% Create a new dictionary

   164

  begin

   165

    % Matrix to install when painting the pattern

   166

    TilingType PATtcalc

   167

    /PatternGState PATcg def

   168

    PatternGState /cm 3 -1 roll put

   169

    % Check for multi pattern sources (Level 1 fast color patterns)

   170

    currentdict /Multi known not { /Multi 1 def } if

   171

    % Font dictionary definitions

   172

    /FontType 3 def

   173

    % Create a dummy encoding vector

   174

    /Encoding 256 array def

   175

    3 string 0 1 255 {

   176

      Encoding exch dup 3 index cvs cvn put } for pop

   177

    /FontMatrix matrix def

   178

    /FontBBox BBox def

   179

    /BuildChar {

   180

	mark 3 1 roll		% mark dict char

   181

	exch begin

   182

	Multi 1 ne {PaintData exch get}{pop} ifelse  % mark [paintdata]

   183

	  PaintType 2 eq Multi 1 ne or

   184

	  { XStep 0 FontBBox aload pop setcachedevice }

   185

	  { XStep 0 setcharwidth } ifelse

   186

	  currentdict		% mark [paintdata] dict

   187

	  /PaintProc load	% mark [paintdata] dict paintproc

   188

	end

   189

	gsave

   190

	  false PATredef exec true PATredef

   191

	grestore

   192

	cleartomark		% -

   193

    } bind def

   194

    currentdict

   195

  end				% newdict

   196

  /foo exch			% /foo newlict

   197

  definefont			% newfont

   198

} bind def

   199

% PATpcalc - calculates the starting point and width/height

   200

% of the tile fill for the shape

   201

/PATpcalc {	% - PATpcalc nw nh px py

   202

  PATDict /CurrentPattern get begin

   203

    gsave

   204

	% Set up the coordinate system to Pattern Space

   205

	% and lock down pattern

   206

	PatternGState /cm get setmatrix

   207

	BBox aload pop pop pop translate

   208

	% Determine the bounding box of the shape

   209

	pathbbox			% llx lly urx ury

   210

    grestore

   211

    % Determine (nw, nh) the # of cells to paint width and height

   212

    PatHeight div ceiling		% llx lly urx qh

   213

    4 1 roll				% qh llx lly urx

   214

    PatWidth div ceiling		% qh llx lly qw

   215

    4 1 roll				% qw qh llx lly

   216

    PatHeight div floor			% qw qh llx ph

   217

    4 1 roll				% ph qw qh llx

   218

    PatWidth div floor			% ph qw qh pw

   219

    4 1 roll				% pw ph qw qh

   220

    2 index sub cvi abs			% pw ph qs qh-ph

   221

    exch 3 index sub cvi abs exch	% pw ph nw=qw-pw nh=qh-ph

   222

    % Determine the starting point of the pattern fill

   223

    %(px, py)

   224

    4 2 roll				% nw nh pw ph

   225

    PatHeight mul			% nw nh pw py

   226

    exch				% nw nh py pw

   227

    PatWidth mul exch			% nw nh px py

   228

  end

   229

} bind def

   230

   231

% Save the original routines so that we can use them later on

   232

/oldfill	/fill load def

   233

/oldeofill	/eofill load def

   234

/oldstroke	/stroke load def

   235

/oldshow	/show load def

   236

/oldashow	/ashow load def

   237

/oldwidthshow	/widthshow load def

   238

/oldawidthshow	/awidthshow load def

   239

/oldkshow	/kshow load def

   240

   241

% These defs are necessary so that subsequent procs don't bind in

   242

% the originals

   243

/fill	   { oldfill } bind def

   244

/eofill	   { oldeofill } bind def

   245

/stroke	   { oldstroke } bind def

   246

/show	   { oldshow } bind def

   247

/ashow	   { oldashow } bind def

   248

/widthshow { oldwidthshow } bind def

   249

/awidthshow { oldawidthshow } bind def

   250

/kshow 	   { oldkshow } bind def

   251

/PATredef {

   252

  MyAppDict begin

   253

    {

   254

    /fill { /clip load PATdraw newpath } bind def

   255

    /eofill { /eoclip load PATdraw newpath } bind def

   256

    /stroke { PATstroke } bind def

   257

    /show { 0 0 null 0 0 6 -1 roll PATawidthshow } bind def

   258

    /ashow { 0 0 null 6 3 roll PATawidthshow }

   259

    bind def

   260

    /widthshow { 0 0 3 -1 roll PATawidthshow }

   261

    bind def

   262

    /awidthshow { PATawidthshow } bind def

   263

    /kshow { PATkshow } bind def

   264

  } {

   265

    /fill   { oldfill } bind def

   266

    /eofill { oldeofill } bind def

   267

    /stroke { oldstroke } bind def

   268

    /show   { oldshow } bind def

   269

    /ashow  { oldashow } bind def

   270

    /widthshow { oldwidthshow } bind def

   271

    /awidthshow { oldawidthshow } bind def

   272

    /kshow  { oldkshow } bind def

   273

    } ifelse

   274

  end

   275

} bind def

   276

false PATredef

   277

% Conditionally define setcmykcolor if not available

   278

/setcmykcolor where { pop } {

   279

  /setcmykcolor {

   280

    1 sub 4 1 roll

   281

    3 {

   282

	3 index add neg dup 0 lt { pop 0 } if 3 1 roll

   283

    } repeat

   284

    setrgbcolor - pop

   285

  } bind def

   286

} ifelse

   287

/PATsc {		% colorarray

   288

  aload length		% c1 ... cn length

   289

    dup 1 eq { pop setgray } { 3 eq { setrgbcolor } { setcmykcolor

   290

  } ifelse } ifelse

   291

} bind def

   292

/PATsg {		% dict

   293

  begin

   294

    lw setlinewidth

   295

    lc setlinecap

   296

    lj setlinejoin

   297

    ml setmiterlimit

   298

    ds aload pop setdash

   299

    cc aload pop setrgbcolor

   300

    cm setmatrix

   301

  end

   302

} bind def

   303

   304

/PATDict 3 dict def

   305

/PATsp {

   306

  true PATredef

   307

  PATDict begin

   308

    /CurrentPattern exch def

   309

    % If it's an uncolored pattern, save the color

   310

    CurrentPattern /PaintType get 2 eq {

   311

      /PColor exch def

   312

    } if

   313

    /CColor [ currentrgbcolor ] def

   314

  end

   315

} bind def

   316

% PATstroke - stroke with the current pattern

   317

/PATstroke {

   318

  countdictstack

   319

  save

   320

  mark

   321

  {

   322

    currentpoint strokepath moveto

   323

    PATpcalc				% proc nw nh px py

   324

    clip newpath PATfill

   325

    } stopped {

   326

	(*** PATstroke Warning: Path is too complex, stroking

   327

	  with gray) =

   328

    cleartomark

   329

    restore

   330

    countdictstack exch sub dup 0 gt

   331

	{ { end } repeat } { pop } ifelse

   332

    gsave 0.5 setgray oldstroke grestore

   333

  } { pop restore pop } ifelse

   334

  newpath

   335

} bind def

   336

/PATtcalc {		% modmtx tilingtype PATtcalc tilematrix

   337

  % Note: tiling types 2 and 3 are not supported

   338

  gsave

   339

    exch concat					% tilingtype

   340

    matrix currentmatrix exch			% cmtx tilingtype

   341

    % Tiling type 1 and 3: constant spacing

   342

    2 ne {

   343

	% Distort the pattern so that it occupies

   344

	% an integral number of device pixels

   345

	dup 4 get exch dup 5 get exch		% tx ty cmtx

   346

	XStep 0 dtransform

   347

	round exch round exch			% tx ty cmtx dx.x dx.y

   348

	XStep div exch XStep div exch		% tx ty cmtx a b

   349

	0 YStep dtransform

   350

	round exch round exch			% tx ty cmtx a b dy.x dy.y

   351

	YStep div exch YStep div exch		% tx ty cmtx a b c d

   352

	7 -3 roll astore			% { a b c d tx ty }

   353

    } if

   354

  grestore

   355

} bind def

   356

/PATusp {

   357

  false PATredef

   358

  PATDict begin

   359

    CColor PATsc

   360

  end

   361

} bind def

   362

   363

% right45

   364

11 dict begin

   365

/PaintType 1 def

   366

/PatternType 1 def

   367

/TilingType 1 def

   368

/BBox [0 0 1 1] def

   369

/XStep 1 def

   370

/YStep 1 def

   371

/PatWidth 1 def

   372

/PatHeight 1 def

   373

/Multi 2 def

   374

/PaintData [

   375

  { clippath } bind

   376

  { 20 20 true [ 20 0 0 -20 0 20 ]

   377

	{<0040100080200100400200800401000802001004

   378

	0020080040100080200000401000802001004002

   379

	0080040100080200100400200800401000802000>}

   380

     imagemask } bind

   381

] def

   382

/PaintProc {

   383

	pop

   384

	exec fill

   385

} def

   386

currentdict

   387

end

   388

/P5 exch def

   389

   390

/cp {closepath} bind def

   391

/ef {eofill} bind def

   392

/gr {grestore} bind def

   393

/gs {gsave} bind def

   394

/sa {save} bind def

   395

/rs {restore} bind def

   396

/l {lineto} bind def

   397

/m {moveto} bind def

   398

/rm {rmoveto} bind def

   399

/n {newpath} bind def

   400

/s {stroke} bind def

   401

/sh {show} bind def

   402

/slc {setlinecap} bind def

   403

/slj {setlinejoin} bind def

   404

/slw {setlinewidth} bind def

   405

/srgb {setrgbcolor} bind def

   406

/rot {rotate} bind def

   407

/sc {scale} bind def

   408

/sd {setdash} bind def

   409

/ff {findfont} bind def

   410

/sf {setfont} bind def

   411

/scf {scalefont} bind def

   412

/sw {stringwidth} bind def

   413

/tr {translate} bind def

   414

/tnt {dup dup currentrgbcolor

   415

  4 -2 roll dup 1 exch sub 3 -1 roll mul add

   416

  4 -2 roll dup 1 exch sub 3 -1 roll mul add

   417

  4 -2 roll dup 1 exch sub 3 -1 roll mul add srgb}

   418

  bind def

   419

/shd {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul

   420

  4 -2 roll mul srgb} bind def

   421

/reencdict 12 dict def /ReEncode { reencdict begin

   422

/newcodesandnames exch def /newfontname exch def /basefontname exch def

   423

/basefontdict basefontname findfont def /newfont basefontdict maxlength dict def

   424

basefontdict { exch dup /FID ne { dup /Encoding eq

   425

{ exch dup length array copy newfont 3 1 roll put }

   426

{ exch newfont 3 1 roll put } ifelse } { pop pop } ifelse } forall

   427

newfont /FontName newfontname put newcodesandnames aload pop

   428

128 1 255 { newfont /Encoding get exch /.notdef put } for

   429

newcodesandnames length 2 idiv { newfont /Encoding get 3 1 roll put } repeat

   430

newfontname newfont definefont pop end } def

   431

/isovec [

   432

8#055 /minus 8#200 /grave 8#201 /acute 8#202 /circumflex 8#203 /tilde

   433

8#204 /macron 8#205 /breve 8#206 /dotaccent 8#207 /dieresis

   434

8#210 /ring 8#211 /cedilla 8#212 /hungarumlaut 8#213 /ogonek 8#214 /caron

   435

8#220 /dotlessi 8#230 /oe 8#231 /OE

   436

8#240 /space 8#241 /exclamdown 8#242 /cent 8#243 /sterling

   437

8#244 /currency 8#245 /yen 8#246 /brokenbar 8#247 /section 8#250 /dieresis

   438

8#251 /copyright 8#252 /ordfeminine 8#253 /guillemotleft 8#254 /logicalnot

   439

8#255 /hyphen 8#256 /registered 8#257 /macron 8#260 /degree 8#261 /plusminus

   440

8#262 /twosuperior 8#263 /threesuperior 8#264 /acute 8#265 /mu 8#266 /paragraph

   441

8#267 /periodcentered 8#270 /cedilla 8#271 /onesuperior 8#272 /ordmasculine

   442

8#273 /guillemotright 8#274 /onequarter 8#275 /onehalf

   443

8#276 /threequarters 8#277 /questiondown 8#300 /Agrave 8#301 /Aacute

   444

8#302 /Acircumflex 8#303 /Atilde 8#304 /Adieresis 8#305 /Aring

   445

8#306 /AE 8#307 /Ccedilla 8#310 /Egrave 8#311 /Eacute

   446

8#312 /Ecircumflex 8#313 /Edieresis 8#314 /Igrave 8#315 /Iacute

   447

8#316 /Icircumflex 8#317 /Idieresis 8#320 /Eth 8#321 /Ntilde 8#322 /Ograve

   448

8#323 /Oacute 8#324 /Ocircumflex 8#325 /Otilde 8#326 /Odieresis 8#327 /multiply

   449

8#330 /Oslash 8#331 /Ugrave 8#332 /Uacute 8#333 /Ucircumflex

   450

8#334 /Udieresis 8#335 /Yacute 8#336 /Thorn 8#337 /germandbls 8#340 /agrave

   451

8#341 /aacute 8#342 /acircumflex 8#343 /atilde 8#344 /adieresis 8#345 /aring

   452

8#346 /ae 8#347 /ccedilla 8#350 /egrave 8#351 /eacute

   453

8#352 /ecircumflex 8#353 /edieresis 8#354 /igrave 8#355 /iacute

   454

8#356 /icircumflex 8#357 /idieresis 8#360 /eth 8#361 /ntilde 8#362 /ograve

   455

8#363 /oacute 8#364 /ocircumflex 8#365 /otilde 8#366 /odieresis 8#367 /divide

   456

8#370 /oslash 8#371 /ugrave 8#372 /uacute 8#373 /ucircumflex

   457

8#374 /udieresis 8#375 /yacute 8#376 /thorn 8#377 /ydieresis] def

   458

/Helvetica /Helvetica-iso isovec ReEncode

   459

/$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def

   460

/$F2psEnd {$F2psEnteredState restore end} def

   461

   462

$F2psBegin

   463

10 setmiterlimit

   464

0 slj 0 slc

   465

 0.06299 0.06299 sc

   466

%

   467

% Fig objects follow

   468

%

   469

% 

   470

% here starts figure with depth 50

   471

% Polyline

   472

7.500 slw

   473

gs  clippath

   474

3450 4020 m 3450 4080 l 3602 4080 l 3482 4050 l 3602 4020 l cp

   475

eoclip

   476

n 4230 3915 m 3825 3915 l 3960 4050 l

   477

 3465 4050 l gs col0 s gr gr

   478

   479

% arrowhead

   480

n 3602 4020 m 3482 4050 l 3602 4080 l  col0 s

   481

% Polyline

   482

gs  clippath

   483

330 5910 m 390 5910 l 390 5759 l 360 5879 l 330 5759 l cp

   484

eoclip

   485

n 360 2295 m

   486

 360 5895 l gs col0 s gr gr

   487

   488

% arrowhead

   489

n 330 5759 m 360 5879 l 390 5759 l 330 5759 l  cp gs 0.00 setgray ef gr  col0 s

   490

% Polyline

   491

n 3465 2160 m

   492

 3465 6120 l gs col0 s gr 

   493

% Polyline

   494

n 1215 2160 m

   495

 1215 6120 l gs col0 s gr 

   496

% Polyline

   497

n 1215 3375 m

   498

 3465 3375 l gs col0 s gr 

   499

% Polyline

   500

n 1215 4050 m

   501

 3465 4050 l gs col0 s gr 

   502

% Polyline

   503

n 1215 4770 m

   504

 3465 4770 l gs col0 s gr 

   505

% Polyline

   506

n 1215 3375 m 3465 3375 l 3465 4050 l 1215 4050 l

   507

 cp gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def

   508

15.00 15.00 sc P5 [16 0 0 -16 81.00 225.00] PATmp PATsp ef gr PATusp gs col0 s gr 

   509

% Polyline

   510

n 1215 4410 m

   511

 3465 4410 l gs col0 s gr 

   512

% Polyline

   513

n 1215 3015 m

   514

 3465 3015 l gs col0 s gr 

   515

% Polyline

   516

n 855 2295 m

   517

 3465 2295 l gs col0 s gr 

   518

% Polyline

   519

n 1215 2655 m

   520

 3465 2655 l gs col0 s gr 

   521

% Polyline

   522

n 1215 4770 m 3465 4770 l 3465 5445 l 1215 5445 l

   523

 cp gs /PC [[1.00 1.00 1.00] [0.00 0.00 0.00]] def

   524

15.00 15.00 sc P5 [16 0 0 -16 81.00 318.00] PATmp PATsp ef gr PATusp gs col0 s gr 

   525

% Polyline

   526

n 855 5445 m

   527

 3465 5445 l gs col0 s gr 

   528

% Polyline

   529

n 1215 5805 m

   530