← Back to branch summary

~ubuntu-branches/ubuntu/oneiric/suitesparse/oneiric

« back to all changes in this revision

Viewing changes to CSparse/MATLAB/CSparse/private/drawboxes.m

  • Committer: Bazaar Package Importer
  • Author(s): Nick Ellery
  • Date: 2009-06-14 19:15:52 UTC
  • mfrom: (7.2.2 sid)
  • Revision ID: james.westby@ubuntu.com-20090614191552-2hliya5q8n1quseu
Tags: 1:3.4.0-1ubuntu1
https://launchpad.net/bugs/387137
* Merge from debian unstable, remaining changes (LP: #387137):
  - debian/control:
    - demote libatlas-doc from recommends to suggests as it is not in main
    - drop recommends on doc-central as it is not in main

Show diffs side-by-side

added added

removed removed

Lines of Context:
CSparse/MATLAB/CSparse/private/drawboxes.m
9
9
 
10
10
if (nb > 1)
11
11
    if (e == 1)
12
 
        r1 = r (1:nb) - .5 ;
13
 
        r2 = r (2:nb+1) - .5 ;
14
 
        c1 = s (1:nb) - .5 ;
15
 
        c2 = s (2:nb+1) - .5 ;
 
12
        r1 = r (1:nb) - .5 ;
 
13
        r2 = r (2:nb+1) - .5 ;
 
14
        c1 = s (1:nb) - .5 ;
 
15
        c2 = s (2:nb+1) - .5 ;
16
16
    else
17
 
        r1 = ceil (r (1:nb) / e) - .5 ;
18
 
        r2 = ceil ((r (2:nb+1) - 1) / e) + .5 ;
19
 
        c1 = ceil (s (1:nb) / e) - .5 ;
20
 
        c2 = ceil ((s (2:nb+1) - 1) / e) + .5 ;
 
17
        r1 = ceil (r (1:nb) / e) - .5 ;
 
18
        r2 = ceil ((r (2:nb+1) - 1) / e) + .5 ;
 
19
        c1 = ceil (s (1:nb) / e) - .5 ;
 
20
        c2 = ceil ((s (2:nb+1) - 1) / e) + .5 ;
21
21
    end
22
22
    kk = find (diff (c1) > 0 | diff (c2) > 0 | diff (r1) > 0 | diff (r2) > 0) ;
23
23
    kk = [1 kk+1] ;
24
24
    for k = kk
25
 
        plot ([c1(k) c2(k) c2(k) c1(k) c1(k)], ...
26
 
              [r1(k) r1(k) r2(k) r2(k) r1(k)], 'k', 'LineWidth', 1) ;
 
25
        plot ([c1(k) c2(k) c2(k) c1(k) c1(k)], ...
 
26
              [r1(k) r1(k) r2(k) r2(k) r1(k)], 'k', 'LineWidth', 1) ;
27
27
    end
28
28
end
29
29