File: write_exa.iff

package info (click to toggle)
ifeffit 2%3A1.2.11d-15
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 12,332 kB
  • sloc: fortran: 35,441; ansic: 8,458; makefile: 4,727; python: 3,315; perl: 3,144; sh: 2,721; ada: 1,003; tcl: 95
file content (9 lines) | stat: -rw-r--r-- 309 bytes parent folder | download | duplicates (10) 
1
2
3
4
5
6
7
8
9
 
#
# add writing of output chi(k) to autobk-like spline
#
 read_data(file = ../data/cu.xmu, label = 'energy xmu', group = cu)
 spline(energy= cu.energy, xmu= cu.xmu, kweight=1)

 $xtitle = "Cu 10K chi(k) from ifeffit's spline"
 write_data(file = "../data/cu.chi", cu.k, cu.chi, $xtitle,
           $cu_title*)