Kern- und Teilchenphysik - Blatt 9

<< Graphics`Graphics`

3. Aufgabe

λSe = Log[2]/120; N0 = 3.4;

DisplayTogether[Plot[N0 Exp[-2 λSe t], {t, 0, 305}], 
        Plot[-2 N0 (Exp[-2 λSe t] - 
                Exp[- λSe t]), {t, 0, 440}], 
        ImageSize -> 550, 
        AxesLabel -> {"delay time (d)", "concentration (10^12 \
cm^-3)"}];

4. Aufgabe

h = 6.626076 10^(-34); hbar = h/(2 π); 
    em = 1.602177 10^(-19); c0 = 3 10^8; 
    u = 1.660538782 10^-27; mNa = 22.989770 u; 
    mCd = 111 u; λ = 590 10^-9; 
    EgammaCd = 247 10^3 em; νgammaCd = EgammaCd/h;

vNa = Sqrt[1/(1 + mNa^2 c0^2 λ^2/h^2)]

vNa = 
      Sqrt[1/(1 + mNa^2 c0^4/(h^2 νgammaCd^2))]

ErNa = h^2/(2 mNa λ^2)/em

ErCd = h^2 νgammaCd^2/(2  mCd c0^2)/em