Refactor vect_mod

2026-10-24 14:51:49 +00:00 · 2026-05-03 11:14:23 +02:00
parent 7ff4d251fd
commit dd6dd4cdfe
16 changed files with 15519 additions and 9898 deletions
@@ -266,6 +266,7 @@ contains
    end if

    ixb = psb_c_get_index_base()
+    write(0,*) 'C_get_entry: ',index,(index+(1-ixb))
    res = xp%get_entry((index+(1-ixb)))
  end function psb_c_dvect_get_entry