LSAMEN(3F)							    LSAMEN(3F)

NAME    [Toc]    [Back]

     LSAMEN - test if the first	N letters of CA	are the	same as	the first N
     letters of	CB, regardless of case

SYNOPSIS    [Toc]    [Back]

     LOGICAL FUNCTION LSAMEN( N, CA, CB	)

	 CHARACTER*(  *	) CA, CB

	 INTEGER      N

PURPOSE    [Toc]    [Back]

     LSAMEN  tests if the first	N letters of CA	are the	same as	the first N
     letters of	CB, regardless of case.	 LSAMEN	returns	.TRUE. if CA and CB
     are equivalent except for case and	.FALSE.	otherwise.  LSAMEN also
     returns .FALSE. if	LEN( CA	) or LEN( CB ) is less than N.

ARGUMENTS    [Toc]    [Back]

     N	     (input) INTEGER
	     The number	of characters in CA and	CB to be compared.

     CA	     (input) CHARACTER*(*)
	     CB	     (input) CHARACTER*(*) CA and CB specify two character
	     strings of	length at least	N.  Only the first N characters	of
	     each string will be accessed.
LSAMEN(3F)							    LSAMEN(3F)

NAME    [Toc]    [Back]

     LSAMEN - test if the first	N letters of CA	are the	same as	the first N
     letters of	CB, regardless of case

SYNOPSIS    [Toc]    [Back]

     LOGICAL FUNCTION LSAMEN( N, CA, CB	)

	 CHARACTER*(  *	) CA, CB

	 INTEGER      N

PURPOSE    [Toc]    [Back]

     LSAMEN  tests if the first	N letters of CA	are the	same as	the first N
     letters of	CB, regardless of case.	 LSAMEN	returns	.TRUE. if CA and CB
     are equivalent except for case and	.FALSE.	otherwise.  LSAMEN also
     returns .FALSE. if	LEN( CA	) or LEN( CB ) is less than N.

ARGUMENTS    [Toc]    [Back]

     N	     (input) INTEGER
	     The number	of characters in CA and	CB to be compared.

     CA	     (input) CHARACTER*(*)
	     CB	     (input) CHARACTER*(*) CA and CB specify two character
	     strings of	length at least	N.  Only the first N characters	of
	     each string will be accessed.


									PPPPaaaaggggeeee 1111