model fonteDegrau
  connectorEletrico p,n;
  Modelica.SIunits.Voltage v;
  Modelica.SIunits.Current i;
  parameter Modelica.SIunits.Voltage V0 = 1.0;
  parameter Modelica.SIunits.Time t0 = 0.0;
equation
  v = if time < t0 then 0.0 else V0;
  i = p.i;
  v = p.v - n.v;
  p.i + n.i = 0;
end fonteDegrau;