title: Scheme - run two procedures from arguments sequentially?
body: <p>I am trying to create a function that takes two functions as arguments and executes both of them.</p>
  
  <p>I tried using <code>cond</code>, but it only executes <code>action1</code>.</p>
  
  <pre><code>(define seq-action
    (lambda (action1 action2)
      (cond
       ((procedure? action1) (action1))
       ((procedure? action2) (action2)))))
  </code></pre>
  
  <p>I feel like it shouldn't be too hard to run one after the other. They don't need to run at the same time.</p>
  
  <p>I have tried simply <code>(action1) (action2)</code> side-by-side, but it only returns <code>action2</code>. Here is what I define for <code>action1</code> and <code>action2</code>:</p>
  
  <pre><code>(define ax 
    (lambda ()
      (+ 1 2)))
  (define bx 
    (lambda ()
      (+ 5 2)))
  </code></pre>