proc getchar_unlocked():char {. importc:"getchar_unlocked",header: "" .} proc scan(): int = while true: let k = getchar_unlocked() if k < '0': break result = 10 * result + k.ord - '0'.ord const MOD = 1000000007 var n = scan() var ans = 1 while n > 0: ans = ans * n if ans >= MOD : ans = ans mod MOD ans = ans * (2 * n - 1) if ans >= MOD : ans = ans mod MOD n -= 1 echo ans