c
c=======================================================================
c  Include file "xtr_opts.h"
c=======================================================================
c
#ifndef rmdocinc
c  Extraction parameters for each sub-domain:
c
c  DT_XTR      extraction (boundary conditions) sampling rate
c              (timestep units, integer array).
c  NSUBDOM     number of sub-domains to extract.
c  TINDX_XTR   counter for NetCDF time dimension (integer array).
c  TEND_XTR    ending extraction timestep (integer array).
c  TSTR_XTR    starting extraction timestep (integer array).
c  TNEXT_XTR   next timestep to process (integer array).
c  XTR_NAME    input/output extraction NetCDF filename (character array).
c  
c=======================================================================
c
#endif
      common /xtr_opts/ nsubdom,tstr_xtr,tend_xtr,dt_xtr,tnext_xtr,
     *       tindx_xtr
      integer nsubdom
      integer dt_xtr(msubdom),tend_xtr(msubdom),tindx_xtr(msubdom),
     *        tnext_xtr(msubdom),tstr_xtr(msubdom)
c
      common /xtr_file/ xtr_name
      character*80 xtr_name(msubdom)