function beginmodule(&p,sourcepath,modname,moddesc,secname,section_descriptors)
p.moddesc = moddesc;
p.secname = lower(secname);
p.modulename = lower(modname);
p.section_descriptors = section_descriptors;
p.sourcepath = sourcepath;
p.eqnlist = {};
filename = [sourcepath '/help/html/' p.secname '_' p.modulename '.html'];
p.myfile = fopen(filename,'w');
if (p.myfile < 0)
error(sprintf('unable to open %s for output',filename));
end
fprintf(p.myfile,'\n');
fprintf(p.myfile,'\n');
fprintf(p.myfile,'\n');
fprintf(p.myfile,'\n');
fprintf(p.myfile,'%s\n',moddesc);
fprintf(p.myfile,'\n');
fprintf(p.myfile,'\n');
fprintf(p.myfile,'%s
\n',moddesc);
if (~isfield(p.sectables,p.secname))
p.sectables.(p.secname) = {};
end
p.sectables.(p.secname) = [p.sectables.(p.secname);{p.modulename, ...
p.moddesc}];
fprintf(p.myfile,'\n');
fprintf(p.myfile,'Section: %s \n',lower(secname),section_descriptors.(lower(secname)));
p.verbatim = 0;
p.ignore = 0;