© Numerical Algorithms Group, 2002.

f02fjf_dot User Supplied Function Description

             [NAGWare Gateway Generator]

Copyright (c) 1993 by the Numerical Algorithms Group Ltd

dot
(see also f02fjf) 


iflag                                 integer
n                                     integer
z (n)                                 real
w (n)                                 real

[fun_value,iflag] = dot(iflag,n,z,w)


 function [fun_value,iflag] = dot(iflag,n,z,w)