Skip to content
Snippets Groups Projects
Commit 163fa74e authored by Gaelle TANGUY's avatar Gaelle TANGUY
Browse files

Gaelle 20/09/2016 : supression variables inutiles

parent a83c010d
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
src/MNH/spawn_model2.f90
+ 0
− 1
View file @ 163fa74e
...@@ -370,7 +370,6 @@ LOGICAL :: GNOSON = .TRUE. ...@@ -370,7 +370,6 @@ LOGICAL :: GNOSON = .TRUE.
REAL, DIMENSION(:,:,:), ALLOCATABLE :: ZWORK3D ! working array REAL, DIMENSION(:,:,:), ALLOCATABLE :: ZWORK3D ! working array
CHARACTER(LEN=28) :: YDAD_SON CHARACTER(LEN=28) :: YDAD_SON
!$ !$
INTEGER :: IDIMX, IDIMY
INTEGER :: IINFO_ll INTEGER :: IINFO_ll
TYPE(LIST_ll), POINTER :: TZFIELDS_ll=>NULL() ! list of fields to exchange TYPE(LIST_ll), POINTER :: TZFIELDS_ll=>NULL() ! list of fields to exchange
INTEGER :: NXOR_TMP, NYOR_TMP, NXEND_TMP, NYEND_TMP INTEGER :: NXOR_TMP, NYOR_TMP, NXEND_TMP, NYEND_TMP
......
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