LSAME - return .TRUE


SYNOPSIS

       LOGICAL FUNCTION LSAME( CA, CB )

           CHARACTER    CA, CB


PURPOSE

       LSAME  returns  .TRUE.  if  CA  is  the  same letter as CB
       regardless of case.


ARGUMENTS

       CA      (input) CHARACTER*1
               CB      (input) CHARACTER*1 CA and CB specify  the
               single characters to be compared.

               Test if the characters are equal

               Now  test  for  equivalence if both characters are
               alphabetic.

               Use 'Z' rather than  'A'  so  that  ASCII  can  be
               detected on Prime machines, on which ICHAR returns
               a value with  bit  8  set.   ICHAR('A')  on  Prime
               machines   returns   193  which  is  the  same  as
               ICHAR('A') on an EBCDIC machine.

               ASCII is assumed - ZCODE  is  the  ASCII  code  of
               either lower or upper case 'Z'.

               EBCDIC  is  assumed  - ZCODE is the EBCDIC code of
               either lower or upper case 'Z'.

               ASCII is assumed, on Prime machines - ZCODE is the
               ASCII  code plus 128 of either lower or upper case
               'Z'.

               RETURN

               End of LSAME


Man(1) output converted with man2html