int ordina( int N, float v[]) {
  int i, j, k=0;
  float dum;
  for( i=0; i<N-1; i++ ) {
    for( j=i+1; j<N; j++) {
      if ( v[i]>v[j] ) {
        dum = v[i];
        v[i]= v[j];
        v[j]= dum;
        k++;
      }
    }
  }
  return k;
}