set_nconnect_max Subroutine

private subroutine set_nconnect_max(this, n_connect_max)

Type Bound

lattice

Arguments

Type IntentOptional Attributes Name
class(lattice) :: this
integer, intent(in) :: n_connect_max

Contents

Source Code

set_nconnect_max

Source Code

    subroutine set_nconnect_max(this, n_connect_max)
        class(lattice) :: this
        integer, intent(in) :: n_connect_max

        this%n_connect_max = n_connect_max

    end subroutine set_nconnect_max