diff options
-rw-r--r-- | src/Con2Prim_fortran_interfaces.F90 | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Con2Prim_fortran_interfaces.F90 b/src/Con2Prim_fortran_interfaces.F90 index 4f8a4bf..aac868b 100644 --- a/src/Con2Prim_fortran_interfaces.F90 +++ b/src/Con2Prim_fortran_interfaces.F90 @@ -6,7 +6,8 @@ module Con2Prim_fortran_interfaces interface subroutine Con2Prim_pt(& - handle, & + cctk_iteration,ii,jj,kk,& + handle, & dens, & sx, sy, sz, & tau, & @@ -23,6 +24,7 @@ module Con2Prim_fortran_interfaces GRHydro_reflevel, GRHydro_C2P_failed) implicit none + CCTK_INT cctk_iteration, ii, jj, kk CCTK_INT handle CCTK_REAL dens CCTK_REAL sx, sy, sz |