Calculer le cosinus, le sinus et la tangente d'un angle

C     Appel :

C     CALL PTH054 (W,CW,SW)

C     

C     Les variables suivantes doivent être définies au préalable :

C     

C     W  : angle (en degrés)

C     CW : valeur cosinus (valeur de retour)

C     SW : valeur sinus (valeur de retour)

C     

C     Exemple :

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

C     Calculer le cosinus, le sinus et la tangente d'un angle

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

      W = 35.0

      CALL PTH054 (W,CW,SW)

C     

C     Calculer la tangente (TW)

      TW = SW / CW