_jh_fp3.wxmx

kill(all);

ro:1000; g:9.81; H1:3; p_a:101325; B:2; H2:1.5;

Plate Left

h_c1:H1/2,numer;

p_c1:ro*g*h_c1;

w1:H1*B;

P_x1:p_c1*w1;

I_01:(B*(H1**3))/(12),numer;

h_d1:h_c1+(I_01/(h_c1*w1));

Plate Righr

h_c2:H2/2,numer;

p_c2:ro*g*h_c2;

w2:H2*B;

P_x2:p_c2*w2;

I_02:(B*(H2**3))/(12),numer;

h_d2:h_c2+(I_02/(h_c2*w2));

h_d1_1:H1-h_d1;

h_d2_1:H2-h_d2;

P:P_x1-P_x2;

mP:h_d1_1*P_x1-h_d2_1*P_x2;

h_D:mP/P;

D:\_jknuba_25_26_autem\_jg_Lections\_j_knuba_hydraulics\_jh_fp3_v1.jpg

# K123 two plates

P1:integrate(ro*g*(H1-h)*B,h,0,H1);

'integrate(ro*g*(H1-h)*B,h,0,H1);

mP1:integrate(ro*g*(H1-h)*B*h,h,0,H1);

'integrate(ro*g*(H1-h)*B*h,h,0,H1);

P2:integrate(ro*g*(H2-h)*B,h,0,H2);

mP2:integrate(ro*g*(H2-h)*B*h,h,0,H2);

h_D_k123:(mP1-mP2)/(P1-P2);

'h_D_k123=('mP1-'mP2)/('P1-'P2);