diff --git a/mediator/med_fraction_mod.F90 b/mediator/med_fraction_mod.F90
index 2a410aace..ded0e4e7d 100644
--- a/mediator/med_fraction_mod.F90
+++ b/mediator/med_fraction_mod.F90
@@ -130,8 +130,8 @@ module med_fraction_mod
   character(len=6),parameter,dimension(2) :: fraclist_g = (/'gfrac ','lfrac '/)
   character(len=6),parameter,dimension(2) :: fraclist_r = (/'rfrac ','lfrac '/)
 !PSH begin  
-  character(len=6),parameter,dimension(1) :: fraclist_w = (/'wfrac '/)
-!  character(len=6),parameter,dimension(3) :: fraclist_w = (/'ifrac ','ofrac ','wfrac '/)
+!  character(len=6),parameter,dimension(1) :: fraclist_w = (/'wfrac '/)
+  character(len=6),parameter,dimension(3) :: fraclist_w = (/'ifrac ','ofrac ','wfrac '/)
 !PSH end
   !--- standard ---
   real(R8)    , parameter :: eps_fraclim = 1.0e-03      ! truncation limit in fractions_a(lfrac)