ceed-qfunction.c (b99f7525d49ad2fe8f9289cddf341eb7a9f99461) ceed-qfunction.c (409ab9add72fccfb52bfe19ec1922df4a3ccf50e)
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.

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

62
63 ierr = CeedCalloc(1,qf); CeedChk(ierr);
64 (*qf)->ceed = ceed;
65 ceed->refcount++;
66 (*qf)->refcount = 1;
67 (*qf)->vlength = vlength;
68 (*qf)->function = f;
69 ierr = CeedCalloc(strlen(focca)+1, &focca_copy); CeedChk(ierr);
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.

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

62
63 ierr = CeedCalloc(1,qf); CeedChk(ierr);
64 (*qf)->ceed = ceed;
65 ceed->refcount++;
66 (*qf)->refcount = 1;
67 (*qf)->vlength = vlength;
68 (*qf)->function = f;
69 ierr = CeedCalloc(strlen(focca)+1, &focca_copy); CeedChk(ierr);
70 strcpy(focca_copy, focca);
70 strncpy(focca_copy, focca, strlen(focca)+1);
71 (*qf)->focca = focca_copy;
72 ierr = CeedCalloc(16, &(*qf)->inputfields); CeedChk(ierr);
73 ierr = CeedCalloc(16, &(*qf)->outputfields); CeedChk(ierr);
74 ierr = ceed->QFunctionCreate(*qf); CeedChk(ierr);
75 return 0;
76}
77
78/**

--- 417 unchanged lines hidden --- 		71 (*qf)->focca = focca_copy;
72 ierr = CeedCalloc(16, &(*qf)->inputfields); CeedChk(ierr);
73 ierr = CeedCalloc(16, &(*qf)->outputfields); CeedChk(ierr);
74 ierr = ceed->QFunctionCreate(*qf); CeedChk(ierr);
75 return 0;
76}
77
78/**

--- 417 unchanged lines hidden ---