Commit db375cc3 authored by Espen Sollum's avatar Espen Sollum
Browse files

Removed some unused variables

parent e52967c0
...@@ -62,8 +62,8 @@ subroutine wetdepo(itime,ltsample,loutnext) ...@@ -62,8 +62,8 @@ subroutine wetdepo(itime,ltsample,loutnext)
implicit none implicit none
integer :: jpart,itime,ltsample,loutnext,ldeltat,i,j,ix,jy integer :: jpart,itime,ltsample,loutnext,ldeltat
integer :: itage,nage,il,interp_time, n integer :: itage,nage
integer :: ks, kp integer :: ks, kp
integer(selected_int_kind(16)), dimension(nspec) :: blc_count, inc_count integer(selected_int_kind(16)), dimension(nspec) :: blc_count, inc_count
real :: grfraction(3),wetscav real :: grfraction(3),wetscav
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment