Function Add-Projection

Part of:

package cl-perec
( add-projection < input > < query > )