8 static PetscErrorCode PetscBagRegister_Private(PetscBag bag, PetscBagItem item, const char *name, c…  in PetscBagRegister_Private()  argument
11   PetscCall(PetscStrncpy(item->name, name, PETSC_BAG_NAME_LENGTH - 1));  in PetscBagRegister_Private()
31 . list     - array of strings containing names of enum values followed by enum name followed by enu…
33 . name     - the name of the item
42 …g bag, void *addr, const char *const *list, PetscEnum mdefault, const char *name, const char *help)  in PetscBagRegisterEnum()  argument
53   PetscAssertPointer(name, 5);  in PetscBagRegisterEnum()
57   PetscCall(PetscStrlcat(nname, name, PETSC_BAG_NAME_LENGTH));  in PetscBagRegisterEnum()
61 …%s <%s>: (%s) %s (choose one of) ", bag->bagprefix ? bag->bagprefix : "", name, list[mdefault], li…  in PetscBagRegisterEnum()
70 …MM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Registered item %s %s is not in bag memory space", name, help);  in PetscBagRegisterEnum()
75   PetscCall(PetscBagRegister_Private(bag, item, name, help));  in PetscBagRegisterEnum()
88 . name  - name of the array
97 PetscErrorCode PetscBagRegisterIntArray(PetscBag bag, void *addr, PetscInt msize, const char *name,…  in PetscBagRegisterIntArray()  argument
107   PetscAssertPointer(name, 4);  in PetscBagRegisterIntArray()
111   PetscCall(PetscStrlcat(nname, name, PETSC_BAG_NAME_LENGTH));  in PetscBagRegisterIntArray()
114 …tscCall((*PetscHelpPrintf)(bag->bagcomm, "  -%s%s <", bag->bagprefix ? bag->bagprefix : "", name));  in PetscBagRegisterIntArray()
123 …MM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Registered item %s %s is not in bag memory space", name, help);  in PetscBagRegisterIntArray()
126   PetscCall(PetscBagRegister_Private(bag, item, name, help));  in PetscBagRegisterIntArray()
139 . name  - name of the array
148 PetscErrorCode PetscBagRegisterRealArray(PetscBag bag, void *addr, PetscInt msize, const char *name…  in PetscBagRegisterRealArray()  argument
158   PetscAssertPointer(name, 4);  in PetscBagRegisterRealArray()
162   PetscCall(PetscStrlcat(nname, name, PETSC_BAG_NAME_LENGTH));  in PetscBagRegisterRealArray()
165 …tscCall((*PetscHelpPrintf)(bag->bagcomm, "  -%s%s <", bag->bagprefix ? bag->bagprefix : "", name));  in PetscBagRegisterRealArray()
174 …MM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Registered item %s %s is not in bag memory space", name, help);  in PetscBagRegisterRealArray()
177   PetscCall(PetscBagRegister_Private(bag, item, name, help));  in PetscBagRegisterRealArray()
190 . name     - name of the integer
199 PetscErrorCode PetscBagRegisterInt(PetscBag bag, void *addr, PetscInt mdefault, const char *name, c…  in PetscBagRegisterInt()  argument
208   PetscAssertPointer(name, 4);  in PetscBagRegisterInt()
212   PetscCall(PetscStrlcat(nname, name, PETSC_BAG_NAME_LENGTH));  in PetscBagRegisterInt()
214 …"  -%s%s <%" PetscInt_FMT ">: %s \n", bag->bagprefix ? bag->bagprefix : "", name, mdefault, help));  in PetscBagRegisterInt()
220 …MM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Registered item %s %s is not in bag memory space", name, help);  in PetscBagRegisterInt()
224   PetscCall(PetscBagRegister_Private(bag, item, name, help));  in PetscBagRegisterInt()
237 . name     - name of the integer
246 …BagRegisterInt64(PetscBag bag, void *addr, PetscInt64 mdefault, const char *name, const char *help)  in PetscBagRegisterInt64()  argument
259   PetscCall(PetscStrlcat(nname, name, PETSC_BAG_NAME_LENGTH));  in PetscBagRegisterInt64()
261 …"  -%s%s <%" PetscInt_FMT ">: %s \n", bag->bagprefix ? bag->bagprefix : "", name, odefault, help));  in PetscBagRegisterInt64()
268 …MM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Registered item %s %s is not in bag memory space", name, help);  in PetscBagRegisterInt64()
272   PetscCall(PetscBagRegister_Private(bag, item, name, help));  in PetscBagRegisterInt64()
285 . name  - name of the boolean array
294 PetscErrorCode PetscBagRegisterBoolArray(PetscBag bag, void *addr, PetscInt msize, const char *name…  in PetscBagRegisterBoolArray()  argument
304   PetscAssertPointer(name, 4);  in PetscBagRegisterBoolArray()
308   PetscCall(PetscStrlcat(nname, name, PETSC_BAG_NAME_LENGTH));  in PetscBagRegisterBoolArray()
311 …tscCall((*PetscHelpPrintf)(bag->bagcomm, "  -%s%s <", bag->bagprefix ? bag->bagprefix : "", name));  in PetscBagRegisterBoolArray()
320 …MM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Registered item %s %s is not in bag memory space", name, help);  in PetscBagRegisterBoolArray()
323   PetscCall(PetscBagRegister_Private(bag, item, name, help));  in PetscBagRegisterBoolArray()
337 . name     - name of the string
349 …tscBag bag, void *addr, PetscInt msize, const char *mdefault, const char *name, const char *help) …  in PetscBagRegisterString()  argument
359   PetscAssertPointer(name, 5);  in PetscBagRegisterString()
363   PetscCall(PetscStrlcat(nname, name, PETSC_BAG_NAME_LENGTH));  in PetscBagRegisterString()
365 …(bag->bagcomm, "  -%s%s <%s>: %s \n", bag->bagprefix ? bag->bagprefix : "", name, mdefault, help));  in PetscBagRegisterString()
370 …MM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Registered item %s %s is not in bag memory space", name, help);  in PetscBagRegisterString()
375   PetscCall(PetscBagRegister_Private(bag, item, name, help));  in PetscBagRegisterString()
388 . name     - name of the variable
397 PetscErrorCode PetscBagRegisterReal(PetscBag bag, void *addr, PetscReal mdefault, const char *name,…  in PetscBagRegisterReal()  argument
406   PetscAssertPointer(name, 4);  in PetscBagRegisterReal()
410   PetscCall(PetscStrlcat(nname, name, PETSC_BAG_NAME_LENGTH));  in PetscBagRegisterReal()
412 …ag->bagcomm, "  -%s%s <%g>: %s \n", bag->bagprefix ? bag->bagprefix : "", name, (double)mdefault, …  in PetscBagRegisterReal()
418 …MM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Registered item %s %s is not in bag memory space", name, help);  in PetscBagRegisterReal()
422   PetscCall(PetscBagRegister_Private(bag, item, name, help));  in PetscBagRegisterReal()
435 . name     - name of the variable
444 …gRegisterScalar(PetscBag bag, void *addr, PetscScalar mdefault, const char *name, const char *help)  in PetscBagRegisterScalar()  argument
453   PetscAssertPointer(name, 4);  in PetscBagRegisterScalar()
457   PetscCall(PetscStrlcat(nname, name, PETSC_BAG_NAME_LENGTH));  in PetscBagRegisterScalar()
459 …gcomm, "  -%s%s <%g + %gi>: %s \n", bag->bagprefix ? bag->bagprefix : "", name, (double)PetscRealP…  in PetscBagRegisterScalar()
465 …MM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Registered item %s %s is not in bag memory space", name, help);  in PetscBagRegisterScalar()
469   PetscCall(PetscBagRegister_Private(bag, item, name, help));  in PetscBagRegisterScalar()
482 . name     - name of the variable
491 PetscErrorCode PetscBagRegisterBool(PetscBag bag, void *addr, PetscBool mdefault, const char *name,…  in PetscBagRegisterBool()  argument
500   PetscAssertPointer(name, 4);  in PetscBagRegisterBool()
504   PetscCall(PetscStrlcat(nname, name, PETSC_BAG_NAME_LENGTH));  in PetscBagRegisterBool()
506 …ag->bagcomm, "  -%s%s <%s>: %s \n", bag->bagprefix ? bag->bagprefix : "", name, PetscBools[mdefaul…  in PetscBagRegisterBool()
512 …MM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Registered item %s %s is not in bag memory space", name, help);  in PetscBagRegisterBool()
516   PetscCall(PetscBagRegister_Private(bag, item, name, help));  in PetscBagRegisterBool()
574 …char         name[PETSC_BAG_NAME_LENGTH + 1], helpname[PETSC_BAG_NAME_LENGTH + PETSC_BAG_HELP_LENG…  in PetscBagSetFromOptions()  local
584     name[0] = '-';  in PetscBagSetFromOptions()
585     name[1] = 0;  in PetscBagSetFromOptions()
586     PetscCall(PetscStrlcat(name, nitem->name, sizeof(name)));  in PetscBagSetFromOptions()
589       PetscCall(PetscOptionsString(name, nitem->help, "", value, value, nitem->msize, NULL));  in PetscBagSetFromOptions()
593         PetscCall(PetscOptionsReal(name, nitem->help, "", *value, value, NULL));  in PetscBagSetFromOptions()
596         PetscCall(PetscOptionsRealArray(name, nitem->help, "", value, &n, NULL));  in PetscBagSetFromOptions()
600       PetscCall(PetscOptionsScalar(name, nitem->help, "", *value, value, NULL));  in PetscBagSetFromOptions()
604         PetscCall(PetscOptionsInt(name, nitem->help, "", *value, value, NULL));  in PetscBagSetFromOptions()
607         PetscCall(PetscOptionsIntArray(name, nitem->help, "", value, &n, NULL));  in PetscBagSetFromOptions()
613 …PetscCall(PetscOptionsEnum(name, nitem->help, nitem->list[i - 3], (const char *const *)nitem->list…  in PetscBagSetFromOptions()
617         PetscCall(PetscOptionsBool(name, nitem->help, "", *value, value, NULL));  in PetscBagSetFromOptions()
620         PetscCall(PetscOptionsBoolArray(name, nitem->help, "", value, &n, NULL));  in PetscBagSetFromOptions()
669         PetscCall(PetscViewerASCIIPrintf(view, "  %s = %s; %s\n", nitem->name, value, nitem->help));  in PetscBagView()
674         PetscCall(PetscViewerASCIIPrintf(view, "  %s = ", nitem->name));  in PetscBagView()
681 …PetscCall(PetscViewerASCIIPrintf(view, "  %s = %g + %gi; %s\n", nitem->name, (double)PetscRealPart…  in PetscBagView()
683 …PetscCall(PetscViewerASCIIPrintf(view, "  %s = %g; %s\n", nitem->name, (double)PetscRealPart(value…  in PetscBagView()
686 …PetscCall(PetscViewerASCIIPrintf(view, "  %s = %g; %s\n", nitem->name, (double)value, nitem->help)…  in PetscBagView()
690         PetscCall(PetscViewerASCIIPrintf(view, "  %s = ", nitem->name));  in PetscBagView()
696         PetscCall(PetscViewerASCIIPrintf(view, "  %s = ", nitem->name));  in PetscBagView()
700 …Boolean value for %s %s is corrupt; integer value %" PetscInt_FMT, nitem->name, nitem->help, (Pets…  in PetscBagView()
708 …PetscCall(PetscViewerASCIIPrintf(view, "  %s = %s; (%s) %s\n", nitem->name, nitem->list[value], ni…  in PetscBagView()
725       PetscCall(PetscViewerBinaryWrite(view, nitem->name, PETSC_BAG_NAME_LENGTH, PETSC_CHAR));  in PetscBagView()
809   char         name[PETSC_BAG_NAME_LENGTH], help[PETSC_BAG_HELP_LENGTH], **list;  in PetscBagLoad()  local
836     PetscCall(PetscViewerBinaryRead(view, name, PETSC_BAG_NAME_LENGTH, NULL, PETSC_CHAR));  in PetscBagLoad()
904   PetscBagSetName - Sets the name of a bag of values
912 . name - the name assigned to the bag
919 PetscErrorCode PetscBagSetName(PetscBag bag, const char name[], const char help[])  in PetscBagSetName()  argument
923   PetscAssertPointer(name, 2);  in PetscBagSetName()
925   PetscCall(PetscStrncpy(bag->bagname, name, PETSC_BAG_NAME_LENGTH - 1));  in PetscBagSetName()
931   PetscBagGetName - Gets the name of a bag of values
941 . name - the name assigned to the bag
947 PetscErrorCode PetscBagGetName(PetscBag bag, const char **name)  in PetscBagGetName()  argument
951   PetscAssertPointer(name, 2);  in PetscBagGetName()
952   *name = bag->bagname;  in PetscBagGetName()
1038   for (PetscInt n = 0; nitem; ++n, nitem = nitem->next) names[n] = nitem->name;  in PetscBagGetNames()