Subversion Repositories wimsdev

Rev

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

Rev 18530 Rev 18546
Line 2... Line 2...
2 
!set slib_data=!declosing $slib_data
 2 
!set slib_data=!declosing $slib_data
3 
!distribute items $slib_data into slib_som,slib_face
 3 
!distribute items $slib_data into slib_som,slib_face
- 
 
 4 
 
- 
 
 5 
!set slib_range=!exec pari A=$slib_som;H=[vecmin(A[,1]),vecmax(A[,1]);vecmin(A[,2]),vecmax(A[,2])];[vecmin(H[,1]),vecmax(H[,2])]
- 
 
 6 
 
4 
slib_som=!declosing $slib_som
 7 
slib_som=!declosing $slib_som
5 
slib_face=!declosing $slib_face
 8 
slib_face=!declosing $slib_face
6 
slib_facecnt=!itemcnt $slib_face
 9 
slib_facecnt=!itemcnt $slib_face
7 
!for slib_k=1 to $slib_facecnt
 10 
!for slib_k=1 to $slib_facecnt
8 
  !reset slib_tmp slib_test slib_col
 11 
  !reset slib_tmp slib_test slib_col