model forcaPeso "Componente mecânico com um conector - força constante"
  constant Real g = 10.0;
  parameter Real m = 100.0;
  acoplamento b;
  Real x, P = m * g;
equation
  x = b.y;
  P + b.f = 0;
end forcaPeso;