Permalink
Switch branches/tags
Find file
Fetching contributors…
Cannot retrieve contributors at this time
10 lines (9 sloc) 198 Bytes
{
int i; int j; float v; float x; float[100] a;
while (true) {
do i = i+1; while(a[i] < v);
do j = j-1; while(a[j] > v);
if(i >= j) break;
x = a[i]; a[i] = a[j]; a[j] = x;
}
}