mod_functions_bfield Module

Subroutines

public subroutine get_current(w, ixImin1, ixImin2, ixImin3, ixImax1, ixImax2, ixImax3, ixOmin1, ixOmin2, ixOmin3, ixOmax1, ixOmax2, ixOmax3, idirmin, current, fourthorder)

Compute the current density j = curl(B)

Arguments

Type	Intent	Optional	Attributes		Name
double precision,	intent(in)			::	w(ixImin1:ixImax1,ixImin2:ixImax2,ixImin3:ixImax3,1:nw)
integer,	intent(in)			::	ixImin1
integer,	intent(in)			::	ixImin2
integer,	intent(in)			::	ixImin3
integer,	intent(in)			::	ixImax1
integer,	intent(in)			::	ixImax2
integer,	intent(in)			::	ixImax3
integer,	intent(in)			::	ixOmin1
integer,	intent(in)			::	ixOmin2
integer,	intent(in)			::	ixOmin3
integer,	intent(in)			::	ixOmax1
integer,	intent(in)			::	ixOmax2
integer,	intent(in)			::	ixOmax3
integer,	intent(out)			::	idirmin
double precision,	intent(inout)			::	current(ixImin1:ixImax1,ixImin2:ixImax2,ixImin3:ixImax3,7-2*ndir:3)
logical,	intent(in),	optional		::	fourthorder

public subroutine get_divb(w, ixImin1, ixImin2, ixImin3, ixImax1, ixImax2, ixImax3, ixOmin1, ixOmin2, ixOmin3, ixOmax1, ixOmax2, ixOmax3, divb, fourthorder)

Calculate div B within ixO

Arguments

Type	Intent	Optional	Attributes		Name
double precision,	intent(in)			::	w(ixImin1:ixImax1,ixImin2:ixImax2,ixImin3:ixImax3,1:nw)
integer,	intent(in)			::	ixImin1
integer,	intent(in)			::	ixImin2
integer,	intent(in)			::	ixImin3
integer,	intent(in)			::	ixImax1
integer,	intent(in)			::	ixImax2
integer,	intent(in)			::	ixImax3
integer,	intent(in)			::	ixOmin1
integer,	intent(in)			::	ixOmin2
integer,	intent(in)			::	ixOmin3
integer,	intent(in)			::	ixOmax1
integer,	intent(in)			::	ixOmax2
integer,	intent(in)			::	ixOmax3
double precision,	intent(inout)			::	divb(ixImin1:ixImax1,ixImin2:ixImax2,ixImin3:ixImax3)
logical,	intent(in),	optional		::	fourthorder