
The subroutine REG2 calculates the coefficients of a equalization polynomial of
the 2nd degree after the discrete error square method of Gauss
Note
This module seems to be used nowhere
The subroutine REG2 calculates the coefficients of a equalization polynomial of the 2nd degree after the discrete error square method of Gauss
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer | :: | m | ||||
| real(kind=dp), | dimension(*) | :: | x | |||
| real(kind=dp), | dimension(*) | :: | f | |||
| real(kind=dp), | dimension(*) | :: | w | |||
| real(kind=dp), | dimension(*) | :: | c | |||
| real(kind=dp) | :: | xm | ||||
| real(kind=dp) | :: | fm |