'.$lab.'
'.$ret; } sub ws { local($inurl,$title,$more)=@_; local($url); #if($inurl=~/mws$/) { $ico=$ico_maple; } #if($inurl=~/pdf$/) { $ico=$ico_pdf; } #$url='maple/'.$inurl; $url=$inurl; print ''; print ''; print &zeperl'link($url,$ico_maple); print ''; $pdf=$url; $pdf=~s/\.mws$/.pdf/; print ''; print &zeperl'link($pdf,$ico_pdf); print ''; print ''; print &zeperl'link('',$title); if($more) { print ' ('.$more.')'; } print ''; print ''; print $ret; } sub labbb { local($title)=@_; print $ret; print ''; print ' '; print ''; print ''.$title.''; print ''; print ''; print $ret; print $ret; } !>

Maple worksheets

'; } #&lab('Calculus'); !>