package Circuitos2
  package Interfaces
    connector Pin
      Real v;
      flow Real i;
    end Pin;
  end Interfaces;

  package Componentes
    model Capacitor
      Interfaces.Pin p,n;
      Real v, i;
      parameter Real C=1;
    equation
      C * der(v) - i = 0;
      p.v-n.v = v;
      p.i=i;
      p.i+n.i=0;
    end Capacitor;

  model Inductor
      Interfaces.Pin p,n;
      Real v, i;
    parameter Real L=1;
  equation
    L * der(i) - v = 0;
      p.v-n.v = v;
      p.i=i;
      p.i+n.i=0;
  end Inductor;

  model Resistor
      Interfaces.Pin p,n;
      Real v, i;
    parameter Real R=1;
  equation
    R * i - v = 0;
      p.v-n.v = v;
      p.i=i;
      p.i+n.i=0;
  end Resistor;

  model Ground
    Interfaces.Pin p;
  equation
    p.v = 0;
  end Ground;
  end Componentes;
  
  package Ejemplos
  model RLC3
    Componentes.Capacitor cap(v.start=1);
    Componentes.Inductor ind;
    Componentes.Resistor res, res2(R=2);
    Componentes.Ground gr;
  equation
    connect(cap.p,res2.p);
    connect(res2.n,ind.p);
    connect(res2.n,res.p);
    connect(cap.n,gr.p);
    connect(ind.n,gr.p);
    connect(res.n,gr.p);
  end RLC3;
  end Ejemplos;
end Circuitos2;