diff --git a/components/cam/src/control/camsrfexch.F90 b/components/cam/src/control/camsrfexch.F90 index 66ebc575c896..31c018745940 100644 --- a/components/cam/src/control/camsrfexch.F90 +++ b/components/cam/src/control/camsrfexch.F90 @@ -472,8 +472,8 @@ subroutine cam_export(state,cam_out,pbuf) cam_out%tbot(i) = state%t(i,pver) cam_out%thbot(i) = state%t(i,pver) * state%exner(i,pver) cam_out%zbot(i) = state%zm(i,pver) - cam_out%ubot(i) = state%u(i,pver) * (vmag_gust(i)+vmag(i))/vmag(i) - cam_out%vbot(i) = state%v(i,pver) * (vmag_gust(i)+vmag(i))/vmag(i) + cam_out%ubot(i) = state%u(i,pver) * ((vmag_gust(i)+vmag(i))/vmag(i)) + cam_out%vbot(i) = state%v(i,pver) * ((vmag_gust(i)+vmag(i))/vmag(i)) cam_out%pbot(i) = state%pmid(i,pver) cam_out%rho(i) = cam_out%pbot(i)/(rair*cam_out%tbot(i)) psm1(i,lchnk) = state%ps(i)