D:\j_Iam_TEMP\_jh\jh_k123_momentForce.wxmx

kill(all);

G1:1;G2:6;L1:0;L2:8;G:G1+G2;L:10;

mG1:(L-L1)*G1;mG2:(L-L2)*G2;

L3:(mG1+mG2)/G,numer;

fL(L1,L2,G1,G2):=(L1*G1+L2*G2)/(G1+G2);

fL((L-L1),(L-L2),G1,G2),numer;

size1:sqrt(G1),numer;size2:sqrt(G2),numer;

del1:0.5;

 draw2d(xrange = [-2,13],
yrange = [-5,6],
  font      = "Arial",
           font_size = 30,
title="jh_k123_momentForce.wxmx",
  grid = true,
  proportional_axes=xy,
line_width=4,color=black,
   fill_color = "#eeeeee",
rectangle([-size1/2+L1,-size1/2+L1],[size1/2+L1,size1/2+L1]),
    rectangle([-size2/2+L2,-size2/2],[size2/2+L2,size2/2]),
     points_joined = false,
    color=red,
   point_size=1,
   line_width=1.3,
   line_type = solid,
point_type = filled_circle,
points([[L1,0],[L2,0],[L,0],[L3,4]]),
    label(["G1=+1",L1,-size1/2-del1]),
     label(["G2=+6",L2,-size2/2-del1]),
     points_joined = true,
   point_size=0.1,
   line_width=1.3,
   line_type = solid,
points([[L1,0],[L1,4],[L2,4],[L2,0],[L2,4],[L,4],[L,0]]),
     line_type = solid,
   color=black,line_width=1,
   head_both = true,
   head_length = 0.4,
   head_angle = 10,
vector([L1,-4],[(L-L1),0]),
    label(["L1",(L-L1)/2,-4+del1/2]),
    vector([L2,-3],[(L-L2),0]),
    label(["L2",(L-L2)/2+L2,-3+del1/2]),
    color=red,
    vector([L3,3],[(L-L3),0]),
    label(["L3=?",(L-L3)/2+L3,3+del1]),
    head_both = false,
     vector([L3,4],[0,3*del1]),
    label(["G=G1+G2",L3,4.5]),
      /*  GPL */
font      = "Arial",
           font_size = 16,
  color = "#0e406e",
label_orientation = 'vertical,
label(["www.k123.org.ua ",12,1.3]),
  label(["Kopanytsia Y (c)  2025",12.5,1.3])
   )$ 