[Commits] [svn:einsteintoolkit] GRHydro/trunk/src/ (Rev. 210)
knarf at cct.lsu.edu
knarf at cct.lsu.edu
Fri Jan 7 21:59:58 CST 2011
User: knarf
Date: 2011/01/07 09:59 PM
Modified:
/trunk/src/
GRHydro_Prim2Con.F90
Log:
correct variable declaration
File Changes:
Directory: /trunk/src/
======================
File [modified]: GRHydro_Prim2Con.F90
Delta lines: +1 -1
===================================================================
--- trunk/src/GRHydro_Prim2Con.F90 2011-01-08 01:37:53 UTC (rev 209)
+++ trunk/src/GRHydro_Prim2Con.F90 2011-01-08 03:59:58 UTC (rev 210)
@@ -46,7 +46,7 @@
integer :: i, j, k
CCTK_REAL :: gxxl,gxyl,gxzl,gyyl,gyzl,gzzl,avg_detl,&
gxxr,gxyr,gxzr,gyyr,gyzr,gzzr,avg_detr
- CCTK_REAL :: xtemp
+ CCTK_REAL :: xtemp(1)
if(evolve_temper.ne.1) then
!$OMP PARALLEL DO PRIVATE(i, j, avg_detl, avg_detr,&
More information about the Commits
mailing list