Define a function for v' J v

[mohamed82008]

https://discourse.julialang.org/t/differentiating-jacobian-vector-product-for-sliced-score-matching/99746/19?u=mohamed82008