No commit message

cpraveen · Jul 29, 2009 · 1d0a8b9 · 1d0a8b9
1 parent 6aed1b0
commit 1d0a8b9
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/init_scalars.f90 b/init_scalars.f90
@@ -296,7 +296,7 @@ subroutine init_scalar_space(n_scalar)
   implicit none
 
   integer :: k, n_scalar, sc_type, ic_type
-  real*8  :: zloc, s, h
+  real*8  :: zloc, xx, s, h
 
   write(out,*) " Generating scalar # ", n_scalar
   call flush(out)