diff --git a/src/MNH/deallocate_model1.f90 b/src/MNH/deallocate_model1.f90
index 11a577e2e5a77f04b0ea4f0f24009235b5f51312..dc3107d54dd4857b1857c4a2692638d4e9a4c3c8 100644
--- a/src/MNH/deallocate_model1.f90
+++ b/src/MNH/deallocate_model1.f90
@@ -67,6 +67,7 @@ END MODULE MODI_DEALLOCATE_MODEL1
 !!                   10/2016 M.Mazoyer New KHKO output fields
 !!  Philippe Wautelet: 05/2016-04/2018: new data structures and calls for I/O
 !!                   02/2019 C.Lac add rain fraction as an output field
+!  P. Wautelet 07/06/2019: bugfix: deallocate XLSRVM only if allocated
 !-------------------------------------------------------------------------------
 !
 !*       0.    DECLARATIONS
@@ -306,7 +307,7 @@ IF ( KCALL == 3 ) THEN
   DEALLOCATE(XLSVM)
   DEALLOCATE(XLSWM)
   DEALLOCATE(XLSTHM)
-  DEALLOCATE(XLSRVM)
+  IF(ASSOCIATED(XLSRVM)) DEALLOCATE(XLSRVM)
   IF (ASSOCIATED(XLBXUM)) THEN
     DEALLOCATE(XLBXUM)
     DEALLOCATE(XLBYUM)