require 'set'
a=(0..50).map{[]}
l="gets.split.map{|e| e.to_i}"
n,m=eval l
m.times{
	d,e=eval l
	
	a[d]<<e
	a[e]<<d
}
ans=0
0.upto(n-1){|i|
	a[i]=a[i].select{|e|
		e>i
	}
	(i+1).upto(n-1){|j|
		b=Set.new(a[i])
		c=Set.new(a[j])
		d=b&c
		s=d.size
		if s>1 && !b.member?(j) then
			d.each{|e1|
				d.each{|e2|
					next if e1>=e2
					if a[e1].index(e2)==nil then
						ans=ans+1
					end
				}
			}
		end
	}
}
puts ans