Home | History | Annotate | Download | only in fortran

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