Advertisement
Guest User

Untitled

a guest
Apr 16th, 2018
84
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.25 KB | None | 0 0
  1. restart
  2. R__AV:=0:
  3. lign1:=ral+rc-Q*L=0:
  4. lign2:=-Q*L/2-ma+rc*L=0:
  5. lign3:=0=-Q*L^3/(8*EI)+rc*L^3/(3*EI):
  6. unassign('rav','rc','ma'):
  7. assign(solve([lign1,lign2,lign3],[ral,rc,ma])):
  8. 'R__AL'=ral:
  9. 'R__C'=rc:
  10. 'M__A'=ma:
  11. 'Q'=solve(rc=Pi^2/((L/2)^2)*EI,Q):
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement