function mcs_init
%
%
% COPYRIGHT (c) 2008
% 
% Applied Research Laboratories, The University of Texas at Austin
% (ARL:UT)
% All rights reserved.
% 
% This material may be reproduced by or for the U.S. Government
% only. This notice must appear in all copies of this file and its
% derivatives. Further distribution outside the U.S. Government is
% prohibited without the explicit written authorization from the
% Director of the Environmental Sciences Laboratory, ARL:UT.
% 
% THIS SOFTWARE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND,
% EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO THE
% IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
% PURPOSE, OR NONINFRINGEMENT.
% 
% IN NO EVENT WILL ARL:UT BE LIABLE FOR ANY DAMAGES WHATSOEVER ARISING
% OUT OF THE USE OR INABILITY TO USE THIS SOFTWARE, EVEN IF ARL:UT HAS
% BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
mcs_global
%
MCS.iiprog=1;
MCS.fft_files=[]; MCS.fft_root=[]; MCS.fft_root2=[];
MCS.cts_files=[]; MCS.cts_root=[]; 
MCS.data_files=[]; MCS.data_root=[]; MCS.data_last=[];
MCS.tape_files={'\\.\tape0';'\\.\tape1';'\\.\tape2'}; MCS.tape_root=[];
MCS.geom_files=[]; MCS.geom_file=[];
MCS.out_root=[]; MCS.src_files=[]; MCS.src_root=[]; MCS.wf_root=[];
MCS.mcs_files=[]; MCS.mcs_root=[]; MCS.TLm_root=[]; MCS.AN_root=[];
MCS.SL_files=[]; MCS.SL_root=[]; 
MCS.hdf_files=[]; MCS.hdf_root=[];
MCS.freq_lim=[10,150]; MCS.freq_bands=[10,150];
MCS.f_bb=0;
%
MCS.bf_type={'CBF';'MVDR';'WNGC ABF';'WNGC DMR'}; MCS.iibf_type=1;
iiabf=0; D=32; db_red=-3; db_tol=0.5; ii_fdep=1; alpha=-10;
MCS.abf_parm=[iiabf D db_red db_tol ii_fdep alpha];
%
MCS.nf_bf=0; MCS.f_bf=[]; MCS.iifbin=[]; MCS.rvec_bw=-1.5; MCS.nbin=[];
MCS.tspec_opt={'Seq number';'HHMM';'Decimal hrs'};
MCS.tspec=3;
MCS.Tlims=[1,100]; MCS.tau_lim=[0,.5]; MCS.ctau_lim=[-.5,.5]; MCS.iihr=1;
MCS.th_lim=[0];
MCS.phi_lim=[-1,1,91]; MCS.iisin=1;
MCS.xc_aper=[2.5,20];
MCS.bf_aper=[.2,30];
MCS.iivar=1; MCS.fac_var=2;
MCS.cavg=[]; MCS.xyz_all=[]; MCS.nph_all=0; MCS.nph_geom=0; MCS.xyz=[]; 
MCS.phones=0; MCS.iiph=[]; MCS.nrec=0;
MCS.ph_pairs=[1 2];
MCS.fft_parm=[0 0 0 0 0 0 0 0];
MCS.fft_Tlims=[0 0; 0 0];
MCS.btr=[]; MCS.iinm=1;
MCS.lg_parms=[0 0 0 0 0 0 0 0 0 0];
MCS.sg_parms=[-1 0 0 0 1 1 0 0 0 0]; MCS.rep_files=[]; MCS.rep_root=[];
MCS.iienv_codes=[0 -1 2 1];
MCS.wf_dir=[]; MCS.rep_dir=[];
MCS.rep_iiph=[]; MCS.rep_iiseq=[]; MCS.rep_parm=[0 0 0 0 0 0 0];
MCS.rm_parms=[1 0 0 0 0 0]; MCS.rm_Df=[0 0 1]; MCS.v_10km=[0 0 1];
MCS.clim=[60,120]; MCS.xclim=[-.1,.2]; MCS.psize=[5,2]; MCS.SL=185; 
MCS.ii_phavg=0;
%%MCS.ii_jump=0; MCS.SL_jump=0; 
MCS.mc_phis=0; MCS.mc_parms=[0 0 0 0 0 0 0 0 0 0]; MCS.mc_mcc=0; MCS.mc_cts2fft=1;
MCS.cts_parms=[-50 -50 0 0]; MCS.PRI=0;
MCS.make_types={'User Defined';'SWAMI';'HLAB';'DVLA2002_OMNI';'DVLA2002_DIFAR';'DVLA2002_ALL';'TVLA';'TEAC'};
MCS.make_array(1:6)=0;
%            type	fs 		cal  	Jday1  	Jhour1 	Jhour2 	mult JdayGUI Jday2
MCS.make_parms=[1	2400	1995	  1 	     0	     1 	0       1      1       0   0   0   0  0  0];
% MCS.rsp_arrays={'DVLA','SW DIFAR1','SW DIFAR2','Fleet DIFAR','VLAD','Ref Phone'};
% MCS.rsp_parms=[1 1 0 0 0 0 0 0 0 0];
MCS.hla_fs_opts={'1200','2000'}; MCS.hla_fs_ii=2;
MCS.ii_TL=1; MCS.TL_freq=[120 150]; MCS.iiAN_corr=0;
MCS.ii_AN=1; MCS.AN_freq=[100 120; 150 170];
MCS.ii_SL=0; MCS.SL_freq=[100 120];
MCS.SL_use=0; MCS.SL_parms=[9, 10];
MCS.ii_sc2=0;
%
MCS.comb_parms=[4 7 0 0 0 0 0 0 0 0  1 1 1 1 1 1 1 1 1 1];
MCS.comb_cts=[];
MCS.comb_files=cell(MCS.comb_parms(2),1);
MCS.comb_levels=-999*ones(2,MCS.comb_parms(2));
MCS.comb_offsets=zeros(1,MCS.comb_parms(2));
%
MCS.spike_parms=[0 120];
%
MCS.hdf_nset=0; MCS.hdf_sets=[]; 
MCS.hdf_jset=1; MCS.hdf_rank=1; MCS.hdf_dims=[20,20]; MCS.hdf_dim_names=[];
MCS.hdf_dim_lims={[],[],[],[],[],[],[]};
MCS.v_opts=[1 1 0 0 0 0 0 0 0 0];
%
MCS.swami_cal_opts={'19400','121','1995','3990','1'}; MCS.swami_cal_ii=2;
%tms
MCS.TAPE.isatape=0;
MCS.TAPE.Tfid=[];
% MCS.TAPE.buf=[];
% MCS.TAPE.ii_buf=[];
MCS.TAPE.maxsamp=[];
MCS.TAPE.blocksize=65536;
MCS.TAPE.use_fp=0;
MCS.TAPE.nchan=31;
MCS.TAPE.array_type=MCS.make_types(MCS.make_parms(1));
MCS.TAPE.ii_cal=0; MCS.TAPE.cal_files=[]; MCS.TAPE.cal_root=[];
%tms
MCS.dir=[pwd '\'];
MCS.TAPE.hlab_endian={'GCT-Little Endian';'DC02-Big Endian'};
MCS.TAPE.iihlab_endian=2;

MCS.TAPE.byteswap_yn={'No','Yes'};
MCS.TAPE.iibyteswap=2;
MCS.TAPE.byteswap=2;
MCS.TAPE.file_header_bytes=0;
MCS.TAPE.file_footer_bytes=0;
MCS.TAPE.record_header_bytes=0;
MCS.TAPE.record_footer_bytes=0;
MCS.TAPE.nbyte_sample=2;
MCS.TAPE.nsamp=1000;
MCS.TAPE.data_formats={'uint8';'uint16';'uint32';'int8';'int16';'int32'};
MCS.TAPE.iidata_formats=5;
MCS.TAPE.ii_cal=0;
TAPE.cal_root=[];

MCS.batch=0;
