4.7.15 SUBROUTINE ZUCODS(D,S,N) : COpy Double prec to Single prec

This routine copies the firts N words of the double precission array D to the single precission array S.

ARGUMENTS:

INPUT :

    D     : Double precission array
    N     : number of words the sets extend over
  OUTOUT :
    S     : Single precission copy of first N words of D

IMPLICIT INPUTS:

    none

IMPLICIT OUTPUTS:

    none

CALLED BY :

any routine.

CALLED ROUTINE(S):

none

SIDE EFFECTS:

none

AUTHORS:

M. Berggren,CERN

CREATION DATE:

20-JUN-2001