Sources Esope | Cast3M

ooodsc
C OOODSC    SOURCE    PV090527  26/04/24    08:23:06     12524          
      SUBROUTINE OOODSC (PSEGM)
C------------------------------------------------------   SEP 87   ---
C
C   ->PSEGM    LE POINTEUR SUR LE SEGMENT DES DESCRIPTEUR
C              ( UTILISE PAR LLLED0 AVEC GEMB )
C
C PROGRAMMEUR : MOUGIN  (OPTIMISATION DE ARCHIVE POUR PHYSURA)
C
      POINTEUR PSEGM.PSEGM
 
      PSEGM = 0
                                                       RETURN
      END