Go to the source code of this file.
Functions/Subroutines | |
subroutine | COUPLING_SLT_n (KI, KSLT, PWIND, PSFSLT) |
subroutine COUPLING_SLT_n | ( | INTEGER, intent(in) | KI, |
INTEGER, intent(in) | KSLT, | ||
REAL, dimension(ki), intent(in) | PWIND, | ||
REAL, dimension(ki,kslt), intent(out) | PSFSLT | ||
) |