5 * Revision 1.1.1.1 1996/02/15 17:49:42 mclareni
9 #include "kerngen/pilot.h"
10 SUBROUTINE CCOPYL (FR,TO,NCH)
12 C CERN PROGLIB# M432 CCOPYL .VERSION KERNFOR 4.39 940228
15 C- Copy NCH characters from FR to TO shifting left
17 CHARACTER FR(512)*1, TO(512)*1