.PS cct_init # Usual defs... qrt=dimen_/4; hlf=dimen_/2; dim=dimen_; diode(up_); llabel(0$mA$,,10V) resistor(up_); llabel(,1k\Omega,) line right_ hlf {line up_ qrt; "10V" above} line right_ hlf resistor(down_);llabel(,1k\Omega,) diode(down_);llabel(0V,,10$mA$) line left_ hlf ground line left_ hlf "\tiny IdealDiode2" at (dim,-hlf) .PE