Previous: karord Up: ../karrtn.html Next: karput

KARPAK

       SUBROUTINE KARPAK (TARGET,LOCTAR,SOURCE,LENGTH)

          Pack  LENGTH  characters stored  in  A1  FORMAT  in
 SOURCE(*) into  TARGET(*),  beginning at character  position
 LOCTAR  in TARGET(*).   If either  LOCTAR or  LENGTH is less
 than one, no characters are packed.