op_obj_p_div Function

private function op_obj_p_div(this, in1, in2, in3) result(out)

Compute the divergence of a vector (in1,in2,in3) This function takes in1,in2,in3 face-centered (stag=1/2/3) and returns the divergence on cell centers (stag=0)

Type Bound

op_obj

Arguments

Type IntentOptional Attributes Name
class(op_obj), intent(inout) :: this

Differential operators utility

type(eulerian_obj_r), intent(in) :: in1

Component in 1-dir

type(eulerian_obj_r), intent(in) :: in2

Component in 2-dir

type(eulerian_obj_r), intent(in) :: in3

Component in 3-dir

Return Value type(eulerian_obj_r)

Result


Calls

proc~~op_obj_p_div~~CallsGraph proc~op_obj_p_div op_obj%op_obj_p_div proc~eulerian_obj_init eulerian_obj_base%eulerian_obj_Init proc~op_obj_p_div->proc~eulerian_obj_init