* *=== Addrcm ===========================================================* * *======================================================================* * * * Copyright (C) 2003-2019: CERN & INFN * * All Rights Reserved. * * * * Include file Addrcm : * * * * Created on 3 September 1989 by Alfredo Ferrari * * INFN, Milan * * * * Addrcm: this common contains all useful addresses for the blank * * common (in real*4 or i*4 numeration!!!!!!!!!!!!!!!!) * * * * Mblnmx = blank common dimension in i*4/real*4 units * * * * Kblnkl = Last memory location used in the blank common * * * * Kgmbgn = Beginning of geometry data * * * * Kgmlst = Last memory location for the geometry data * * * * Kcmbgn = Beginning of the region dependent Comsco energy * * and stars accumulation arrays * * (note this address if for zero index!!) * * * * Kcmlst = Last memory location of the region dependent * * Comsco energy and stars accumulation arrays * * * * Krfbgn = Beginning of region dependent density scaling * * factors (0 address) * * * * Krflst = Last memory location of region dependent density* * scaling factors * * * * Kisbgn = Beginning of isotope data tabulations * * * * Kislst = Last memory location of isotope data tabulations* * * * Kdtbgn = Beginning of detector data * * * * Kdtlst = Last memory location for the detector data * * * * Kubbgn = Beginning of user defined binning storage * * * * Kublst = Last memory location for user defined binnings * * * * Kuxbgn = Beginning of user defined bdrx storage * * * * Kuxlst = Last memory location for user defined bdrx * * * * Ktcbgn = Beginning of user defined track-length and/or * * collision estimators * * * * Ktclst = Last memory location for user defined track- * * length and/or collision density estimators * * * * Krnbgn = Beginning of user defined residual nuclei sco- * * ring * * (note this address is for zero index!!) * * * * Krnlst = Last memory location for user defined residual * * nuclei scoring * * * * Kylbgn = Beginning of user defined yield estimator * * (note this address is for zero index!!) * * * * Kyllst = Last memory location for user defined yield * * estimators * * * * Kxsbgn = Beginning of cross section storage * * * * Kxslst = Last memory location for cross section storage * * * * Kihbgn = Beginning of region importance storage * * for high energy particles * * (note this address is for zero index!!) * * * * Kihlst = Last memory location for region importances * * for high energy particles * * * * Kinbgn = Beginning of region importance storage * * for low energy neutrons * * (note this address is for zero index!!) * * * * Kinlst = Last memory location for region importances * * for low energy neutrons * * * * Kiebgn = Beginning of region importance storage * * for em cascade particles * * (note this address is for zero index!!) * * * * Kielst = Last memory location for region importances * * for em cascade particles * * * * Ketbgn = Beginning of exp. transf. parameters * * (note this address is for zero index!!) * * * * Ketlst = Last memory location for exp. transf. parameters* * * * Krrbgn = Beginning of region RR storage * * (note this address is for zero index!!) * * * * Krrlst = Last memory location for region RR storage * * * * Kglbgn = Beginning of the region dependent non-analog * * absorption group limit storage * * (note this address is for zero index!!) * * * * Kgllst = Last memory location of the region dependent * * non-analog absorption group limits * * * * Knabgn = Beginning of the region dependent non-analog * * absorption factor storage * * (note this address is for zero index!!) * * * * Knalst = Last memory location of the region dependent * * non-analog absorption factors * * * * Kgdbgn = Beginning of the region dependent biased down- * * scattering group limit storage * * (note this address is for zero index!!) * * * * Kgdlst = Last memory location of the region dependent * * biased downscattering group limits * * * * Kdwbgn = Beginning of the region dependent biased down- * * scattering factor storage * * (note this address is for zero index!!) * * * * Kdwlst = Last memory location of the region dependent * * biased downscattering factors * * * * Kgcbgn = Beginning of the region dependent group cut-off * * storage * * (note this address is for zero index!!) * * * * Kgclst = Last memory location of the region dependent * * group cut-off's * * * * Kwlbgn = Beginning of the region dependent weight window * * lower bound * * (note this address is for zero index!!) * * * * Kwllst = Last memory location of the region dependent * * weight window lower bound * * * * Kwhbgn = Beginning of the region dependent weight window * * higher bound * * (note this address is for zero index!!) * * * * Kwhlst = Last memory location of the region dependent * * weight window higher bound * * * * Kwmbgn = Beginning of the region dependent weight window * * threshold multiplication factor * * (note this address is for zero index!!) * * * * Kwmlst = Last memory location of the region dependent * * weight window threshold multiplication factor * * * * Kwsbgn = Beginning of the region dependent weight window * * shape profile index for low energy neutrons * * (note this address is for zero index!!) * * * * Kwslst = Last memory location of the region dependent * * shape profile index for low energy neutrons * * * * Kndbgn = Beginning of nuclear data tabulations required * * by the preequilibrium model * * * * Kndlst = Last memory location of nuclear data storage * * * * Kdpbgn = Beginning of the dp/dx tabulation storage * * (note this address is for zero index!!) * * * * Kdplst = Last memory location of dp/dx tabulations * * * * Krgbgn = Beginning of the range tabulation storage * * (note this address is for zero index!!) * * * * Krglst = Last memory location of range tabulations * * * * Ksgbgn = Beginning of the cross section storage * * (note this address is for zero index!!) * * * * Ksglst = Last memory location of cross section * * tabulations * * * * Kbrbgn = Beginning of the brem. (e+,e-) storage * * (note this address is for zero index!!) * * * * Kbrlst = Last memory location of the brem. (e+,e-) * * storage * * * * Klvbgn = Beginning of the isotope excited level storage * * (note this address is for zero index!!) * * * * Klvlst = Last memory location of the isotope excited * * level storage * * * * Kggbgn = Beginning of the isotope gamma line storage * * (note this address is for zero index!!) * * * * Kgglst = Last memory location of the isotope gamma line * * storage * * * * Kcebgn = Beginning of the isotope CE line storage * * (note this address is for zero index!!) * * * * Kcelst = Last memory location of the isotope CE line * * storage * * * * Kalbgn = Beginning of the isotope alpha line storage * * (note this address is for zero index!!) * * * * Kallst = Last memory location of the isotope alpha line * * storage * * * * Kbbbgn = Beginning of the isotope beta spectrum storage * * (note this address is for zero index!!) * * * * Kbblst = Last memory location of the isotope beta spec- * * trum storage * * * * Kgxbgn = Beginning of the (g,x) Bezier fit data storage * * (note this address is for zero index!!) * * * * Kgxlst = Last memory location of the (g,x) Bezier fit * * data storage * * * * Kfybgn = Beginning of the fission yield storage * * (note this address is for zero index!!) * * * * Kfylst = Last memory location of the fission yield * * storage * * * * Kpwbgn = Beginning of the neutron pointwise cross section* * storage (note this address is for zero index!!) * * * * Kpwlst = Last memory location of the neutron pointwise * * cross section storage * * * * Kgrbgn = Beginning of the GDR cross section storage * * (note this address is for zero index!!) * * * * Kgrlst = Last memory location of the GDR cross section * * storage * * * * Kvobgn = Beginning of the Voxel data storage * * (note this address is for zero index!!) * * * * Kvolst = Last memory location of the Voxel data storage * * * * Kffbgn = Beginning of the atomic form factor data storage* * (note this address is for zero index!!) * * * * Kfflst = Last memory location of the atomic form factor * * data storage * * * * Kedbgn = Beginning of the photoelectric xsec data storage* * (note this address is for zero index!!) * * * * Kedlst = Last memory location of the photoelectric xsec * * data storage * * * * Kdmbgn = Beginning of the decay matrix storage * * (note this address is for zero index!!) * * * * Kdmlst = Last memory location of decay matrices * * * * Ksmbgn = Beginning of the minimum step size storage * * (note this address is for zero index!!) * * * * Ksmlst = Last memory location of minimum step sizes * * * * Ksxbgn = Beginning of the maximum step size storage * * (note this address is for zero index!!) * * * * Ksxlst = Last memory location of maximum step sizes * * * * Ktmbgn = Beginning of the temporary storage * * (note this address is for zero index!!) * * * *----------------------------------------------------------------------* * COMMON / ADDRCM / MBLNMX, KBLNKL, KGMBGN, KGMLST, KCMBGN, KCMLST, & KRFBGN, KRFLST, KISBGN, KISLST, KDTBGN, KDTLST, & KUBBGN, KUBLST, KUXBGN, KUXLST, KTCBGN, KTCLST, & KRNBGN, KRNLST, KYLBGN, KYLLST, KXSBGN, KXSLST, & KIHBGN, KIHLST, KINBGN, KINLST, KIEBGN, KIELST, & KETBGN, KETLST, KRRBGN, KRRLST, KGLBGN, KGLLST, & KNABGN, KNALST, KGDBGN, KGDLST, KDWBGN, KDWLST, & KGCBGN, KGCLST, KWLBGN, KWLLST, KWHBGN, KWHLST, & KWMBGN, KWMLST, KWSBGN, KWSLST, KNDBGN, KNDLST, & KDPBGN, KDPLST, KRGBGN, KRGLST, KSGBGN, KSGLST, & KBRBGN, KBRLST, KLVBGN, KLVLST, KGGBGN, KGGLST, & KCEBGN, KCELST, KALBGN, KALLST, KBBBGN, KBBLST, & KGXBGN, KGXLST, KFYBGN, KFYLST, KPWBGN, KPWLST, & KGRBGN, KGRLST, KVOBGN, KVOLST, KFFBGN, KFFLST, & KEDBGN, KEDLST, KDMBGN, KDMLST, KSMBGN, KSMLST, & KSXBGN, KSXLST, KTMBGN SAVE / ADDRCM /