/*************************************************************
 * File: lib/isalpha.c
 * Purpose: Part of C runtime library
 * Author: Phil Bunce (pjb@carmel.com)
 * Revision History:
 *	970304	Start of revision history
 */

/** isalpha(c) returns true if c is alphabetic */
isalpha(c)
int c;
{
if (c >= 'a' && c <= 'z') return(1);
if (c >= 'A' && c <= 'Z') return(1);
return(0);
}