yatak_dengeli.mlx

yatak_dengeli.mlx

function [A_yatagi, B_yatagi] = dengeli_yatak_kuvvetleri(W, S1, Q1, Q2, m1, m2, D, E,L,A, B, mL, mR, Qr, Ql, RbL, RbR)
% Statik denge şartından toplam kuvvetler ve toplam moment 0 olmalı
V = pi * (W/30); % Mil hız
% X ekseninde
% A yatağına göre moment
Bx = (mL*cosd(Ql)*S1*RbL*V^2+mR*cosd(Qr)*(L+S1)*RbR*V^2+m2*cosd(Q2)*(A+B+S1)*E*V^2+m1*cosd(Q1)*(A+S1)*D*V^2)/(L+S1+S1);
Ax = Bx - (mL*cosd(Ql)*RbL*V^2 + mR*cosd(Qr)*RbR*V^2 + m2*cosd(Q2)*E*V^2 + m1*cosd(Q1)*D*V^2);%- m1 * cosd(Q1) * V^2 + m2 * cosd(Q2) * V^2 - mL * cosd(Ql) * V^2 - mR * cosd(Q2) * V^2;

% Y ekseninde
% A yatağına göre moment
By = (mL*sind(Ql)*S1*RbL*V^2+mR*sind(Qr)*(L+S1)*RbR*V^2+m2*sind(Q2)*(A+B+S1)*E*V^2+m1*sind(Q1)*(A+S1)*D*V^2)/(L+S1+S1);
Ay = By - (m1*sind(Q1)*D* V^2 + m2*sind(Q2)*E*V^2 + mL*sind(Ql)*RbL*V^2 + mR*sind(Qr)*RbR*V^2);
A_yatagi = sqrt(Ax^2 + Ay^2);
B_yatagi = sqrt(Bx^2 + By^2);