1using Test, LibCEED, LinearAlgebra, StaticArrays 2 3@testset "LibCEED Development Tests" begin 4 @testset "Operator" begin 5 c = Ceed() 6 @interior_qf id = ( 7 c, 8 (input, :in, EVAL_INTERP), 9 (output, :out, EVAL_INTERP), 10 begin 11 output[] = input 12 end, 13 ) 14 b = create_tensor_h1_lagrange_basis(c, 3, 1, 3, 3, GAUSS_LOBATTO) 15 n = getnumnodes(b) 16 offsets = Vector{CeedInt}(0:n-1) 17 r = create_elem_restriction(c, 1, n, 1, 1, n, offsets) 18 op = Operator( 19 c; 20 qf=id, 21 fields=[ 22 (:input, r, b, CeedVectorActive()), 23 (:output, r, b, CeedVectorActive()), 24 ], 25 ) 26 @test showstr(op) == """ 27 CeedOperator 28 1 elements with 27 quadrature points each 29 2 Fields 30 1 Input Field: 31 Input Field [0]: 32 Name: "input" 33 Active vector 34 1 Output Field: 35 Output Field [0]: 36 Name: "output" 37 Active vector""" 38 end 39end 40