Математическое моделирование в литейном производстве. Черный А.А. - 141 стр.

4270 U(J) = H(J) ^ P2 + I2 * H(J) ^ O2 + M2 * H(J) ^ J2 + F2: NEXT J
4280 RETURN
4290 FOR J = 1 TO X: I(J) = F(J) ^ J1 + V1
4300 K(J) = F(J) ^ O1 + U1 * F(J) ^ J1 + Q1
4310 L(J) = F(J) ^ P1 + I1 * F(J) ^ O1 + M1 * F(J) ^ J1 + F1
4320 M(J) = F(J) ^ T1 + G1 * F(J) ^ P1 + H1 * F(J) ^ O1 + K1 * F(J) ^
J1 + L1
4330 NEXT J: RETURN
4340 FOR J = 1 TO X: P(J) = H(J) ^ J2 + V2
4350 Q(J) = H(J) ^ O2 + U2 * H(J) ^ J2 + Q2
4360 U(J) = H(J) ^ P2 + I2 * H(J) ^ O2 + M2 * H(J) ^ J2 + F2
4370 V(J) = H(J) ^ T2 + G2 * H(J) ^ P2 + H2 * H(J) ^ O2 + K2 * H(J) ^
J2 + L2
4380 NEXT J: RETURN
4390 FOR J = 1 TO X: Z(J) = B(1) + B(2) * I(J) + B(3) * K(J): NEXT J:
RETURN
4400 FOR J = 1 TO X: Z(J) = B(1) + B(2) * I(J) + B(3) * K(J) + B(4) *
L(J)
4410 NEXT J: RETURN
4420 FOR J = 1 TO X
4430 Z(J) = B(1) + B(2) * I(J) + B(3) * K(J) + B(4) * L(J) + B(5) * M(J)
4440 NEXT J: RETURN
4450 FOR J = 1 TO X: N3 = B(1) + B(2) * I(J) + B(3) * K(J) + B(4) *
P(J)
4460 N4 = B(5) * I(J) * P(J) + B(6) * Q(J) + B(7) * I(J) * Q(J)
4470 N5 = B(8) * P(J) * K(J) + B(9) * K(J) * Q(J)
4480 Z(J) = N3 + N4 + N5: NEXT J: RETURN
4490 FOR J = 1 TO X: N3 = B(1) + B(2) * I(J) + B(3) * K(J) + B(4) *
P(J)
4500 N4 = B(5) * I(J) * P(J) + B(6) * Q(J) + B(7) * I(J) * Q(J) + B(8) *
P(J) * K(J)
4510 N5 = B(9) * K(J) * Q(J) + B(10) * U(J) + B(11) * I(J) * U(J)
4520 Z(J) = N3 + N4 + N5 + B(12) * K(J) * U(J): NEXT J: RETURN
4530 FOR J = 1 TO X: N3 = B(1) + B(2) * I(J) + B(3) * K(J) + B(4) *
P(J)
4540 N4 = B(5) * I(J) * P(J) + B(6) * Q(J) + B(7) * I(J) * Q(J) + B(8) *
P(J) * K(J)
4550 N5 = B(9) * K(J) * Q(J) + B(10) * U(J) + B(11) * I(J) * U(J)
4560 N6 = B(12) * K(J) * U(J) + B(13) * V(J) + B(14) * I(J) * V(J)
4570 Z(J) = N3 + N4 + N5 + N6 + B(15) * K(J) * V(J): NEXT J: RE-
TURN
4580 FOR J = 1 TO X: N3 = B(1) + B(2) * I(J) + B(3) * K(J) + B(4) *
P(J)


                                   141