Skip to content
Snippets Groups Projects
Commit a3c126fe authored by WAUTELET Philippe's avatar WAUTELET Philippe Committed by WAUTELET Philippe
Browse files

Philippe 01/12/2015: bug correction: division by a float for an array index

parent a9d8afa0
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
src/MNH/radar_simulator.f90
+ 1
− 1
View file @ a3c126fe
......@@ -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
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment

Documentation | Mentions légales | CGU | Accessibilité : non conforme