aboutsummaryrefslogtreecommitdiff
path: root/Multistar.com
diff options
context:
space:
mode:
authorJoseph Hunkeler <jhunkeler@gmail.com>2021-08-03 14:41:53 -0400
committerJoseph Hunkeler <jhunkeler@gmail.com>2021-08-03 14:41:53 -0400
commitaf8fa097905186e0d8ba257e4d70d63fe8901264 (patch)
tree647de7ddd01c750e9a80849b3cf79efddf32d4b2 /Multistar.com
downloadmoog-af8fa097905186e0d8ba257e4d70d63fe8901264.tar.gz
Initial commit
Diffstat (limited to 'Multistar.com')
-rwxr-xr-xMultistar.com20
1 files changed, 20 insertions, 0 deletions
diff --git a/Multistar.com b/Multistar.com
new file mode 100755
index 0000000..af83056
--- /dev/null
+++ b/Multistar.com
@@ -0,0 +1,20 @@
+
+c******************************************************************************
+c this common block is used for storning information that will be
+c used in combining spectra of different stars in various ways
+c******************************************************************************
+
+ real*8 binpecabund(2,95,5), binpec(2,95),
+ . fluxprimary, fluxsecondary,
+ . lumratio, deltaradvel
+ integer begin
+ character*80 modbin(2)
+
+ common/binstuff/
+ . binpecabund, binpec,
+ . fluxprimary, fluxsecondary,
+ . lumratio, deltaradvel,
+ . begin
+ common/binchars/
+ . modbin
+