linse/fit
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Initial commit

Browse Source
This commit is contained in:
zolliker
2022-08-19 15:22:33 +02:00
commit d682fae506
545 changed files with 48172 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
gen/fit_user.inc Normal file
View File

@ -0,0 +1,11 @@
real xbase
integer confun ! function to convolute
logical show
integer istp ! integration over istp*2 points
integer npy ! number of points
integer icnt ! number of folding multiplications
integer ecnt ! error count
common /fit_confun_com/confun, xbase,
1 npy, istp, icnt, ecnt, show