[go: up one dir, main page]

File: math.h

package info (click to toggle)
ifeffit 2%3A1.2.11d-9.1
  • links: PTS
  • area: contrib
  • in suites: jessie, jessie-kfreebsd
  • size: 12,444 kB
  • ctags: 6,492
  • sloc: fortran: 35,441; ansic: 8,454; makefile: 4,815; python: 3,274; perl: 3,146; sh: 2,721; ada: 1,003; tcl: 95
file content (12 lines) | stat: -rw-r--r-- 580 bytes parent folder | download | duplicates (9) 
1
2
3
4
5
6
7
8
9
10
11
12
 
c{math.h:  -*-fortran-*-
c numbers and integer codes for math expressions in feffit
       double precision  defalt(mpthpr), consts(mconst)
       double precision  values(maxval), delval(maxval)
       integer  icdpar(micode,mpthpr,mpaths)
       integer  icdval(micode, maxval), jpthff(mpaths)
       integer  icdloc(micode, mlocal, mdata), ixlocl
       parameter(ixlocl = 16384)
       integer  jdtpth(0:mdpths,mdata), jdtusr(0:mdpths,mdata)
       common /math_i/ icdpar, icdval, icdloc, jdtpth, jdtusr, jpthff
       common /math_d/ defalt, consts, values, delval
c math.h}