ruletest9.al 755 B

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354
  1. % ruletest9.al
  2. NEWTONIAN N
  3. FRAMES A
  4. A> = 0>
  5. D>> = EXPRESS(1>>, A)
  6. POINTS PO{2}
  7. PARTICLES P{2}
  8. MOTIONVARIABLES' C{3}'
  9. BODIES R
  10. P_P1_PO2> = C1*A1>
  11. V> = 2*P_P1_PO2> + C2*A2>
  12. W_A_N> = C3*A3>
  13. V> = 2*W_A_N> + C2*A2>
  14. W_R_N> = C3*A3>
  15. V> = 2*W_R_N> + C2*A2>
  16. ALF_A_N> = DT(W_A_N>, A)
  17. V> = 2*ALF_A_N> + C2*A2>
  18. V_P1_A> = C1*A1> + C3*A2>
  19. A_RO_N> = C2*A2>
  20. V_A> = CROSS(A_RO_N>, V_P1_A>)
  21. X_B_C> = V_A>
  22. X_B_D> = 2*X_B_C>
  23. A_B_C_D_E> = X_B_D>*2
  24. A_B_C = 2*C1*C2*C3
  25. A_B_C += 2*C1
  26. A_B_C := 3*C1
  27. MOTIONVARIABLES' Q{2}', U{2}'
  28. Q1' = U1
  29. Q2' = U2
  30. VARIABLES X'', Y''
  31. SPECIFIED YY
  32. Y'' = X*X'^2 + 1
  33. YY = X*X'^2 + 1
  34. M[1] = 2*X
  35. M[2] = 2*Y
  36. A = 2*M[1]
  37. M = [1,2,3;4,5,6;7,8,9]
  38. M[1, 2] = 5
  39. A = M[1, 2]*2
  40. FORCE_RO> = Q1*N1>
  41. TORQUE_A> = Q2*N3>
  42. FORCE_RO> = Q2*N2>
  43. F> = FORCE_RO>*2