Parenthesize some expressions

The point of this is to make some minimal changes needed to get
bit-for-bit results with an upcoming refactor, in which the elevation
factors will be computed separately.

Author: billsacks

mediator/med_phases_prep_glc_mod.F90

@@ -924,8 +924,8 @@ subroutine med_phases_prep_glc_map_lnd2glc(gcomp, rc)
                          data_ice_covered_g(n) = dataptr2d(ec-1,n) * 0.5_r8 &
                               + dataptr2d(ec  ,n) * 0.5_r8
                       else
-                         data_ice_covered_g(n) =  dataptr2d(ec-1,n) * (elev_u - topoglc_g(n)) / d_elev  &
-                              + dataptr2d(ec  ,n) * (topoglc_g(n) - elev_l) / d_elev
+                         data_ice_covered_g(n) =  dataptr2d(ec-1,n) * ((elev_u - topoglc_g(n)) / d_elev)  &
+                              + dataptr2d(ec  ,n) * ((topoglc_g(n) - elev_l) / d_elev)
                       end if
                       exit
                    end if