xy_site Derived Type

type, public, extends(xy) :: xy_site

A 2D point extension for inequivalent sites


Inherits

type~~xy_site~~InheritsGraph type~xy_site xy_site type~xy xy type~xy_site->type~xy

Inherited by

type~~xy_site~~InheritedByGraph type~xy_site xy_site type~xy_lattice xy_lattice type~xy_lattice->type~xy_site site

Components

Type Visibility Attributes Name Initial
real(kind=8), public :: x
real(kind=8), public :: y
character(len=1), public :: label

A or B (sublattice)

integer, public :: key = 0

for lattice lookup


Type-Bound Procedures

generic, public :: operator(==) => eq_xy

  • private pure elemental function eq_xy(A, B) result(isequal)

    tolerance equality for xy class [absolute tol hard-coded to 1d-12] -> probably to improve...

    Arguments

    Type IntentOptional Attributes Name
    class(xy), intent(in) :: A
    class(xy), intent(in) :: B

    Return Value logical

generic, public :: operator(/=) => neq_xy

  • private pure elemental function neq_xy(A, B) result(notequal)

    tolerance inequality for xy class [absolute tol hard-coded to 1d-12] -> probably to improve...

    Arguments

    Type IntentOptional Attributes Name
    class(xy), intent(in) :: A
    class(xy), intent(in) :: B

    Return Value logical