| pure subroutine mesh_base_mod::TensorDivergence3D::tensordivergence3d |
( |
class(mesh_base), intent(in) |
this, |
|
|
real, dimension(this%igmin:this%igmax,this%jgmin:this%jgmax,this%kgmin:this%kgmax), intent(in) |
Txx, |
|
|
real, dimension(this%igmin:this%igmax,this%jgmin:this%jgmax,this%kgmin:this%kgmax), intent(in) |
Txy, |
|
|
real, dimension(this%igmin:this%igmax,this%jgmin:this%jgmax,this%kgmin:this%kgmax), intent(in) |
Txz, |
|
|
real, dimension(this%igmin:this%igmax,this%jgmin:this%jgmax,this%kgmin:this%kgmax), intent(in) |
Tyx, |
|
|
real, dimension(this%igmin:this%igmax,this%jgmin:this%jgmax,this%kgmin:this%kgmax), intent(in) |
Tyy, |
|
|
real, dimension(this%igmin:this%igmax,this%jgmin:this%jgmax,this%kgmin:this%kgmax), intent(in) |
Tyz, |
|
|
real, dimension(this%igmin:this%igmax,this%jgmin:this%jgmax,this%kgmin:this%kgmax), intent(in) |
Tzx, |
|
|
real, dimension(this%igmin:this%igmax,this%jgmin:this%jgmax,this%kgmin:this%kgmax), intent(in) |
Tzy, |
|
|
real, dimension(this%igmin:this%igmax,this%jgmin:this%jgmax,this%kgmin:this%kgmax), intent(in) |
Tzz, |
|
|
real, dimension(this%igmin:this%igmax,this%jgmin:this%jgmax,this%kgmin:this%kgmax), intent(out) |
divTx, |
|
|
real, dimension(this%igmin:this%igmax,this%jgmin:this%jgmax,this%kgmin:this%kgmax), intent(out) |
divTy, |
|
|
real, dimension(this%igmin:this%igmax,this%jgmin:this%jgmax,this%kgmin:this%kgmax), intent(out) |
divTz |
|
) |
| |
|
private |
