Searched refs:oldnum (Results 1 – 1 of 1) sorted by relevance
273 PetscFortranCallbackId oldnum = obj->num_fortrancallback[cbtype]; in PetscObjectSetFortranCallback() local274 … PetscFortranCallbackId newnum = PetscMax(*cid - PETSC_SMALLEST_FORTRAN_CALLBACK + 1, 2 * oldnum); in PetscObjectSetFortranCallback()277 PetscCall(PetscArraycpy(callback, obj->fortrancallback[cbtype], oldnum)); in PetscObjectSetFortranCallback()