Close files used for saving model results


INTERFACE:

   subroutine close_ascii(unit)
   IMPLICIT NONE
DESCRIPTION:

Close the open ASCII file.


INPUT PARAMETERS:

   integer, intent(in)                 :: unit
REVISION HISTORY:
   Original author(s): Karsten Bolding & Hans Burchard
   See asciiout module



Karsten Bolding 2012-12-28