Go to the source code of this file.
Functions/Subroutines | |
subroutine | coupling_slt_n (SLT, KI, KSLT, PWIND, PSFSLT) |
subroutine coupling_slt_n | ( | type(slt_t), intent(inout) | SLT, |
integer, intent(in) | KI, | ||
integer, intent(in) | KSLT, | ||
real, dimension(ki), intent(in) | PWIND, | ||
real, dimension(ki,kslt), intent(out) | PSFSLT | ||
) |