ceed-qfunction.c (75affc3b27ef4afd9e0b71275e32fb85c1a00c79) ceed-qfunction.c (2ebaca429b06eae440f2ba902155200fcfe17de6)
1// Copyright (c) 2017, Lawrence Livermore National Security, LLC. Produced at
2// the Lawrence Livermore National Laboratory. LLNL-CODE-734707. All Rights
3// reserved. See files LICENSE and NOTICE for details.
4//
5// This file is part of CEED, a collection of benchmarks, miniapps, software
6// libraries and APIs for efficient high-order finite element and spectral
7// element discretizations for exascale applications. For more information and
8// source code availability see http://github.com/ceed.

--- 528 unchanged lines hidden (view full) ---

537 qf->ctx = ctx;
538 qf->ctxsize = ctxsize;
539 return 0;
540}
541
542/**
543 @brief View a field of a CeedQFunction
544
1// Copyright (c) 2017, Lawrence Livermore National Security, LLC. Produced at
2// the Lawrence Livermore National Laboratory. LLNL-CODE-734707. All Rights
3// reserved. See files LICENSE and NOTICE for details.
4//
5// This file is part of CEED, a collection of benchmarks, miniapps, software
6// libraries and APIs for efficient high-order finite element and spectral
7// element discretizations for exascale applications. For more information and
8// source code availability see http://github.com/ceed.

--- 528 unchanged lines hidden (view full) ---

537 qf->ctx = ctx;
538 qf->ctxsize = ctxsize;
539 return 0;
540}
541
542/**
543 @brief View a field of a CeedQFunction
544
545 @param[in] field QFunction field to view
546 @param[in] fieldnum Number of field being viewed
547 @param[in] stream Stream to view to, e.g., stdout
545 @param[in] field QFunction field to view
546 @param[in] fieldnumber Number of field being viewed
547 @param[in] stream Stream to view to, e.g., stdout
548
549 @return An error code: 0 - success, otherwise - failure
550
551 @ref Utility
552**/
553static int CeedQFunctionFieldView(CeedQFunctionField field, CeedInt fieldnumber,
554 FILE *stream) {
555 fprintf(stream, " [%d] QFunction Field \"%s\"\n"

--- 16 unchanged lines hidden (view full) ---

572 @ref Utility
573**/
574int CeedQFunctionView(CeedQFunction qf, FILE *stream) {
575 int ierr;
576
577 fprintf(stream, "%sCeedQFunction %s\n",
578 qf->qfname ? "Gallery " : "User ", qf->qfname ? qf->qfname : "");
579
548
549 @return An error code: 0 - success, otherwise - failure
550
551 @ref Utility
552**/
553static int CeedQFunctionFieldView(CeedQFunctionField field, CeedInt fieldnumber,
554 FILE *stream) {
555 fprintf(stream, " [%d] QFunction Field \"%s\"\n"

--- 16 unchanged lines hidden (view full) ---

572 @ref Utility
573**/
574int CeedQFunctionView(CeedQFunction qf, FILE *stream) {
575 int ierr;
576
577 fprintf(stream, "%sCeedQFunction %s\n",
578 qf->qfname ? "Gallery " : "User ", qf->qfname ? qf->qfname : "");
579
580
581 fprintf(stream, "%d Input Field%s\n", qf->numinputfields,
582 qf->numinputfields>1 ? "s" : "");
583 for (CeedInt i=0; i<qf->numinputfields; i++) {
584 ierr = CeedQFunctionFieldView(qf->inputfields[i], i, stream); CeedChk(ierr);
585 }
586
587 fprintf(stream, "%d Output Field%s\n", qf->numoutputfields,
588 qf->numoutputfields>1 ? "s" : "");

--- 151 unchanged lines hidden --- 		580 fprintf(stream, "%d Input Field%s\n", qf->numinputfields,
581 qf->numinputfields>1 ? "s" : "");
582 for (CeedInt i=0; i<qf->numinputfields; i++) {
583 ierr = CeedQFunctionFieldView(qf->inputfields[i], i, stream); CeedChk(ierr);
584 }
585
586 fprintf(stream, "%d Output Field%s\n", qf->numoutputfields,
587 qf->numoutputfields>1 ? "s" : "");

--- 151 unchanged lines hidden ---