SUBROUTINE GRID_CONF_PROJ_INIT(YGRIDCONF)
TYPE(GRID_CONF_PROJ_t), INTENT(INOUT) :: YGRIDCONF
REAL(KIND=JPRB) :: ZHOOK_HANDLE
IF (LHOOK) CALL DR_HOOK("MODD_GRID_CONF_PROJ_n:GRID_CONF_PROJ_INIT",0,ZHOOK_HANDLE)
YGRIDCONF%NX = 0
YGRIDCONF%NY = 0
YGRIDCONF%XLAT0 = 0.
YGRIDCONF%XLON0 = 0.
YGRIDCONF%XLATORI = 0.
YGRIDCONF%XLONORI = 0.
YGRIDCONF%XRPK = 0.
YGRIDCONF%XBETA = 0.
YGRIDCONF%XLATC = 0.
YGRIDCONF%XLONC = 0.
IF (LHOOK) CALL DR_HOOK("MODD_GRID_CONF_PROJ_n:GRID_CONF_PROJ_INIT",1,ZHOOK_HANDLE)
END SUBROUTINE GRID_CONF_PROJ_INIT