0
$\begingroup$ 
Cases[Names["System`*"],x_:> If[StringTake[x, 1] == "$", Nothing, If[AtomQ@ToExpression[x], ToExpression[x], Nothing]]]

This still gives me a list of atoms which are actually Built-in Function heads. How do it find and remove them to get a list of all available true atoms.

Improve this question
$\endgroup$
2
  • $\begingroup$ Have you seen WolframLanguageData[EntityClass["WolframLanguageSymbol", "Atomic"]]? (It's not complete; Integer and Real are not there, for example.) This is a previous thread. $\endgroup$
    – J. M.'s persistent exhaustion ♦
    Jun 4, 2016 at 17:04
  • $\begingroup$ Yes, but how do i get the complete list, from the list which i have after the evaluation of the code. $\endgroup$
    – user13892
    Jun 4, 2016 at 17:05

0

Reset to default

Browse other questions tagged or ask your own question.