// Exa 8.14.1
clc;
clear;
close;
// Given data
t_rr = 10;// in µs
Q_rr = 150;// in µc
I_rr = (2*Q_rr)/t_rr;// in A
disp(I_rr,"The peak reverse recovery current in A is");