Skip to content

Commit

Permalink
delete print message for debug
Browse files Browse the repository at this point in the history
  • Loading branch information
bnuweinan committed Jan 31, 2024
1 parent 06c323c commit 063a640
Showing 1 changed file with 0 additions and 4 deletions.
4 changes: 0 additions & 4 deletions mksrfdata/Aggregation_SoilParameters.F90
Original file line number Diff line number Diff line change
Expand Up @@ -736,8 +736,6 @@ SUBROUTINE Aggregation_SoilParameters ( &
alpha_vgm_patches(ipatch) = xv(2)
n_vgm_patches(ipatch) = xv(3)
k_s_patches (ipatch) = xv(4)
ELSE
write(6,*)"fit failed in VG model",xv,isiter,landpatch%eindex(ipatch), landpatch%settyp(ipatch)
ENDIF

deallocate(ydatv)
Expand Down Expand Up @@ -985,8 +983,6 @@ SUBROUTINE Aggregation_SoilParameters ( &
psi_s_patches (ipatch) = xc(1)
lambda_patches(ipatch) = xc(2)
k_s_patches (ipatch) = xc(3)
ELSE
write(6,*)"fit failed in CB model",xc,isiter,landpatch%eindex(ipatch), landpatch%settyp(ipatch)
ENDIF

deallocate(ydatc)
Expand Down

0 comments on commit 063a640

Please sign in to comment.