! $Id: params.f90,v 1.1 2007/11/18 16:32:56 brandenb Exp $

!*******************************************************************************
MODULE params
  integer,parameter:: mfile=60,txt_unit=10,in_unit=11,out_unit=12,sink_unit=13
  logical,save:: do_seq_read=.false., do_seq_write=.false., do_exp=.true.
  real offset
  character(len=70),save:: hl="----------------------------------------------------------------------"
END module