I can’t give you full detail atm but block energy is calcd wrong.
pBlock= total transacted in block (inc coinbase)/supply
pBlock is how you calc the Shannon entropy H and Ublock
Tblock=coinbase (fee+subsidy)/supply
Ep= Planck Energy= 1.9561×10^9 joules (constant input wrong)
(D*2^32) is Bolt...