w4kek/WSJT-X
1
0
Fork 0
mirror of https://github.com/saitohirga/WSJT-X.git synced 2024-11-25 05:38:46 -05:00
Code Issues Packages Projects Releases Wiki Activity

Code cleanup.

Browse Source
This commit is contained in:
Joe Taylor 2020-10-04 15:32:08 -04:00
parent 20fb18c8ae
commit 333fac1fae
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/lorentzian.f90
View File

@ -1,7 +1,7 @@
subroutine lorentzian(y,npts,a) subroutine lorentzian(y,npts,a)
! Input: y(npts); assume x(i)=i, i=1,npts ! Input: y(npts); assume x(i)=i, i=1,npts
! Output: a(5) ! Output: a(1:5)
! a(1) = baseline ! a(1) = baseline
! a(2) = amplitude ! a(2) = amplitude
! a(3) = x0 ! a(3) = x0