RosettaCodeData/Task/Averages-Arithmetic-mean/ECL/averages-arithmetic-mean.ecl
2023-07-01 13:44:08 -04:00

6 lines
115 B
Prolog

AveVal(SET OF INTEGER s) := AVE(s);
//example usage
SetVals := [14,9,16,20,91];
AveVal(SetVals) //returns 30.0 ;