char *strlower(string)
     /* Transforms all characters in string to lower case */
     char *string;  /* String to transform */
          {
          char *pc;

          /* Save the starting address */
          pc = string;

          while (*string)
               {
               if (isupper(*string))
                    *string = tolower(*string);
               string++;
               }

          return pc;
          }
     
     char *strlower(string, length)
     /* Transforms all characters in string to lower case */
     char *string;  /* String to transform */
     int length;    /* Length of string */
          {
          char *pc;

          /* Save the starting address */
          pc = string;

          while (*string && length--)
               {
               if (isupper(*string))
                    *string = tolower(*string);
               string++;
               }

          return pc;
          }