SUBROUTINE DIAG_MISC_ISBA_INIT(DMI)
TYPE(DIAG_MISC_ISBA_t), INTENT(INOUT) :: DMI
REAL(KIND=JPRB) :: ZHOOK_HANDLE
IF (LHOOK) CALL DR_HOOK("MODD_DIAG_MISC_ISBA_N:DIAG_MISC_ISBA_INIT",0,ZHOOK_HANDLE)
NULLIFY(DMI%XHV)
NULLIFY(DMI%XLAI)
NULLIFY(DMI%XSWI)
NULLIFY(DMI%XTSWI)
NULLIFY(DMI%XSOIL_SWI)
NULLIFY(DMI%XSOIL_TSWI)
NULLIFY(DMI%XSOIL_TWG)
NULLIFY(DMI%XSOIL_TWGI)
NULLIFY(DMI%XSOIL_WG)
NULLIFY(DMI%XSOIL_WGI)
NULLIFY(DMI%XFRD2_TWG)
NULLIFY(DMI%XFRD2_TWGI)
NULLIFY(DMI%XFRD3_TSWI)
NULLIFY(DMI%XFRD3_TWG)
NULLIFY(DMI%XFRD3_TWGI)
NULLIFY(DMI%XALT)
NULLIFY(DMI%XFLT)
NULLIFY(DMI%XRNSNOW)
NULLIFY(DMI%XHSNOW)
NULLIFY(DMI%XHPSNOW)
NULLIFY(DMI%XGFLUXSNOW)
NULLIFY(DMI%XUSTARSNOW)
NULLIFY(DMI%XGRNDFLUX)
NULLIFY(DMI%XSRSFC)
NULLIFY(DMI%XRRSFC)
NULLIFY(DMI%XCDSNOW)
NULLIFY(DMI%XCHSNOW)
NULLIFY(DMI%XSNOWDZ)
NULLIFY(DMI%XSNOWDEND)
NULLIFY(DMI%XSNOWSPHER)
NULLIFY(DMI%XSNOWSIZE)
NULLIFY(DMI%XSNOWTYPEMEPRA)
NULLIFY(DMI%XSNOWSSA)
NULLIFY(DMI%XSNOWRAM)
NULLIFY(DMI%XSNOWSHEAR)
NULLIFY(DMI%XSNDPT_1DY)
NULLIFY(DMI%XSNDPT_3DY)
NULLIFY(DMI%XSNDPT_5DY)
NULLIFY(DMI%XSNDPT_7DY)
NULLIFY(DMI%XSNSWE_1DY)
NULLIFY(DMI%XSNSWE_3DY)
NULLIFY(DMI%XSNSWE_5DY)
NULLIFY(DMI%XSNSWE_7DY)
NULLIFY(DMI%XSNRAM_SONDE)
NULLIFY(DMI%XSN_REFRZNTHCKN)
NULLIFY(DMI%XSN_WETTHCKN)
NULLIFY(DMI%XSNOWHMASS)
NULLIFY(DMI%XSNOWLIQ)
NULLIFY(DMI%XSNOWTEMP)
NULLIFY(DMI%XTWSNOW)
NULLIFY(DMI%XTDSNOW)
NULLIFY(DMI%XTTSNOW)
NULLIFY(DMI%XPSNG)
NULLIFY(DMI%XPSNV)
NULLIFY(DMI%XPSN)
NULLIFY(DMI%XFFG)
NULLIFY(DMI%XFFV)
NULLIFY(DMI%XFF)
NULLIFY(DMI%XSEUIL)
NULLIFY(DMI%XFAPAR)
NULLIFY(DMI%XFAPIR)
NULLIFY(DMI%XDFAPARC)
NULLIFY(DMI%XDFAPIRC)
NULLIFY(DMI%XFAPAR_BS)
NULLIFY(DMI%XFAPIR_BS)
NULLIFY(DMI%XDLAI_EFFC)
NULLIFY(DMI%XCG)
NULLIFY(DMI%XC1)
NULLIFY(DMI%XC2)
NULLIFY(DMI%XWGEQ)
NULLIFY(DMI%XCT)
NULLIFY(DMI%XRS)
DMI%LSURF_MISC_BUDGET=.FALSE.
DMI%LSURF_DIAG_ALBEDO=.FALSE.
DMI%LSURF_MISC_DIF=.FALSE.
IF (LHOOK) CALL DR_HOOK("MODD_DIAG_MISC_ISBA_N:DIAG_MISC_ISBA_INIT",1,ZHOOK_HANDLE)
END SUBROUTINE DIAG_MISC_ISBA_INIT