 |  | stairs |  |
 |  | stairs.ads |  |
 | stairs.adb |
|  | glyphs | |
| | curves | |
| glyphs | ||
| nocurves | ||
| outlines | ||
| stairs | ||
| transforms |
| | fonts | |
|  | eps/ | |
| glyphs/ | ||
| lines/ | ||
| loaders/ | ||
| raster/ | ||
| svg/ |
| | ada | |
| | bin/ | |
| engine/ | ||
| fonts/ | ||
| internal/ | ||
| text/ | ||
| util/ |
|  | Home | |
|  | Showcase | |
 | Snapshots | ||
 | Ada Source | ||
 | PHP Source | ||
 | Fonts |
|  | Sourceforge | |
|  | Summary | |
 | Downloads | ||
 | Browse CVS | ||
 | Donate | ||
 | Activity |
Hosted by
-- $Date: 2004/01/21 04:28:32 $
-- $Revision: 1.6 $
-- $Author: jcrocholl $
with Real_Numbers; use Real_Numbers;
with Glyphs; use Glyphs;
package Stairs is
-- Remove pixel stairs. This is done by collapsing all lines with a
-- length of less than Min_Length, and using their middle point
-- instead.
procedure Remove_Stairs
(This : access Glyph; -- Depixel this glyph.
Min_Length : in Real := 1.5); -- Collapse lines shorter than this.
end Stairs;