Skip to content
Snippets Groups Projects
Commit 1db27bfd authored by Dave Whipp's avatar Dave Whipp
Browse files

Removed unused declared/passed variables

parent a47a8be2
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
src/compute_convergence_criterion.f90
+ 2
− 2
View file @ 1db27bfd
...@@ -49,8 +49,8 @@ logical velocity_converged ...@@ -49,8 +49,8 @@ logical velocity_converged
!(((((((((((((((( declaration of the subroutine internal variables ))))))))))))) !(((((((((((((((( declaration of the subroutine internal variables )))))))))))))
!------------------------------------------------------------------------------| !------------------------------------------------------------------------------|
integer err,ierr,iproc,nproc,i integer ierr,iproc,nproc,i
double precision dduvw,duvw,uvw,time1,time2 double precision dduvw,duvw,uvw
double precision velocity_diff_norm,maxdiff,oldmax double precision velocity_diff_norm,maxdiff,oldmax
character*72 shift character*72 shift
......
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