Open the file unit for writing


INTERFACE:

    subroutine init_ascii(fn,title,unit)
    IMPLICIT NONE
DESCRIPTION:

Opens a file giving in the output namelist and connects it with a unit number.


INPUT PARAMETERS:

    character(len=*), intent(in)        :: fn,title
INPUT/OUTPUT PARAMETERS:
    integer, intent(in)                 :: unit
REVISION HISTORY:
    Original author(s): Karsten Bolding & Hans Burchard
    See asciiout module



Karsten Bolding 2012-01-24