|
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

1.8.13