n=gets.to_i
hate=/AGC|A.GC|AG.C|GAC|ACG/
cu={""=>1}
n.times{
	ne={}
	cu.map{|k,v|
		"ACGT".chars{|a|
			s=(k+a)[/.{,4}$/]
			ne[s]||=0
			ne[s]+=(s=~hate)?0:v
		}
	}
	cu=ne
}
p cu.values.reduce(:+)%(10**9+7)