            [xtract_window_types_]
            [xtract_spectrum_]
            [xtract_subband_scales_]
+           [xtractConstants]
 
           [javax.sound.sampled AudioSystem]))
 
 (defonce xtract-spectrum (.swigValue (xtract_features_/XTRACT_SPECTRUM)))
 (defonce xtract-windowed (.swigValue (xtract_features_/XTRACT_WINDOWED)))
+(defonce xtract-bark-coefficents (.swigValue (xtract_features_/XTRACT_BARK_COEFFICIENTS)))
+
+(defonce xtract-bark-bands (xtractConstants/XTRACT_BARK_BANDS))
+
 (defonce xtract-hann     (.swigValue (xtract_window_types_/XTRACT_HANN)))
 
 (defonce xtract-equal-gain (.swigValue (xtract_mfcc_types_/XTRACT_EQUAL_GAIN)))

                                                          f0 0.5 NUM_HARMONICS 0)]

                              (xtract/xtract_rms_amplitude ds block-size (apply xtract-args argv) rms)

                              {(* idx SAMPLERATE)
                               {:spectral-inharmonicity spectral-inharmonicity
                                :rms_amplitude (first rms)
                                :midi midi
                                :f0 f0}
                               }))

        block-size 512
        half-block-size (/ 512 2)

        mel-filters  (xtract/create_filterbank  MFCC_FREQ_BANDS block-size)

      ;;  bark-band-limits (xtract/new_int_array 0)
    ;;    _ (xtract/int_array_setitem bark-band-limits 0 0)
        ]

    (xtract/xtract_init_mfcc (/ block-size 2)
                             (/ SAMPLERATE 2)
