'From Squeak3.9alpha of ''27 October 2004'' [latest update: #6474] on 25 November 2004 at 9:11:09 am'! "Change Set: AtomMorphEnh Date: 25 November 2004 Author: Torsten Bergmann This adds a class comment and an example to AtomMorph. It also fixes the broken AtomMorphTest which failed due to the missing class comment."! !AtomMorph commentStamp: 'tbn 11/25/2004 09:06' prior: 0! AtomMorph represents an atom used in the simulation of an ideal gas. It's container is typically a BouncingAtomsMorph. Try: BouncingAtomsMorph new openInWorld to open the gas simulation or: AtomMorph example to open an instance in the current world! !AtomMorph class methodsFor: 'examples' stamp: 'tbn 11/25/2004 09:03'! example " AtomMorph example " |a| a := AtomMorph new openInWorld. a color: Color random. [1000 timesRepeat: [a bounceIn: World bounds. (Delay forMilliseconds: 50) wait]. a delete] fork.! !