Changeset 3703 for LMDZ6/branches/Optimisation_LMDZ/libf/phylmd/cosp/radar_simulator.F90

Timestamp:

Jun 11, 2020, 11:01:18 AM (4 years ago)

Author:

adurocher

Message:

Fixed compilation errors

• Fixed some OpenMP syntax errors for scorep
• Fix issues with ifort -check all -warn all -O0

File:

• LMDZ6/branches/Optimisation_LMDZ/libf/phylmd/cosp/radar_simulator.F90 (modified) (1 diff)

LMDZ6/branches/Optimisation_LMDZ/libf/phylmd/cosp/radar_simulator.F90

@@ -96 +96 @@
   real*8, dimension(hp%nhclass,nprof,ngate), intent(in) :: hm_matrix
   real*8, dimension(hp%nhclass,nprof,ngate), intent(inout) :: re_matrix
-  real*8, dimension(hp%nhclass,nprof,ngate), intent(in)    :: Np_matrix
+  real*8, dimension(hp%nhclass,nprof,ngate), intent(inout)    :: Np_matrix
 
 ! ----- OUTPUTS -----