diff --git a/src/prec.f90 b/src/prec.f90 index 2616a6dcf..8de82fee8 100644 --- a/src/prec.f90 +++ b/src/prec.f90 @@ -22,11 +22,6 @@ module prec integer, parameter :: pReal = IEEE_selected_real_kind(15,307) !< number with 15 significant digits, up to 1e+-307 (typically 64 bit) integer, parameter :: pI32 = selected_int_kind(9) !< number with at least up to +-1e9 (typically 32 bit) integer, parameter :: pI64 = selected_int_kind(18) !< number with at least up to +-1e18 (typically 64 bit) -#if(INT==8) - integer, parameter :: pInt = pI64 -#else - integer, parameter :: pInt = pI32 -#endif #ifdef PETSC PetscInt, private :: dummy integer, parameter :: pPETSCINT = kind(dummy)