load(vect)$

Kovektorfeld bzw. Differentialform

w:[2*x1*(x2^3),3*(x1^2)*(x2^2)];

Potential (Skalarfeld)

h:potential(w,[x1,x2]);