[PSTricks] Mathematisches Pendel

[Klaus]

Hallo ihr Lieben,

ich versuche gerade ein mathematisches mit PS Tricks zu basteln. Interessant ist die Konstruktion der tangentialen Rückstellkraft, aber das habe ich gelöst.

Nun ist die Frage, wie ich von dem von PSTricks berechneten Punkt auf dem Kreis die Gewichtskraft nach unten gezeichnet kriege. Dass ich analog zur Ruhelage einen Pfeil senkrecht nach unten mit G beschriften kann.

Hat jemand eine Idee?

Hier der Quellcode und im Anhang die bisherige Graphik

EDIT: Irgendwie kann ich keine Graphik hochladen.

\documentclass{standalone}
\usepackage{pstricks,pstricks-add,pst-node}
\usepackage{amsmath,amssymb}
\usepackage{xcolor}
\pagestyle{empty}
\begin{document}
\begin{pspicture}(0,0)(15,10)
%%%%%%%%%%%%
% Ruhelage %
%%%%%%%%%%%%
\psline[linewidth=2pt]{-}(2,5)(6,5)
\pnode(4,5){center1}\psarc(center1){3}{-150}{-30}
\pnode(4,2){mass1}\pscircle*(mass1){0.2}
\ncline{center1}{mass1}\nbput{$\ell$}
\pnode(4,0.5){gforce}
\ncline[linewidth=2pt]{->}{mass1}{gforce}\nbput{$G$}
%%%%%%%%%%%%%%
% Ausgelenkt %
%%%%%%%%%%%%%%
\psline[linewidth=2pt]{-}(9,5)(13,5)
\pnode(11,5){center2}\psarc(center2){3}{-150}{-30}
\pnode(11,1.5){direction}
\psCircleTangents(direction)(center2){3}
\pnode(CircleT2){mass2}\pscircle*(mass2){0.2}
\ncline{center2}{mass2}\nbput{$\ell$}
\ncline[linewidth=2pt]{->}{CircleT2}{direction}\nbput{$F_r$}
\end{pspicture}
\end{document} 

Viele Grüße,
-- Klaus

[esdd]

Hallo,

die Gewichtskraft kannst du am Ende mit folgendem einzeichnen:

\pnode([offset=-1.5]mass2){gforce2}
\ncline[linewidth=2pt]{->}{mass2}{gforce2}

Allerdings sieht man dann, dass die Länge des Vektors für die tangentiale Rückholkraft nicht stimmt.

Hier ist deshalb noch ein Vorschlag mit der Konstruktion der tangentialen Rückholkraft in Abhängigkeit vom Gewicht und dem Auslenkungswinkel:

\documentclass{standalone}
\usepackage{pstricks-add}

\begin{document}
\begin{pspicture}(0,0)(15,10)
\newcommand\Gewicht{1.5}
%%%%%%%%%%%%
% Ruhelage %
%%%%%%%%%%%%
\psline[linewidth=2pt]{-}(2,5)(6,5) 
\pnode(4,5){center1}\psarc(center1){3}{-150}{-30}
\pnode(4,2){mass1}\pscircle*(mass1){0.2}
\ncline{center1}{mass1}\nbput{$\ell$}
\pnode([offset=-\Gewicht]mass1){gforce1}
\ncline[linewidth=2pt]{->}{mass1}{gforce1}\nbput{$G$}
%%%%%%%%%%%%%%
% Ausgelenkt %
%%%%%%%%%%%%%%
\newcommand\Winkel{-50}
\psline[linewidth=2pt]{-}(9,5)(13,5) 
\pnode(11,5){center2}\psarc(center2){3}{-150}{-30}
\rput{270}(center2){\pnode(3;\Winkel){mass2}}
\pscircle*(mass2){0.2}
\ncline{center2}{mass2}\nbput{$\ell$}
\pnode([offset=-\Gewicht]mass2){gforce2}
\ncline[linewidth=2pt]{->}{mass2}{gforce2}
\rput(mass2){\pnode(\Gewicht;\Winkel){dirFr}}
\rput{90}(gforce2){\pnode(\Gewicht;\Winkel){dirFrN}}
\rput{180}(gforce2){\pnode(\Gewicht;\Winkel){dirSN}}
\psIntersectionPoint(mass2)(dirFr)(gforce2)(dirFrN){Fr}
\psIntersectionPoint(center2)(mass2)(gforce2)(dirSN){S}
\ncline[linewidth=2pt]{->}{mass2}{Fr}
\ncline[linewidth=2pt]{->}{mass2}{S}
\end{pspicture}
\end{document}

Gruß
Elke

[localghost]

Mit tikZ/PGF wäre alles so viel einfacher.

\documentclass[11pt]{standalone}
\usepackage[T1]{fontenc}
\usepackage{tikz}

\begin{document}
  \begin{tikzpicture}[>=stealth]
    \useasboundingbox (-3,0) rectangle (3,-5);
    \filldraw[thick] (-2,0) -- (2,0) (0:0) -- (270:3) circle (5pt) node [midway,left] {$\ell$};
    \draw[->,thick](270:3) -- +(270:2) node[midway,left] {$G$};;
    \draw +(3*cos 210,3*sin 210) arc (210:330:3);
  \end{tikzpicture}
  \qquad
  \begin{tikzpicture}[>=stealth]
    \useasboundingbox (-3,0) rectangle (3,-5);
    \filldraw[thick] (-2,0) -- (2,0) (0:0) -- (240:3) circle (5pt) node [midway,above left] {$\ell$};
    \draw[->,thick] (240:3) -- +(270:2) node[midway,left] {$G$};
    \draw[->,thick] (240:3) -- +(330:2*sin 30) node[midway,above] {$F_r$};
    \draw +(3*cos 210,3*sin 210) arc (210:330:3);
  \end{tikzpicture}
\end{document}

Thorsten

[Klaus]

Boa, cool.

Muss das erstmal Stück für Stück nachvollziehen.

Da hast du aber schon tief in die Trickkiste gegriffen, oder?

Viele Grüße,

-- Klaus.