\\ Pari/GP code for working with elliptic curve isogeny class 3822.ba \\ Define the isogeny class: E = ellinit([1, 0, 0, -3725, 89361]) ellisomat(E) \\ Mordell-Weil rank: [lower,upper] = ellrank(E) \\ q-expansion of modular form: Ser(ellan(E,20),q)*q \\ Isogeny matrix: ellisomat(E)