5 lines
230 B
Text
5 lines
230 B
Text
jobRateCounted[fn_,Y_Integer]:=First[AbsoluteTiming[Do[fn,{Y}]]/Y;
|
|
SetAttributes[jobRateCounted,HoldFirst]
|
|
|
|
jobRatePeriod[fn_,time_]:=Block[{n=0},TimeConstrained[While[True,fn;n++]];n/time];
|
|
SetAttributes[jobRatePeriod,HoldFirst]
|