projects
/
h316.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
*** 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$D
N
+ CALL PL$D
RETURN
END
C
@@
-159,11
+159,11
@@
C
C
CR = 13
LF = 10
- WIDTH =
50
0
- MAXI =
5
0
+ WIDTH =
12
0
+ MAXI =
6
0
MAXVAL = 2.0
LOWX =-1.48
- HIGHX =
0.5
+ HIGHX =
1.2
LOWY =-1.2
HIGHY = 1.2
INIT = 1