Lines Matching refs:tab
38 subroutine PetscDSGetTabulationSetSizes(ds, i, tab, ierr)
42 type(ttPetscTabulation) tab
110 subroutine PetscDSGetTabulation(ds, tab, ierr) argument
112 PetscTabulation, pointer :: tab(:)
117 allocate (tab(Nf))
119 allocate (tab(i)%ptr)
121 call PetscDSGetTabulationSetSizes(ds, i, tab(i)%ptr, ierr)
123 allocate (tab(i)%ptr%T(tab(i)%ptr%K + 1))
124 call PetscDSGetTabulationSetPointers(ds, i, tab(i)%ptr%T, ierr)
129 subroutine PetscDSRestoreTabulation(ds, tab, ierr) argument
131 PetscTabulation, pointer :: tab(:)
137 deallocate (tab(i)%ptr%T)
138 deallocate (tab(i)%ptr)
140 deallocate (tab)