Subversion Repositories wimsdev

Rev

Rev 11123 | Rev 12247 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 11123 Rev 12122
Line 66... Line 66...
66 
%stmp=!lower $tmp\n\
 66 
%stmp=!lower $tmp\n\
67 
%stmp%d=!exec maxima diff($tmp);\n",
 67 
%stmp%d=!exec maxima diff($tmp);\n",
68 
          setpre,p,setpre,setpre,prepcnt);
 68 
          setpre,p,setpre,setpre,prepcnt);
69 
}
 69 
}
70 
 
 70 
 
71 
/* user pari to compute matrix determinant. */
 71 
/* use pari to compute matrix determinant. */
72 
void sp_det(char *p, int ptype)
 72 
void sp_det(char *p, int ptype)
73 
{
 73 
{
74 
    fprintf(outf,"%stmp=!translate $    $ to ; in %s\n\n\
 74 
    fprintf(outf,"%stmp=!translate $    $ to ; in %s\n\n\
75 
%stmp%d=!exec pari matdet([$tmp])\n",
 75 
%stmp%d=!exec pari matdet([$tmp])\n",
76 
          setpre,p,setpre,prepcnt);
 76 
          setpre,p,setpre,prepcnt);