##// END OF EJS Templates
lagp.f update 7
lagp.f update 7

File last commit:

r1601:3b2826fe0d97
r1627:a8cd1aaa1b75
Show More
fitter.h
7 lines | 240 B | text/x-c | CLexer
c information needed for spectral computations
parameter(nimax=10)
integer nion,wi(nimax)
real te,ti(nimax),fi(nimax),ven,vin(nimax),alpha,dens,bfld,ak
common /spec/te,ti,fi,ven,vin,alpha,dens,bfld,nion,wi,ak