diff --git a/src/LIB/SURCOUCHE/src/mode_io_field_write.f90 b/src/LIB/SURCOUCHE/src/mode_io_field_write.f90 index 3a2cb358820e3a396b7bb628a552179c7f2170f7..25ab1ff7c4a038ec12bb077b0a582746287239cc 100644 --- a/src/LIB/SURCOUCHE/src/mode_io_field_write.f90 +++ b/src/LIB/SURCOUCHE/src/mode_io_field_write.f90 @@ -1394,11 +1394,6 @@ end subroutine IO_Ndimlist_reduce END IF END DO ! - ! Write the variable attributes in the non-split file - ! - if ( tpfile%nmaster_rank == isp .and. gnc4 ) & - call IO_Field_header_split_write_nc4( tpfile, tpfield, size( pfield, 3 ) ) - ! ! write the data ! DO JKK=JK,JK_MAX