ceed-operator.c (3c65f1475c0c36e146e45e66d93954024b28f040) ceed-operator.c (bf4cb66493dbcc06b8d25c9c91cf89fe1cab7c9b)
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.

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

509 if (dqf && dqf != CEED_QFUNCTION_NONE) {
510 (*op)->dqf = dqf;
511 ierr = CeedQFunctionReference(dqf); CeedChk(ierr);
512 }
513 if (dqfT && dqfT != CEED_QFUNCTION_NONE) {
514 (*op)->dqfT = dqfT;
515 ierr = CeedQFunctionReference(dqfT); CeedChk(ierr);
516 }
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.

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

509 if (dqf && dqf != CEED_QFUNCTION_NONE) {
510 (*op)->dqf = dqf;
511 ierr = CeedQFunctionReference(dqf); CeedChk(ierr);
512 }
513 if (dqfT && dqfT != CEED_QFUNCTION_NONE) {
514 (*op)->dqfT = dqfT;
515 ierr = CeedQFunctionReference(dqfT); CeedChk(ierr);
516 }
517 ierr = CeedCalloc(16, &(*op)->input_fields); CeedChk(ierr);
518 ierr = CeedCalloc(16, &(*op)->output_fields); CeedChk(ierr);
517 ierr = CeedCalloc(CEED_FIELD_MAX, &(*op)->input_fields); CeedChk(ierr);
518 ierr = CeedCalloc(CEED_FIELD_MAX, &(*op)->output_fields); CeedChk(ierr);
519 ierr = ceed->OperatorCreate(*op); CeedChk(ierr);
520 return CEED_ERROR_SUCCESS;
521}
522
523/**
524 @brief Create an operator that composes the action of several operators
525
526 @param ceed A Ceed object where the CeedOperator will be created

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

543 return CEED_ERROR_SUCCESS;
544 }
545 }
546
547 ierr = CeedCalloc(1, op); CeedChk(ierr);
548 (*op)->ceed = ceed;
549 ierr = CeedReference(ceed); CeedChk(ierr);
550 (*op)->is_composite = true;
519 ierr = ceed->OperatorCreate(*op); CeedChk(ierr);
520 return CEED_ERROR_SUCCESS;
521}
522
523/**
524 @brief Create an operator that composes the action of several operators
525
526 @param ceed A Ceed object where the CeedOperator will be created

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

543 return CEED_ERROR_SUCCESS;
544 }
545 }
546
547 ierr = CeedCalloc(1, op); CeedChk(ierr);
548 (*op)->ceed = ceed;
549 ierr = CeedReference(ceed); CeedChk(ierr);
550 (*op)->is_composite = true;
551 ierr = CeedCalloc(16, &(*op)->sub_operators); CeedChk(ierr);
551 ierr = CeedCalloc(CEED_COMPOSITE_MAX, &(*op)->sub_operators); CeedChk(ierr);
552
553 if (ceed->CompositeOperatorCreate) {
554 ierr = ceed->CompositeOperatorCreate(*op); CeedChk(ierr);
555 }
556 return CEED_ERROR_SUCCESS;
557}
558
559/**

--- 677 unchanged lines hidden --- 		552
553 if (ceed->CompositeOperatorCreate) {
554 ierr = ceed->CompositeOperatorCreate(*op); CeedChk(ierr);
555 }
556 return CEED_ERROR_SUCCESS;
557}
558
559/**

--- 677 unchanged lines hidden ---