| subroutine mod_physics::sub_add_source::sub_add_source |
( |
double precision, intent(in) | qdt, |
|
|
double precision, intent(in) | dtfactor, |
|
|
integer, intent(in) | ixi, |
|
|
integer, intent(in) | l, |
|
|
integer, intent(in) | ixo, |
|
|
| l, |
|
|
double precision, dimension(ixi^s, 1:nw), intent(in) | wct, |
|
|
double precision, dimension(ixi^s,1:nw), intent(in) | wctprim, |
|
|
double precision, dimension(ixi^s, 1:nw), intent(inout) | w, |
|
|
double precision, dimension(ixi^s, 1:ndim), intent(in) | x, |
|
|
logical, intent(in) | qsourcesplit, |
|
|
logical, intent(inout) | active ) |
|
virtual |