effective numerical matrix rank concode_field_sep double[] s concode_elem_sep double[][] U concode_elem_sep double[][] V concode_elem_sep double EPS concode_elem_sep int m concode_elem_sep int n concode_field_sep double[][] getV concode_elem_sep double norm2 concode_elem_sep double cond concode_elem_sep double[] getSingularValues concode_elem_sep double[][] getS concode_elem_sep double[][] getU
int function ( ) { double loc0 = EPS ; double loc1 = Math . max ( m , n ) * s [ 0 ] * loc0 ; int loc2 = 0 ; for ( int loc3 = 0 ; loc3 < s . length ; loc3 ++ ) { if ( s [ loc3 ] > loc1 ) { loc2 ++ ; } } return loc2 ; }