In[1]:=
Laplace transform of an SD pulse with tail
In[2]:=
![c = ^(-6) (UnitStep[t] - UnitStep[t - 600 * 10^(-9)]) ^(10^7t) + (UnitStep[t - 600 * 10^(-9)] - UnitStep[t - 700 * 10^(-9)]) (-10^7t + 7)](HTMLFiles/index_2.gif){kind=small}
Out[2]=
![(7 - 10000000 t) (-UnitStep[-7/10000000 + t] + UnitStep[-3/5000000 + t]) + ^(-6 + 10000000 t) (-UnitStep[-3/5000000 + t] + UnitStep[t])](HTMLFiles/index_3.gif){kind=small}
In[3]:=
![LaplaceTransform[c, t, s]](HTMLFiles/index_4.gif){kind=small}
Out[3]=
Replace s with jw
In[4]:=
Out[4]=
In[5]:=
![Plot[Abs[d], {w, -1 * 10^8, 1 * 10^8}, ImageSize→600]](HTMLFiles/index_8.gif){kind=small}
![[Graphics:HTMLFiles/index_9.gif]](HTMLFiles/index_9.gif)
Out[5]=
In[6]:=
![LogLinearPlot[20 * Log[Abs[d]]/Log[10], {w, 1 * 10^(-5), 1 * 10^8}, ImageSize→600]](HTMLFiles/index_11.gif){kind=small}
![[Graphics:HTMLFiles/index_12.gif]](HTMLFiles/index_12.gif)
Out[6]=
In[7]:=
![LogLinearPlot[20 * Log[Abs[d]]/Log[10], {w, 1 * 10^(-5), 1 * 10^9}, ImageSize→600]](HTMLFiles/index_14.gif){kind=small}
![[Graphics:HTMLFiles/index_15.gif]](HTMLFiles/index_15.gif)
Out[7]=
In[8]:=
![Plot[180/π * ArcTan[Im[d]/Re[d]], {w, 1, 1 * 10^7}, ImageSize→600]](HTMLFiles/index_17.gif){kind=small}
![[Graphics:HTMLFiles/index_18.gif]](HTMLFiles/index_18.gif)
Out[8]=
| Created by Mathematica (January 29, 2007) |  |