Function Times2

Part of:

package cl-mathstats
( times2 < i > &optional < power > )
Multiply `i' by a power of 2.