kill(libname);
libname = concat(componentfolder,"cmtools.so");

kill(manindbfolder);
manindbfolder = concat(componentfolder,"db/manin/");

read(concat(componentfolder,"src/modsymb.pari"));

kill(modsymb);
addhelp(modsymb,"The modsymb package includes the fuctions ellmaninsymbols, ellcuspint, ellmanindbadd and allmanindbget.  For more information on a function *, type ?*");


kill(ellmaninraw);
ellmaninraw(E) = ellmaninraw0(E);
addhelp(ellmaninraw,"ellmaninraw(E) returns a table of raw Manin symbols corresponding to the elliptic curve E");

kill(ellcuspint);
/* ellcuspint(table,a,b) = ellcuspint0(table,a,b); */
install(ellcuspint,GGG,ellcuspint,libname);
addhelp(ellcuspint,"ellcuspint(table,a,b): computes the integral between cusps a and b of the modular function with Manin symbols table (output of ellmaninsymbols");

kill(ellmanindbadd);
ellmanindbadd(cremonaentry) = ellmanindbadd0(cremonaentry);
addhelp(ellmanindbadd,"ellmanindbadd(cremonaentry) stores in the Manin symbol database a table of raw Manin symbols corresponding to the isogeny class cremonaentry which should be expressed in the format explained in the help for the cremona component; for example ellmanindbadd(\"37A\") stores in the database a table of raw Manin symbols for Cremona's isogeny class 37A");

kill(ellmanindbget);
ellmanindbget(cremonaentry) = ellmanindbget0(cremonaentry);
addhelp(ellmanindbget,"ellmanindbget(cremonaentry) retrieves from the Manin symbol database a table of raw Manin symbols corresponding to the isogeny class cremonaentry which should be expressed in the format explained in the help for the cremona component; for example ellmanindbget(\"37A\") retrieves from the database the table of raw Manin symbols for Cremona's isogeny class 37A");