aboutsummaryrefslogtreecommitdiff
path: root/Pstuff.com
diff options
context:
space:
mode:
authorJoseph Hunkeler <jhunkeler@gmail.com>2021-08-03 14:49:58 -0400
committerJoseph Hunkeler <jhunkeler@gmail.com>2021-08-03 14:49:58 -0400
commite9293da11f685d17e2002bb06f0fd756845dadfd (patch)
tree0ce16357b71b44bf5af0be717830b361ecc25700 /Pstuff.com
parentaf8fa097905186e0d8ba257e4d70d63fe8901264 (diff)
downloadmoog-e9293da11f685d17e2002bb06f0fd756845dadfd.tar.gz
Changeset:
* Simplify Makefile * Accept input file as command line argument * Increase path length to 1024 for all path-related variables * Replace hard-coded path to \*.dat files with environment variable MOOG_DATA * SM needs double precision for several of its functions. Pass REAL8 not REAL4 to those.
Diffstat (limited to 'Pstuff.com')
-rwxr-xr-xPstuff.com4
1 files changed, 2 insertions, 2 deletions
diff --git a/Pstuff.com b/Pstuff.com
index c261690..155cf52 100755
--- a/Pstuff.com
+++ b/Pstuff.com
@@ -18,8 +18,8 @@ c******************************************************************************
. half, power, powerrot, powermac,
. average, deviate, oldhalf
real*4 xobs(500000), yobs(500000)
- real*4 xlo, xhi, ylo, yhi,
- . origxlo, origxhi, origylo, origyhi,
+ real*8 xlo, xhi, ylo, yhi
+ real*8 origxlo, origxhi, origylo, origyhi,
. oldxlo, oldxhi, oldylo, oldyhi,
. xadd, yadd, ymult, veladd, deltavel,
. origxadd, origyadd, origymult, origveladd,