diff --git a/src/MNH/write_diachro.f90 b/src/MNH/write_diachro.f90 index bde51d154a0bc5e084d733a4a74b6b1a09d7d56c..3a45d50f964deaf38dedd0ac2fc9c6909110f20b 100644 --- a/src/MNH/write_diachro.f90 +++ b/src/MNH/write_diachro.f90 @@ -1509,7 +1509,7 @@ select case ( idims ) end select !Write X and Y position of the flyer -if ( Present( tpflyer ) ) then +if ( Present( tpflyer ) .and. yshape == 'Point' ) then if ( lcartesian ) then ystdnameprefix = 'plane' else