SYNTAX QUICKER THAN FUNCTION NAME
       
       ,----
       |   (let* ((fn-name (length "org-insert-structure-template s"))
       |      (syntax (length "#+begin_src #+end_src"))
       |      (diff (- fn-name syntax)))
       |     (when (< syntax fn-name)
       |    (message "Typing the syntax is %d key strokes less than typing the function name." diff))) 
       `----
       
       Typing the syntax is 10 key strokes less than typing the
       function name.