/* -*- LPC -*- */
/*
* $Locker: $
* $Id: valid_ident.c,v 1.1 1998/01/06 05:12:03 ceres Exp $
* $Log: valid_ident.c,v $
* Revision 1.1 1998/01/06 05:12:03 ceres
* Initial revision
*
*/
int valid_ident(string euid) {
return high_programmer(euid);
} /* valid_ident() */