Subversion Repositories Electronics.Rangefider

.SUBCKT p_type_laser_diode A K OPTW PARAMS: seff=0.85 ith=450m rs=0.1


*voltage source to measure diode current
VIMEAS LA ANODE DC 0
DLASER ANODE LK diode_basic

*Optical power from ABM source
*Use of softplus function for fully continuous model
*BVOPT OPTW 0 V = { (seff/646) * ln(1 + exp(646*(I(VIMEAS) - ith * exp((temp - 27)/100) )) ) }
BVOPT OPTW 0 V = {if(I(VIMEAS) - ith*exp((temp - 27)/100) - 0.5, seff*(I(VIMEAS) - ith*exp((temp - 27)/100)), 0)}

.model diode_basic D(RS={rs})

.ends