34   TS_RHSSplitLink newsplit, next = ts->tsrhssplit;  in TSRHSSplitSetIS()  local
41   PetscCall(PetscNew(&newsplit));  in TSRHSSplitSetIS()
43     PetscCall(PetscStrallocpy(splitname, &newsplit->splitname));  in TSRHSSplitSetIS()
45     PetscCall(PetscMalloc1(8, &newsplit->splitname));  in TSRHSSplitSetIS()
46     PetscCall(PetscSNPrintf(newsplit->splitname, 7, "%" PetscInt_FMT, ts->num_rhs_splits));  in TSRHSSplitSetIS()
49   newsplit->is = is;  in TSRHSSplitSetIS()
50   PetscCall(TSCreate(PetscObjectComm((PetscObject)ts), &newsplit->ts));  in TSRHSSplitSetIS()
52   PetscCall(PetscObjectIncrementTabLevel((PetscObject)newsplit->ts, (PetscObject)ts, 1));  in TSRHSSplitSetIS()
53 …"%srhsplit_%s_", ((PetscObject)ts)->prefix ? ((PetscObject)ts)->prefix : "", newsplit->splitname));  in TSRHSSplitSetIS()
54   PetscCall(TSSetOptionsPrefix(newsplit->ts, prefix));  in TSRHSSplitSetIS()
55   if (!next) ts->tsrhssplit = newsplit;  in TSRHSSplitSetIS()
58     next->next = newsplit;  in TSRHSSplitSetIS()