diff --git a/src/krylov/krylov.f90 b/src/krylov/krylov.f90
index 5a3723be45e8..7f44fa1cbb81 100644
--- a/src/krylov/krylov.f90
+++ b/src/krylov/krylov.f90
@@ -189,7 +189,7 @@ end subroutine ksp_t_free
      !! @param monitor Enable/disable monitoring, optional.
      module subroutine krylov_solver_factory(object, n, type_name, &
           max_iter, abstol, M, monitor)
-       class(ksp_t), allocatable, target, intent(inout) :: object
+       class(ksp_t), allocatable, intent(inout) :: object
        integer, intent(in), value :: n
        character(len=*), intent(in) :: type_name
        integer, intent(in) :: max_iter
diff --git a/src/krylov/krylov_fctry.f90 b/src/krylov/krylov_fctry.f90
index 23f9786e47ff..2e31434e140a 100644
--- a/src/krylov/krylov_fctry.f90
+++ b/src/krylov/krylov_fctry.f90
@@ -76,7 +76,7 @@
   !! @param monitor Enable/disable residual history, optional.
   module subroutine krylov_solver_factory(object, n, type_name, &
        max_iter, abstol, M, monitor)
-    class(ksp_t), allocatable, target, intent(inout) :: object
+    class(ksp_t), allocatable, intent(inout) :: object
     integer, intent(in), value :: n
     character(len=*), intent(in) :: type_name
     integer, intent(in) :: max_iter
diff --git a/src/krylov/precon.f90 b/src/krylov/precon.f90
index 3647103ecea7..2ab2e6f75b1d 100644
--- a/src/krylov/precon.f90
+++ b/src/krylov/precon.f90
@@ -68,7 +68,7 @@ end subroutine pc_update
   interface
      !> Create a preconditioner
      module subroutine precon_factory(pc, type_name)
-       class(pc_t), target, allocatable, intent(inout) :: pc
+       class(pc_t),  allocatable, intent(inout) :: pc
        character(len=*), intent(in) :: type_name
      end subroutine precon_factory
 
diff --git a/src/krylov/precon_fctry.f90 b/src/krylov/precon_fctry.f90
index 5255e4899e6a..0a7315430cdd 100644
--- a/src/krylov/precon_fctry.f90
+++ b/src/krylov/precon_fctry.f90
@@ -51,7 +51,7 @@
 
   !> Create a preconditioner
   module subroutine precon_factory(pc, type_name)
-    class(pc_t), target, allocatable, intent(inout) :: pc
+    class(pc_t), allocatable, intent(inout) :: pc
     character(len=*), intent(in) :: type_name
     character(len=:), allocatable :: type_string
 
diff --git a/src/les/les_model.f90 b/src/les/les_model.f90
index 271890671a10..1c05bb3f5553 100644
--- a/src/les/les_model.f90
+++ b/src/les/les_model.f90
@@ -114,7 +114,7 @@ end subroutine les_model_free
      !! @param coef SEM coefficients.
      !! @param json A dictionary with parameters.
      module subroutine les_model_factory(object, type_name, dofmap, coef, json)
-       class(les_model_t), allocatable, target, intent(inout) :: object
+       class(les_model_t), allocatable, intent(inout) :: object
        character(len=*), intent(in) :: type_name
        type(dofmap_t), intent(in) :: dofmap
        type(coef_t), intent(in) :: coef
diff --git a/src/les/les_model_fctry.f90 b/src/les/les_model_fctry.f90
index f2b9525668b0..f9abfee853db 100644
--- a/src/les/les_model_fctry.f90
+++ b/src/les/les_model_fctry.f90
@@ -53,7 +53,7 @@
   !! @param coef SEM coefficients.
   !! @param json A dictionary with parameters.
   module subroutine les_model_factory(object, type_name, dofmap, coef, json)
-    class(les_model_t), allocatable, target, intent(inout) :: object
+    class(les_model_t), allocatable, intent(inout) :: object
     character(len=*), intent(in) :: type_name
     type(dofmap_t), intent(in) :: dofmap
     type(coef_t), intent(in) :: coef
diff --git a/src/wall_models/wall_model.f90 b/src/wall_models/wall_model.f90
index fe4404d9aa93..a49fa70e4500 100644
--- a/src/wall_models/wall_model.f90
+++ b/src/wall_models/wall_model.f90
@@ -156,7 +156,7 @@ end subroutine wall_model_free
      !! @param json A dictionary with parameters.
      module subroutine wall_model_factory(object, coef, msk, facet, nu, &
           json)
-       class(wall_model_t), allocatable, target, intent(inout) :: object
+       class(wall_model_t), allocatable, intent(inout) :: object
        type(coef_t), intent(in) :: coef
        integer, intent(in) :: msk(:)
        integer, intent(in) :: facet(:)
diff --git a/src/wall_models/wall_model_fctry.f90 b/src/wall_models/wall_model_fctry.f90
index 176ea4a431da..7940347ff59b 100644
--- a/src/wall_models/wall_model_fctry.f90
+++ b/src/wall_models/wall_model_fctry.f90
@@ -55,7 +55,7 @@
   !! @param json A dictionary with parameters.
   module subroutine wall_model_factory(object, coef, msk, facet, nu, &
        json)
-    class(wall_model_t), allocatable, target, intent(inout) :: object
+    class(wall_model_t), allocatable, intent(inout) :: object
     type(coef_t), intent(in) :: coef
     integer, intent(in) :: msk(:)
     integer, intent(in) :: facet(:)