Text processing/Max licenses in use: Difference between revisions
Content added Content deleted
(Adding a TXR version of this task.) |
|||
| Line 1,549: | Line 1,549: | ||
</pre> |
</pre> |
||
=={{header|Mathematica}}== |
=={{header|Mathematica}}/{{header|Wolfram Language}}== |
||
<lang Mathematica>LC = 0; LCMax = 0; Scan[ |
<lang Mathematica>LC = 0; LCMax = 0; Scan[ |
||
If[MemberQ[#, "OUT"], LC++; |
If[MemberQ[#, "OUT"], LC++; |
||
| Line 1,556: | Line 1,556: | ||
LC--;] &, Import["mlijobs.txt", "Table"]] |
LC--;] &, Import["mlijobs.txt", "Table"]] |
||
Print["The maximum number of licenses used was ", LCMax, ", at ", LCMaxtimes]</lang> |
Print["The maximum number of licenses used was ", LCMax, ", at ", LCMaxtimes]</lang> |
||
{{out}} |
|||
Output: |
|||
<pre>-> The maximum number of licenses used was 99, at {2008/10/03_08:39:34,2008/10/03_08:40:40}</pre> |
<pre>-> The maximum number of licenses used was 99, at {2008/10/03_08:39:34,2008/10/03_08:40:40}</pre> |
||