Subversion Repositories slepc-dev

Rev

Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2580 Rev 2816
Line 41... Line 41... 
%
 
%
 
n = 30;
 
n = 30;
 
mat = PetscMat();
 
mat = PetscMat();
 
mat.SetType('seqaij');
 
mat.SetType('seqaij');
 
mat.SetSizes(n,n,n,n);
 
mat.SetSizes(n,n,n,n);
 
 
 
mat.SetUp();
 
for i.html">i=1:n
 
for i.html">i=1:n
 
  mat.SetValues(i.html">i,i.html">i,2.0);
 
  mat.SetValues(i.html">i,i.html">i,2.0);
 
end
 
end
 
for i.html">i=1:n-1
 
for i.html">i=1:n-1
 
  mat.SetValues(i.html">i+1,i.html">i,-1.0);
 
  mat.SetValues(i.html">i+1,i.html">i,-1.0);