Lines Matching refs:viewer
453 …rorCode PetscIntViewNumColumns(PetscInt N, PetscInt Ncol, const PetscInt idx[], PetscViewer viewer) in PetscIntViewNumColumns() argument
461 if (!viewer) viewer = PETSC_VIEWER_STDOUT_SELF; in PetscIntViewNumColumns()
463 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 4); in PetscIntViewNumColumns()
464 PetscCall(PetscObjectGetComm((PetscObject)viewer, &comm)); in PetscIntViewNumColumns()
468 PetscCall(PetscObjectTypeCompare((PetscObject)viewer, PETSCVIEWERASCII, &isascii)); in PetscIntViewNumColumns()
469 PetscCall(PetscObjectTypeCompare((PetscObject)viewer, PETSCVIEWERBINARY, &isbinary)); in PetscIntViewNumColumns()
471 PetscCall(PetscViewerASCIIPushSynchronized(viewer)); in PetscIntViewNumColumns()
474 … PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "[%d] %" PetscInt_FMT ":", rank, Ncol * i)); in PetscIntViewNumColumns()
476 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "%" PetscInt_FMT ":", Ncol * i)); in PetscIntViewNumColumns()
478 …for (j = 0; j < Ncol; j++) PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, " %" PetscInt_FMT,… in PetscIntViewNumColumns()
479 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "\n")); in PetscIntViewNumColumns()
483 … PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "[%d] %" PetscInt_FMT ":", rank, Ncol * n)); in PetscIntViewNumColumns()
485 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "%" PetscInt_FMT ":", Ncol * n)); in PetscIntViewNumColumns()
487 …for (i = 0; i < p; i++) PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, " %" PetscInt_FMT, id… in PetscIntViewNumColumns()
488 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "\n")); in PetscIntViewNumColumns()
490 PetscCall(PetscViewerFlush(viewer)); in PetscIntViewNumColumns()
491 PetscCall(PetscViewerASCIIPopSynchronized(viewer)); in PetscIntViewNumColumns()
514 PetscCall(PetscViewerBinaryWrite(viewer, array, Ntotal, PETSC_INT)); in PetscIntViewNumColumns()
520 PetscCall(PetscViewerBinaryWrite(viewer, idx, N, PETSC_INT)); in PetscIntViewNumColumns()
524 PetscCall(PetscObjectGetName((PetscObject)viewer, &tname)); in PetscIntViewNumColumns()
553 …rCode PetscRealViewNumColumns(PetscInt N, PetscInt Ncol, const PetscReal idx[], PetscViewer viewer) in PetscRealViewNumColumns() argument
561 if (!viewer) viewer = PETSC_VIEWER_STDOUT_SELF; in PetscRealViewNumColumns()
563 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 4); in PetscRealViewNumColumns()
564 PetscCall(PetscObjectGetComm((PetscObject)viewer, &comm)); in PetscRealViewNumColumns()
568 PetscCall(PetscObjectTypeCompare((PetscObject)viewer, PETSCVIEWERASCII, &isascii)); in PetscRealViewNumColumns()
569 PetscCall(PetscObjectTypeCompare((PetscObject)viewer, PETSCVIEWERBINARY, &isbinary)); in PetscRealViewNumColumns()
573 PetscCall(PetscViewerASCIIPushSynchronized(viewer)); in PetscRealViewNumColumns()
574 PetscCall(PetscViewerASCIIGetTab(viewer, &tab)); in PetscRealViewNumColumns()
576 PetscCall(PetscViewerASCIISetTab(viewer, tab)); in PetscRealViewNumColumns()
578 … PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "[%d] %2" PetscInt_FMT ":", rank, Ncol * i)); in PetscRealViewNumColumns()
580 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "%2" PetscInt_FMT ":", Ncol * i)); in PetscRealViewNumColumns()
582 PetscCall(PetscViewerASCIISetTab(viewer, 0)); in PetscRealViewNumColumns()
583 …for (j = 0; j < Ncol; j++) PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, " %12.4e", (double… in PetscRealViewNumColumns()
584 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "\n")); in PetscRealViewNumColumns()
587 PetscCall(PetscViewerASCIISetTab(viewer, tab)); in PetscRealViewNumColumns()
589 … PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "[%d] %2" PetscInt_FMT ":", rank, Ncol * n)); in PetscRealViewNumColumns()
591 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "%2" PetscInt_FMT ":", Ncol * n)); in PetscRealViewNumColumns()
593 PetscCall(PetscViewerASCIISetTab(viewer, 0)); in PetscRealViewNumColumns()
594 …for (i = 0; i < p; i++) PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, " %12.4e", (double)id… in PetscRealViewNumColumns()
595 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "\n")); in PetscRealViewNumColumns()
597 PetscCall(PetscViewerFlush(viewer)); in PetscRealViewNumColumns()
598 PetscCall(PetscViewerASCIISetTab(viewer, tab)); in PetscRealViewNumColumns()
599 PetscCall(PetscViewerASCIIPopSynchronized(viewer)); in PetscRealViewNumColumns()
622 PetscCall(PetscViewerBinaryWrite(viewer, array, Ntotal, PETSC_REAL)); in PetscRealViewNumColumns()
628 PetscCall(PetscViewerBinaryWrite(viewer, (void *)idx, N, PETSC_REAL)); in PetscRealViewNumColumns()
632 PetscCall(PetscObjectGetName((PetscObject)viewer, &tname)); in PetscRealViewNumColumns()
661 …e PetscScalarViewNumColumns(PetscInt N, PetscInt Ncol, const PetscScalar idx[], PetscViewer viewer) in PetscScalarViewNumColumns() argument
669 if (!viewer) viewer = PETSC_VIEWER_STDOUT_SELF; in PetscScalarViewNumColumns()
671 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 4); in PetscScalarViewNumColumns()
672 PetscCall(PetscObjectGetComm((PetscObject)viewer, &comm)); in PetscScalarViewNumColumns()
676 PetscCall(PetscObjectTypeCompare((PetscObject)viewer, PETSCVIEWERASCII, &isascii)); in PetscScalarViewNumColumns()
677 PetscCall(PetscObjectTypeCompare((PetscObject)viewer, PETSCVIEWERBINARY, &isbinary)); in PetscScalarViewNumColumns()
679 PetscCall(PetscViewerASCIIPushSynchronized(viewer)); in PetscScalarViewNumColumns()
682 … PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "[%d] %2" PetscInt_FMT ":", rank, Ncol * i)); in PetscScalarViewNumColumns()
684 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "%2" PetscInt_FMT ":", Ncol * i)); in PetscScalarViewNumColumns()
688 …PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, " (%12.4e,%12.4e)", (double)PetscRealPart(idx… in PetscScalarViewNumColumns()
690 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, " %12.4e", (double)idx[i * Ncol + j])); in PetscScalarViewNumColumns()
693 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "\n")); in PetscScalarViewNumColumns()
697 … PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "[%d] %2" PetscInt_FMT ":", rank, Ncol * n)); in PetscScalarViewNumColumns()
699 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "%2" PetscInt_FMT ":", Ncol * n)); in PetscScalarViewNumColumns()
703 …PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, " (%12.4e,%12.4e)", (double)PetscRealPart(idx… in PetscScalarViewNumColumns()
705 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, " %12.4e", (double)idx[Ncol * n + i])); in PetscScalarViewNumColumns()
708 PetscCall(PetscViewerASCIISynchronizedPrintf(viewer, "\n")); in PetscScalarViewNumColumns()
710 PetscCall(PetscViewerFlush(viewer)); in PetscScalarViewNumColumns()
711 PetscCall(PetscViewerASCIIPopSynchronized(viewer)); in PetscScalarViewNumColumns()
734 PetscCall(PetscViewerBinaryWrite(viewer, array, Ntotal, PETSC_SCALAR)); in PetscScalarViewNumColumns()
740 PetscCall(PetscViewerBinaryWrite(viewer, (void *)idx, N, PETSC_SCALAR)); in PetscScalarViewNumColumns()
744 PetscCall(PetscObjectGetName((PetscObject)viewer, &tname)); in PetscScalarViewNumColumns()
774 PetscErrorCode PetscIntView(PetscInt N, const PetscInt idx[], PetscViewer viewer) in PetscIntView() argument
777 PetscCall(PetscIntViewNumColumns(N, 20, idx, viewer)); in PetscIntView()
805 PetscErrorCode PetscRealView(PetscInt N, const PetscReal idx[], PetscViewer viewer) in PetscRealView() argument
808 PetscCall(PetscRealViewNumColumns(N, 5, idx, viewer)); in PetscRealView()
836 PetscErrorCode PetscScalarView(PetscInt N, const PetscScalar idx[], PetscViewer viewer) in PetscScalarView() argument
839 PetscCall(PetscScalarViewNumColumns(N, 3, idx, viewer)); in PetscScalarView()