diff --git a/installation/patch/petsc3.7 b/installation/patch/petsc3.7
new file mode 100644
index 000000000..b5fd696fb
--- /dev/null
+++ b/installation/patch/petsc3.7
@@ -0,0 +1,22 @@
+diff --git a/code/spectral_utilities.f90 b/code/spectral_utilities.f90
+index 34eb0ea..a33c7a9 100644
+--- a/code/spectral_utilities.f90
++++ b/code/spectral_utilities.f90
+@@ -227,12 +227,13 @@ subroutine utilities_init()
+                 trim(PETScDebug), &
+                 ' add more using the PETSc_Options keyword in numerics.config '; flush(6)
+ 
+- call PetscOptionsClear(ierr); CHKERRQ(ierr)
+- if(debugPETSc) call PetscOptionsInsertString(trim(PETSCDEBUG),ierr)
++ call PetscOptionsClear(PETSC_NULL_OBJECT,ierr)
+  CHKERRQ(ierr)
+- call PetscOptionsInsertString(trim(petsc_defaultOptions),ierr)
++ if(debugPETSc) call PetscOptionsInsertString(PETSC_NULL_OBJECT,trim(PETSCDEBUG),ierr)
+  CHKERRQ(ierr)
+- call PetscOptionsInsertString(trim(petsc_options),ierr)
++ call PetscOptionsInsertString(PETSC_NULL_OBJECT,trim(petsc_defaultOptions),ierr)
++ CHKERRQ(ierr)
++ call PetscOptionsInsertString(PETSC_NULL_OBJECT,trim(petsc_options),ierr)
+  CHKERRQ(ierr)
+ 
+  grid1Red = grid(1)/2_pInt + 1_pInt