!
! PROCEDURE:  Pmac                                                   
! USAGE:      Macrolib construction for a fixed material
! AUTHOR:     E.Varin (97/08/11)                                     
! CALL:                                   
!
!  MACRO := Pmac    ;
!
! NOTES:
!    All the sequential ASCII files are exported COMPO files
!    and must have the names and directory hierarchy as used
!    in the calling to CRE: module
!
 PARAMETER   MACRO ::
  ::: LINKED_LIST MACRO ;  ;
 LINKED_LIST NREFL ;
 SEQ_ASCII   REFLn ::
    FILE 'REFLn' ;
 MODULE      CRE: END: ;
*
 NREFL  := REFLn     ; 
 MACRO := CRE: NREFL ::  NMIX 2  READ  
       COMPO NREFL   MIX    2      'MIXTMOD    1'  ENDMIX ;
 END: ;