Finds a peak and flags it to search for subsequent ones. Flags are negated weights, so they are not lost.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=TIME), | intent(in) | :: | dt | peak width |
||
type(SPEC_T) | :: | spec | spectrum structure (changed on output) |
|||
real(kind=TIME), | intent(out) | :: | freq | current peak frequency |
||
real(kind=SP), | intent(out) | :: | thm | current peak value |
||
real(kind=SP), | intent(out) | :: | dfm | current peak width |