aux.cpp
void parameters::set_s(int idx)
{
    for (int i=10; i<20; i++) q[i]=0.0;
    q[idx]=1.0;
}
/* Set unit source-time function. -------------------------------------------------*/
Set unit source-time function.
Set unit source - time function .
void parameters::set_s(int idx)
{
    for (int i=10; i<20; i++) q[i]=0.0;
    q[idx]=1.0;
}
void parameters :: set_s ( int idx ) { for ( int i = 10 ; i < 20 ; i ++ ) q [ i ] = 0.0 ; q [ idx ] = 1.0 ; }
Set unit source-time function.
Set unit source - time function .