C MESLIR SOURCE CHAT 06/03/16 21:21:27 5336 SUBROUTINE MESLIR(MESS) IMPLICIT INTEGER(I-N) -INC CCNOYAU MESERR=MESS END