Esempi in C++ (Cpp) per noninterpKernels

Esempio n. 1

File: test_modified_helmholtz_3d_double_layer_potential_kernel_interpolated_functor.cpp Progetto: evantwout/bempp

BOOST_AUTO_TEST_CASE_TEMPLATE(agrees_with_noninterpolated_for_negative_real_wave_number,
                              ValueType, kernel_types)
{
    typedef Fiber::ModifiedHelmholtz3dDoubleLayerPotentialKernelFunctor<ValueType>
            NoninterpolatedFunctor;
    typedef Fiber::ModifiedHelmholtz3dDoubleLayerPotentialKernelInterpolatedFunctor<ValueType>
            InterpolatedFunctor;
    typedef Fiber::DefaultCollectionOfKernels<NoninterpolatedFunctor>
            NoninterpolatedKernels;
    typedef Fiber::DefaultCollectionOfKernels<InterpolatedFunctor>
            InterpolatedKernels;
    typedef typename Fiber::ScalarTraits<ValueType>::RealType CoordinateType;
    const ValueType waveNumber = -1;
    const CoordinateType wavelength = 2. * M_PI / std::abs(waveNumber);
    const double maxDist = 20.;
    auto parameterList = GlobalParameters::parameterList();
    const int interpPtsPerWavelength = parameterList.template get<int>("options.assembly.interpolationPointsPerWavelength");

    NoninterpolatedKernels noninterpKernels((NoninterpolatedFunctor(waveNumber)));
    InterpolatedKernels interpKernels((InterpolatedFunctor(waveNumber, maxDist,
                                                          interpPtsPerWavelength)));

    Fiber::GeometricalData<CoordinateType> testGeomData, trialGeomData;
    const int worldDim = 3;
    const int testPointCount = 3, trialPointCount = 50;
    testGeomData.globals.resize(worldDim, testPointCount);
    testGeomData.globals.fill(0.);
    testGeomData.globals(0, 0) = wavelength / (2 * interpPtsPerWavelength);
    testGeomData.globals(1, 1) = wavelength / (2 * interpPtsPerWavelength);
    testGeomData.globals(2, 2) = wavelength / (2 * interpPtsPerWavelength);

    trialGeomData.globals = 0.5 * maxDist *
            generateRandomMatrix<CoordinateType>(worldDim, trialPointCount);
    trialGeomData.globals.col(0).fill(0.);
    trialGeomData.globals.block(0, 1, trialGeomData.globals.rows(), 10) *= 0.01; // to test well the area near origin
    trialGeomData.globals.block(0, 11, trialGeomData.globals.rows(), 10) *= 0.1;

    trialGeomData.normals.resize(worldDim, trialPointCount);
    trialGeomData.normals.fill(0.);
    trialGeomData.normals.row(0).fill(0.5);
    trialGeomData.normals.row(1).fill(0.5);
    trialGeomData.normals.row(2).fill(1. / sqrt(2.)); // just to make them nonzero and nonequal

    Fiber::CollectionOf4dArrays<ValueType> noninterpResult, interpResult;
    noninterpKernels.evaluateOnGrid(testGeomData, trialGeomData, noninterpResult);
    interpKernels.evaluateOnGrid(testGeomData, trialGeomData, interpResult);

    CoordinateType tol = 50 * std::numeric_limits<CoordinateType>::epsilon();
    BOOST_CHECK(check_arrays_are_close<ValueType>(interpResult[0],
                                                  noninterpResult[0], tol));
}

Esempio n. 2

File: test_modified_helmholtz_3d_double_layer_potential_kernel_interpolated_functor.cpp Progetto: UCL/bempp

BOOST_AUTO_TEST_CASE_TEMPLATE(agrees_with_noninterpolated_for_complex_wave_number,
                              ValueType, complex_kernel_types)
{
    typedef Fiber::ModifiedHelmholtz3dDoubleLayerPotentialKernelFunctor<ValueType>
            NoninterpolatedFunctor;
    typedef Fiber::ModifiedHelmholtz3dDoubleLayerPotentialKernelInterpolatedFunctor<ValueType>
            InterpolatedFunctor;
    typedef Fiber::DefaultCollectionOfKernels<NoninterpolatedFunctor>
            NoninterpolatedKernels;
    typedef Fiber::DefaultCollectionOfKernels<InterpolatedFunctor>
            InterpolatedKernels;
    typedef typename Fiber::ScalarTraits<ValueType>::RealType CoordinateType;
    const ValueType waveNumber(1., 1.);
    const CoordinateType wavelength = 2. * M_PI / std::abs(waveNumber);
    const double maxDist = 20.;
    const int interpPtsPerWavelength = Bempp::DEFAULT_HELMHOLTZ_INTERPOLATION_DENSITY;
    NoninterpolatedKernels noninterpKernels((NoninterpolatedFunctor(waveNumber)));
    InterpolatedKernels interpKernels((InterpolatedFunctor(waveNumber, maxDist,
                                                          interpPtsPerWavelength)));

    Fiber::GeometricalData<CoordinateType> testGeomData, trialGeomData;
    const int worldDim = 3;
    const int testPointCount = 3, trialPointCount = 30;
    testGeomData.globals.set_size(worldDim, testPointCount);
    testGeomData.globals.fill(0.);
    testGeomData.globals(0, 0) = wavelength / (2 * interpPtsPerWavelength);
    testGeomData.globals(1, 1) = wavelength / (2 * interpPtsPerWavelength);
    testGeomData.globals(2, 2) = wavelength / (2 * interpPtsPerWavelength);

    trialGeomData.globals = 0.5 * maxDist *
            generateRandomMatrix<CoordinateType>(worldDim, trialPointCount);
    trialGeomData.globals.col(0).fill(0.);
    trialGeomData.globals.cols(1, 10) *= 0.01; // to test well the area near origin
    trialGeomData.globals.cols(11, 20) *= 0.1;

    trialGeomData.normals.set_size(worldDim, trialPointCount);
    trialGeomData.normals.fill(0.);
    trialGeomData.normals.row(0).fill(0.5);
    trialGeomData.normals.row(1).fill(0.5);
    trialGeomData.normals.row(2).fill(1. / sqrt(2.)); // just to make them nonzero and nonequal

    Fiber::CollectionOf4dArrays<ValueType> noninterpResult, interpResult;
    noninterpKernels.evaluateOnGrid(testGeomData, trialGeomData, noninterpResult);
    interpKernels.evaluateOnGrid(testGeomData, trialGeomData, interpResult);

    CoordinateType tol = 50 * std::numeric_limits<CoordinateType>::epsilon();
    BOOST_CHECK(check_arrays_are_close<ValueType>(interpResult[0],
                                                  noninterpResult[0], tol));
}