*** *SUGAW * - Routine to initialize the Gaussian abcissa and the associated weights
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer(kind=JPIM), | intent(in) | :: | KDGL | |||
integer(kind=JPIM), | intent(in) | :: | KM | |||
integer(kind=JPIM), | intent(in) | :: | KN | |||
real(kind=JPRD), | intent(out) | :: | PL(KDGL) | |||
real(kind=JPRD), | intent(out) | :: | PW(KDGL) | |||
real(kind=JPRD), | intent(in) | :: | PANM | |||
real(kind=JPRD), | intent(in), | optional | :: | PFN(0:KDGL,0:KDGL) |