Rev 4351 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 4351 | Rev 7692 | ||
|---|---|---|---|
| Line 10... | Line 10... | ||
| 10 | 10 | ||
| 11 | :proc |
11 | :proc |
| 12 | slib_cnt=!itemcnt $wims_read_parm |
12 | slib_cnt=!itemcnt $wims_read_parm |
| 13 | !for slib_i=1 to $slib_cnt |
13 | !for slib_i=1 to $slib_cnt |
| 14 | slib_mat$slib_i = !item $slib_i of $wims_read_parm |
14 | slib_mat$slib_i = !item $slib_i of $wims_read_parm |
| 15 | !next |
15 | !next |
| 16 | 16 | ||
| 17 | slib_out= |
17 | slib_out= |
| 18 | 18 | ||
| 19 | slib_wm= |
19 | slib_wm= |
| 20 | slib_wn= |
20 | slib_wn= |
| 21 | !!inutile ? |
21 | !!inutile ? |
| 22 | slib_data= |
22 | slib_data= |
| 23 | 23 | ||
| 24 | !for slib_i=1 to $slib_cnt |
24 | !for slib_i=1 to $slib_cnt |
| 25 | slib_N=!declosing $(slib_mat$slib_i) |
25 | slib_N=!declosing $(slib_mat$slib_i) |
| 26 | slib_N = !translate internal ; to $\ |
26 | slib_N = !translate internal ; to $\ |