~reducedmodelling/fluidity/fluidity_enkf_reduced_pert

!    Copyright (C) 2006 Imperial College London and others.

!    

!    Please see the AUTHORS file in the main source directory for a full list

!    of copyright holders.

!

!    Prof. C Pain

!    Applied Modelling and Computation Group

!    Department of Earth Science and Engineering

!    Imperial College London

!

!    amcgsoftware@imperial.ac.uk

!    

!    This library is free software; you can redistribute it and/or

!    modify it under the terms of the GNU Lesser General Public

!    License as published by the Free Software Foundation,

!    version 2.1 of the License.

!

!    This library is distributed in the hope that it will be useful,

!    but WITHOUT ANY WARRANTY; without even the implied warranty of

!    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

!    Lesser General Public License for more details.

!

!    You should have received a copy of the GNU Lesser General Public

!    License along with this library; if not, write to the Free Software

!    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307

!    USA

module fldebug_parameters

  !!< Debug specific global parameters

  implicit none

  !------------------------------------------------------------------------

  ! Parameters controlling diagnostic output.

  !------------------------------------------------------------------------

  integer, save :: current_debug_level=1, global_debug_level=1

  !! These defaults are an assumption which may not be true on all platforms.

  integer, save :: debug_error_unit=0, debug_log_unit=6

end module fldebug_parameters