A Quantitative Model of Hydrogen Induced Grain Boundary Cracking