summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/dvips
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2021-12-16 22:05:56 +0000
committerKarl Berry <karl@freefriends.org>2021-12-16 22:05:56 +0000
commit9c3baf1d92547ef919675aca25267de03788f1c2 (patch)
treeef742663de62dad074854fd112570c2a2afb9ec4 /Master/texmf-dist/dvips
parenta1e6a7b727e6acf25eeacbacc20345b721b416c4 (diff)
rm pst-ghsb, part of pst-grad, gone from CTAN
git-svn-id: svn://tug.org/texlive/trunk@61329 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/dvips')
-rw-r--r--Master/texmf-dist/dvips/pst-ghsb/pst-ghsb.pro90
1 files changed, 0 insertions, 90 deletions
diff --git a/Master/texmf-dist/dvips/pst-ghsb/pst-ghsb.pro b/Master/texmf-dist/dvips/pst-ghsb/pst-ghsb.pro
deleted file mode 100644
index 23dc9135cf7..00000000000
--- a/Master/texmf-dist/dvips/pst-ghsb/pst-ghsb.pro
+++ /dev/null
@@ -1,90 +0,0 @@
-%!
-% -*- Mode: Postscript -*-
-% pst-ghsb.pro --- PostScript header file pst-ghsb.pro
-% For the PSTricks HSB mode gradient fillstyle
-% Based on pst-grad.pro from Timothy van Zandt
-% Syntax:
-% H0 S0 B0 H1 S1 B1 MidPoint NumLines Angle GradientFillHSB
-%
-% Author : Denis GIROU (CNRS/IDRIS - France) <Denis.Girou@idris.fr>
-% Created the : Tue May 13 11:12:36 1997
-% Version : 1.0
-% Last mod. by : Denis GIROU (CNRS/IDRIS - France) <Denis.Girou@idris.fr>
-% Last mod. the : Wed May 14 18:48:03 1997
-%
-
-% Syntax:
-% H0 S0 B0 H1 S1 B1 NumLines MidPoint Angle GradientFillHSB
-
-/tx@GradientHSBDict 40 dict def
-tx@GradientHSBDict begin
-/GradientFillHSB {
- rotate
- /MidPoint ED
- /NumLines ED
- /LastBrightness ED
- /LastSaturation ED
- /LastHue ED
- /FirstBrightness ED
- /FirstSaturation ED
- /FirstHue ED
- % This avoids gaps due to rounding errors:
- clip
- pathbbox %leave llx,lly,urx,ury on stack
- /y ED /x ED
- 2 copy translate
- y sub neg /y ED
- x sub neg /x ED
- % This avoids gaps due to rounding errors:
- LastHue FirstHue add 2 div
- LastSaturation FirstSaturation add 2 div
- LastBrightness FirstBrightness add 2 div
- sethsbcolor
- fill
- /YSizePerLine y NumLines div def
- /CurrentY 0 def
- /MidLine NumLines 1 MidPoint sub mul abs cvi def
- MidLine NumLines 2 sub gt
- { /MidLine NumLines def }
- { MidLine 2 lt { /MidLine 0 def } if }
- ifelse
- MidLine 0 gt
- {
- /Hue FirstHue def
- /Saturation FirstSaturation def
- /Brightness FirstBrightness def
- /HueIncrement LastHue FirstHue sub MidLine 1 sub div def
- /SaturationIncrement LastSaturation FirstSaturation sub MidLine 1 sub
- div def
- /BrightnessIncrement LastBrightness FirstBrightness sub MidLine 1 sub
- div def
- MidLine { GradientLoopHSB } repeat
- } if
- MidLine NumLines lt
- {
- /Hue LastHue def
- /Saturation LastSaturation def
- /Brightness LastBrightness def
- /HueIncrement FirstHue LastHue sub NumLines MidLine sub 1 sub div def
- /SaturationIncrement FirstSaturation LastSaturation sub
- NumLines MidLine sub 1 sub div def
- /BrightnessIncrement FirstBrightness LastBrightness sub
- NumLines MidLine sub 1 sub div def
- NumLines MidLine sub { GradientLoopHSB } repeat
- } if
-} def
-/GradientLoopHSB {
- 0 CurrentY moveto
- x 0 rlineto
- 0 YSizePerLine rlineto
- x neg 0 rlineto
- closepath
- Hue Saturation Brightness sethsbcolor fill
- /CurrentY CurrentY YSizePerLine add def
- /Brightness Brightness BrightnessIncrement add def
- /Saturation Saturation SaturationIncrement add def
- /Hue Hue HueIncrement add def
-} def
-
-end
-% END pst-ghsb.pro