1 extern int v3p_netlib_dlaruv_(
2   v3p_netlib_integer *iseed,
3   v3p_netlib_integer *n,
4   v3p_netlib_doublereal *x
5   );
6