Merge branch 'mesh_compile' into 'development'

Petsc Destroy interfaces are not included in version<=3.16.x yet

See merge request damask/DAMASK!792
This commit is contained in:
Martin Diehl 2023-08-04 19:58:16 +00:00
commit 7d1adebde9
2 changed files with 2 additions and 2 deletions

View File

@ -56,7 +56,7 @@ module discretization_mesh
real(pREAL), dimension(:,:,:), allocatable :: &
mesh_ipCoordinates !< IP x,y,z coordinates (after deformation!)
#ifdef PETSC_USE_64BIT_INDICES
#if defined(PETSC_USE_64BIT_INDICES) || PETSC_VERSION_MINOR < 17
external :: &
DMDestroy
#endif

View File

@ -72,7 +72,7 @@ module mesh_mechanical_FEM
real(pREAL), parameter :: eps = 1.0e-18_pREAL
external :: & ! ToDo: write interfaces
#ifdef PETSC_USE_64BIT_INDICES
#if defined(PETSC_USE_64BIT_INDICES) || PETSC_VERSION_MINOR < 17
ISDestroy, &
#endif
PetscSectionGetNumFields, &