sound_type snd_make_prod(sound_type s1, sound_type s2);
sound_type snd_prod(sound_type s1, sound_type s2);
    /* LISP: (snd-prod SOUND SOUND) */