Take out reference to elldev_mod

openacc/impl/psb_d_oacc_csr_csmm.F90

@@ -1,7 +1,7 @@
 subroutine psb_d_oacc_csr_csmm(alpha, a, x, beta, y, info, trans)
     use psb_base_mod
-    use elldev_mod
-    use psb_vectordev_mod
+    !use elldev_mod
+    !use psb_vectordev_mod
     use psb_d_oacc_csr_mat_mod, psb_protect_name => psb_d_oacc_csr_csmm
     implicit none
     class(psb_d_oacc_csr_sparse_mat), intent(in) :: a
@@ -83,4 +83,4 @@ subroutine psb_d_oacc_csr_csmm(alpha, a, x, beta, y, info, trans)
     return
   
   end subroutine psb_d_oacc_csr_csmm
-  
+  

openacc/impl/psb_d_oacc_csr_csmv.F90

@@ -1,7 +1,7 @@
 subroutine psb_d_oacc_csr_csmv(alpha, a, x, beta, y, info, trans)
     use psb_base_mod
-    use elldev_mod
-    use psb_vectordev_mod
+    !use elldev_mod
+    !use psb_vectordev_mod
     use psb_d_oacc_csr_mat_mod, psb_protect_name => psb_d_oacc_csr_csmv
     implicit none 
     class(psb_d_oacc_csr_sparse_mat), intent(in) :: a
@@ -78,4 +78,4 @@ subroutine psb_d_oacc_csr_csmv(alpha, a, x, beta, y, info, trans)
     return
   
   end subroutine psb_d_oacc_csr_csmv
-  
+  

openacc/impl/psb_d_oacc_csr_inner_vect_sv.F90

@@ -1,7 +1,7 @@
 subroutine psb_d_oacc_csr_inner_vect_sv(alpha, a, x, beta, y, info, trans)
     use psb_base_mod
-    use elldev_mod
-    use psb_vectordev_mod
+    !    use elldev_mod
+    !   use psb_vectordev_mod
     use psb_d_oacc_csr_mat_mod, psb_protect_name => psb_d_oacc_csr_inner_vect_sv
     use psb_d_oacc_vect_mod
     implicit none
@@ -81,4 +81,4 @@ subroutine psb_d_oacc_csr_inner_vect_sv(alpha, a, x, beta, y, info, trans)
   9999 call psb_error_handler(err_act)
     return
   end subroutine psb_d_oacc_csr_inner_vect_sv
-  
+