// Magma code for working with modular form 1815.4.a.s


// Compute space of new eigenforms: 
//Please install CHIMP (https://github.com/edgarcosta/CHIMP) if you want to run this code
chi := DirichletCharacter("1815.1");
S:= CuspForms(chi, 4);
N := Newforms(S);