139     Real Vsrc, Imeas;  in Objective_DiodeCircuit()  local
142       input_file >> Vsrc;  in Objective_DiodeCircuit()
144       (*Vsrc_)[i] = Vsrc;  in Objective_DiodeCircuit()
452   Real diode(const Real I, const Real Vsrc, const Real Is, const Real Rs){  in diode()  argument
453     return I-Is*(exp((Vsrc-I*Rs)/Vth_)-1);  in diode()
457   Real diodeI(const Real I, const Real Vsrc, const Real Is, const Real Rs){  in diodeI()  argument
458     return 1+Is*exp((Vsrc-I*Rs)/Vth_)*(Rs/Vth_);  in diodeI()
462   Real diodeIs(const Real I, const Real Vsrc, const Real Is, const Real Rs){  in diodeIs()  argument
463     return 1-exp((Vsrc-I*Rs)/Vth_);  in diodeIs()
467   Real diodeRs(const Real I, const Real Vsrc, const Real Is, const Real Rs){  in diodeRs()  argument
468     return Is*exp((Vsrc-I*Rs)/Vth_)*(I/Vth_);  in diodeRs()
472   Real diodeII(const Real I, const Real Vsrc, const Real Is, const Real Rs){  in diodeII()  argument
473     return -Is*exp((Vsrc-I*Rs)/Vth_)*(Rs/Vth_)*(Rs/Vth_);  in diodeII()
477   Real diodeIIs(const Real I, const Real Vsrc, const Real Is, const Real Rs){  in diodeIIs()  argument
478     return exp((Vsrc-I*Rs)/Vth_)*(Rs/Vth_);  in diodeIIs()
482   Real diodeIRs(const Real I, const Real Vsrc, const Real Is, const Real Rs){  in diodeIRs()  argument
483     return (Is/Vth_)*exp((Vsrc-I*Rs)/Vth_)*(1-(I*Rs)/Vth_);  in diodeIRs()
487   Real diodeIsIs(const Real I, const Real Vsrc, const Real Is, const Real Rs){  in diodeIsIs()  argument
492   Real diodeIsRs(const Real I, const Real Vsrc, const Real Is, const Real Rs){  in diodeIsRs()  argument
493     return exp((Vsrc-I*Rs)/Vth_)*(I/Vth_);  in diodeIsRs()
497   Real diodeRsRs(const Real I, const Real Vsrc, const Real Is, const Real Rs){  in diodeRsRs()  argument
498     return -Is*exp((Vsrc-I*Rs)/Vth_)*(I/Vth_)*(I/Vth_);  in diodeRsRs()
508   Real Newton(const Real I, const Real Vsrc, const Real Is, const Real Rs){  in Newton()  argument
513     Real fval  = diode(IN,Vsrc,Is,Rs);  in Newton()
523       dfval = diodeI(IN,Vsrc,Is,Rs);  in Newton()
531       fval_tmp = diode(IN_tmp,Vsrc,Is,Rs);  in Newton()
535         fval_tmp = diode(IN_tmp,Vsrc,Is,Rs);  in Newton()
657   Real lambertWCurrent(Real Is, Real Rs, Real Vsrc){  in lambertWCurrent()  argument
658     Real arg1        = (Vsrc + Is*Rs)/Vth_;  in lambertWCurrent()