c  fatigue crack growth rates programme
c  this programme file name-GB.FOR
cc m-total test points
cc Pmax- maximun load
cc Pmin- minimun load
cc b-specimen thickness
cc w-specimen widthness
cc a0-initial crack length
cc ys-yield strength
cc Sratio-Stress ratio
cc Ni(I)- load cycle number
cc Ai(I)-a set of crack length
编译错误Error: Syntax error found IDENTIFIER 'B' when expecting one of: ( : % . = =>
怎么改啊!高手帮改下，