Previous: dtrsv Up: ../lapack-blas.html Next: sgbmv

lsame

 NAME
      LSAME - return .TRUE

 SYNOPSIS
      LOGICAL FUNCTION LSAME( CA, CB )

          CHARACTER    CA, CB

 PURPOSE
      LSAME returns .TRUE. if CA is the same letter as CB regard-
      less 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