Lines Matching full:sh22
25 * (SH21 SH22), (SH21 1.E0), (-1.E0 SH22), (0.E0 1.E0).
52 * SPARAM(5)=SH22
57 REAL SFLAG,SH11,SH12,SH21,SH22,TWO,W,Z,ZERO
82 SH22 = SPARAM(5)
87 SY(I) = -W + SH22*Z
94 SH22 = SPARAM(5)
99 SY(I) = W*SH21 + Z*SH22
123 SH22 = SPARAM(5)
128 SY(KY) = -W + SH22*Z
137 SH22 = SPARAM(5)
142 SY(KY) = W*SH21 + Z*SH22