#include <ripley/RipleyDomain.h>
#include <escript/DataFactory.h>
#include <escript/FunctionSpaceFactory.h>
#include <pasowrap/SystemMatrixAdapter.h>
#include <pasowrap/TransportProblemAdapter.h>
#include <ripley/domainhelpers.h>
#include <iomanip>
Define Documentation
Value:do {\
for (dim_t ic=0; ic<mat->col_block_size; ++ic) {\
const dim_t i_Sol=ic+mat->col_block_size*l_col;\
for (dim_t ir=0; ir<mat->row_block_size; ++ir) {\
const dim_t i_Eq=ir+mat->row_block_size*l_row;\
VAL[k*mat->block_size+ir+mat->row_block_size*ic]\
+= array[INDEX4(i_Eq, i_Sol, k_Eq, k_Sol, num_Eq, num_Sol, nodes_Eq.size())];\
}\
}\
} while(0)
Referenced by ripley::RipleyDomain::addToSystemMatrix().