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-01-24