EAN/UPC: Calculate guard bar descent as 5X

Author: terryburton

src/ean13.ps.src

@@ -223,7 +223,7 @@ begin
     /resolve_height //render exec
 
     includetext {
-        /descent propspec physspec or { 5 modunit mul 72 div } { .075 } ifelse def  % Guard bar descent: 5X at spec
+        /descent 5 modunit mul 72 div def  % Guard bar descent: 5X
         /bhs [height height 12{height descent sub}repeat height height 12{height descent sub}repeat height height] def
         /bbs [0 0 12{descent}repeat 0 0 12{descent}repeat 0 0] def
     } {

src/ean8.ps.src

@@ -207,7 +207,7 @@ begin
     /resolve_height //render exec
 
     includetext {
-        /descent propspec physspec or { 5 modunit mul 72 div } { .075 } ifelse def
+        /descent 5 modunit mul 72 div def  % Guard bar descent: 5X
         /bhs [height height 8{height descent sub}repeat height height 8{height descent sub}repeat height height] def
         /bbs [0 0 8{descent}repeat 0 0 8{descent}repeat 0 0] def
     } {

src/upca.ps.src

@@ -260,7 +260,7 @@ begin
     /resolve_height //render exec
 
     includetext {
-        /descent propspec physspec or { 5 modunit mul 72 div } { .075 } ifelse def
+        /descent 5 modunit mul 72 div def  % Guard bar descent: 5X
         /bhs [4{height}repeat 10{height descent sub}repeat height height 10{height descent sub}repeat 4{height}repeat] def
         /bbs [0 0 0 0 10{descent}repeat 0 0 10{descent}repeat 0 0 0 0] def
     } {

src/upce.ps.src

@@ -300,7 +300,7 @@ begin
     /resolve_height //render exec
 
     includetext {
-        /descent propspec physspec or { 5 modunit mul 72 div } { .075 } ifelse def
+        /descent 5 modunit mul 72 div def  % Guard bar descent: 5X
         /bhs [height height 12{height descent sub}repeat height height height] def
         /bbs [0 0 12{descent}repeat 0 0 0] def
     } {