Rev 17872 | Rev 18406 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 17872 | Rev 17978 | ||
---|---|---|---|
Line 1... | Line 1... | ||
1 | !if \ isin $parm1 |
1 | !if \ isin $parm1 |
2 | !for p in 1 |
2 | !for p in 1 |
3 | !set parm$p=!slashsubst $(parm$p) |
3 | !set parm$p=!slashsubst $(parm$p) |
4 | !next p |
4 | !next p |
5 | !endif |
5 | !endif |
- | 6 | ||
6 | !set add=$parm1 |
7 | !set add=$parm1 |
7 | !if ? isin $add |
8 | !if ? isin $add |
8 | !set add=!translate internal ? to , in $add |
9 | !set add=!translate internal ? to , in $add |
9 | !set add=!item 2 of $add |
10 | !set add=!item 2 of $add |
10 | !endif |
11 | !endif |
11 | !set eq== |
12 | !set eq== |
12 | !!for exercices and tools in a class, syntax of the form |
13 | !!for exercices and tools in a class, syntax of the form numero_sheet/numero_exercise |
13 | !if $eq notin $add and $wims_class>0 and / isin $add \ |
14 | !if $eq notin $add and $wims_class>0 and / isin $add \ |
14 | and $prim iswordof exercise tool |
15 | and $prim iswordof exercise tool |
15 | !set add=!translate internal / to $ $ in $add |
16 | !set add=!translate internal / to $ $ in $add |
16 | !distribute words $add into sh_,ex_ |
17 | !distribute words $add into sh_,ex_ |
17 | !distribute lines $(m_infoexo$ex_) into m_,p_,a_,b_,t_,d_ |
18 | !distribute lines $(m_infoexo$ex_) into m_,p_,a_,b_,t_,d_ |