        REAL*4 FUNCTION CSZMAP()
        IMPLICIT NONE
        INCLUDE DIGLIB$KOM:PLTPRM.PRM
C
C       RETURN CHARACTER SIZE MAP USED/WILL USE
C
        CSZMAP = CYSIZE
        RETURN
        END

