INTERFACE:
module outputDESCRIPTION:
This module acts as an interface between GOTM and modules/routines doing the actual output. In order to add a new output format it is only necessary to add hooks in this module and write the actual output routines. It is not necessary to change anything in GOTM itself.
USES:
use time, ONLY: write_time_string,julianday,secondsofday,timestep use asciiout ifdef NETCDF_FMT use ncdfout, ONLY: init_ncdf,do_ncdf_out,close_ncdf endif IMPLICIT NONEPUBLIC DATA MEMBERS:
logical :: write_results integer, public, parameter :: ascii_unit=50 integer, public, parameter :: grads_unit=51 character(len=19) :: ts integer :: out_fmt=ASCII character(len=PATH_MAX) :: out_dir='.' character(len=PATH_MAX) :: out_fn='gotm' integer :: nsave=1 logical :: diagnostics=.false. integer :: mld_method=1 REALTYPE :: diff_k=1.e-5 REALTYPE :: Ri_crit=0.5 logical :: rad_corr=.true.REVISION HISTORY:
Original author(s): Karsten Bolding, Hans Burchard $Log: output.F90,v $ Revision 1.9 2006-11-29 09:31:20 kbk output units made public Revision 1.8 2005/07/19 17:09:37 hb removed code commented out Revision 1.7 2005/07/06 14:22:40 kbk updated documentation - saves KPP related variables Revision 1.6 2003/10/14 08:04:32 kbk time is now stored as real Revision 1.5 2003/03/28 09:20:35 kbk added new copyright to files Revision 1.4 2003/03/28 08:24:19 kbk removed tabs Revision 1.3 2003/03/10 08:53:05 gotm Improved documentation and cleaned up code Revision 1.2 2001/11/18 11:51:52 gotm Fixed a typo Revision 1.1.1.1 2001/02/12 15:55:59 gotm initial import into CVS