List of particle combinations.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(ftlListInt), | public | :: | ia |
index of particle 'a' |
|||
type(ftlListInt), | public | :: | ib |
index of particle 'b' |
|||
type(ftlListDouble), | public | :: | weight |
weight of 'a+b' assigned to pivot |
Constructor comblist
.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(comblist), | intent(inout) | :: | self |
object |
Size of comblist
.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(comblist), | intent(in) | :: | self |
object |
Append values to comblist
object.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(comblist), | intent(inout) | :: | self |
object |
||
integer | :: | ia |
particle index |
|||
integer | :: | ib |
particle index |
|||
real(kind=rk) | :: | weight |
weight |
Clear comblist
object.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(comblist), | intent(inout) | :: | self |
object |
type :: comblist
!! List of particle combinations.
type(ftlListInt) :: ia
!! index of particle 'a'
type(ftlListInt) :: ib
!! index of particle 'b'
type(ftlListDouble) :: weight
!! weight of 'a+b' assigned to pivot
contains
procedure, pass(self) :: new => list_new
procedure, pass(self) :: size => list_size
procedure, pass(self) :: append => list_append
procedure, pass(self) :: toarray => list_toarray
procedure, pass(self) :: clear => list_clear
end type comblist