diff --git a/src/MNH/radar_simulator.f90 b/src/MNH/radar_simulator.f90 index 503dcf45333d1f4bb974b57047d9d3162d0dedde..c43a351c4d26ea1f5a61d2973513700ba70ae249 100644 --- a/src/MNH/radar_simulator.f90 +++ b/src/MNH/radar_simulator.f90 @@ -332,7 +332,7 @@ ELSE END IF WRITE(ILUOUT0,*) "ZAZIM_BASE(1)",ZAZIM_BASE(1) -WRITE(ILUOUT0,*) "ZAZIM_BASE(NBAZIM/2.)",ZAZIM_BASE(NBAZIM/2.) +WRITE(ILUOUT0,*) "ZAZIM_BASE(NBAZIM/2.)",ZAZIM_BASE(NINT(NBAZIM/2.)) WRITE(ILUOUT0,*) "ZAZIM_BASE(NBAZIM)",ZAZIM_BASE(NBAZIM) !copy in the 3D matrix (ZAZIM) containing the horizontal discretization of the beam for all azimut of all radars