SPARSE TRANSPOSE
[Link] i, j, x, n, a[][], b[][]
2.n=a[0].value
3.b[0].row=a[0].col
4.b[0].col=a[0].row
5.b[0].value=n
7.x=1
[Link]( i=0 ; i<a[0].col ; i++ )
9. for( j=0 ; j<=n ; j++ )
10. if(a[j].col==i)
11. b[x].row= a[j].col
12. b[x].col= a[j].row
13 b[x].value=a[j].value
14. x++