Zur Beschreibungsseite auf Commons

Datei:Kt arbre epaule traction.svg

aus Wikipedia, der freien Enzyklopädie

Originaldatei(SVG-Datei, Basisgröße: 637 × 751 Pixel, Dateigröße: 194 KB)

Commons-logo.svg

Diese Datei und die Informationen unter dem roten Trennstrich werden aus dem zentralen Medienarchiv Wikimedia Commons eingebunden.

Zur Beschreibungsseite auf Commons


Beschreibung

Beschreibung
Français : Abaque de facteurs de concentration de contrainte (Kt) dans le cas d'un arbre épaulé en traction.
English: Stress concentration factors (Kt) chart for a shaft with shoulder fillet in traction.
Datum
Quelle Eigenes Werk, from Pilkey, Walter D., Peterson's Stress Concentration Factors 2nd ed., Wiley & sons (1997), ISBN 97-0-471-53849-3, p. 156
Urheber Cdang
 
Diese W3C-unbestimmte Vektorgrafik wurde mit Inkscape erstellt .
Calculation
t is the fillet height, t = (D - d)/2
Coefficient for the calculation of Kt
β = t/r 0,1 ≤ β ≤ 2,0 2,0 ≤ β ≤ 20
C1
C2
C3
C4

Scilab source

// ********************
// Initialisation
// ********************

clear;
clc;

// ********************
// Fonctions
// ********************

// Saisie des paramètres géométriques

function [A]=param_geo()
    A(1) = input("grand diamètre : D = ");
    A(2) = input("petit diamètre : d = ");
    A(3) = input("rayon : r = ");
endfunction

// Calcul en traction

function [Kt] = Kt_traction(Alpha, Beta)
    drapeau = Beta <= 2;
    select drapeau
    case %t then
        coefs = [0.926, 1.157, -0.099;
            0.012, -3.036, 0.961;
            -0.302, 3.977, -1.744;
            0.365, -2.098, 0.878];
    case %f then
        coefs = [1.200, 0.860, -0.022;
            -1.805, -0.346, -0.038;
            2.198, -0.486, 0.165;
            -0.593, -0.028, -0.106];
    end
    C = coefs(:,1) + coefs(:,2)*sqrt(Beta) + coefs(:,3)*Beta;
    polynome = poly(C', "x", "c") ;
    Kt = horner(polynome, Alpha);
endfunction

// ********************
// Programme principal
// ********************

// Accueil

disp("Facteurs de concentration de contrainte d''un arbre épaulé")

// A(1) = D ; A(2) = d ; A(3) = r

A = param_geo();
t = 0.5*(A(1) - A(2)); // hauteur de filet
Beta = t/A(3); // t/r
Alpha = 2*t/A(1);

Kt_tr = Kt_traction(Alpha, Beta);

if (Beta < 0.1) | (Beta > 20) then
    disp("Attention, valeur extrapolée");
end
disp('Kt traction = '+string(Kt_tr));

Lizenz

Ich, der Urheber dieses Werkes, veröffentliche es unter der folgenden Lizenz:
Creative Commons CC-Zero Diese Datei wird unter der Creative-Commons-Lizenz „CC0 1.0 Verzicht auf das Copyright“ zur Verfügung gestellt.
Die Person, die das Werk mit diesem Dokument verbunden hat, übergibt dieses weltweit der Gemeinfreiheit, indem sie alle Urheberrechte und damit verbundenen weiteren Rechte – im Rahmen der jeweils geltenden gesetzlichen Bestimmungen – aufgibt. Das Werk kann – selbst für kommerzielle Zwecke – kopiert, modifiziert und weiterverteilt werden, ohne hierfür um Erlaubnis bitten zu müssen.

Kurzbeschreibungen

Ergänze eine einzeilige Erklärung, was diese Datei darstellt.

In dieser Datei abgebildete Objekte

Motiv

Dateiversionen

Klicke auf einen Zeitpunkt, um diese Version zu laden.

Version vomVorschaubildMaßeBenutzerKommentar
aktuell06:54, 24. Apr. 2013Vorschaubild der Version vom 06:54, 24. Apr. 2013637 × 751 (194 KB)wikimediacommons>CdangMissing edges on the sketch

Die folgende Seite verwendet diese Datei:

Metadaten