Searched refs:fys1 (Results 1 – 8 of 8) sorted by relevance
670 realtype fys1, fys2, fys3; in fS() local687 fys1 = - 2.0*p1*y1 * s1 - s3; in fS()691 Ith(ySdot[0],1) = fys1 - y1*y1; in fS()701 fys1 = - 2.0*p1*y1 * s1 - s3; in fS()705 Ith(ySdot[1],1) = fys1; in fS()
3229 fys1