NAME

vsinqi - initialize the array WSAVE, which is used in both VSINQF and VSINQB.


SYNOPSIS

  SUBROUTINE VSINQI( N, WSAVE)
  INTEGER N
  REAL WSAVE(*)
  SUBROUTINE VSINQI_64( N, WSAVE)
  INTEGER*8 N
  REAL WSAVE(*)

F95 INTERFACE

  SUBROUTINE VSINQI( N, WSAVE)
  INTEGER :: N
  REAL, DIMENSION(:) :: WSAVE
  SUBROUTINE VSINQI_64( N, WSAVE)
  INTEGER(8) :: N
  REAL, DIMENSION(:) :: WSAVE

C INTERFACE

#include <sunperf.h>

void vsinqi(int n, float *wsave);

void vsinqi_64(long n, float *wsave);


ARGUMENTS