diff options
author | tradke <tradke@5301f0c2-dbc4-4cee-b2f5-8d7afba4d129> | 2003-07-07 15:21:25 +0000 |
---|---|---|
committer | tradke <tradke@5301f0c2-dbc4-4cee-b2f5-8d7afba4d129> | 2003-07-07 15:21:25 +0000 |
commit | 9ba88a4e7c228c29823c9ec36b1fecc4edfa0642 (patch) | |
tree | a6c2a6d77372fd6ace4f27b043af823a69a58ea2 /src/D3_extract_int.F | |
parent | 91853ef68b64448bc7d902de45084407b7e18b77 (diff) |
conformal_state must be passed as CCTK_INT rather than int.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/Extract/trunk@80 5301f0c2-dbc4-4cee-b2f5-8d7afba4d129
Diffstat (limited to 'src/D3_extract_int.F')
-rw-r--r-- | src/D3_extract_int.F | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/D3_extract_int.F b/src/D3_extract_int.F index e00b321..3be6450 100644 --- a/src/D3_extract_int.F +++ b/src/D3_extract_int.F @@ -18,8 +18,10 @@ c ------------------------------------------------------------------ CCTK_POINTER :: cctkGH + CCTK_INT,INTENT(IN) :: + & conformal_state INTEGER,INTENT(IN) :: - & conformal_state,igrid,l,m,Psi_power,myproc + & igrid,l,m,Psi_power,myproc CCTK_INT,INTENT(IN) :: & Nt,Np,nx,ny,nz,all_modes,do_momentum,do_spin,interpolation_order INTEGER,INTENT(IN) :: |