_swin2i(s)
{
        local w;

        switch (tolower(s))
        {
                case "hamming":
                        w = 0;
                        break;

                case "hanning":
                        w = 1;
                        break;

                case "none":
                default:
                        w = 2;
                        break;

                case "kaiser":
                        w = 3;
                        break;

                case "flattop":
                        w = 4;
                        break;

                case "blackman":
                        w = 5;
                        break;

                case "flattopwin":
                        w = 6;
                        break;

                case "chebwin":
                        w = 7;
                        break;

                case "taylorwin":
                        w = 8;
                        break;

                case "blackmanharris":
                        w = 9;
                        break;

                case "nuttall":
                        w = 10;
                        break;
        }

        return(w);
}