aboutsummaryrefslogtreecommitdiff
path: root/Abunplot.f
diff options
context:
space:
mode:
authorJoseph Hunkeler <jhunkeler@gmail.com>2021-08-12 11:27:18 -0400
committerJoseph Hunkeler <jhunkeler@gmail.com>2021-08-12 11:27:51 -0400
commit783d4baaa19ea3843dffa2ca5654e662d4a5aa8b (patch)
treefd38bf324613ae4fbdaa0fce595f717935c35524 /Abunplot.f
parent9f7c4133c9a0d0f34ca4c7d0ff510ee2cf57935f (diff)
downloadmoog-783d4baaa19ea3843dffa2ca5654e662d4a5aa8b.tar.gz
Fix point plotting
Diffstat (limited to 'Abunplot.f')
-rw-r--r--Abunplot.f4
1 files changed, 2 insertions, 2 deletions
diff --git a/Abunplot.f b/Abunplot.f
index a34e115..ffd56ae 100644
--- a/Abunplot.f
+++ b/Abunplot.f
@@ -10,9 +10,9 @@ c******************************************************************************
include 'Linex.com'
include 'Pstuff.com'
include 'Dummy.com'
- real*4 ep(2500),abb(2500),logrw(2500),wavepl(2500)
+ real*8 ep(2500),abb(2500),logrw(2500),wavepl(2500)
equivalence (ep,dummy3(1)),(abb,dummy3(1251)),(logrw,dummy3(2501))
- real*4 style(1),ymed
+ real*8 style(1),ymed
character ion*4