%       set básico de "features" de consonantes y vocales inglesas, acá
%       transcritas en X-SAMPA (Extendend SAM Phonetic Alphabet) "recasting"
%       del IPA a 7-bit ASCII   
%       gabriel@ranchonotorious.org

% consonantes inglesas:
segment(
                'p'     % voiceless bilabial plosive

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                1)
                ,       (round,                 0)
                ,       (coronal,               0)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'p_h'   % voiceless bilabial plosive aspirated

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    1)

                        % place features
                ,       (labial,                1)
                ,       (round,                 0)
                ,       (coronal,               0)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'b'     % voiced bilabial plosive

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                1)
                ,       (round,                 0)
                ,       (coronal,               0)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                't'     % voiceless alveolar plosive

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                't_h'   % voiceless alveolar plosive aspirated

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    1)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).


segment(
                'd'     % voiced alveolar plosive

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'k'     % voiceless velar plosive

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               0)
                ,       (anterior,              0)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  1)
                ,       (back,                  1)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'k_h'   % voiceless velar plosive aspirated

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    1)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               0)
                ,       (anterior,              0)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  1)
                ,       (back,                  1)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'g'     % voiced velar plosive

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               0)
                ,       (anterior,              0)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  1)
                ,       (back,                  1)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'f'     % voiceless labiodental fricative

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                1)
                ,       (round,                 0)
                ,       (coronal,               0)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).


segment(
                'v'     % voiced labiodental fricative

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                1)
                ,       (round,                 0)
                ,       (coronal,               0)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                's'     % voiceless alveolar fricative

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              1)
                ,       (strident,              1)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).


segment(
                'z'     % voiced alveolar fricative

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              1)
                ,       (strident,              1)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).


segment(
                'T'     % voiceless dental fricative

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).


segment(
                'D'     % voiced dental fricative

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'S'     % voiceless postalveolar fricative

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              0)
                ,       (strident,              1)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).


segment(
                'Z'     % voiced postalveolar fricative

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              0)
                ,       (strident,              1)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'dS'

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              0)
                ,       (strident,              1)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       1)

        ]).

segment(
                'dZ'

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              0)
                ,       (strident,              1)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       1)

        ]).

segment(
                'm'     % bilabial nasal

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              1)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                1)
                ,       (round,                 0)
                ,       (coronal,               0)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 1)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'n'     % alveolar nasal

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              1)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 1)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'N'     % velar nasal

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              1)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               0)
                ,       (anterior,              0)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  1)
                ,       (back,                  1)

                        % manner features
                ,       (nasal,                 1)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'l'     % alveolar lateral approximant

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              1)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               1)
                ,       (delayed_release,       0)

        ]).

segment(
                'r'     % alveolar trill

        ,       [

                        % major class features
                        (consonantal,           1)
                ,       (sonorant,              1)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              1)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'j'     % palatal aproximant

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               1)
                ,       (anterior,              0)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  1)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'w'     % labial-velar aproximant

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 1)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                1)
                ,       (round,                 1)
                ,       (coronal,               0)
                ,       (anterior,              0)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  1)
                ,       (back,                  1)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'W'     % voiceless labial-velar fricativ

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                1)
                ,       (round,                 1)
                ,       (coronal,               0)
                ,       (anterior,              0)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  1)
                ,       (back,                  1)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                'h'     % voiceless glottal fricative

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    0)
                ,       (sg,                    1)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               0)
                ,       (anterior,              0)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            1)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).

segment(
                '?'     % glottal stop

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              0)
                ,       (syllabic,              0)

                        % laryngeal features
                ,       (voice,                 0)
                ,       (cg,                    1)
                ,       (sg,                    0)

                        % place features
                ,       (labial,                0)
                ,       (round,                 0)
                ,       (coronal,               0)
                ,       (anterior,              0)
                ,       (strident,              0)

                        % dorsal features
                ,       (high,                  0)
                ,       (back,                  0)

                        % manner features
                ,       (nasal,                 0)
                ,       (continuant,            0)
                ,       (lateral,               0)
                ,       (delayed_release,       0)

        ]).


% vocales inglesas

segment(
                'i'     % close front unrounded vowel

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              1)

                        % laryngeal features
                ,       (voice,                 1)

                        % place features
                ,       (round,                 0)

                        % dorsal features
                ,       (high,                  1)
                ,       (low,                   0)
                ,       (back,                  0)
                ,       (tense,                 1)
                ,       (reduced,               0)

                        % manner features
                ,       (continuant,            1)
        ]).

segment(
                'I'     % near-close near-front unrounded vowel

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              1)

                        % laryngeal features
                ,       (voice,                 1)

                        % place features
                ,       (round,                 0)

                        % dorsal features
                ,       (high,                  1)
                ,       (low,                   0)
                ,       (back,                  0)
                ,       (tense,                 0)
                ,       (reduced,               0)

                        % manner features
                ,       (continuant,            1)
        ]).

segment(
                'e'     % close mid-front unrounded vowel

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              1)

                        % laryngeal features
                ,       (voice,                 1)

                        % place features
                ,       (round,                 0)

                        % dorsal features
                ,       (high,                  0)
                ,       (low,                   0)
                ,       (back,                  0)
                ,       (tense,                 1)
                ,       (reduced,               0)

                        % manner features
                ,       (continuant,            1)
        ]).

segment(
                'E'     % open mid-front unrounded vowel

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              1)

                        % laryngeal features
                ,       (voice,                 1)

                        % place features
                ,       (round,                 0)

                        % dorsal features
                ,       (high,                  0)
                ,       (low,                   0)
                ,       (back,                  0)
                ,       (tense,                 0)
                ,       (reduced,               0)

                        % manner features
                ,       (continuant,            1)
        ]).

segment(
                '{'     % near-open front unrounded vowel

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              1)

                        % laryngeal features
                ,       (voice,                 1)

                        % place features
                ,       (round,                 0)

                        % dorsal features
                ,       (high,                  0)
                ,       (low,                   1)
                ,       (back,                  0)
                ,       (tense,                 0)
                ,       (reduced,               0)

                        % manner features
                ,       (continuant,            1)
        ]).

segment(
                'V'     % open-mid back unrounded vowel

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              1)

                        % laryngeal features
                ,       (voice,                 1)

                        % place features
                ,       (round,                 0)

                        % dorsal features
                ,       (high,                  0)
                ,       (low,                   0)
                ,       (back,                  1)
                ,       (tense,                 0)
                ,       (reduced,               0)

                        % manner features
                ,       (continuant,            1)
        ]).

segment(
                '@'     % schwa

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              1)

                        % laryngeal features
                ,       (voice,                 1)

                        % place features
                ,       (round,                 0)

                        % dorsal features
                ,       (high,                  0)
                ,       (low,                   0)
                ,       (back,                  1)
                ,       (tense,                 0)
                ,       (reduced,               1)

                        % manner features
                ,       (continuant,            1)
        ]).

segment(
                'A'     % open back unrounded vowel

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              1)

                        % laryngeal features
                ,       (voice,                 1)

                        % place features
                ,       (round,                 0)

                        % dorsal features
                ,       (high,                  0)
                ,       (low,                   1)
                ,       (back,                  1)
                ,       (tense,                 1)
                ,       (reduced,               0)

                        % manner features
                ,       (continuant,            1)
        ]).

segment(
                'u'     % close back rounded vowel

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              1)

                        % laryngeal features
                ,       (voice,                 1)

                        % place features
                ,       (round,                 1)

                        % dorsal features
                ,       (high,                  1)
                ,       (low,                   0)
                ,       (back,                  1)
                ,       (tense,                 1)
                ,       (reduced,               0)

                        % manner features
                ,       (continuant,            1)
        ]).

segment(
                'U'     % near-close near-back rounded vowel

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              1)

                        % laryngeal features
                ,       (voice,                 1)

                        % place features
                ,       (round,                 1)

                        % dorsal features
                ,       (high,                  1)
                ,       (low,                   0)
                ,       (back,                  1)
                ,       (tense,                 0)
                ,       (reduced,               0)

                        % manner features
                ,       (continuant,            1)
        ]).

segment(
                'o'     % close-mid back rounded vowel

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              1)

                        % laryngeal features
                ,       (voice,                 1)

                        % place features
                ,       (round,                 1)

                        % dorsal features
                ,       (high,                  0)
                ,       (low,                   0)
                ,       (back,                  1)
                ,       (tense,                 1)
                ,       (reduced,               0)

                        % manner features
                ,       (continuant,            1)
        ]).

segment(
                'O'     % open-mid back rounded vowel

        ,       [

                        % major class features
                        (consonantal,           0)
                ,       (sonorant,              1)
                ,       (syllabic,              1)

                        % laryngeal features
                ,       (voice,                 1)

                        % place features
                ,       (round,                 1)

                        % dorsal features
                ,       (high,                  0)
                ,       (low,                   0)
                ,       (back,                  1)
                ,       (tense,                 0)
                ,       (reduced,               0)

                        % manner features
                ,       (continuant,            1)
        ]).


% vim:filetype=prolog