NAME:  Close

     USE: Closes a file previously opened.  Close takes a file variable
          of any type and upon activation, will completely update and
          then close the associated file variable.

     DEPENDENCY:  None

     SYNTAX:  Close(FileVariable);


     EXAMPLE:

           Program CloseTest;
           Var
             FVar : Text;

           Begin
             Assign(FVar,'TEST.DAT');
             ReWrite(FVar);
             Writeln(Fvar,'Writing text to TEST.DAT');
             Close(FVar);
           end.