181   PetscViewer viewer;  in WriteOutput()  local
194 …etscCall(PetscViewerVTKOpen(PetscObjectComm((PetscObject)Q), file_path, FILE_MODE_WRITE, &viewer));  in WriteOutput()
195     PetscCall(VecView(Q_loc, viewer));  in WriteOutput()
196     PetscCall(PetscViewerDestroy(&viewer));  in WriteOutput()
228   PetscCall(PetscViewerBinaryOpen(user->comm, file_path, FILE_MODE_WRITE, &viewer));  in WriteOutput()
231   PetscCall(PetscViewerBinaryWrite(viewer, &token, 1, PETSC_INT32));  in WriteOutput()
232   PetscCall(PetscViewerBinaryWrite(viewer, &step_no, 1, PETSC_INT));  in WriteOutput()
234   PetscCall(PetscViewerBinaryWrite(viewer, &time, 1, PETSC_REAL));  in WriteOutput()
235   PetscCall(VecView(Q, viewer));  in WriteOutput()
236   PetscCall(PetscViewerDestroy(&viewer));  in WriteOutput()
246   PetscViewer       viewer = user->app_ctx->wall_forces.viewer;  in TSMonitor_WallForce()  local
252   if (!viewer) PetscFunctionReturn(PETSC_SUCCESS);  in TSMonitor_WallForce()
258   PetscCall(PetscObjectTypeCompare((PetscObject)viewer, PETSCVIEWERASCII, &iascii));  in TSMonitor_WallForce()
262       PetscCall(PetscViewerASCIIPrintf(viewer, "Step,Time,Wall,ForceX,ForceY,ForceZ\n"));  in TSMonitor_WallForce()
268 …PetscCall(PetscViewerASCIIPrintf(viewer, "%" PetscInt_FMT ",%g,%" PetscInt_FMT ",%g,%g,%g\n", step…  in TSMonitor_WallForce()
272 …PetscCall(PetscViewerASCIIPrintf(viewer, "Wall %" PetscInt_FMT " Forces: Force_x = %12g, Force_y =…  in TSMonitor_WallForce()
346     PetscViewer viewer;  in TSSolve_NS()  local
349       PetscCall(PetscViewerBinaryOpen(comm, app_ctx->cont_time_file, FILE_MODE_READ, &viewer));  in TSSolve_NS()
350       PetscCall(PetscViewerBinaryRead(viewer, &app_ctx->cont_time, 1, &count, PETSC_REAL));  in TSSolve_NS()
351       PetscCall(PetscViewerDestroy(&viewer));  in TSSolve_NS()
361   if (app_ctx->wall_forces.viewer) {  in TSSolve_NS()