GRASP
|
Functions/Subroutines | |
subroutine | packls (M, EL, Q, COUPLE, STR) |
subroutine packls | ( | integer, intent(in) | M, |
character(len=3), dimension(*), intent(in) | EL, | ||
integer, dimension(*), intent(in) | Q, | ||
character(len=3), dimension(*), intent(in) | COUPLE, | ||
character(len=164), intent(out) | STR | ||
) |
Because of a compiler error on the SUN, the following is