Chemical calculator: Difference between revisions
m
→{{header|Common Lisp}}
Cyril Nocton (talk | contribs) No edit summary |
Cyril Nocton (talk | contribs) |
||
Line 1,126:
''Draft''
====
<syntaxhighlight lang="lisp">;; 22.11.20 Draft
Line 1,161:
(return (first stack)))))</syntaxhighlight>
====
<syntaxhighlight lang="lisp">(defconstant +tokens+ '(("Ac" A 227.000) ("Ag" A 107.868) ("Al" A 026.982)
Line 1,201:
(")" R 0)))</syntaxhighlight>
====
<pre>(and (equal (molar-mass "H") 1.008)
Line 1,219:
<pre>T</pre>
====
<pre>COOH(C(CH3)2)3CH3
Line 1,442:
C27H46O -> 386.664
Uue -> 315.000</pre>
=={{header|Delphi}}==
{{trans|Go}}
|