/*)LIBRARY
*/
/*
 * P$HCLOSE - Close help file
 */
extern hclose();

p$hclose(stat)
int *stat;
   {
   call(hclose, 1, stat);
   return(stat[0]);
   }