Skip to content

Commit

Permalink
Princeton forcing does not provide snowfall.
Browse files Browse the repository at this point in the history
  • Loading branch information
ccarouge committed Jan 17, 2025
1 parent d3e39e1 commit 12b9505
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/offline/cable_input.F90
Original file line number Diff line number Diff line change
Expand Up @@ -400,7 +400,7 @@ SUBROUTINE open_met_file(dels,koffset,kend,spinup, TFRZ)
PRINT*,'rainf'
CALL handle_err( ok )
ENDIF
IF(.NOT. globalMetfile%l_gpcc) THEN
IF(.NOT. globalMetfile%l_gpcc .AND. .NOT. TRIM(cable_user%MetType) .EQ. 'prin') THEN
ok = NF90_OPEN(gswpfile%snowf,0,ncid_snow)
IF (ok /= NF90_NOERR) THEN
PRINT*,'snow'
Expand Down

0 comments on commit 12b9505

Please sign in to comment.