Ejemplo n.º 1
0
 public Isotope(Radionuclide nuc, double activ = 0, Radionuclide prog = Radionuclide.Un)
 {
     ln2          = Math.Log(2);
     nuclide      = nuc;
     isotope_name = Isotope_by_name(nuc);
     A_Z_Radionuclide(nuc, out A, out Z);
     decay_type = Emission_Radionuclide(nuc);
     half_life  = halflife_Radionuclide(nuc);
     activity   = activ;
     N          = activity * half_life / ln2;
     progeny    = prog;
 }
Ejemplo n.º 2
0
        public Isotope(string name, double half_l, int z = 0, int a = 0, double activ = 0, Emission_type type = Emission_type.ALPHA, double a_prob = 1.0, Radionuclide progen = Radionuclide.Un)
        {
            ln2 = Math.Log(2);

            nuclide      = Radionuclide.Un;
            isotope_name = name;

            half_life  = half_l;
            activity   = activ;
            N          = activity * half_life / ln2; //Check this!
            decay_type = type;
            Z          = z;
            A          = a;

            //Advanced:
            progeny = progen;
            A_prob  = a_prob;
            B_prob  = 1 - A_prob;

            //Dose sim:
            excited = false;
        }