set_num_neighbors Subroutine

private subroutine set_num_neighbors(this, n_neighbors)

Type Bound

site

Arguments

Type IntentOptional Attributes Name
class(site) :: this
integer, intent(in) :: n_neighbors

Source Code

    subroutine set_num_neighbors(this, n_neighbors)
        class(site) :: this
        integer, intent(in) :: n_neighbors

        this%n_neighbors = n_neighbors

    end subroutine set_num_neighbors