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