home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.cs.arizona.edu
/
ftp.cs.arizona.edu.tar
/
ftp.cs.arizona.edu
/
icon
/
historic
/
v941.tgz
/
icon.v941src.tar
/
icon.v941src
/
ipl
/
packs
/
idol
/
main.iol
< prev
next >
Wrap
Text File
|
2000-07-29
|
289b
|
10 lines
procedure main()
mydeque := Deque()
mydeque$push("hello")
mydeque$push("world")
write("My deque is size ",mydeque$size())
every write("give me a ",mydeque$foreach())
write("A random element is ",mydeque$random())
write("getting ",mydeque$get()," popping ",mydeque$pop())
end