1*13382Ssam #ifndef lint 2*13382Ssam static char sccsid[] = "@(#)erase.c 4.1 (Berkeley) 06/27/83"; 3*13382Ssam #endif 4*13382Ssam 5*13382Ssam extern vti; 6*13382Ssam erase(){ 7*13382Ssam int i; 8*13382Ssam i=0401; 9*13382Ssam write(vti,&i,2); 10*13382Ssam } 11