如何聲明一個函數J作爲q的函數？

Question

如何在Mathematica中編寫以下代碼？

J[x,t]=q[x,t]*D[q[x,t],x] 

我想在另一個方程中使用這個標識。

Answer 1

這裏是如何定義這樣一個函數：

J[x_, q_] := q*D[q, x] 

因此，舉例來說，

J[x, q[x, t]] 

會給

q[x, t] * D[q[x, t], x]