Affected Releases: CESM1.2.zUPDATED:
- Fixed in CESM1.2.2
Code:
@@ -39,7 +39,7 @@
call initEdgeBuffer(edge3,3*nlev)
allocate(deriv(0:Nthreads-1))
- psurf_ref = hypi(plev+1)
+ psurf_ref = hypi(plev+1)/100._r8
end subroutine gws_init