Initialise module variables
subroutine init_blanket_library
!! Initialise module variables
implicit none
hblnkt = 0.0D0
hshld = 0.0D0
hcryopf = 0.0D0
hvv = 0.0D0
volshldi = 0.0D0
volshldo = 0.0D0
volvvi = 0.0D0
volvvo = 0.0D0
bldepti = 0.0D0
bldepto = 0.0D0
blwidti = 0.0D0
blwidto = 0.0D0
bllengi = 0.0D0
bllengo = 0.0D0
bzfllengi = 0.0D0
bzfllengi_liq = 0.0D0
bzfllengo_liq = 0.0D0
bzfllengo = 0.0D0
pnucfwi = 0.0D0
pnucfwo = 0.0D0
tpeakfwi = 0.0D0
tpeakfwo = 0.0D0
mffwi = 0.0D0
mffwo = 0.0D0
mffw = 0.0D0
npfwi = 0.0D0
npfwo = 0.0D0
mffwpi = 0.0D0
mffwpo = 0.0D0
pnucblkti = 0.0D0
pnucblkto = 0.0D0
mfblkti = 0.0D0
mfblkto = 0.0D0
mfblkti_liq = 0.0D0
mfblkto_liq = 0.0D0
mfblkt_liq = 0.0D0
mfblkt = 0.0D0
mftotal = 0.0D0
npblkti = 0.0D0
npblkto = 0.0D0
mfblktpi = 0.0D0
mfblktpo = 0.0D0
velblkti = 0.0D0
velblkto = 0.0D0
htpmw_fwi = 0.0D0
htpmw_fwo = 0.0D0
htpmw_blkti = 0.0D0
htpmw_blkto = 0.0D0
vfblkti = 0.0D0
vfblkto = 0.0D0
end subroutine init_blanket_library