clone -- Clone current object

call  x%clone(y,info)

Type:
Asynchronous.
On Entry
x
the dense vector.
Scope: local.

On Return
y
A copy of the input object.
info
Return code.