SUBROUTINE CLOSE_FORCING() ! UW Land Surface Hydrology Group implementation of SAC/SNOW17 model ! modified from NLDAS implementation ! author: Ted Bohn, tbohn@hydro.washington.edu ! CLOSES FORCING FILES ! driverMod contains definitions of all global driver variables USE driverMod IMPLICIT NONE status = NF_CLOSE(FORCING_NCID) END