Kästchenpapier für Kegelschnitte – 2-Focus-Papier


Das (näherungsweise und im Ausschnitt) abgebildete Kästchenpapier erlaubt Einsichten in die geometirsche Bedeutung der Kegelschnitte Hyperbel und Ellipse. Man kann es sich Hier als pdf herunterladen, man kann sich aber auch den unten wiedergebebenen Postscript-Code herauskopieren und den jeweiligen Bedürfnissen flexibel anpassen.

Postscript mit seiner umgekehrten polnischen Notation erscheint zunächst gewöhnungsbedürftig. Z.B. schreibt sich der Ausdruck (2+3)*5 so: 2 3 add 5 mul . Mit Hilfe der eingestreuten Kommentare hoffe ich jedoch, auch für Leute ohne tiefere Kenntnis dieser Sprache die Möglichkeit eröffnet zu haben, den Code für eigene Zwecke anzupassen.
Postscript kann man mit Hilfe der Open-Source-Programme Ghostscript und Ghostview am Bildschirm darstellen und in andere Graphikformate exportieren. Man erhält sie z.B. unter http://www.haw-hamburg.de/pers/Lueddecke/ghost/


gif vom Kaestchenpapier

%!PS-Adobe-2.0
%%Title: 2_focus_Paper
%%EndComments

/MM
{
2.83464567 mul
} bind def

/MyPageHeight
{
297 MM round
} bind def

/MyPageWidth
{
210 MM round
} bind def

% distance between circles and parallels
/MyIncrement
{
5 MM
} bind def

%
/MyLinewidth
{
0.15 MM setlinewidth
} bind def

% horizontal offset of circle center
/MyOffset
{
30 MM
} bind def

statusdict begin
MyPageHeight MyPageWidth 0 1 setpageparams
%% pageparams PP = PP = PP = PP =
end

/DrawConcentricCircles
{
gsave
MyLinewidth
% adapt limit ("200") individually so that the sheet is filled
% up to the corners with circles
0 MyIncrement 200 MM round
{
0 exch 0 exch
0 360 arc
stroke
} bind for
grestore
gsave
} bind def

%%EndProlog

gsave
% coordinate origin to center of sheet
MyPageWidth 2 div round MyPageHeight 2 div round translate
% move coordinate origin slightly leftwards
0 MyOffset -1 mul translate
DrawConcentricCircles
grestore

% move coordinate origin back to center
0 MyOffset 2 mul translate

DrawConcentricCircles

grestore

showpage
%%Trailer