#include int sysclsc_(chnl) int *chnl; { close(*chnl); return(0); }