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-12-28