TDCRPy 0.0.1__tar.gz

TDCRPy-0.0.1/Code/Activity_TDCR.py

@@ -0,0 +1,305 @@
+# -*- coding: utf-8 -*-
+"""
+Created on Fri Apr 14 20:43:26 2023
+
+@author: romain.coulon
+"""
+import matplotlib.pyplot as plt
+import numpy as np
+import scipy.signal as sg
+import scipy.optimize as opt
+import sys
+sys.path.insert(1, 'G:\Python_modules\BIPM_RI_PyModules')
+import  TDCRcalculation as dtc  
+    
+    
+def readEff(Rad, kB, SDT):
+    file = open("G:\Python_modules\TDCRPy\TDCRPy\Code\\EfficiencyCurves/"+''.join(Rad)+"/Eff"+SDT+"_"+''.join(Rad)+'_[1]_'+str(kB)+".txt","r")
+    L=[]
+    p=[]
+    up=[]
+    for row in file:
+        H=row.split(" ")
+        L.append(float(H[0]))
+        p.append(float(H[1]))
+        up.append(float(H[2]))
+    return L, p, up
+
+def readProfil(Rad,kB,SDT):
+    Lv, pSv, upSv = readEff(Rad, kB, SDT)
+    pSv = sg.savgol_filter(pSv, 7, 2)
+    return Lv, np.asarray(pSv), upSv
+
+def res(L, TD, Lv, pDv, pTv):
+    return (np.interp(L, Lv, pTv)/np.interp(L, Lv, pDv)-TD)**2
+
+def effTDCR(TD, Rad, kB):
+    kBv = [0.8e-5, 0.9e-5, 1.0e-5, 1.1e-5, 1.2e-5]
+    Lv0 = readProfil(Rad,0.8e-5,"D")[0]
+    pDv=[]; pTv=[]; Lv1=[]; effD1=[]; effT1=[]
+    for i in kBv:
+        pDv.append(readProfil(Rad,i,"D")[1])
+        pTv.append(readProfil(Rad,i,"T")[1])
+        Lv1.append(opt.minimize_scalar(res, args=(TD, Lv0, pDv[-1], pTv[-1]), method='golden').x)
+        effD1.append(np.interp(Lv1[-1], Lv0, pDv[-1]))
+        effT1.append(np.interp(Lv1[-1], Lv0, pTv[-1]))
+    L = np.interp(kB, kBv, Lv1)
+    effD = np.interp(kB, kBv, effD1)
+    effT = np.interp(kB, kBv, effT1)
+     
+    # plt.figure("eff_D = f(kB)")
+    # plt.clf()
+    # plt.title('  ')
+    # plt.plot(kBv, effD1,'-b')
+    # plt.plot(kB, effD, 'or')
+    # plt.xlabel(r"$kB$ /(cm keV$^{-1}$)", fontsize = 14)
+    # plt.ylabel(r"$\epsilon_D$", fontsize = 14)
+    # plt.legend(fontsize = 12)
+    # # plt.close()
+    
+    # plt.figure("eff_T = f(kB)")
+    # plt.clf()
+    # plt.title('  ')
+    # plt.plot(kBv, effT1,'-b')
+    # plt.plot(kB, effT, 'or')
+    # plt.xlabel(r"$kB$ /(cm keV$^{-1}$)", fontsize = 14)
+    # plt.ylabel(r"$\epsilon_T$", fontsize = 14)
+    # plt.legend(fontsize = 12)
+    # # plt.close()
+    
+    # plt.figure("L = f(kB)")
+    # plt.clf()
+    # plt.title('  ')
+    # plt.plot(kBv, Lv1,'-b')
+    # plt.plot(kB, L, 'or')
+    # plt.xlabel(r"$kB$ /(cm keV$^{-1}$)", fontsize = 14)
+    # plt.ylabel(r"$L$ /keV$^{-1}$", fontsize = 14)
+    # plt.legend(fontsize = 12)
+    # # plt.close()
+    
+    return L, effD, effT
+
+def plotEffProfil(Rad,kB):
+    kBv = [0.8e-5, 0.9e-5, 1.0e-5, 1.1e-5, 1.2e-5]
+    Lv0 = readProfil(Rad,0.8e-5,"D")[0]
+    pDv=[]; pTv=[]; pSv=[]
+    for i in kBv:
+        pDv.append(readProfil(Rad,i,"D")[1])
+        pTv.append(readProfil(Rad,i,"T")[1])
+        pSv.append(readProfil(Rad,i,"S")[1])
+    effS=[]; effD=[]; effT=[]
+    print("S",np.asarray(pSv)[:,0])
+    for i in range(len(Lv0)):
+        effS.append(np.interp(kB, kBv, np.asarray(pSv)[:,i]))
+        effD.append(np.interp(kB, kBv, np.asarray(pDv)[:,i]))
+        effT.append(np.interp(kB, kBv, np.asarray(pTv)[:,i]))
+    tdcr = np.asarray(effT)/np.asarray(effD)
+    
+    plt.figure("Efficiency curve eff = f(L)")
+    plt.clf()
+    plt.title('  ')
+    plt.plot(Lv0, effS,'-b', label = r"$\epsilon_{S}$, $kB$ = "+str(kB)+" cm/keV")
+    plt.plot(Lv0, effD,'-k', label = r"$\epsilon_{D}$, $kB$ = "+str(kB)+" cm/keV")
+    plt.plot(Lv0, effT,'-r', label = r"$\epsilon_{T}$, $kB$ = "+str(kB)+" cm/keV")
+    plt.xscale("log")
+    plt.xlabel(r"$L$ /keV$^{-1}$", fontsize = 14)
+    plt.ylabel(r"$\epsilon$", fontsize = 14)
+    plt.legend(fontsize = 12)
+    # plt.close()
+    
+    plt.figure("Efficiency curve eff = f(TDCR)")
+    plt.clf()
+    plt.title('  ')
+    plt.plot(tdcr, effS,'-b', label = r"$\epsilon_{S}$, $kB$ = "+str(kB)+" cm/keV")
+    plt.plot(tdcr, effD,'-k', label = r"$\epsilon_{D}$, $kB$ = "+str(kB)+" cm/keV")
+    plt.plot(tdcr, effT,'-r', label = r"$\epsilon_{T}$, $kB$ = "+str(kB)+" cm/keV")
+    # plt.xscale("log")
+    plt.xlabel(r"$\epsilon_T/\epsilon_D$", fontsize = 14)
+    plt.ylabel(r"$\epsilon$", fontsize = 14)
+    # bbox_inches = "tight", format = "png", dpi = 500
+    plt.legend(fontsize = 12)
+    # plt.close()
+    
+    
+def plotEffProfilkB(Rad,SDT): # plot the fitted efficiecny curves for a range of kB 
+    kBv = [0.8e-5, 0.9e-5, 1.0e-5, 1.1e-5, 1.2e-5]   # kB vector
+    plt.figure("Efficiency curve eff = f(TDCR)")
+    plt.clf()
+    plt.title('  ')
+    for i in kBv:                                    # loop in the kB vector
+        pDv = readProfil(Rad,i,"D")[1]               # probability vector of events
+        pTv = readProfil(Rad,i,"T")[1]               # probability vector of triple coincidence events
+        pSv = readProfil(Rad,i,"S")[1]               # probability vector of single events
+        tdcr = np.asarray(pTv)/np.asarray(pDv)       # tdcr vector
+        if SDT == "S":
+            plt.plot(tdcr, pSv, label = r"$kB$ = "+str(i)+" cm/keV")
+            plt.ylabel(r"$\epsilon_S$", fontsize = 14)
+        if SDT == "D":
+            plt.plot(tdcr, pDv, label = r"$kB$ = "+str(i)+" cm/keV")
+            plt.ylabel(r"$\epsilon_D$", fontsize = 14)
+        if SDT == "T":
+            plt.plot(tdcr, pDv, label = r"$kB$ = "+str(i)+" cm/keV")
+            plt.ylabel(r"$\epsilon$", fontsize = 14)
+        # plt.xscale("log")
+        plt.xlabel(r"$\epsilon_T/\epsilon_D$", fontsize = 14)
+        # bbox_inches = "tight", format = "png", dpi = 500
+        plt.legend(fontsize = 12)
+        plt.savefig("EfficiencyCurves/"+Rad+"/tdcr_"+Rad+".png")
+        # plt.close()
+
+def plotSmoothing(Rad,SDT): # plot the fitted efficiecny curves for a range of kB 
+    kB = 1.0e-5
+    plt.figure(r"Fitting of calculated points - $kB$ = "+str(kB)+" cm/keV")
+    plt.clf()
+    plt.title('  ')
+    pDv = readProfil(Rad,kB,"D")[1]               # probability vector of events
+    pts_D = readEff(Rad, kB, "D")
+    pTv = readProfil(Rad,kB,"T")[1]               # probability vector of triple coincidence events
+    pts_T = readEff(Rad, kB, "T")
+    pSv = readProfil(Rad,kB,"S")[1]               # probability vector of single events
+    pts_S = readEff(Rad, kB, "S")
+    tdcr = np.asarray(pTv)/np.asarray(pDv)       # tdcr vector fit
+    tdcr_x = np.asarray(pts_T[1])/np.asarray(pts_D[1]) # calculated points
+    if SDT == "S":
+        plt.plot(tdcr_x, pts_S[1], "ok", label = r"calculated points")
+        plt.plot(tdcr, pSv, label = r"fitted function")
+        plt.ylabel(r"$\epsilon_S$", fontsize = 14)
+    if SDT == "D":
+        plt.plot(tdcr_x, pts_D[1], "ok", label = r"calculated points")
+        plt.plot(tdcr, pDv, label = r"fitted function")
+        plt.ylabel(r"$\epsilon_D$", fontsize = 14)
+    if SDT == "T":
+        plt.plot(tdcr_x, pts_T[1], "ok", label = r"calculated points")
+        plt.plot(tdcr, pDv, label = r"fitted function")
+        plt.ylabel(r"$\epsilon$", fontsize = 14)
+    # plt.xscale("log")
+    plt.xlabel(r"$\epsilon_T/\epsilon_D$", fontsize = 14)
+    # bbox_inches = "tight", format = "png", dpi = 500
+    plt.legend(fontsize = 12)
+    plt.savefig("EfficiencyCurves/"+Rad+"/tdcr_"+Rad+"_fit.png")
+    # plt.close()
+
+def plotL(radv,kB,L): # plot the fitted efficiecny curves for a range of kB 
+    
+    effD = []; effT = []
+    for Rad in radv:
+        out = readProfil(Rad,kB,"D")               # probability vector of double events
+        effD.append(np.interp(L, out[0], np.asarray(out[1])))
+        out = readProfil(Rad,kB,"T")               # probability vector of triple events
+        effT.append(np.interp(L, out[0], np.asarray(out[1])))
+    
+    effD = np.asarray(effD)
+    effT = np.asarray(effT)
+    
+    x = effT/effD
+    plt.figure(r"Fitting of calculated points")#" - $kB$ = "+str(kB)+" cm/keV - $L$ = "+str(L)+" keV$^{-1}$")
+    plt.clf()
+    plt.title('  ') 
+    plt.plot(x, effD, "ok", label="TDCR model")
+    for ix, c in enumerate(x):
+        plt.text(c, effD[ix]+0.000, radv[ix], color="b")
+    plt.errorbar(0.9788, 0.9767, xerr=0.0012, yerr=0.011, fmt="or", label="experiemental result")
+    plt.text(0.9788, 0.9767, "Co-60", color = "r")
+    plt.ylabel(r"$\epsilon_D$", fontsize = 14)
+    plt.xlabel(r"$\epsilon_T/\epsilon_D$", fontsize = 14)
+    # plt.xscale("log")
+    plt.legend(fontsize = 12)
+    plt.savefig("EfficiencyCurves/ESIRIC/EfficiencyCurve.png")
+    plt.show()
+    
+    # plt.xscale("log")
+
+    # bbox_inches = "tight", format = "png", dpi = 500
+
+    # plt.close()
+
+## PLOT EFFICIENCY CURVES FOR SEVERAL KB VALUES
+# plotEffProfilkB("C-14","D")
+
+## PLOT EFFICIENCY CURVE A GIVEN KB VALUE
+# plotEffProfil("Fe-55", 1.05E-5)
+
+## PLOT THE FIT OF THE EFFICIENCY FUNCTION
+# plotSmoothing("C-14","D")
+
+## PLOT THE EFFICIENCY FOR A GIVEN FREE PARAMETER
+# plotSmoothing("C-14","D")
+
+## CALCULATION OF THE EFFICIENCY
+# Reference Point Co-60 => TDCR=0.9788 Eff_D = 0.9767 => L = 
+
+# radv = ["H-3", "He-6", "Be-7", "C-11", "C-14", "N-13", "O-15", "F-18", "Na-22", \
+# "Na-24", "Al-26", "P-32", "P-33", "S-35", "Cl-36", "Ar-41", "K-40", \
+# "Ca-41", "Ca-45", "Sc-44", "Sc-46", "Sc-47", "Ti-44", "Cr-51", \
+# "Mn-52", "Mn-52m", "Mn-54", "Mn-56", "Fe-52", "Fe-55", "Fe-59", "Co-56", \
+# "Co-57", "Co-58", "Co-60", "Ga-66", "Ni-57", "Ni-59", "Ni-63", "Zn-65", \
+# "I-123", "Sb-124", "Sb-125", "Te-123m", "Te-127", "Te-127m", "Te-132", \
+# "Pu-241"]
+
+
+radv = ["Fe-55"]
+kB = 1.0e-5
+L = 1.13
+plotL(radv, kB, L)
+
+# AB = 657.296
+# BC = 695.919
+# AC = 693.579
+# T = 448.868
+# D = AB+BC+AC-2*T
+# out = effTDCR(T/D, "H-3", 1.05E-5) # H-3
+# plotEffProfil("H-3", 1.05E-5)
+
+# AB = 864.95
+# BC = 1006.58
+# AC = 968.45
+# T = 700
+# D = 1000
+# XX = (D + 2*T)/3
+# print(XX)
+# print(T/D)
+# D = AB+BC+AC-2*T
+
+# TDCR = [0.3, 0.4, 0.5, 0.6, 0.7, 0.8, 0.9]
+# kB = 0.8E-5
+# rad = "C-14"
+# TDCR.reverse()
+# for t in TDCR:
+#     eff = effTDCR(t, rad, kB)[1] # H-3
+#     eff2 = dtc.I2calc(t, 0, 0, 0, rad, kB*1e3)[2]
+#     digRound = 2
+#     print("Efficiency of double coincidences = ", round(100*eff2, digRound),"% - ", round(100*eff, digRound),"%")
+
+    
+
+
+
+# DT = 0.977784348 # Co-60 NIST
+# uDT = 0.000711023 # Co-60 NIST
+# D = 84679.21179
+# nMc = 1e3
+# eff_v = []
+# kB1 = 0.8e-5
+# kB2 = 1.2e-5
+# for i in range(int(nMc)):
+#     dti = np.random.normal(DT,uDT)
+#     kBi = np.random.uniform(kB1,kB2)
+#     eff_v.append(effTDCR(dti, "Co-60", kBi)[1]) # Co-60 NIST
+# eff = np.median(eff_v)
+# u_eff = np.std(eff_v)
+# A = D/eff
+# uA = D*u_eff/eff**2
+# result 87099      67             (err = 0.0002) kB = 0.01
+# result 87045      88             kB = [0.008 - 0.012]
+# I2 86640.31523	14.64334414
+# A_NIST = 86920    200
+
+# out = effTDCR(657.296, 695.919, 693.579, 448.868) # Co-60
+# print("Efficiency of double coincidences = ", round(100*eff, digRound),"+/-", round(100*u_eff, digRound),"%")
+# print("Efficiency of triple coincidences = ", round(100*out[2], digRound),"%")
+# print("Activity from double coincidences = ", round(A, digRound), "+/-", round(uA, digRound) ,"Bq")
+# print("Activity of triple coincidences = ", round(T/out[2], digRound), "Bq")
+# print("Efficiency of double coincidences (asym) = ", round(100*out[3], digRound),"%")
+# print("Efficiency of triple coincidences (asym) = ", round(100*out[5], digRound),"%")
+# print("Activity from double coincidences (asym) = ", round(D/out[3], digRound), "Bq")
+# print("Activity of triple coincidences (asym) = ", round(T/out[5], digRound), "Bq")

TDCRPy-0.0.1/Code/EfficiencyProfils.py

@@ -0,0 +1,96 @@
+# -*- coding: utf-8 -*-
+"""
+Created on Wed Jul  5 10:04:23 2023
+
+@author: romain.coulon
+"""
+import TDCR_model_lib as tl
+import TDCRPy as td
+import matplotlib.pyplot as plt
+
+## INPUT OF THE MODEL
+# N=1                   # number of simulated decay (MC trials)
+N= 10000
+Rad="Co-60, H-3"            # list of radionuclides (Na-24)
+# Rad = ["Cs-137"]
+pmf_1="0.5, 0.5"                # relative abondance (pmf)
+kB =[1.0e-5]
+# kB = [0.8e-5, 0.9e-5, 1.0e-5, 1.1e-5, 1.2e-5]    # Birks constant in cm/keV
+L=[1.13]
+# L = np.logspace(-3,1,50) # Free paramete in keV-1
+
+Record = False                  # to record the efficiency curves
+# Record = True                  # to record the efficiency curves
+# Display = False               # to display calculation results on the console
+Display = True                # to display calculation results on the console
+# RHO = 0.96         #density of absorber (Toluene) g/cm3
+RHO = 0.98           #density of absorber (UG + H20) g/cm3
+nE = 1000            #number of bin to discretize the energy vector for scintillation quenching calculation
+mode = "eff"
+#meta_vec = ["Am-242m","Pa-234m","Pm-148m","Pr-144m","Xe-133m","Te-127m","Ag-110m","Ag-108m","Tc-99m","Nb-95m","Y-90m","Mn-52m"]
+
+TDCR_measure = 0.977784        # Measured TDCR value
+u_TDCR_measure = 0.000711      # standard uncertainty
+TAB=0.8
+TBC=0.8
+TAC=0.8
+
+for kB_i in kB: # Loop on the kB
+    mean_efficiency_S = []  # efficiency of single counte rate
+    std_efficiency_S = []   # std
+    mean_efficiency_T = []  # efficiency of triple coincidence counte rate
+    std_efficiency_T = []   # std
+    mean_efficiency_D = []  # efficiency of double coincidence counte rate
+    std_efficiency_D = []   # std
+    TDCR_calcul = []
+    for L_i in L: # loop on the free parameter values
+        efficiency_S = []        # results calculated efficiency for single events
+        efficiency_D = []        # results calculated efficiency for double coincidence
+        efficiency_T = []        # results calculated efficiency for triple coincidence
+        
+        out=td.TDCRPy(L_i,TDCR_measure,TAB, TBC, TAC, Rad,pmf_1,10,kB_i,RHO,nE,mode="eff",mode2="sym",Display=True)
+        efficiency_S.append(out[0])
+        std_efficiency_S.append(out[1])
+        efficiency_D.append(out[2])
+        std_efficiency_D.append(out[3])
+        efficiency_T.append(out[4])
+        std_efficiency_T.append(out[5])
+        
+        if len(L) > 1: print("\n\t\t Progress = ", round(100*(L.tolist().index(L_i)+1)/len(L), 1), " %")
+        print("\t\tradionuclide(s): ", Rad)
+        print("\t\t TDCR calculation _ kB = ", kB_i, "cm/keV")
+        print("\t\t Free parameter = ", L_i, " keV-1")
+        print("\t\t Efficiency of Triple coincident events = ", round(100*efficiency_T[-1],3), "+/-", round(100*std_efficiency_T[-1],3), " %")
+        print("\t\t Efficiency of Double coincident events = ", round(100*efficiency_D[-1],3), "+/-", round(100*std_efficiency_D[-1],3), " %")
+        print("\t\t Efficiency of Single events = ", round(100*efficiency_S[-1],3), "+/-", round(100*std_efficiency_S[-1],3), " %")
+
+    if len(mean_efficiency_S)>1:
+        plt.figure("Efficiency curve I")
+        plt.clf()
+        plt.title(''.join(Rad))
+        plt.errorbar(L, mean_efficiency_S, yerr = std_efficiency_S, fmt=".b", label = "S")
+        plt.errorbar(L, mean_efficiency_D, yerr = std_efficiency_D, fmt=".k", label = "D")
+        plt.errorbar(L, mean_efficiency_T, yerr = std_efficiency_T, fmt=".r", label = "T")
+        plt.xscale("log")
+        plt.xlabel(r"$L$ /keV$^{-1}$", fontsize = 14)
+        plt.ylabel(r"$\epsilon$", fontsize = 14)
+        plt.legend(fontsize = 12)
+        if Record: plt.savefig("EfficiencyCurves/"+''.join(Rad)+"/fom_"+''.join(Rad)+"_"+str(kB_i)+".png")
+        plt.close()
+                
+        plt.figure("Efficiency curve II")
+        plt.clf()
+        plt.title(''.join(Rad))
+        plt.errorbar(TDCR_calcul, mean_efficiency_S, yerr=std_efficiency_S, fmt=".b", label = "S")
+        plt.errorbar(TDCR_calcul, mean_efficiency_D, yerr=std_efficiency_D, fmt=".k", label = "D")
+        plt.errorbar(TDCR_calcul, mean_efficiency_T, yerr=std_efficiency_T, fmt=".r", label = "T")
+        plt.xlabel(r"$\epsilon_T/\epsilon_D$", fontsize = 14)
+        plt.ylabel(r"$\epsilon_D$", fontsize = 14)
+        plt.legend(fontsize = 12)
+        if Record: plt.savefig("EfficiencyCurves/"+''.join(Rad)+"/tdcr_"+''.join(Rad)+"_"+str(kB_i)+".png")
+        plt.close()
+    
+    if Record:
+        tl.writeEffcurves(L, mean_efficiency_S, std_efficiency_S, Rad, pmf_1, kB_i, "S")
+        tl.writeEffcurves(L, mean_efficiency_D, std_efficiency_D, Rad, pmf_1, kB_i, "D")
+        tl.writeEffcurves(L, mean_efficiency_T, std_efficiency_T, Rad, pmf_1, kB_i, "T")