Index: LMDZ6/trunk/libf/misc/readTracFiles_mod.f90
===================================================================
--- LMDZ6/trunk/libf/misc/readTracFiles_mod.f90	(revision 4193)
+++ LMDZ6/trunk/libf/misc/readTracFiles_mod.f90	(revision 4194)
@@ -1226,6 +1226,6 @@
   CHARACTER(LEN=*),                   INTENT(IN)  :: keyn
   CHARACTER(LEN=maxlen), ALLOCATABLE, INTENT(OUT) ::   val(:)
-  CHARACTER(LEN=*), TARGET, OPTIONAL, INTENT(IN)  :: tname(:)
-  TYPE(keys_type),  TARGET, OPTIONAL, INTENT(IN)  ::    ky(:)
+  CHARACTER(LEN=*),         OPTIONAL, INTENT(IN)  :: tname(:)
+  TYPE(keys_type),          OPTIONAL, INTENT(IN)  ::    ky(:)
   TYPE(keys_type),           POINTER :: k(:)
   CHARACTER(LEN=maxlen), ALLOCATABLE :: n(:)
@@ -1257,8 +1257,8 @@
 !==============================================================================================================================
 LOGICAL FUNCTION getKeyByName_im(keyn, val, tname, ky) RESULT(lerr)
-  CHARACTER(LEN=*),                   INTENT(IN)  :: keyn
-  INTEGER,               ALLOCATABLE, INTENT(OUT) ::   val(:)
-  CHARACTER(LEN=*), TARGET, OPTIONAL, INTENT(IN)  :: tname(:)
-  TYPE(keys_type),  TARGET, OPTIONAL, INTENT(IN)  ::    ky(:)
+  CHARACTER(LEN=*),           INTENT(IN)  :: keyn
+  INTEGER,       ALLOCATABLE, INTENT(OUT) ::   val(:)
+  CHARACTER(LEN=*), OPTIONAL, INTENT(IN)  :: tname(:)
+  TYPE(keys_type),  OPTIONAL, INTENT(IN)  ::    ky(:)
   TYPE(keys_type),           POINTER :: k(:)
   CHARACTER(LEN=maxlen), ALLOCATABLE :: n(:)
@@ -1290,8 +1290,8 @@
 !==============================================================================================================================
 LOGICAL FUNCTION getKeyByName_rm(keyn, val, tname, ky) RESULT(lerr)
-  CHARACTER(LEN=*),                   INTENT(IN)  :: keyn
-  REAL,                  ALLOCATABLE, INTENT(OUT) ::   val(:)
-  CHARACTER(LEN=*), TARGET, OPTIONAL, INTENT(IN)  :: tname(:)
-  TYPE(keys_type),  TARGET, OPTIONAL, INTENT(IN)  ::    ky(:)
+  CHARACTER(LEN=*),           INTENT(IN)  :: keyn
+  REAL,          ALLOCATABLE, INTENT(OUT) ::   val(:)
+  CHARACTER(LEN=*), OPTIONAL, INTENT(IN)  :: tname(:)
+  TYPE(keys_type),  OPTIONAL, INTENT(IN)  ::    ky(:)
   TYPE(keys_type),           POINTER :: k(:)
   CHARACTER(LEN=maxlen), ALLOCATABLE :: n(:)