bond_type Derived Type

  1. mimic_types.f90
  2. mimic_types
  3. bond_type

type, public :: bond_type


Contents

Variables

Type-Bound Procedures

Source Code

bond_type

Components

TypeVisibilityAttributesNameInitial
integer, public :: atom_i

first atom of the bond
integer, public :: atom_j

second atom of the bond
real(kind=dp), public :: length

equilibrium length of the bond

Type-Bound Procedures

procedure, public :: copy => copy_bond

  • private subroutine copy_bond(dest, source)

    Arguments

    TypeIntentOptionalAttributesName
    class(bond_type), intent(out) :: dest
    class(bond_type), intent(in) :: source

generic, public :: assignment(=) => copy

  • private subroutine copy_bond(dest, source)

    Arguments

    TypeIntentOptionalAttributesName
    class(bond_type), intent(out) :: dest
    class(bond_type), intent(in) :: source

Source Code

    type :: bond_type
        !> first atom of the bond
        integer :: atom_i
        !> second atom of the bond
        integer :: atom_j
        !> equilibrium length of the bond
        real(dp) :: length
    contains
        procedure :: copy => copy_bond
        generic, public :: assignment(=) => copy
    end type bond_type