\version "2.19.83"

#(define-markup-command (chop-one layout props)()
  (interpret-markup layout props
   (markup
     (#:stencil
       (make-path-stencil
        '(M 2.152 0.023 C 2.082 0.043 2.016 0.23 1.82 0.988 C 1.758 1.215 1.676 1.531
            1.633 1.684 C 1.453 2.344 1.398 2.551 1.293 2.941 C 1.234 3.168 1.152 3.48
            1.109 3.637 C 0.988 4.07 0.887 4.441 0.773 4.871 C 0.676 5.246 0.535 5.766
            0.41 6.223 C 0.328 6.523 0.156 7.168 0.063 7.527 C 0.016 7.695 -0.012 7.871
            0.004 7.914 C 0.039 8.023 0.18 8.078 0.281 8.023 C 0.379 7.973 0.406 7.902
            0.547 7.367 C 0.605 7.141 0.672 6.895 0.695 6.824 C 0.719 6.75 0.75 6.625
            0.77 6.543 C 0.789 6.461 0.863 6.172 0.938 5.902 C 1.012 5.637 1.105 5.281
            1.152 5.117 C 1.195 4.953 1.262 4.707 1.297 4.574 C 1.457 3.984 1.723 2.996
            1.785 2.754 C 1.824 2.609 1.879 2.398 1.91 2.285 C 1.941 2.172 1.992 1.988
            2.02 1.871 C 2.113 1.523 2.195 1.258 2.227 1.207 C 2.258 1.16 2.309 1.359
            3.008 4.273 C 3.059 4.488 3.152 4.875 3.211 5.125 C 3.273 5.379 3.371 5.801
            3.438 6.063 C 3.941 8.176 3.883 7.977 4.008 8.02 C 4.133 8.066 4.242 8.023
            4.277 7.914 C 4.297 7.852 4.188 7.348 3.824 5.848 C 3.75 5.551 3.652 5.129
            3.598 4.91 C 3.547 4.695 3.449 4.281 3.379 3.992 C 3.309 3.703 3.215 3.316
            3.172 3.129 C 3.129 2.945 3.02 2.488 2.93 2.117 C 2.84 1.746 2.73 1.289
            2.688 1.105 C 2.609 0.762 2.523 0.43 2.453 0.18 C 2.418 0.059 2.324 -0.016
            2.234 0.004 C 2.223 0.004 2.188 0.016 2.152 0.023 Z M
            1.762 6.293 C 1.539 6.395 1.344 6.613 1.277 6.836 C 1.207 7.07 1.207 7.176
            1.277 7.406 C 1.438 7.953 2.063 8.199 2.578 7.926 C 3.234 7.574 3.199 6.629
            2.52 6.301 C 2.316 6.199 1.973 6.199 1.762 6.293 Z)
         0.02 .25 .25 #t)))))

#(define-markup-command (chop-two layout props)()
  (interpret-markup layout props
   (markup
     (#:stencil
       (make-path-stencil
        '(M 1.313 0.051 C 0.828 0.188 0.527 0.352 0.203 0.652 C -0.02 0.859 -0.047 
          0.961 0.074 1.082 C 0.191 1.199 0.281 1.176 0.504 0.969 C 0.961 0.559 1.297
          0.43 1.895 0.43 C 2.375 0.434 2.594 0.5 3.008 0.77 C 3.434 1.051 3.723 
          1.492 3.848 2.055 C 3.902 2.301 3.906 2.383 3.867 2.656 C 3.633 4.285 1.695
          4.988 0.523 3.871 C 0.383 3.738 0.281 3.668 0.219 3.668 C 0.113 3.668 0
          3.773 0 3.867 C 0 3.902 0.207 4.359 0.465 4.883 C 0.949 5.883 0.98 5.926
          1.168 5.828 C 1.305 5.758 1.277 5.574 1.055 5.125 C 0.867 4.738 0.832 4.645
          0.891 4.645 C 0.906 4.645 1.012 4.684 1.125 4.727 C 1.301 4.797 1.406 4.809
          1.855 4.813 C 2.41 4.813 2.605 4.773 2.945 4.598 C 2.984 4.574 3.086 4.523
          3.168 4.48 C 3.375 4.371 3.816 3.918 3.969 3.664 C 4.035 3.547 4.137 3.328
          4.188 3.176 C 4.273 2.938 4.285 2.836 4.289 2.434 C 4.289 1.805 4.164 1.414
          3.816 0.949 C 3.461 0.484 2.984 0.18 2.391 0.039 C 2.16 -0.02 1.527 -0.008
          1.313 0.051 Z)
        0.02 .25 .25 #t)))))

#(define-markup-command (chop-three layout props)()
  (interpret-markup layout props
   (markup
     (#:stencil
       (make-path-stencil
        '(M 2.039 0.055 C 1.977 0.102 1.965 0.168 1.949 0.793 L 1.93 1.48 L 0.43 1.48
          L 0.41 0.816 C 0.391 0.254 0.383 0.141 0.324 0.086 C 0.273 0.035 0.238 
          0.031 0.156 0.059 C 0.059 0.094 0.051 0.105 0.027 0.434 C 0.016 0.617 0.004
          1.516 0 2.43 C -0.004 4.039 0 4.09 0.07 4.164 C 0.145 4.234 0.195 4.238
          2.152 4.238 C 3.922 4.238 4.16 4.23 4.215 4.18 C 4.262 4.129 4.273 3.984
          4.273 3.195 C 4.273 2.684 4.285 1.828 4.297 1.285 C 4.32 0.215 4.305 0.094
          4.133 0.051 C 3.941 0.004 3.918 0.086 3.895 0.816 L 3.875 1.48 L 2.375 
          1.48 L 2.355 0.793 C 2.34 0.168 2.332 0.102 2.266 0.055 C 2.223 0.023 2.172
          0 2.148 0 C 2.129 0 2.074 0.023 2.035 0.055 Z M
          1.902 1.957 C 1.965 2.02 1.965 3.004 1.902 3.066 C 1.855 3.113 0.59 3.133
          0.473 3.09 C 0.422 3.07 0.41 2.984 0.41 2.516 C 0.41 2.211 0.422 1.953 
          0.438 1.938 C 0.484 1.891 1.855 1.91 1.906 1.957 Z M
          3.891 2.492 C 3.898 2.914 3.891 3.059 3.852 3.082 C 3.773 3.133 2.457 3.121
          2.406 3.066 C 2.359 3.02 2.34 1.984 2.387 1.938 C 2.402 1.922 2.742 1.918
          3.145 1.918 L 3.879 1.93 Z)
        0.02 .31 .31 #t)))))

#(define-markup-command (chop-four layout props)()
  (interpret-markup layout props
   (markup
     (#:stencil
       (make-path-stencil
        '(M 3.93 0.063 C 3.84 0.121 3.672 0.246 2.891 0.859 C 2.199 1.395 2.207 1.391
          2.121 1.352 C 2.078 1.332 1.656 1.027 1.184 0.672 C 0.5 0.164 0.301 0.031
          0.207 0.031 C 0.145 0.031 0.07 0.051 0.047 0.078 C 0.012 0.113 0 0.617 
          0 2.117 C 0 3.883 0.008 4.121 0.059 4.176 C 0.109 4.227 0.352 4.234 2.129
          4.23 C 3.332 4.23 4.168 4.219 4.199 4.195 C 4.285 4.145 4.305 3.688 4.309
          1.828 C 4.313 0.227 4.313 0.191 4.234 0.094 C 4.145 -0.02 4.07 -0.027 3.93
          0.063 Z M
          0.625 0.793 C 0.684 0.844 0.961 1.047 1.238 1.25 C 1.516 1.449 1.754 1.637
          1.77 1.66 C 1.797 1.711 0.559 2.695 0.469 2.695 C 0.422 2.695 0.414 2.555
          0.414 1.703 C 0.414 0.613 0.41 0.617 0.625 0.793 Z M
          3.863 1.645 C 3.863 2.156 3.848 2.586 3.828 2.598 C 3.813 2.609 3.656 2.512
          3.48 2.383 C 3.309 2.254 3.039 2.051 2.879 1.93 C 2.719 1.813 2.586 1.703
          2.586 1.684 C 2.586 1.641 2.645 1.586 2.961 1.344 C 3.113 1.23 3.355 1.043
          3.5 0.926 C 3.648 0.809 3.789 0.711 3.816 0.707 C 3.852 0.707 3.863 0.918
          3.863 1.645 Z M
          2.758 2.375 C 3.684 3.066 3.652 3.039 3.598 3.07 C 3.566 3.09 2.934 3.09
          2.188 3.078 C 1.105 3.063 0.832 3.051 0.855 3.012 C 0.906 2.922 2.129 1.984
          2.191 1.984 C 2.215 1.984 2.469 2.16 2.758 2.375 Z)
        0.02 .31 .31 #t)))))


\markup { \chop-one \chop-two \chop-three \chop-four }