Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public | :: | n | ||||
character(len=1), | public | :: | l | ||||
integer, | public | :: | set | ||||
real(kind=dp), | public | :: | j | = | -1.0_dp | ||
real(kind=dp), | public | :: | energy_level | ||||
type(radfunc_t), | public | :: | Phi | ||||
type(wfns_t), | public, | pointer | :: | parent_group | => | null() | |
type(wf_t), | public, | pointer | :: | next | => | null() |
type, public :: wf_t
integer :: n
character(len=1) :: l
integer :: set
real(dp) :: j = -1.0_dp
real(dp) :: energy_level
type(radfunc_t) :: Phi
type(wfns_t), pointer :: parent_group => null()
type(wf_t), pointer :: next => null()
end type wf_t