使用两个列表并计算第一个列表中的模式在第二个列表中出现多少次的Scheme函数

Question

(define (pattern lis1 lis2)
    (cond ((null? lis1) 0)
        (( = (car lis1) lis2) ( + 1 (pattern (cdr lis1) lis2)))
        (else (pattern (cdr lis1) lis2))))

这是我到目前为止所拥有的，但是当我运行它时，我收到错误“ =：期望数字作为第二个参数，当我输入时给定'a' （模式'（a a）'（a a a a a a a））