*** empty log message ***

[h316.git] / programs / plotter / src / plotapfel.f

diff --git a/programs/plotter/src/plotapfel.f b/programs/plotter/src/plotapfel.f
index ab4365d88500094cbb7cce0c87d2be63bbf3f00f..64e401c29521f18615c7c4c0a78f1cde62dbbf34 100644 (file)
--- a/programs/plotter/src/plotapfel.f
+++ b/programs/plotter/src/plotapfel.f
@@ -143,7 +143,7 @@ C
       PENX=PENX-1
       GO TO 8000
  8100 CONTINUE
-      CALL PL$DN
+      CALL PL$D
       RETURN
       END
 C
@@ -159,11 +159,11 @@ C
 C
        CR      = 13 
        LF      = 10
-       WIDTH   = 500
-       MAXI    = 50
+       WIDTH   = 120
+       MAXI    = 60
        MAXVAL  = 2.0
        LOWX    =-1.48
-       HIGHX   = 0.5
+       HIGHX   = 1.2
        LOWY    =-1.2
        HIGHY   = 1.2
        INIT    = 1