let modVal = 1000000007 |> bigint
let A,B = let t = stdin.ReadLine().Split() 
                  |> Array.map(int>>bigint)
          in t.[0],t.[1]
A*B%modVal |> printfn "%A"