Procedure calculates slopes in simple beam under uniformly distributed load. Support A is considered left, support B is right.
General information
Procedure BeamType1_UDL_Slope calculates slope [rad] in simple beam. Support A is considered left, support B is right. You can use this routine in your applications and reports during linear static analysis.
General equations:
\[\theta (x) = \theta_A + \frac{R_A x^2}{2EI}, x \leq a; \]
\[\theta (x) = \theta_A + \frac{R_A x^2}{2EI} - \frac{w (x - a)^3}{6EI}, a < x < L - b; \]
\[\theta (x) = \theta_B - \frac{R_B (L - x)^2}{2EI}, x \geq L - b. \]
Recommended units of measurement
- a, b, L, Lw, x — meter [m];
- w — newton per meter [N/m];
- E — Pascal [Pa];
- I — meter in 4th degree [m4];
- s — radians [rad].
DLL
dystlab.mechanics.dll
Usage format (Pascal)
procedure BeamType1_UDL_Slope(w, a, b, L, E, I, x: Double; var s: Double); stdcall; external [DllName];
Parameters:
- w — intensity of the unirformly distributed load [N/m];
- a — distance between start point of the load and support A [m];
- b — distance between end of the load and support B [m];
- L — beam length [m];
- E — modulus of elasticity [Pa];
- I — moment of inertia (cross-sectional characteristic for bending) [m4];
- x — coordinate of analyzed section (distance between support A and section with slope) [m];
- s — resultant slope [rad].
Return value
Procedure returns in s correspondent slope [rad]. If errors (for example, L<0), procedure returns s=0.
Directives
- DllName — library name. If DLL included in installation pack, then DllName is 'dystlab.mechanics.dll'.
Example for TechEditor
Next code calls routine from DLL and shows standard message box. Code can be used in applications for TechEditor 1.0.7 and higher.
uses
Classes, Dialogs;
procedure BeamType1_UDL_Slope(w, a, b, L, E, I, x: Double; var s: Double); stdcall; external 'dystlab.mechanics.dll';
var
s: Double;
begin
BeamType1_UDL_Slope(1.5, 0, 0, 2.0, 15.0e9, 5.2e-9, 1.0, s); ShowMessage('s=' + FloatToStr(s)); end;
