@@ -17,7 +17,7 c usgs, ms 964, box 25046 federal center, denver, co 80225 | |||
|
17 | 17 | c |
|
18 | 18 | c =============================================================== |
|
19 | 19 | character*8 filmod(17) |
|
20 |
character* |
|
|
20 | character*9 fqual | |
|
21 | 21 | dimension gh1(220), gh2(220), gha(224), ext(3), dtemod(17) |
|
22 | 22 | data ext /3*0./ |
|
23 | 23 | data filmod / 'dgrf45', 'dgrf50', |
@@ -26,7 +26,7 c =============================================================== | |||
|
26 | 26 | 3 'dgrf85', 'dgrf90', 'dgrf95', |
|
27 | 27 | 4 'dgrf00', 'dgrf05', 'dgrf10', |
|
28 | 28 | 5 'dgrf15', 'igrf20', 'igrf20s'/ |
|
29 |
data fqual/"/ |
|
|
29 | data fqual/"/bfmodel/"/ | |
|
30 | 30 | data dtemod / 1945., 1950., 1955., 1960., |
|
31 | 31 | 1 1965., 1970., 1975., 1980., 1985., 1990., 1995., 2000., |
|
32 | 32 | 2 2005.,2010.,2015.,2020.,2025./ |
@@ -97,6 +97,19 setup(name='schainpy', | |||
|
97 | 97 | "schainf/mkfact/lmdif1.f", |
|
98 | 98 | "schainf/mkfact/mkfact.f", |
|
99 | 99 | "schainf/mkfact/r1mach.f", |
|
100 | "schainf/mkfact/bfield2.f"]) | |
|
101 | ] | |
|
102 | ) | |
|
103 | ||
|
104 | ''' | |
|
105 | setup(name='schainpy', | |
|
106 | ext_modules = [ | |
|
107 | Extension("schainpy.model.proc.mkfact_short_2020_2", | |
|
108 | sources=[ | |
|
109 | "schainf/mkfact/mkfact_short_2020_2.pyf", | |
|
110 | "schainf/mkfact/lmdif1.f", | |
|
111 | "schainf/mkfact/mkfact.f", | |
|
112 | "schainf/mkfact/r1mach.f", | |
|
100 | 113 | "schainf/mkfact/bfield2.f"]), |
|
101 | 114 | Extension("schainpy.model.proc.full_profile_profile", |
|
102 | 115 | sources=[ |
@@ -206,3 +219,4 setup(name='schainpy', | |||
|
206 | 219 | "schainf/acf2/tred1.f"]) |
|
207 | 220 | ] |
|
208 | 221 | ) |
|
222 | ''' |
General Comments 0
You need to be logged in to leave comments.
Login now