diff --git a/src/SURFEX/read_gr_snow.F90 b/src/SURFEX/read_gr_snow.F90 index d806efd7d64498b0ff7b8f04a8e78f90e88769dd..c0d6330bc8e8ecffe1645ca6c257aeecc336a1bc 100644 --- a/src/SURFEX/read_gr_snow.F90 +++ b/src/SURFEX/read_gr_snow.F90 @@ -313,7 +313,7 @@ IF (TPSNOW%SCHEME=='1-L' .OR. TPSNOW%SCHEME=='D95' .OR. TPSNOW%SCHEME=='EBA' & CALL READ_SURF(HPROGRAM,YRECFM,ZWORK,IRESP,HDIR=YDIR) CALL PACK_SAME_RANK(KMASK_P,ZWORK(:,MAX(1,KPATCH)),TPSNOW%ALB(:)) ENDIF - IF (KLU>0) print*,YRECFM,minval(TPSNOW%ALB(:)),maxval(TPSNOW%ALB(:)) +! IF (KLU>0) print*,YRECFM,minval(TPSNOW%ALB(:)),maxval(TPSNOW%ALB(:)) ! ENDIF !