Ideone.com

fork download

(defparameter *a* (vector 1 2 3))
(defparameter *b* (vector 1 2 3))
(print (map 'vector #'* *a* *b* ))

Success #stdin #stdout 0.03s 10584KB

stdin

Standard input is empty

stdout

#(1 4 9)

https://ideone.com/BRWyB

language:

Common Lisp (clisp 2.49.92)

created:

visibility:

public

Share or Embed source code

The brand new service which powers Ideone!

Widget for compiling and running the source code in a web browser!