Créer un parcours de grignotage circulaire avec poinçonnage

C     Appel :

C     CALL PVB410 (RX,RY,DD,WNIB,WPUN,ANG,RGHN,IBL,IRET)

C     

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

C     

C     RX,RY : centre du cercle

C     DD    : diamètre du cercle

C     WNIB  : diamètre de l'outil de grignotage

C     WPUN  : diamètre de l'outil de poinçonnage

C     ANG   : angle de départ du cercle de grignotage

C     RGHN  : rugosité du parcours de grignotage

C     IBL   : formation de bloc

C             0 = non

C             1 = oui

C     IRET  : n'est pas évalué, mais doit être spécifié

C     

C     Exemple :

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

C     Créer un parcours de grignotage circulaire avec poinçonnage

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

      RX = XMAIN / 2.0

      RY = YMAIN / 2.0

      DD = 200.0

      WNIB = 10.0

      WPUN = 32.0

      ANG = 270.0

      RGHN = 0.2

      IBL = 1

      CALL PVB410 (RX,RY,DD,WNIB,WPUN,ANG,RGHN,IBL,IRET)