% application_setup  
%  
% - Necessary partemeter is read to reworkspace.
% - Open simulink file.

% LeverRateControlモデルパラメータロード
run('PreLoadLeverRateControl.m');

% Parmeter Data Item
T1 = 0.01;      % 時定数T1=0.01 [s]
K1 = 1.0;       % ゲインK1=1.0 [-]
K2 = 1.0;       % ゲインK2=1.0 [-]
K3 = 1.0;       % ゲインK3=1.0 [-]
dT = 0.01;      % サンプル周期dT=0.01 [s]

% サンプリング時間設定
t = (0.0:dT:10.0);
sysdNUM = 0.1;
sysdDEN = 0.1;
sysdNUM2 = 0.1;
sysdDEN2 = 0.1;


% 一次遅れ系伝達関数作成
%num = K1;
%den = [T1 1.0 0];
%sysc = tf(num, den);                % 伝達関数 K1/{s･(T1･s + 1)}
%sysd = c2d(sysc, dT, 'tustin');     % 伝達関数の離散化
% 離散多項式の係数作成
%[sysdNUM, sysdDEN] = tfdata(sysd, 'v');

% 積分ブロック作成
%num2 = K2;
%den2 = [1.0 0];
%sysc2 = tf(num2, den2);             % 伝達関数 K2/s
%sysd2 = c2d(sysc2, dT, 'tustin');   % 伝達関数の離散化
% 離散多項式の係数作成
%[sysdNUM2, sysdDEN2] = tfdata(sysd2, 'v');



