4021.sagews

reset()
var('x,y,z')
U = CoordinatePatch((x,y,z))
Omega = DifferentialForms(U)
A = DifferentialForm(Omega, 1)
A[0] = x
A[1] = sin(x)
show(A)
B = DifferentialForm(Omega, 2)
B[0,1] = 1
B[1,2] = sin(x)
show(B)

\newcommand{\Bold}[1]{\mathbf{#1}}x d x + \sin\left(x\right) d y

\newcommand{\Bold}[1]{\mathbf{#1}}d x \wedge d y + \sin\left(x\right) d y \wedge d z