Index: /BOL/trunk/IPCC/ts2IPCC.F90
===================================================================
--- /BOL/trunk/IPCC/ts2IPCC.F90	(revision 571)
+++ /BOL/trunk/IPCC/ts2IPCC.F90	(revision 572)
@@ -286,5 +286,5 @@
                     table=trim(ipcc_table(index_table)),      &
                     table_entry='latitude',                   &
-                    units=units,                              &  
+                    units=trim(units),                        &  
                     length=lendim(idim),                      &
                     coord_vals=lat,                           &
@@ -312,5 +312,5 @@
                     table=trim(ipcc_table(index_table)),      &
                     table_entry='longitude',                  &
-                    units=units,                              &  
+                    units=trim(units),                        &  
                     length=lendim(idim),                            &
                     coord_vals=lon,                           &
@@ -333,5 +333,5 @@
                     table=trim(ipcc_table(index_table)),      &
                     table_entry='pressure',                   &
-                    units=units,                              &  
+                    units=trim(units),                        &  
                     length=lendim(idim),                      &
                     coord_vals=vert)
@@ -354,5 +354,5 @@
            table=trim(ipcc_table(index_table)),            &
            table_entry='time',                             &
-           units=units,                                    &
+           units=trim(units),                              &
            length=lendim(idim),                            &
            interval='30 minutes')
@@ -376,9 +376,9 @@
        table=trim(ipcc_table(index_table)),          &
        table_entry=trim(ipcc_name(index_table)),     &
-       units=units,                                  &
+       units=trim(units),                            &
        axis_ids= axis_ids,                           &
        missing_value=real(missing_value),            &
        positive = trim(ipsl_pos(index_table)),       &
-       original_name=varname)
+       original_name=trim(varname))
 !
 ! Lecture de la variable