Service Functions – Math / WinRunner

Check a value exists in array

public function mx_val_exists(in value, inout dtSet[]) {
 auto i;
 for (i in dtSet)
 if (value == dtSet[i])
 return(TRUE);
 return(FALSE); 
}

Sort one-dimensional array

public function mx_sort_vector(inout mxVector[], in flAscending) {
 auto i,j,c,v;
 if (flAscending != FALSE) flAscending = TRUE;
 c = mxVector[0];
 for (j=1;j<=c;j++) {
 for (i=1;i<c;i++) {
 v = mxVector[i];
 if (flAscending) {
 if (v > mxVector[i+1]) {
 mxVector[i] = mxVector[i+1];
 mxVector[i+1] = v;
 }
 }
 else {
 if (v < mxVector[i+1]) {
 mxVector[i] = mxVector[i+1];
 mxVector[i+1] = v;
 }
 } 
 }
 }
} 

Convert array to simple set (enumeration)

public function mx_vector2enum(inout mxVector[], out enumstr) {
 auto i,c;
 c = mxVector[0];
 enumstr = "";
 for (i=1;i<=c;i++)
 enumstr = str_list_add(enumstr, mxVector[i], ",");
}