title: Check if a list is sorted on Scheme
body: <p>i'm trying to check whether the list is sorted or not. If it is sorted, then return True otherwise return False. However, this code always return True and I'm not sure how to fix it.</p>
  
  <pre><code>(define (ordered? lst)
      (cond (if (null? lst) #t)
            ((&gt; (car(cdr(lst))) car(lst))
             (apply increasing? cdr(lst)))
            (else #f))
  )
  </code></pre>