Delta X/Y aus Winkel und Abstand berechnen

C     Aufruf:

C     CALL PTH117 (W,DIST,RDX,RDY,IRET)

C     

C     Folgende Variablen müssen zuvor festgelegt werden:

C     

C     W    : Winkel (in Grad)

C     DIST : Distanz

C     RDX  : Delta-Wert in X (Rückgabewert)

C     RDY  : Delta-Wert in Y (Rückgabewert)

C     IRET : wird nicht ausgewertet, muss aber angegeben werden

C     

C     Beispiel:

C     ------------------------------------------

C     Delta X/Y aus Winkel und Abstand berechnen

C     ------------------------------------------

      W = 65.0

      DIST = 80.0

      CALL PTH117 (W,DIST,RDX,RDY,IRET)