clqr-characters.tex

   1 % Copyright (C) 2008, 2010, 2011 Bert Burgemeister
   2 %
   3 % Permission is granted to copy, distribute and/or modify this
   4 % document under the terms of the GNU Free Documentation License,
   5 % Version 1.2 or any later version published by the Free Software
   6 % Foundation; with no Invariant Sections, no Front-Cover Texts and
   7 % no Back-Cover Texts. For details see file COPYING.
   8 %
   9
  10 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  11 \section{Characters}
  12 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  13
  14 The \kwd*{standard-char} type comprises \LIT{a}-\LIT{z},
  15 \LIT{A}-\LIT{Z}, \LIT{0}-\LIT{9}, \LIT{Newline}, \LIT{Space}, and
  16 \LIT{!?\$"'`.:,;*+-/|{\tt\char`\\}\TLD\_\^{}<=>\#\%@\&()[]\{\}}.
  17 \index{NEWLINE}\index{SPACE}
  18
  19 \begin{LIST}{1cm}
  20
  21   \IT{\arrGOO{(\FU*{CHARACTERP} \VAR{ foo})\\
  22       (\FU*{STANDARD-CHAR-P} \VAR{ char})}{.}}
  23   {
  24     \retval{\T} if argument is of indicated type.
  25   }
  26
  27   \IT{\arrGOO{(\FU*{GRAPHIC-CHAR-P} \VAR{ character})\\
  28       (\FU*{ALPHA-CHAR-P} \VAR{ character})\\
  29       (\FU*{ALPHANUMERICP} \VAR{ character})}{.}}
  30   {
  31     \retval{\T} if \VAR{character} is visible, alphabetic, or
  32     alphanumeric, respectively.
  33   }
  34
  35   \IT{\arrGOO{(\FU*{UPPER-CASE-P} \VAR{ character})\\
  36       (\FU*{LOWER-CASE-P} \VAR{ character})\\
  37       (\FU*{BOTH-CASE-P} \VAR{ character})}{.}}
  38   {
  39   Return \retval{\T} if \VAR{character} is uppercase, lowercase, or
  40   able to be in another case, respectively.
  41   }
  42
  43   \IT{(\FU*{DIGIT-CHAR-P} \VAR{character}
  44     \Op{\VAR{radix}\DF{\LIT{10}}})}
  45   {
  46     Return \retval{its weight} if \VAR{character} is a digit, or
  47     \retval{\NIL} otherwise.
  48   }
  49
  50   \IT{\arrGOO{(\FU*{CHAR=}\RP{\VAR{
  51           character}})\\(\FU*{CHAR/=}\RP{\VAR{
  52           character}})}{.}}
  53   {
  54     Return \retval{\T} if all \VAR{character}s, or
  55     none, respectively,  are equal.
  56   }
  57
  58   \IT{\arrGOO{(\FU*{CHAR-EQUAL}\RP{\VAR{
  59           character}})\\(\FU*{CHAR-NOT-EQUAL}\RP{\VAR{
  60           character}})}{.}}
  61   {
  62     Return \retval{\T} if all \VAR{character}s, or
  63     none, respectively,  are equal ignoring case.
  64   }
  65
  66   \IT{\arrGOO{(\FU{CHAR\boldmath$>$}\RP{\VAR{
  67           character}})\\(\FU{CHAR\boldmath$>$=}\RP{\VAR{
  68           character}})\\(\FU{CHAR\boldmath$<$}\RP{\VAR{
  69           character}})\\(\FU{CHAR\boldmath$<$=}\RP{\VAR{
  70           character}})}{.}}
  71   {
  72   \index{CHAR>@CHAR$>$}%
  73   \index{CHAR>=@CHAR$>$=}%
  74   \index{CHAR<@CHAR$<$}%
  75   \index{CHAR<=@CHAR$<$=}%
  76   Return \retval{\T} if \VAR{character}s are
  77   monotonically decreasing, monotonically non-increasing, monotonically
  78   increasing, or monotonically non-decreasing, respectively.
  79   }
  80
  81   \IT{\arrGOO{
  82       (\FU*{CHAR-GREATERP}\RP{\VAR{ character}})\\
  83       (\FU*{CHAR-NOT-LESSP}\RP{\VAR{ character}})\\
  84       (\FU*{CHAR-LESSP}\RP{\VAR{ character}})\\
  85       (\FU*{CHAR-NOT-GREATERP}\RP{\VAR{ character}})}{.}}
  86   {
  87     Return \retval{\T} if \VAR{character}s are monotonically
  88     decreasing, monotonically non-increasing, monotonically
  89     increasing, or monotonically non-decreasing, respectively,
  90     ignoring case.
  91   }
  92
  93   \IT{\arrGOO{(\FU*{CHAR-UPCASE} \VAR{ character})\\
  94       (\FU*{CHAR-DOWNCASE} \VAR{ character})}{.}}
  95   {
  96     Return corresponding uppercase/lowercase \retval{character},
  97     respectively.
  98   }
  99
 100   \IT{(\FU*{DIGIT-CHAR} \VAR{i} \Op{\VAR{radix}\DF{\LIT{10}}})}
 101   {
 102     \retval{Character} representing digit \VAR{i}.
 103   }
 104
 105   \IT{(\FU*{CHAR-NAME} \VAR{char})}
 106   {
 107     \VAR{char}'s \retval{name} if any, or
 108     \retval{\NIL}.
 109   }
 110
 111   \IT{(\FU*{NAME-CHAR} \VAR{foo})\qquad\qquad}
 112   {
 113     \retval{Character} named \VAR{foo} if any, or
 114     \retval{\NIL}.
 115   }
 116
 117   \IT{\arrGOO{(\FU*{CHAR-INT} \VAR{ character})\\
 118       (\FU*{CHAR-CODE} \VAR{ character})}{.}}
 119   {
 120     \retval{Code} of \VAR{character}.
 121   }
 122
 123   \IT{(\FU*{CODE-CHAR} \VAR{code})\qquad\qquad}
 124   {
 125     \retval{Character} with \VAR{code}.
 126   }
 127
 128   \IT{\CNS*{CHAR-CODE-LIMIT}}
 129   {
 130     Upper bound of (\FU{CHAR-CODE} \VAR{char}); $\geq 96$.
 131   }
 132
 133   \IT{(\FU*{CHARACTER} \VAR{c})}
 134   {
 135     Return \retval{\kwd{\#$\backslash$}\VAR{c}}.
 136   }
 137
 138 \end{LIST}
 139
 140 %%% Local Variables:
 141 %%% mode: latex
 142 %%% TeX-master: "clqr"
 143 %%% End: