Fix missing method in oacc_ell

openacc/psb_c_oacc_ell_mat_mod.F90

@@ -303,6 +303,18 @@ contains
     call tmpa%set_sync()
   end subroutine c_oacc_ell_sync
 
+  subroutine c_oacc_ell_to_dev_scalar(v)
+    implicit none
+    complex(psb_spk_), intent(in) :: v(:)
+    !$acc update device(v)
+  end subroutine c_oacc_ell_to_dev_scalar
+
+  subroutine c_oacc_ell_to_dev(v)
+    implicit none
+    complex(psb_spk_), intent(in) :: v(:,:)
+    !$acc update device(v)
+  end subroutine c_oacc_ell_to_dev
+
   subroutine c_oacc_ell_to_host(v)
     implicit none
     complex(psb_spk_), intent(in) :: v(:,:)

openacc/psb_d_oacc_ell_mat_mod.F90

@@ -303,6 +303,18 @@ contains
     call tmpa%set_sync()
   end subroutine d_oacc_ell_sync
 
+  subroutine d_oacc_ell_to_dev_scalar(v)
+    implicit none
+    real(psb_dpk_), intent(in) :: v(:)
+    !$acc update device(v)
+  end subroutine d_oacc_ell_to_dev_scalar
+
+  subroutine d_oacc_ell_to_dev(v)
+    implicit none
+    real(psb_dpk_), intent(in) :: v(:,:)
+    !$acc update device(v)
+  end subroutine d_oacc_ell_to_dev
+
   subroutine d_oacc_ell_to_host(v)
     implicit none
     real(psb_dpk_), intent(in) :: v(:,:)

openacc/psb_s_oacc_ell_mat_mod.F90

@@ -303,6 +303,18 @@ contains
     call tmpa%set_sync()
   end subroutine s_oacc_ell_sync
 
+  subroutine s_oacc_ell_to_dev_scalar(v)
+    implicit none
+    real(psb_spk_), intent(in) :: v(:)
+    !$acc update device(v)
+  end subroutine s_oacc_ell_to_dev_scalar
+
+  subroutine s_oacc_ell_to_dev(v)
+    implicit none
+    real(psb_spk_), intent(in) :: v(:,:)
+    !$acc update device(v)
+  end subroutine s_oacc_ell_to_dev
+
   subroutine s_oacc_ell_to_host(v)
     implicit none
     real(psb_spk_), intent(in) :: v(:,:)

openacc/psb_z_oacc_ell_mat_mod.F90

@@ -303,6 +303,18 @@ contains
     call tmpa%set_sync()
   end subroutine z_oacc_ell_sync
 
+  subroutine z_oacc_ell_to_dev_scalar(v)
+    implicit none
+    complex(psb_dpk_), intent(in) :: v(:)
+    !$acc update device(v)
+  end subroutine z_oacc_ell_to_dev_scalar
+
+  subroutine z_oacc_ell_to_dev(v)
+    implicit none
+    complex(psb_dpk_), intent(in) :: v(:,:)
+    !$acc update device(v)
+  end subroutine z_oacc_ell_to_dev
+
   subroutine z_oacc_ell_to_host(v)
     implicit none
     complex(psb_dpk_), intent(in) :: v(:,:)