From 783d4baaa19ea3843dffa2ca5654e662d4a5aa8b Mon Sep 17 00:00:00 2001 From: Joseph Hunkeler Date: Thu, 12 Aug 2021 11:27:18 -0400 Subject: Fix point plotting --- Specplot.f | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Specplot.f') diff --git a/Specplot.f b/Specplot.f index 76992d1..e7a1d7d 100644 --- a/Specplot.f +++ b/Specplot.f @@ -12,8 +12,8 @@ c****************************************************************************** include 'Pstuff.com' include 'Equivs.com' include 'Multistar.com' - real*4 style(1) - real*4 yup,ydown + real*8 style(1) + real*8 yup,ydown integer iflip real*8 inx1,inx2,iny1,iny2 -- cgit