Save the model results to file

INTERFACE:

    subroutine do_ascii_out(nlev,timestr,unit)

DESCRIPTION:

Writes all calculated data to an ASCII file.

USES:

    use meanflow,     only: depth0,h,u,v,z,S,T,NN,buoy
    use turbulence,   only: num,nuh,tke,eps,L
    use turbulence,   only: kb,epsb
    use observations, only: tprof,sprof,uprof,vprof,epsprof
  #ifdef SEDIMENT
     use sediment, only: ascii_sediment
  #endif
  #ifdef SEDIMENT
     use seagrass, only: ascii_seagrass
  #endif
 
    IMPLICIT NONE

INPUT PARAMETERS:

    integer, intent(in)                 :: nlev
    CHARACTER(len=*), intent(in)        :: timestr
    integer, intent(in)                 :: unit

REVISION HISTORY:

    Original author(s): Karsten Bolding & Hans Burchard
    See asciiout module