0001
0002
0003
0004
0005
0006
0007
0008
0009 global RELEASE
0010
0011 OFF = 0;
0012 ON = 1;
0013 RIGID = 0;
0014 YIELDING = 1;
0015 FLOW = 0;
0016 PRESSURE = 1;
0017 CLOSE = 0;
0018 OPEN = 1;
0019 SHORT_CIRCUIT = 0;
0020 RL_CIRCUIT = 1;
0021 BESSEL_FUNCTION= 2;
0022
0023 TIME_VARYING = 1;
0024 STATIONARY = 0;
0025
0026 UNIFROM_TUBE = 0;
0027 FROM_FILE = 1;
0028 T2MODEL = 2;
0029 P3MODEL = 3;
0030 ART_MODEL = 4;
0031
0032 Utube_par = struct(...
0033 'area',6.0,...
0034 'length',17.5,...
0035 'nss',17,...
0036 'anc',0);
0037 T2model_par = struct(...
0038 'A1',1.5,...
0039 'x1',8.5,...
0040 'A2',8.0,...
0041 'x2',8.5,...
0042 'anc',0);
0043 P3model_par = struct(...
0044 'At',2.6,...
0045 'Xt',8.0,...
0046 'Al',4.0,...
0047 'anc',0);
0048
0049 AMmodel_par = struct(...
0050 'vowel',0,...
0051 'ampar',zeros(1,7),...
0052 'anc',0);
0053
0054 nss = 17;
0055 af(1,:) = 6*ones(1,nss);
0056 af(2,:) = (17.5/nss)*ones(1,nss);
0057 AS2Fmodel_par = struct(...
0058 'nss',nss,...
0059 'af',af,...
0060 'length',17.5,...
0061 'nts',nss,...
0062 'anc',0);
0063
0064 tract_cfg = struct(...
0065 'rad_boundary',RL_CIRCUIT,...
0066 'wall',YIELDING,...
0067 'nasal_tract',OFF,...
0068 'glt_boundary',CLOSE);
0069
0070 phys_const = struct(...
0071 'ro',1.14e-3,...
0072 'c',3.5e+4,...
0073 'wall_resi',1600,...
0074 'wall_mass',1.5,...
0075 'wall_comp',3e+5);
0076
0077 data = struct(...
0078 'TC',tract_cfg,...
0079 'PC',phys_const,...
0080 'UTmpar',Utube_par,...
0081 'T2mpar',T2model_par,...
0082 'P3mpar',P3model_par,...
0083 'AMpar',AMmodel_par,...
0084 'AS2Fpar',AS2Fmodel_par);