version 1.1.1.1, 2000/01/09 17:01:15 |
version 1.1.1.2, 2000/01/22 14:16:28 |
Line 162 static char GPFAR * GPFAR PS_header[] = { |
|
Line 162 static char GPFAR * GPFAR PS_header[] = { |
|
"/DL { Color {setrgbcolor Solid {pop []} if 0 setdash }\n", |
"/DL { Color {setrgbcolor Solid {pop []} if 0 setdash }\n", |
" {pop pop pop Solid {pop []} if 0 setdash} ifelse } def\n", |
" {pop pop pop Solid {pop []} if 0 setdash} ifelse } def\n", |
/* Border Lines */ |
/* Border Lines */ |
"/BL { stroke gnulinewidth 2 mul setlinewidth } def\n", |
"/BL { stroke userlinewidth 2 mul setlinewidth } def\n", |
/* Axes Lines */ |
/* Axes Lines */ |
"/AL { stroke gnulinewidth 2 div setlinewidth } def\n", |
"/AL { stroke userlinewidth 2 div setlinewidth } def\n", |
/* set user defined linewidth */ |
/* set user defined linewidth */ |
"/UL { gnulinewidth mul /userlinewidth exch def } def\n", |
"/UL { dup gnulinewidth mul /userlinewidth exch def\n", |
|
" 10 mul /udl exch def } def\n", |
/* Plot Lines */ |
/* Plot Lines */ |
"/PL { stroke userlinewidth setlinewidth } def\n", |
"/PL { stroke userlinewidth setlinewidth } def\n", |
/* Line Types */ |
/* Line Types */ |
"/LTb { BL [] 0 0 0 DL } def\n", /* border */ |
"/LTb { BL [] 0 0 0 DL } def\n", /* border */ |
"/LTa { AL [1 dl 2 dl] 0 setdash 0 0 0 setrgbcolor } def\n", /* axes */ |
"/LTa { AL [1 udl mul 2 udl mul] 0 setdash 0 0 0 setrgbcolor } def\n", /* axes */ |
"/LT0 { PL [] 1 0 0 DL } def\n", |
"/LT0 { PL [] 1 0 0 DL } def\n", |
"/LT1 { PL [4 dl 2 dl] 0 1 0 DL } def\n", |
"/LT1 { PL [4 dl 2 dl] 0 1 0 DL } def\n", |
"/LT2 { PL [2 dl 3 dl] 0 0 1 DL } def\n", |
"/LT2 { PL [2 dl 3 dl] 0 0 1 DL } def\n", |