Skip to content
Snippets Groups Projects
Commit 34fbfb85 authored by WAUTELET Philippe's avatar WAUTELET Philippe Committed by WAUTELET Philippe
Browse files

Philippe 01/12/2015: bug correction: nullify TZFIELDS_ll at declaration

parent a3c126fe
No related branches found
Tags PACK-MNH-V5-3--0-03_RTTOV
No related merge requests found
Hide whitespace changes
Inline Side-by-side
src/MNH/read_all_data_mesonh_case.f90
+ 1
− 1
View file @ 34fbfb85
...@@ -202,7 +202,7 @@ INTEGER :: IPRE_REAL1 ...@@ -202,7 +202,7 @@ INTEGER :: IPRE_REAL1
! !
!20131113 add vars related to ADD3DFIELD and UPDATE_HALO !20131113 add vars related to ADD3DFIELD and UPDATE_HALO
INTEGER :: IINFO_ll INTEGER :: IINFO_ll
TYPE(LIST_ll), POINTER :: TZFIELDS_ll ! list of fields to exchange TYPE(LIST_ll), POINTER :: TZFIELDS_ll => NULL() ! list of fields to exchange
! !
!------------------------------------------------------------------------------ !------------------------------------------------------------------------------
! !
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment

Documentation | Mentions légales | CGU | Accessibilité : non conforme