Common Lisp Package: ELEMENTS

README:

FUNCTION

Public

ATOMIC-NUMBER-ELEMENT (ATOMIC-NUMBER)

Get an element from its atomic number

ATOMIC-WEIGHT-ELEMENT (ATOMIC-WEIGHT)

Get an element from its approximate atomic weight

BOILING-POINT-ELEMENT (BOILING-POINT)

Get an element from its approximate boiling point

ELECTRONEGATIVITY-ELEMENT (ELECTRONEGATIVITY)

Get an element from its approximate electronegativity

ELEMENT-ATOMIC-NUMBER (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

ELEMENT-ATOMIC-WEIGHT (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

ELEMENT-BOILING-POINT (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

ELEMENT-ELECTRONEGATIVITY (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

ELEMENT-NAME (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

ELEMENT-OXIDATION-STATES (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

ELEMENT-SYMBOL (INSTANCE)

@arg[extid]{A @class{extid}} @return[sytemid]{puri:uri or nil} Returns the System ID part of this External ID.

FIND-ELEMENT-IF (PREDICATE)

A version of `find-if' that searches in `*elements-table'

FIND-ELEMENT-IF-SLOT-NEAR (SLOT-ACCESSOR VALUE)

Find the element where the value returned by calling `slot-accessor' on the element produces the closest match to `value'

GET-ELEMENT (ELEMENT &KEY ERROR-P)

Get an element structure from either an element structure (just return it), an element name, or a symbol for an element. This is not case sensitive. Or you can search by atomic number if `element' is a positive integer. Or search for an element whose symbol or name equal the symbol-name if element is a symbol. If `error-p' is nil, then unmatched elements will simply return nil but if it is t, then an error will be raised.

NAME-ELEMENT (NAME)

Get an element from its name

SYMBOL-ELEMENT (SYMBOL)

Get an element from its symbol

Undocumented

SETFELEMENT-ATOMIC-NUMBER (NEW-VALUE INSTANCE)

SETFELEMENT-ATOMIC-WEIGHT (NEW-VALUE INSTANCE)

SETFELEMENT-BOILING-POINT (NEW-VALUE INSTANCE)

SETFELEMENT-ELECTRONEGATIVITY (NEW-VALUE INSTANCE)

SETFELEMENT-NAME (NEW-VALUE INSTANCE)

SETFELEMENT-OXIDATION-STATES (NEW-VALUE INSTANCE)

SETFELEMENT-SYMBOL (NEW-VALUE INSTANCE)

TEST-ELEMENTS

TEST-GET-ELEMENT

Private

Undocumented

COPY-ELEMENT (INSTANCE)

DEFELEMENT (NAME ATOMIC-WEIGHT ATOMIC-NUMBER OXIDATION-STATES BOILING-POINT SYMBOL ELECTRONEGATIVITY)

ELEMENT-P (OBJECT)

MAKE-ELEMENT (&KEY ((NAME DUM0) ) ((ATOMIC-WEIGHT DUM1) 0.0) ((ATOMIC-NUMBER DUM2) 0) ((OXIDATION-STATES DUM3) ) ((BOILING-POINT DUM4) 0.0) ((SYMBOL DUM5) ) ((ELECTRONEGATIVITY DUM6) 0.0))

VARIABLE

Private

*ELEMENTS-TABLE*

Table of elements

CLASS

Public

Undocumented

ELEMENT