Function Elt-1

Part of:

package cl-perec
( elt-1 < vector > )