Driver dsdrv3

and
The actions are required.

• ido=-1 or ido=1
  Actions Required:

  Compute for .
  The vector is in workd(ipntr(1)).
  The vector must returned in (overwrite) workd(ipntr(1)).
  The result vector must be returned in the array workd(ipntr(2)).

• ido=2
  Action Required:

  Compute .
  The vector is in workd(ipntr(1)).
  The result vector must be returned in the array workd(ipntr(2)).