1 | /* |
---|

2 | Copyright (C) 2003-2009 Paul Brossier <piem@aubio.org> |
---|

3 | |
---|

4 | This file is part of aubio. |
---|

5 | |
---|

6 | aubio is free software: you can redistribute it and/or modify |
---|

7 | it under the terms of the GNU General Public License as published by |
---|

8 | the Free Software Foundation, either version 3 of the License, or |
---|

9 | (at your option) any later version. |
---|

10 | |
---|

11 | aubio is distributed in the hope that it will be useful, |
---|

12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
---|

13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
---|

14 | GNU General Public License for more details. |
---|

15 | |
---|

16 | You should have received a copy of the GNU General Public License |
---|

17 | along with aubio. If not, see <http://www.gnu.org/licenses/>. |
---|

18 | |
---|

19 | */ |
---|

20 | |
---|

21 | #include "aubio_priv.h" |
---|

22 | #include "fvec.h" |
---|

23 | #include "lvec.h" |
---|

24 | #include "temporal/filter.h" |
---|

25 | #include "temporal/biquad.h" |
---|

26 | |
---|

27 | uint_t |
---|

28 | aubio_filter_set_biquad (aubio_filter_t * f, lsmp_t b0, lsmp_t b1, lsmp_t b2, |
---|

29 | lsmp_t a1, lsmp_t a2) |
---|

30 | { |
---|

31 | uint_t order = aubio_filter_get_order (f); |
---|

32 | lvec_t *bs = aubio_filter_get_feedforward (f); |
---|

33 | lvec_t *as = aubio_filter_get_feedback (f); |
---|

34 | |
---|

35 | if (order != 3) { |
---|

36 | AUBIO_ERROR ("order of biquad filter must be 3, not %d\n", order); |
---|

37 | return AUBIO_FAIL; |
---|

38 | } |
---|

39 | bs->data[0] = b0; |
---|

40 | bs->data[1] = b1; |
---|

41 | bs->data[2] = b2; |
---|

42 | as->data[0] = 1.; |
---|

43 | as->data[1] = a1; |
---|

44 | as->data[1] = a2; |
---|

45 | return AUBIO_OK; |
---|

46 | } |
---|

47 | |
---|

48 | aubio_filter_t * |
---|

49 | new_aubio_filter_biquad (lsmp_t b0, lsmp_t b1, lsmp_t b2, lsmp_t a1, lsmp_t a2) |
---|

50 | { |
---|

51 | aubio_filter_t *f = new_aubio_filter (3); |
---|

52 | aubio_filter_set_biquad (f, b0, b1, b2, a1, a2); |
---|

53 | return f; |
---|

54 | } |
---|