How to fix "Equations for ‘lefgNLista’ have different numbers of arguments" : I'm trying to learn list in Haskell but I have a error that me and my friends don't understand

I've been trying with the definition of the arguments, but to be honest I don't understand too much of haskell yet.

lefgNLista:: [Int]->[Int]->Int
lefgNLista []=[]
lefgNLista (fre1:fre2) fre3  = if fre1 == fre3 then 1+lefgNLista else fre1 : lefgNLista fre2

Also try with this but another error pop up
lefgNLista []=[]=0

I expect the function count the amount of N numbers in the list, e.g. 
lefgNLista [1,3,5,7,8,8,2,3,8] 8
result 3