Clone -- clone current object

call  desc%clone(descout,info)

Type:

Asynchronous.

On Entry

desc

the communication descriptor.
Scope: local.

On Return

descout

A copy of the input object.

info

Return code.