Rev 4349 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 4349 | Rev 13585 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | !if $wims_read_parm!=slib_header |
1 | !if $wims_read_parm!=slib_header |
2 | !goto proc |
2 | !goto proc |
3 | !endif |
3 | !endif |
4 | 4 | ||
5 | slib_author=Gang, XIAO |
5 | slib_author=Gang, XIAO |
6 | slib_example=9/br3close |
6 | slib_example=9/br3close |
7 | !exit |
7 | !exit |
8 | 8 | ||
9 | :proc |
9 | :proc |
10 | slib_type=!item 1 of $wims_read_parm |
10 | slib_type=!item 1 of $wims_read_parm |
11 | slib_c=!char 1 of $slib_type |
11 | slib_c=!char 1 of $slib_type |
12 | !if $slib_c isin 123456789 |
12 | !if $slib_c isin 123456789 |
13 | slib_prefix=data/circuits |
13 | slib_prefix=data/circuits |
14 | !else |
14 | !else |
15 | slib_prefix= |
15 | slib_prefix= |
16 | !endif |
16 | !endif |
17 | slib_rec=$slib_prefix/$slib_type.data |
17 | slib_rec=$slib_prefix/$slib_type.data |
18 | slib_out=!record 2 of $slib_rec |
18 | slib_out=!record 2 of $slib_rec |