Purpose
 
 
 Securely deletes the content of a text entity.
 
 
  Synopsis
 
 
  procedure erase(txt:text) 
 
 
  Argument
 
 
 
  
   | 
     
     txt 
       | 
   
     
     A text object to be erased
       | 
  
 
 
  Further information
 
 
  This function resets the text string it receives after having replaced each of its characters by a space.
 
 
  Module