blob: 65bd9bb8142afca8f33928b9284bfb4d7bfd00a4 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
|
# Common for fitting model GAUSS5.
real factor # Convergence factor
int spectra[3, MAX_RANGES] # Spectra to fit
int parameters[MS_NGAUSS5] # Parameters to be fit
int smooth[MS_NGAUSS5] # Smooth parameters?
int algorithm # Fitting algorithm
common /g5_fitcom/ factor, spectra, parameters, smooth, algorithm
|