


    /* EPC Imp to C Translation Release 4 Version Apr 95 */


#include "imptoc.h"

main() {
/* CHECKS THAT ASSIGNMENT OF STRINGS OF FIXED LENGTH WITH*/
/* L>128 DO NOT LOES CHARARCTERS*/
char l [1+1] [256] ;
 strcpy(l [1],"\n0123456789012345678901234567890123456789012345678901234567890\n0123456789012345678901234567890123456789012345678901234567890\n0123456789012345678901234567890123456789012345678901234567890\nTEST OK")
;
 fprintf(out_file, "%s", imp_concat(imp_concat("L1=",l [1]),"\n"));
exit(0);
}

/* end of automatic translation */

