NAME

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

SYNOPSIS

LOGICAL FUNCTION
LSAMEN( N, CA, CB )

CHARACTER∗( ∗ ) CA, CB

INTEGER N

PURPOSE

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

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.

SunSoft, Inc.  —  Last change: 27 Jun 1995