Lines Matching +full:setup +full:- +full:qfunctions
1 !-----------------------------------------------------------------------
5 include 't320-basis-f.h'
7 ! Header with QFunctions
9 include 't510-operator-f.h'
10 !-----------------------------------------------------------------------
52 external setup,mass
87 ! -- Restrictions
97 ! -- Bases
105 ! -- QFunctions
106 call ceedqfunctioncreateinterior(ceed,1,setup,&
108 &//'t510-operator.h:setup'//char(0),qf_setuptet,err)
115 &//'t510-operator.h:mass'//char(0),qf_masstet,err)
120 ! -- Operators
121 ! ---- Setup Tet
131 ! ---- Mass Tet
143 do i=0,nelemhex-1
147 do j=0,phex-1
148 do k=0,phex-1
154 ! -- Restrictions
164 ! -- Bases
170 ! -- QFunctions
171 call ceedqfunctioncreateinterior(ceed,1,setup,&
173 &//'t510-operator.h:setup'//char(0),qf_setuphex,err)
180 &//'t510-operator.h:mass'//char(0),qf_masshex,err)
185 ! -- Operators
186 ! ---- Setup Hex
196 ! ---- Mass Hex
209 call ceedoperatorsetname(op_setup,'setup',err)
249 !-----------------------------------------------------------------------