Recent public codes are listed below. You can filter them by the following programming languages:
- view
- All
- Ada
- Assembler
- Assembler
- AWK (gawk)
- AWK (mawk)
- Bash
- bc
- Brainf**k
- C
- C#
- C++
- C++0x
- C99 strict
- CLIPS
- Clojure
- COBOL
- COBOL 85
- Common Lisp (clisp)
- D (dmd)
- Erlang
- F#
- Factor
- Falcon
- Forth
- Fortran
- Go
- Groovy
- Haskell
- Icon
- Intercal
- Java
- JavaScript (rhino)
- JavaScript (spidermonkey)
- Lua
- Nemerle
- Nice
- Nimrod
- Objective-C
- Ocaml
- Oz
- Pascal (fpc)
- Pascal (gpc)
- Perl
- Perl 6
- PHP
- Pike
- Prolog (gnu)
- Prolog (swi)
- Python
- Python 3
- R
- Ruby
- Scala
- Scheme (guile)
- Smalltalk
- SQL
- Tcl
- Text
- Unlambda
- VB.NET
- Whitespace
-
1 2 3 4
| aSort | aSort:=SortedCollection new. aSort:= #(3 5 1 4 2 )asSortedCollection: [:a :b | a<=b ]. aSort display
-
1 2 3 4
| aSort | aSort:=SortedCollection new. #(3 5 1 4 2 )asSortedCollection: [:a :b | a<=b ]. aSort display
-
1 2
#(4 3 5 2 1) asSortedCollection: [:a :b | a >= b]. SortedCollection display printString.
-
1 2
#(4 3 5 2 1) asSortedCollection: [:a :b | a >= b]. SortedCollection display printSting.
-
1
#(4 3 5 2 1) asSortedCollection: [:a :b | a >= b].
-
1 2
#(4 3 5 2 1) asSortedCollection: [:a :b | a >= b]. SortedCollection display
-
1 2 3 4 5 6 7
|anArray| anArray:=Array new:5. anArray:=#(1 2 'hi' '#5%' ) asArray. "anArray at:1 put:'hi'." "anArray at:2 put:5." anArray display
-
1 2 3 4 5 6 7 8
| cars | cars:=OrderedCollection new. cars addLast:'lakshmanalingam'. cars add:'periyasamy'. cars addFirst:'suyambulingam'. cars add:'Ramalingam'. cars display
-
1 2 3 4 5 6 7
| cars | cars:=OrderedCollection new. cars add:'periyasamy'. cars addFirst:'suyambulingam'. cars addLast:'lakshmanalingam'. cars add:'Ramalingam'. cars display
-
1 2 3 4 5 6
| cars | cars:=OrderedCollection new. cars add:'periyasamy'. cars addFirst:'suyambulingam'. cars addLast:'lakshmanalingam'. cars display
-
1 2 3 4 5 6 7
|anArray| anArray:=Array new:5. anArray at:1 put:'hi'. anArray at:2 put:5. anArray at:3 put:'periyasamyn'. anArray at:4 put:'#4%'. anArray display
-
1 2 3 4 5 6 7 8
|anArray| anArray:=Array new:5. anArray at:1 put:'hi'. anArray at:2 put:5. anArray at:3 put:'periyasamyn'. anArray at:4 put:'#4%'. Transcript show: anArray at:2 printString. anArray display
-
1 2 3 4 5 6 7
|anArray| anArray:=Array new:5. anArray at:1 put:'hi'. anArray at:2 put:5. anArray at:3 put:'periyasamyn'. anArray at:4 put:'#4%'. anArray display
-
1 2 3 4 5 6
|anArray| anArray:=Array new:5. anArray at:1 put:'hi'. anArray at:2 put:5. anArray at:3 put:'periyasamyn'. anArray display
-
1 2 3 4 5 6
|anArray| anArray:=Array new:5. anArray at:1 put:'hi'. anArray at:2 put:5. anArray at:3 put:'periyasamyn' anArray display
-
1 2 3 4 5 6
|anArray| anArray:=Array new:5. anArray at:1 put:'hi'. anArray at:2 put:5. anArray at:3 put:'periyasamy n' anArray display
-
1 2 3 4 5
|anArray| anArray:=Array new:5. anArray at:1 put:'hi'. anArray at:2 put:5. anArray display
-
1 2 3 4
|anArray | anArray:= Array new:4. anArray at:1 put: 'hi'. anArray display
-
1 2 3 4 5
|anArray | anArray:= Array new:4. anArray at:1 put: 'hi'. anArray at:2 put: 5 anArray display
-
1 2 3 4 5 6
|anArray | anArray:= Array new:4. anArray at:1 put: 'hi'. anArray at:2 put: 5 anArray at:3 put: '#5'. anArray display
-
1 2 3 4 5 6
|anArray | anArray:= Array new:4. anArray at:1 put: 'hi'. anArray at:2 put: 5 anArray at:3 put: '$5%'. anArray display
-
1 2 3 4 5 6
|anArray | anArray:= Array new:4. anArray at:1 put: 'hi'. anArray at:2 put: 5 anArray at:3 put: '#5%'. anArray display
-
1 2 3 4 5 6
|anArray | anArray:= Array new:4. anArray at:1 put: 'hi'. anArray at:2 put: 5 anArray at:3 put: '#5%'. anArray display
-
1 2 3 4 5 6 7 8
|aSet setSize aOccur | aSet:=Set new. aSet:=#( 1 3 2 3 2 2 3). setSize:=aSet size. aOccur:=aSet occurrencesOf:2. Transcript cr; show: 'Size->',setSize printString. Transcript cr; show: 'Occurrencesof 2:',aOccur printString. aSet display
-
1 2 3 4 5 6 7 8
|aSet setSize aOccur | aSet:=Set new. aSet:=#( 1 3 2 3 2 2 3). setSize:=aSet size. aOccur:=aSet occurrencesOf:2. Transcript cr; show: 'Size->'.setSize. Transcript cr; show: 'Occurrencesof 2:',aOccur. aSet display
-
1 2 3 4 5 6 7
| aBag sizeBag | aBag:=Bag new. aBag:=#( 1 3 2 3 2 2 2 3) asBag. sizeBag:=aBag size. aBag occurrencesOf:2. Transcript cr; show:'size->',sizeBag printString ; cr. aBag display.
-
1 2 3 4 5 6 7
| aBag sizeBag | aBag:=Bag new. aBag:=#( 1 3 2 3 2 2 2 3) asBag. sizeBag:=aBag size. aBag occurrencesOf:2. Transcript cr; show:'size->',sizeBag printString. aBag display.
-
1 2 3 4 5 6 7
| aBag sizeBag | aBag:=Bag new. aBag:=#( 1 3 2 3 2 2 2 3) asBag. sizeBag:=Bag size. aBag occurrencesOf:2. Transcript cr; show:'size->',sizeBag printString. aBag display.
-
1 2 3 4 5 6 7 8
| aBag sizeBag | aBag:=Bag new. aBag:=#( 1 3 2 3 2 2 2 3) asBag. sizeBag:=Bag size. aBag occurrencesOf:2. aBag display. Transcript cr; show:'size->',sizeBag printString. Transcript cr; show:'occurencesof2->',aBagoccurencesof:2 printString.
-
1 2 3 4
aBag:=#( 1 3 2 3 2 2 2 3) asBag. aBag size -> 8. aBag occurrencesOf:2. aBag display.


