####################################################################################################################################### # # # P A R T I T I O N A L E A T O I R E D E L ' E N S E M B L E D E S P A R T I C U L E S # # E N P L U S I E U R S S O U S - E N S E M B L E S P O U R L E C O L L A G E : # # # # # # Author of '$xivP/disk.000000009/face.2/.REFL.r.86.$U' : # # # # Jean-Francois Colonna (LACTAMME, AAAAMMJJhhmmss). # # # ####################################################################################################################################### $Z $DELETE $xTV/CARACTERIS.T $Z $xrv/MINMAX.11$X \ $Z ne=$Npart \ $Z fichier1=$xTV/CARACTERIS.CO \ $Z fichier2=$xTV/COLLAGE \ $Z > $xTV/CARACTERIS.T $Z # ATTENTION a la presence de '$xrv/MINMAX.11$X' et non pas de l'habituel '$xrv/MUL2.11$X' # $Z # rendu necessaire par le fait que les "collages" sont en fait des valeurs logiques... # $Z $DELETE $xTV/COLLAGE $Z $MV $xTV/CARACTERIS.T $xTV/COLLAGE $Z $DELETE $xTV/CARACTERIS.CO