function bandStop import Modelica.Constants.pi; extends Modelica.Icons.Function; input Real cr_in[:] "Coefficients of real poles"; input Real c0_in[:] "Coefficients of s^0 term if conjugate complex pole"; input Real c1_in[size(c0_in, 1)] "Coefficients of s^1 term if conjugate complex pole"; input SI.Frequency f_min "Band of band stop filter is f_min (A=-3db) .. f_max (A=-3db)"; input SI.Frequency f_max "Upper band frequency"; output Real cr[0] "Coefficient of real pole"; output Real c0[size(cr_in, 1) + 2*size(c0_in, 1)] "Coefficients of s^0 term if conjugate complex pole"; output Real c1[size(cr_in, 1) + 2*size(c0_in, 1)] "Coefficients of s^1 term if conjugate complex pole"; end bandStop;