diff --git a/src/common/turb/mode_turb_ver_sv_flux.F90 b/src/common/turb/mode_turb_ver_sv_flux.F90 index 9de1436488d4493754683ea045489fe0f2d10067..3d757a82587effc15e0ff788ed747094811fc578 100644 --- a/src/common/turb/mode_turb_ver_sv_flux.F90 +++ b/src/common/turb/mode_turb_ver_sv_flux.F90 @@ -454,7 +454,6 @@ DO JSV=1,KSV CMNHNAME = TRIM( YMNHNAME ), & CSTDNAME = '', & CLONGNAME = TRIM( YMNHNAME ), & - !PW: TODO: use the correct units of the JSV variable (and multiply it by m s-1) CUNITS = 'SVUNIT m s-1', & CDIR = 'XY', & CCOMMENT = 'X_Y_Z_' // TRIM( YMNHNAME ), & diff --git a/src/mesonh/aux/modd_budget.f90 b/src/mesonh/aux/modd_budget.f90 index 0270f474a0e5b53d71ccc86620c9c9bcafefd866..3b413d569b327ee0666fef3544ba3ac37891174b 100644 --- a/src/mesonh/aux/modd_budget.f90 +++ b/src/mesonh/aux/modd_budget.f90 @@ -124,7 +124,6 @@ type, extends( tfieldmetadata_base ) :: tburhodata real, dimension(:,:,:), allocatable :: xdata ! Array to store the budget data end type tburhodata -!PW: a commenter + renommer??? type :: tbudiachrometadata character(len=NBUNAMELGTMAX), dimension(NMAXLEVELS) :: clevels = '' !Name of the different groups/levels in the netCDF file character(len=NCOMMENTLGTMAX), dimension(NMAXLEVELS) :: ccomments ='' !Comments for the different groups/levels in the netCDF file diff --git a/src/mesonh/micro/rain_ice_warm.f90 b/src/mesonh/micro/rain_ice_warm.f90 index 133dc888b8a8c74c6ca2708e58baf37b7587fc1a..0a781900c768fdd2cf37a3d36ecc27c238709efe 100644 --- a/src/mesonh/micro/rain_ice_warm.f90 +++ b/src/mesonh/micro/rain_ice_warm.f90 @@ -72,7 +72,6 @@ REAL, DIMENSION(:), INTENT(INOUT) :: PRVS ! Water vapor m.r. source REAL, DIMENSION(:), INTENT(INOUT) :: PRCS ! Cloud water m.r. source REAL, DIMENSION(:), INTENT(INOUT) :: PRRS ! Rain water m.r. source REAL, DIMENSION(:), INTENT(INOUT) :: PTHS ! Theta source -!PW: PUSW could be a purely local variable? REAL, DIMENSION(:), INTENT(INOUT) :: PUSW ! Undersaturation over water REAL, DIMENSION(:,:,:), INTENT(INOUT) :: PEVAP3D ! Rain evap profile !