Method addTimeIntegratedPointSourceFSRM

src/Kernels/PointSourceClusterOnHost.cpp:87–108

}

void PointSourceClusterOnHost::addTimeIntegratedPointSourceFSRM(unsigned source,
                                                                double from,
                                                                double to,
                                                                real dofs[tensor::Q::size()]) {
  auto o0 = sources_->sampleOffsets[0][source];
  auto o1 = sources_->sampleOffsets[0][source + 1];
  auto slip = computeSampleTimeIntegral(from,
                                        to,
                                        sources_->onsetTime[source],
                                        sources_->samplingInterval[source],
                                        sources_->sample[0].data() + o0,
                                        o1 - o0);
  kernel::sourceFSRM krnl;
  krnl.Q = dofs;
  krnl.mInvJInvPhisAtSources = sources_->mInvJInvPhisAtSources[source].data();
  krnl.momentFSRM = sources_->tensor[source].data();
  krnl.stfIntegral = slip;
#ifdef MULTIPLE_SIMULATIONS
  krnl.oneSimToMultSim = init::oneSimToMultSim::Values;
#endif
  krnl.execute();
}

} // namespace seissol::kernels