%N keyl %F $MIR/src/subs/key.c
%D Retrieve a logical value from the command line.
%P pjt
%: user-input, command-line
%B
FORTRAN call sequence:
        subroutine keyl(key,value,default)
        character key*(*)
        logical value,default

   Retrieve a logical value from the command line. If the keyword is
   not found, the default is returned.  It associates (case
   insensitive) words starting with 'y', 't' and '1' as .TRUE. and
   words starting with 'n', 'f' and '0' as .FALSE.  Values of .TRUE.
   and .FALSE. are also detected... both with minimum match.

   Input:
     key      The name of the keyword to return.
     default  The default value to return, if the keyword is not
              present on the command line.
   Output:
     value    The returned value.
 
