TABLE OF CONTENTS

fortran/dzero [ Methods ]

NAME

  dzero --- zero out a double vector

FUNCTION

Clears the values in a double vector and replaces them with 0.

SYNOPSIS

1245       subroutine dzero(x,len)

INPUTS

   x       a double vector
   len     length of x

SOURCE

1247       integer len,i
1248       double precision x(len)
1249       do 100 i=1,len
1250         x(i)=0.d0
1251  100    continue
1252       end