SUBROUTINE F(X,V)
      DOUBLE PRECISION X(1),V(1)
C
C EVALUATE  F(X)  AND RETURN IN THE VECTOR  V .
C
      RETURN
      END

.