Commits November 2011

commits@lists.einsteintoolkit.org

13 participants
183 discussions

[svn:einsteintoolkit] www/about/members/ (Rev. 770)
by knarf＠cct.lsu.edu 30 Nov '11

30 Nov '11

User: knarf Date: 2011/11/30 11:59 AM Modified: /about/members/ members.txt Log: a new member: welcome. :) File Changes: Directory: /about/members/ ========================== File [modified]: members.txt Delta lines: +3 -0 =================================================================== --- about/members/members.txt 2011-11-28 21:37:45 UTC (rev 769) +++ about/members/members.txt 2011-11-30 17:59:24 UTC (rev 770) @@ -27,6 +27,9 @@ http://english.cas.cn/ST/ Chinese Academy of Sciences Mew Bing Wan +http://www.fau.edu/ Florida Atlantic University + Petr Tsatsin + http://www.physik.fu-berlin.de/en/ Institute for Theoretical Physics, Free University of Berlin Satish Kumar Saravanan

1 0

New changesets in Carpet Mercurial
by Carpet mercurial repositories 29 Nov '11

29 Nov '11

changeset: 3398:8461f45b41e6 tag: tip user: Erik Schnetter <schnetter(a)cct.lsu.edu> date: Tue Nov 29 19:02:14 2011 -0500 summary: Improve named barriers

1 0

New changesets in Carpet Mercurial
by Carpet mercurial repositories 29 Nov '11

29 Nov '11

changeset: 3397:996987420046 tag: tip user: Erik Schnetter <schnetter(a)cct.lsu.edu> date: Tue Nov 29 15:09:03 2011 -0500 summary: Carpet: Allow all unsigned int values in named barriers

1 0

[svn:einsteintoolkit] incoming/PITTNullCode/ (Rev. 58)
by knarf＠cct.lsu.edu 29 Nov '11

29 Nov '11

User: knarf Date: 2011/11/29 01:54 PM Removed: /PITTNullCode/ Log: The PITTNullCode is now part of the ET

1 0

[svn:einsteintoolkit] GRHydro/trunk/src/ (Rev. 307)
by roland.haas＠physics.gatech.edu 29 Nov '11

29 Nov '11

User: rhaas Date: 2011/11/29 11:17 AM Modified: /trunk/src/ GRHydro_CalcUpdate.F90, GRHydro_ENOReconstruct_drv.F90, GRHydro_HLLEM.F90, GRHydro_PPMMReconstruct_drv.F90, GRHydro_Prim2ConM.F90, GRHydro_TVDReconstruct.F90 Log: expand region where fluxes are computed for constraint transport File Changes: Directory: /trunk/src/ ====================== File [modified]: GRHydro_CalcUpdate.F90 Delta lines: +1 -1 =================================================================== --- trunk/src/GRHydro_CalcUpdate.F90 2011-11-29 17:17:04 UTC (rev 306) +++ trunk/src/GRHydro_CalcUpdate.F90 2011-11-29 17:17:07 UTC (rev 307) @@ -48,7 +48,7 @@ if (use_weighted_fluxes == 0) then !$OMP PARALLEL DO PRIVATE(i,j,k,itracer,alp_l,alp_r,Bvec_l,Bvec_r) - do k = GRHydro_stencil + 1 - transport_constraints, cctk_lsh(3) - GRHydro_stencil ! mean we need to compute fluxes for one more point the GRHydro_stencil would indicate + do k = GRHydro_stencil + 1 - transport_constraints, cctk_lsh(3) - GRHydro_stencil ! we need to compute Evec on all faces/edges where the fluxes are defined do j = GRHydro_stencil + 1 - transport_constraints, cctk_lsh(2) - GRHydro_stencil do i = GRHydro_stencil + 1 - transport_constraints, cctk_lsh(1) - GRHydro_stencil File [modified]: GRHydro_ENOReconstruct_drv.F90 Delta lines: +12 -6 =================================================================== --- trunk/src/GRHydro_ENOReconstruct_drv.F90 2011-11-29 17:17:04 UTC (rev 306) +++ trunk/src/GRHydro_ENOReconstruct_drv.F90 2011-11-29 17:17:07 UTC (rev 307) @@ -179,9 +179,11 @@ endif if (flux_direction == 1) then + ! constraint transport needs to be able to average fluxes in the directions + ! other that flux_direction, which in turn need the primitives on interfaces !$OMP PARALLEL DO PRIVATE(i, j, k) - do k = GRHydro_stencil, cctk_lsh(3) - GRHydro_stencil + 1 - do j = GRHydro_stencil, cctk_lsh(2) - GRHydro_stencil + 1 + do k = GRHydro_stencil, cctk_lsh(3) - GRHydro_stencil + 1 + transport_constraints + do j = GRHydro_stencil, cctk_lsh(2) - GRHydro_stencil + 1 + transport_constraints if (CCTK_EQUALS(recon_vars,"primitive")) then call GRHydro_ENOReconstruct1d(eno_order,cctk_lsh(1),& rho(:,j,k),rhominus(:,j,k),rhoplus(:,j,k),& @@ -259,9 +261,11 @@ end do !$OMP END PARALLEL DO else if (flux_direction == 2) then + ! constraint transport needs to be able to average fluxes in the directions + ! other that flux_direction, which in turn need the primitives on interfaces !$OMP PARALLEL DO PRIVATE(i, j, k) - do k = GRHydro_stencil, cctk_lsh(3) - GRHydro_stencil + 1 - do j = GRHydro_stencil, cctk_lsh(1) - GRHydro_stencil + 1 + do k = GRHydro_stencil, cctk_lsh(3) - GRHydro_stencil + 1 + transport_constraints + do j = GRHydro_stencil, cctk_lsh(1) - GRHydro_stencil + 1 + transport_constraints if (CCTK_EQUALS(recon_vars,"primitive")) then call GRHydro_ENOReconstruct1d(eno_order,cctk_lsh(2),& rho(j,:,k),rhominus(j,:,k),rhoplus(j,:,k),& @@ -339,9 +343,11 @@ end do !$OMP END PARALLEL DO else if (flux_direction == 3) then + ! constraint transport needs to be able to average fluxes in the directions + ! other that flux_direction, which in turn need the primitives on interfaces !$OMP PARALLEL DO PRIVATE(i, j, k) - do k = GRHydro_stencil, cctk_lsh(2) - GRHydro_stencil + 1 - do j = GRHydro_stencil, cctk_lsh(1) - GRHydro_stencil + 1 + do k = GRHydro_stencil, cctk_lsh(2) - GRHydro_stencil + 1 + transport_constraints + do j = GRHydro_stencil, cctk_lsh(1) - GRHydro_stencil + 1 + transport_constraints if (CCTK_EQUALS(recon_vars,"primitive")) then call GRHydro_ENOReconstruct1d(eno_order,cctk_lsh(3),& rho(j,k,:),rhominus(j,k,:),rhoplus(j,k,:),& File [modified]: GRHydro_HLLEM.F90 Delta lines: +5 -3 =================================================================== --- trunk/src/GRHydro_HLLEM.F90 2011-11-29 17:17:04 UTC (rev 306) +++ trunk/src/GRHydro_HLLEM.F90 2011-11-29 17:17:07 UTC (rev 307) @@ -74,9 +74,11 @@ call CCTK_WARN(0, "Flux direction not x,y,z") end if - do k = GRHydro_stencil, cctk_lsh(3) - GRHydro_stencil - do j = GRHydro_stencil, cctk_lsh(2) - GRHydro_stencil - do i = GRHydro_stencil, cctk_lsh(1) - GRHydro_stencil + ! constraint transport needs to be able to average fluxes in the directions + ! other that flux_direction + do k = GRHydro_stencil, cctk_lsh(3) - GRHydro_stencil + transport_constraints*(1-zoffset) + do j = GRHydro_stencil, cctk_lsh(2) - GRHydro_stencil + transport_constraints*(1-yoffset) + do i = GRHydro_stencil, cctk_lsh(1) - GRHydro_stencil + transport_constraints*(1-xoffset) f1 = 0.d0 lamminus = 0.d0 File [modified]: GRHydro_PPMMReconstruct_drv.F90 Delta lines: +12 -6 =================================================================== --- trunk/src/GRHydro_PPMMReconstruct_drv.F90 2011-11-29 17:17:04 UTC (rev 306) +++ trunk/src/GRHydro_PPMMReconstruct_drv.F90 2011-11-29 17:17:07 UTC (rev 307) @@ -181,9 +181,11 @@ !!$ PPM starts: if (flux_direction == 1) then + ! constraint transport needs to be able to average fluxes in the directions + ! other that flux_direction, which in turn need the primitives on interfaces !$OMP PARALLEL DO PRIVATE(i, j, k) - do k = GRHydro_stencil, nz - GRHydro_stencil + 1 - do j = GRHydro_stencil, ny - GRHydro_stencil + 1 + do k = GRHydro_stencil, nz - GRHydro_stencil + 1 + transport_constraints + do j = GRHydro_stencil, ny - GRHydro_stencil + 1 + transport_constraints if(clean_divergence.ne.0) then call SimplePPM_1dM(GRHydro_eos_handle,0,nx,CCTK_DELTA_SPACE(1),& rho(:,j,k),velx(:,j,k),vely(:,j,k),velz(:,j,k),& @@ -252,9 +254,11 @@ end if else if (flux_direction == 2) then + ! constraint transport needs to be able to average fluxes in the directions + ! other that flux_direction, which in turn need the primitives on interfaces !$OMP PARALLEL DO PRIVATE(i, j, k) - do k = GRHydro_stencil, nz - GRHydro_stencil + 1 - do j = GRHydro_stencil, nx - GRHydro_stencil + 1 + do k = GRHydro_stencil, nz - GRHydro_stencil + 1 + transport_constraints + do j = GRHydro_stencil, nx - GRHydro_stencil + 1 + transport_constraints if(clean_divergence.ne.0) then call SimplePPM_1dM(GRHydro_eos_handle,0,ny,CCTK_DELTA_SPACE(2),& rho(j,:,k),vely(j,:,k),velz(j,:,k),velx(j,:,k),& @@ -322,9 +326,11 @@ end if else if (flux_direction == 3) then + ! constraint transport needs to be able to average fluxes in the directions + ! other that flux_direction, which in turn need the primitives on interfaces !$OMP PARALLEL DO PRIVATE(i, j, k) - do k = GRHydro_stencil, ny - GRHydro_stencil + 1 - do j = GRHydro_stencil, nx - GRHydro_stencil + 1 + do k = GRHydro_stencil, ny - GRHydro_stencil + 1 + transport_constraints + do j = GRHydro_stencil, nx - GRHydro_stencil + 1 + transport_constraints if(clean_divergence.ne.0) then call SimplePPM_1dM(GRHydro_eos_handle,0,nz,CCTK_DELTA_SPACE(3),& rho(j,k,:),velz(j,k,:),velx(j,k,:),vely(j,k,:),& File [modified]: GRHydro_Prim2ConM.F90 Delta lines: +10 -6 =================================================================== --- trunk/src/GRHydro_Prim2ConM.F90 2011-11-29 17:17:04 UTC (rev 306) +++ trunk/src/GRHydro_Prim2ConM.F90 2011-11-29 17:17:07 UTC (rev 307) @@ -57,9 +57,11 @@ CCTK_REAL :: gxxl,gxyl,gxzl,gyyl,gyzl,gzzl,avg_detl,& gxxr,gxyr,gxzr,gyyr,gyzr,gzzr,avg_detr - do k = GRHydro_stencil,cctk_lsh(3)-GRHydro_stencil+1 - do j = GRHydro_stencil,cctk_lsh(2)-GRHydro_stencil+1 - do i = GRHydro_stencil,cctk_lsh(1)-GRHydro_stencil+1 + ! constraint transport needs to be able to average fluxes in the directions + ! other that flux_direction, which in turn need the primitives on interfaces + do k = GRHydro_stencil, cctk_lsh(3)-GRHydro_stencil+1 + transport_constraints*(1-zoffset) + do j = GRHydro_stencil, cctk_lsh(2)-GRHydro_stencil+1 + transport_constraints*(1-yoffset) + do i = GRHydro_stencil, cctk_lsh(1)-GRHydro_stencil+1 + transport_constraints*(1-xoffset) gxxl = 0.5d0 * (gxx(i,j,k) + gxx(i-xoffset,j-yoffset,k-zoffset)) gxyl = 0.5d0 * (gxy(i,j,k) + gxy(i-xoffset,j-yoffset,k-zoffset)) @@ -275,11 +277,13 @@ CCTK_REAL :: gxxl,gxyl,gxzl,gyyl,gyzl,gzzl,avg_detl,& gxxr,gxyr,gxzr,gyyr,gyzr,gzzr,avg_detr + ! constraint transport needs to be able to average fluxes in the directions + ! other that flux_direction, which in turn need the primitives on interfaces !$OMP PARALLEL DO PRIVATE(i, j, k, gxxl,gxyl,gxzl,gyyl,gyzl,gzzl,avg_detl,& !$OMP gxxr,gxyr,gxzr,gyyr,gyzr,gzzr,avg_detr) - do k = GRHydro_stencil,cctk_lsh(3)-GRHydro_stencil+1 - do j = GRHydro_stencil,cctk_lsh(2)-GRHydro_stencil+1 - do i = GRHydro_stencil,cctk_lsh(1)-GRHydro_stencil+1 + do k = GRHydro_stencil, cctk_lsh(3)-GRHydro_stencil+1 + transport_constraints*(1-zoffset) + do j = GRHydro_stencil, cctk_lsh(2)-GRHydro_stencil+1 + transport_constraints*(1-yoffset) + do i = GRHydro_stencil, cctk_lsh(1)-GRHydro_stencil+1 + transport_constraints*(1-xoffset) gxxl = 0.5d0 * (gxx(i,j,k) + gxx(i-xoffset,j-yoffset,k-zoffset)) gxyl = 0.5d0 * (gxy(i,j,k) + gxy(i-xoffset,j-yoffset,k-zoffset)) File [modified]: GRHydro_TVDReconstruct.F90 Delta lines: +5 -3 =================================================================== --- trunk/src/GRHydro_TVDReconstruct.F90 2011-11-29 17:17:04 UTC (rev 306) +++ trunk/src/GRHydro_TVDReconstruct.F90 2011-11-29 17:17:07 UTC (rev 307) @@ -52,10 +52,12 @@ !!$ Initially all Riemann problems are NON-trivial trivial_rp = .false. + ! constraint transport needs to be able to average fluxes in the directions + ! other that flux_direction, which in turn need the primitives on interfaces !$OMP PARALLEL DO PRIVATE(i,j,k,dupw,dloc,delta,ratio,hdelta) - do k = GRHydro_stencil, nz-GRHydro_stencil+1 - do j = GRHydro_stencil, ny-GRHydro_stencil+1 - do i = GRHydro_stencil, nx-GRHydro_stencil+1 + do k = GRHydro_stencil, nz - GRHydro_stencil + 1 + transport_constraints*(1-zoffset) + do j = GRHydro_stencil, ny - GRHydro_stencil + 1 + transport_constraints*(1-yoffset) + do i = GRHydro_stencil, nx - GRHydro_stencil + 1 + transport_constraints*(1-xoffset) if (GRHydro_enable_internal_excision /= 0 .and. & (hydro_excision_mask(i,j,k) .ne. 0)) then trivial_rp(i-xoffset, j-yoffset, k-zoffset) = .true.

1 0

[svn:einsteintoolkit] GRHydro/trunk/src/ (Rev. 306)
by roland.haas＠physics.gatech.edu 29 Nov '11

29 Nov '11

User: rhaas Date: 2011/11/29 11:17 AM Removed: /trunk/src/ GRHydro_BoundariesM.F90, GRHydro_ReconstructM.F90, GRHydro_ReconstructPolyM.F90 Modified: /trunk/src/ GRHydro_Boundaries.F90 Log: remove unused variable from GRHydro_Boundaries remove unused file GRHydro_BoundariesM.F90 remove unused file GRHydro_ReconstructPolyM.F90 remove unused file GRHydro_ReconstructM.F90 File Changes: Directory: /trunk/src/ ====================== File [modified]: GRHydro_Boundaries.F90 Delta lines: <Unavailable> File [removed]: GRHydro_BoundariesM.F90 Delta lines: <Unavailable> File [removed]: GRHydro_ReconstructM.F90 Delta lines: <Unavailable> File [removed]: GRHydro_ReconstructPolyM.F90 Delta lines: <Unavailable>

1 0

[svn:einsteintoolkit] GRHydro/trunk/src/ (Rev. 305)
by roland.haas＠physics.gatech.edu 29 Nov '11

29 Nov '11

User: rhaas Date: 2011/11/29 11:17 AM Modified: /trunk/src/ GRHydro_Boundaries.F90 Log: fix error checking in GRHydro_Boundaries File Changes: Directory: /trunk/src/ ====================== File [modified]: GRHydro_Boundaries.F90 Delta lines: +38 -38 =================================================================== --- trunk/src/GRHydro_Boundaries.F90 2011-11-28 21:07:12 UTC (rev 304) +++ trunk/src/GRHydro_Boundaries.F90 2011-11-29 17:17:01 UTC (rev 305) @@ -170,7 +170,7 @@ DECLARE_CCTK_FUNCTIONS integer, dimension(3) :: sw - integer :: ierr + integer :: ierr = 0 CCTK_REAL :: pi = 3.141569d0 integer :: i,j,k CCTK_INT :: GRHydro_UseGeneralCoordinates, general_coordinates @@ -185,61 +185,61 @@ !!$Flat boundaries if required if (CCTK_EQUALS(bound,"flat")) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::dens", "Flat") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::tau", "Flat") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::scon", "Flat") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::w_lorentz", "Flat") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::rho", "Flat") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::press", "Flat") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::eps", "Flat") if (general_coordinates .ne. 0) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::lvel", "Flat") else - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::vel", "Flat") endif if(evolve_mhd.ne.0) then if (general_coordinates .ne. 0) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::lBvec", "Flat") else - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::Bvec", "Flat") endif - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::Bcons", "Flat") if(clean_divergence.ne.0) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::psidc", "Flat") endif endif if(evolve_tracer.ne.0) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::GRHydro_tracers", "Flat") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::GRHydro_cons_tracers", "Flat") endif if(evolve_y_e.ne.0) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::Y_e", "Flat") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::Y_e_con", "Flat") endif if(evolve_temper.ne.0) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::temperature", "Flat") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::entropy", "Flat") endif @@ -247,56 +247,56 @@ endif if (CCTK_EQUALS(bound,"none")) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::dens", "None") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::tau", "None") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::scon", "None") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::w_lorentz", "None") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::rho", "None") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::press", "None") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::eps", "None") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::vel", "None") if(evolve_mhd.ne.0) then if (general_coordinates .ne. 0) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::lBvec", "None") else - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::Bvec", "None") endif - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::Bcons", "None") if(clean_divergence.ne.0) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::psidc", "None") endif endif if(evolve_tracer.ne.0) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::GRHydro_tracers", "None") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::GRHydro_cons_tracers", "None") endif if(evolve_y_e.ne.0) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::Y_e", "None") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "GRHydro::Y_e_con", "None") endif if(evolve_temper.ne.0) then - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::temperature", "None") - ierr = Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & + ierr = ierr + Boundary_SelectGroupForBC(cctkGH, faces, GRHydro_stencil, -ione, & "HydroBase::entropy", "None") endif

1 0

New changesets in Carpet Mercurial
by Carpet mercurial repositories 28 Nov '11

28 Nov '11

changeset: 3396:208f27582e98 tag: tip user: Erik Schnetter <schnetter(a)cct.lsu.edu> date: Mon Nov 28 22:01:33 2011 -0500 summary: Carpet: Add missing Adler-32 files

1 0

New changesets in Carpet Mercurial
by Carpet mercurial repositories 28 Nov '11

28 Nov '11

changeset: 3394:191ad97b59da user: Erik Schnetter <schnetter(a)cct.lsu.edu> date: Mon Nov 28 21:48:21 2011 -0500 summary: Carpet: Escape & characters in timer XML output changeset: 3395:b98b4fc2bdba tag: tip user: Erik Schnetter <schnetter(a)cct.lsu.edu> date: Mon Nov 28 21:49:33 2011 -0500 summary: Carpet: Use unique ids in schedule barriers

1 0

[svn:einsteintoolkit] www/ (Rev. 769)
by knarf＠cct.lsu.edu 28 Nov '11

28 Nov '11

User: knarf Date: 2011/11/28 03:37 PM Added: / .htaccess Removed: /seminars/2011_11_28/recording/ .htaccess Log: move htaccess back now that it works File Changes: Directory: / ============ File [added]: .htaccess Delta lines: +2 -0 =================================================================== --- .htaccess (rev 0) +++ .htaccess 2011-11-28 21:37:45 UTC (rev 769) @@ -0,0 +1,2 @@ +AddType application/pdf pdf +AddType video/ogg ogv Directory: /seminars/2011_11_28/recording/ ========================================== File [removed]: .htaccess Delta lines: +0 -2 =================================================================== --- seminars/2011_11_28/recording/.htaccess 2011-11-28 21:24:56 UTC (rev 768) +++ seminars/2011_11_28/recording/.htaccess 2011-11-28 21:37:45 UTC (rev 769) @@ -1,2 +0,0 @@ -AddType application/pdf pdf -AddType video/ogg ogv

1 0

Jump to page:

2026

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

Commits November 2011