File: vertical_line.ps

package info (click to toggle)
ruby-rghost 0.9.9-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 1,188 kB
  • sloc: ruby: 3,374; makefile: 6; sh: 1
file content (12 lines) | stat: -rwxr-xr-x 233 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
 
/vertical_line{ exch  current_row moveto 0 exch neg rlineto stroke  } def
/vlr {
	gsave
		0 row_height rlineto
    stroke
	grestore
} def
/vlrf { 
    X Y row_padding sub moveto
		0 row_height row_padding add rlineto
    stroke
} def