Averages/Root mean square: Difference between revisions

m
→‎{{header|Sather}}: using method precondition instead of explicit check!
(→‎{{header|Tcl}}: ++ sather)
m (→‎{{header|Sather}}: using method precondition instead of explicit check!)
Line 224:
<lang sather>class MAIN is
-- irrms stands for Integer Ranged RMS
irrms(i, f:INT):FLT is
ifpre i > f then
is
t ::= f;
f := i;
i := t;
end;
sum ::= 0;
loop
Line 241 ⟶ 238:
end;
end;</lang>
 
 
=={{header|Tcl}}==