Jump to content

Search the Community

Showing results for tags 'pattern-matching'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • forums_forum_3
    • forums_forum_4
    • forums_forum_9
  • forums_forum_5
    • forums_forum_6
    • forums_forum_10
    • forums_forum_36
    • forums_forum_18
    • forums_forum_16
    • forums_forum_37
    • forums_forum_11
    • forums_forum_12
    • forums_forum_17
  • A Test Forum
    • forums_forum_7
    • forums_forum_8
  • forums_forum_13
    • forums_forum_14

Blogs

  • blogs_blog_1
  • blogs_blog_3

Categories

  • content_cat_name_4
  • content_cat_name_15

Categories

  • Getting Started
  • Howto
  • Live Coding
  • Music Theory and Analysis

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


core_pfield_1


core_pfield_2


core_pfield_3


core_pfield_4


core_pfield_8


core_pfield_9


core_pfield_10


core_pfield_6


core_pfield_7

Found 2 results

  1. Name: adding articulations with pattern matching Category: Howto Date Added: 2017-12-12 Submitter: Stephane Boussuge Video example for my function articulation-map-omn. Function available here: adding articulations with pattern matching
  2. Stephane Boussuge

    articulation-map-omn

    Here's a small function from my toolbox i use very often for adding articulation on already generated OMN material. Also useful for adding legato slurs. Link to video example: ;;; ============================================= ;;; ARTICULATION-MAP-OMN ;;; AJOUTE DES ARTICULATIONS SUR DES LISTES OMN ;;; BASÉES SUR DU PATTERN MATCHING. ;;; ============================================= (defun articulation-map-omn (map omn &key (otherwise '-)) (do-verbose ("articulation-map-omn") (let ((plist (disassemble-omn omn))) (setf (getf plist :articulation) (pattern-map map (getf plist :length) :otherwise otherwise :swallow t)) (apply 'make-omn plist)))) #| USAGE (setf mat '((q c4 p d4 e e4 f4 s g4 f a4 g4 f4 q e4) (e d4 mp c4 s d4 e4 f4 e4 q d4 e c4 b3) (h a3 f -h))) (setf prules '(((s s s) (leg leg leg)) ((s s) (leg leg)) ((s e) (- -)) ((s q) (- stacc)) ((q) (stacc)) ((e) (-)))) (setf out (articulation-map-omn prules mat)) |# SB.
×