Needs["dsvsolve`"];

Input
ATTENZIONE: DSV SOLVE ADOPERA UN SISTEMA DI RIFERIMENTO NEL QUALE L’ASSE X E` ENTRANTE NEL PIANO. QUINDI v(z) e` lo spostamento verso l’alto e Q(z) che rappresenta il taglio, ha la covenzione opposta rispetto a quella del libro

example={$$nodes->{{0, 0}, {L, 0}},
$$edges->{{1, 2}},$$absname->s,
$$constraints->{{{"slidv", 1}}, {{"clamp", 1}}},
$$bodyloads->{{1, {0, 0, 0}}},
$$nodalloads->{{1, {0, -F, 0}}},
$$predeformations->{{1, {0, 0, 0}}},
$$cdisplacements->{{1, {0, 0, 0}}}};
(*All constraints are initialized to hinge constraints; use "BFConstraintsPalette[BFConstraintTypes];" to input different constraints.*)
BFShowInput[example]

Risposte

Risultati generali

v[z_]=((F (L^3) (1-3 (s^2)+2 (s^3)))/(12 EI))/.s->z/L//Expand
MM[z_]=-EI*v''[z]//Expand
T[z_]=-F

Versione 1

{v[L/3],NumberForm[v[L/3]//N,3]}
{T[L/3],NumberForm[T[L/3]//N,3]}
{MM[L/3],NumberForm[MM[L/3]//N,3]}

Versione 2

{v[L/5],NumberForm[v[L/5]//N,3]}
{T[L/5],NumberForm[T[L/5]//N,3]}
{MM[L/5],NumberForm[MM[L/5]//N,3]}

Versione 3

{v[2/3L],NumberForm[v[2/3L]//N,3]}
{T[2/3L],NumberForm[T[2/3L]//N,3]}
{MM[2/3L],NumberForm[MM[2/3 L]//N,3]}

Output

(*BFClassify[example]; sol = {{Ns, Qs, Ms}, details} = BFForcesSolve[example];*)
(*A=Transpose[First[BFStaticProblem[example]]];MatrixForm[A]
BFShowRigidMotions[example]*)
BFEquations[example,"Nodal"];sol = {{us, vs}, {Ns, Qs, Ms}, details} = BFDisplacementsSolve[example];
gsol=BFShowOutput[example, sol]

CellPrint/@Rest/@Last[sol];
Print/@Cases[gsol,Graphics[___],Infinity];

BFConstraintsPalette[BFConstraintTypes]

-((F (L^3) (1-3 (s^2)+2 (s^3)))/(12 EI))/.s->1/3//N

-((F (L^3) (1-3 (s^2)+2 (s^3)))/(12 EI))/.s->1/2//N

-(1/2) F L (-1+2 s)/.s->1/3//N

-((F (L^3) (1-3 (s^2)+2 (s^3)))/(12 EI))/.s->2/3//N

-((F (L^3) (1-3 (s^2)+2 (s^3)))/(12 EI))/.s->1/4//N

-(1/2) F L (-1+2 s)/.s->1/4//N

-((F (L^3) (1-3 (s^2)+2 (s^3)))/(12 EI))/.s->1/5//N

-((F (L^3) (1-3 (s^2)+2 (s^3)))/(12 EI))/.s->2/5//N

-(1/2) F L (-1+2 s)/.s->2/5//N