rings-king.F90 File Reference

King ring statistics. More...

Go to the source code of this file.

Functions/Subroutines
subroutine	setup_cpat_vpat_ring (nat, str, cont, vois, cpt, vpt)
subroutine	setup_cpat_vpat (str, nat)
integer function	king_rings ()
subroutine	king_ring_search_steps (ari)
integer function	check_ring (the_ring, fnd, s_cr, rid, tae, tah, rsaved, osaved, tring, inde, indh, resl)
recursive subroutine	inside_ring (the_ring, fnd, s_ir, ai_ir, rid, tae, tah, lra, lrb, nrpat, rsaved, osaved, tring, inde, indh, resl, cpt, vpt)
subroutine	save_this_ring (the_ring, tles, rsaved, osaved, tring, indt, resl)
subroutine	del_this_ring (tled, rsaved, osaved, tring, resl, indt)

Detailed Description

King ring statistics.

Author

Sébastien Le Roux sebas.nosp@m.tien.nosp@m..lero.nosp@m.ux@i.nosp@m.pcms..nosp@m.unis.nosp@m.tra.f.nosp@m.r

Definition in file rings-king.F90.

Function/Subroutine Documentation

check_ring()

integer function check_ring	(	type (ring), dimension(tailld), intent(in)	the_ring,
		logical, intent(inout)	fnd,
		integer, intent(in)	s_cr,
		integer, intent(in)	rid,
		integer, intent(inout)	tae,
		integer, intent(inout)	tah,
		integer, dimension(taillr,numa,taillr), intent(inout)	rsaved,
		integer, dimension(taillr,numa,taillr), intent(inout)	osaved,
		integer, dimension(taillr), intent(inout)	tring,
		integer, dimension(numa), intent(inout)	inde,
		integer, dimension(numa), intent(inout)	indh,
		integer, dimension(taillr), intent(inout)	resl )

Definition at line 837 of file rings-king.F90.

del_this_ring()

subroutine del_this_ring	(	integer, intent(in)	tled,
		integer, dimension(taillr,numa,taillr), intent(inout)	rsaved,
		integer, dimension(taillr,numa,taillr), intent(inout)	osaved,
		integer, dimension(taillr), intent(inout)	tring,
		integer, dimension(taillr), intent(inout)	resl,
		integer, dimension(numa), intent(inout)	indt )

Definition at line 1125 of file rings-king.F90.

inside_ring()

recursive subroutine inside_ring	(	type (ring), dimension(tailld), intent(inout)	the_ring,
		logical, intent(inout)	fnd,
		integer, intent(in)	s_ir,
		integer, intent(in)	ai_ir,
		integer, intent(in)	rid,
		integer, intent(inout)	tae,
		integer, intent(inout)	tah,
		integer, intent(in)	lra,
		integer, intent(in)	lrb,
		integer, dimension(na), intent(inout)	nrpat,
		integer, dimension(taillr,numa,taillr), intent(inout)	rsaved,
		integer, dimension(taillr,numa,taillr), intent(inout)	osaved,
		integer, dimension(taillr), intent(inout)	tring,
		integer, dimension(numa), intent(inout)	inde,
		integer, dimension(numa), intent(inout)	indh,
		integer, dimension(taillr), intent(inout)	resl,
		integer, dimension(na), intent(in)	cpt,
		integer, dimension(na,maxn), intent(in)	vpt )

Definition at line 963 of file rings-king.F90.

king_ring_search_steps()

subroutine king_ring_search_steps

(

integer, intent(in)

ari

)

Definition at line 531 of file rings-king.F90.

king_rings()

integer function king_rings

Definition at line 96 of file rings-king.F90.

save_this_ring()

subroutine save_this_ring	(	type (ring), dimension(tailld), intent(in)	the_ring,
		integer, intent(in)	tles,
		integer, dimension(taillr,numa,taillr), intent(inout)	rsaved,
		integer, dimension(taillr,numa,taillr), intent(inout)	osaved,
		integer, dimension(taillr), intent(inout)	tring,
		integer, dimension(numa), intent(inout)	indt,
		integer, dimension(taillr), intent(inout)	resl )

Definition at line 1045 of file rings-king.F90.

setup_cpat_vpat()

subroutine setup_cpat_vpat	(	integer, intent(in)	str,
		integer, intent(in)	nat )

Definition at line 61 of file rings-king.F90.

setup_cpat_vpat_ring()

subroutine setup_cpat_vpat_ring	(	integer, intent(in)	nat,
		integer, intent(in)	str,
		integer, dimension(nat,ns), intent(in)	cont,
		integer, dimension(maxn,nat,ns), intent(in)	vois,
		integer, dimension(nat), intent(inout)	cpt,
		integer, dimension(nat,maxn), intent(inout)	vpt )

Definition at line 21 of file rings-king.F90.