CESM2 water hosing experiment

[Ji-Hoon Oh]

Hi! I'm currently planning to do a water hosing experiment (mimicking Antarctic meltwater) using the CESM2.1.3 model.
I just read the CESM2.1.3 FAQ and found the method (change below code in forcing_coupled.F90.

But, I'm not sure how I can change the freshwater in specific region in this code...
Does anyone know how I would modify the code if I wanted to add freshwater to specific region?

!$OMP PARALLEL DO PRIVATE(iblock)
do iblock = 1, nblocks_clinic
STF(:,:,2,iblock) = RCALCT(:,:,iblock)*( &
(PREC_F(:,:,iblock)+EVAP_F(:,:,iblock)+ &
MELT_F(:,:,iblock)+ROFF_F(:,:,iblock)+IOFF_F(:,:,iblock))*salinity_factor &
+ SALT_F(:,:,iblock)*sflux_factor)
enddo
!$OMP END PARALLEL DO

Thanks!

 

[dbailey]

This looks correct, but I will get Aixue Hue to chime in.