Computational routine
eng


VariableResistor

File content


model VariableResistor
	Pin p, n;
	Real R "Resistance";
equation
	R*p.i = p.v - n.v;
	p.i = -n.i;
end VariableResistor;