Télécharger la plaquette Cast3M


fr en

Télécharger impchi1.procedur

Retour à la liste

Numérotation des lignes : 

  1. * IMPCHI1   PROCEDUR  AURI      97/10/10    21:15:02     2871           
  2. 'DEBPROC' IMPCHI1 TB1*'TABLE'  NOMTB*'MOT'     ;
  3. option echo 1 ;
  4. *
  5. *     IMPRESSION D'UNE TABLE DE TYPE CHIMI1
  6. *
  7. *
  8. BL20 = '                    ' ;
  9. 'MESS'  BL20 'Description de la table ' NOMTB  ;
  10. 'LIST' TB1 ;
  11. 'SAUT' 'LIGNE' ;
  12. 'MESS' BL20 ' Identifiants des composants retenus ' ;
  13. 'MESS' BL20  NOMTB  '.DESCHI.IDX';
  14. 'LIST' TB1. 'DESCHI' . 'IDX' ;
  15. 'SAUT' 'LIGNE' ;
  16. 'MESS'  BL20 'Noms des composants retenus ';
  17. 'MESS' BL20 NOMTB  '.DESCHI.NOM';
  18. 'LIST' TB1. 'DESCHI' . 'NOM' ;
  19. 'SAUT' 'LIGNE' ;
  20.  'MESS' BL20 ' Identifiants des espèces retenues ';
  21.  'MESS' BL20    NOMTB  '.DESCHI.IDY' ;
  22. 'LIST' TB1. 'DESCHI' . 'IDY' ;
  23. 'SAUT' 'LIGNE' ;
  24. 'SI' ( 'EXIS' TB1 'DESCHI' 'IDZ' ) ;
  25.  'MESS' BL20 ' Identifiants des solutions solides retenues ';
  26.  'MESS' BL20    NOMTB  '.DESCHI.IDZ' ;
  27. 'LIST' TB1. 'DESCHI' . 'IDZ' ;
  28. 'FINSI' ;
  29. 'SAUT' 'LIGNE' ;  
  30.  'MESS' BL20 ' Nombre d espèce de chaque type  ' ;
  31. 'MESS' BL20  NOMTB '.DESCHI.NN';
  32. 'LIST' TB1. 'DESCHI'  . 'NN' ;
  33. 'SAUT' 'LIGNE' ;
  34.  'MESS' BL20 'Nature des espèces de type 2 ';
  35.  'MESS' BL20 NOMTB  '.DESCHI.IDSURF ' ;
  36. 'LIST' TB1. 'DESCHI' . 'IDSURF' ;
  37. 'SAUT' 'LIGNE' ;
  38. 'MESS'  NOMTB  '.IDEN ';
  39. 'LIST' TB1. 'IDEN'    ;
  40. 'SAUT' 'LIGNE' ;
  41.  'SI'( 'EXIS' TB1 'IDEN' 'SOLU');
  42. 'MESS'  BL20 'Identifiants des espèces en solution ';
  43. 'MESS' BL20 NOMTB  '.IDEN.SOLU '  ;
  44. 'LIST' TB1. 'IDEN' . 'SOLU' ;
  45. 'SAUT' 'LIGNE' ;
  46.  'FINSI' ;
  47.  'SI' ( 'EXIS' TB1 'IDEN' 'PRECI');
  48. 'MESS' BL20  'Identifiants des espèces précipitées ' ;
  49. 'MESS' BL20 NOMTB  '.IDEN.PRECI' ;
  50. 'LIST' TB1. 'IDEN' . 'PRECI' ;
  51. 'SAUT' 'LIGNE' ;
  52. 'MESS' BL20 'Noms des espèces précipitées ';
  53. 'MESS' BL20 NOMTB  '.IDEN.NOMPRECI' ;
  54. 'LIST' TB1. 'IDEN' . 'NOMPRECI' ;
  55. 'SAUT' 'LIGNE' ;
  56.  'FINSI' ;
  57.  'SI' ( 'EXIS' TB1 'IDEN' 'SOLSOL');
  58. 'MESS' BL20  'Identifiants des solutions solides ' ;
  59. 'MESS' BL20 NOMTB  '.IDEN.SOLSOL' ;
  60. 'LIST' TB1. 'IDEN' . 'SOLSOL' ;
  61. 'SAUT' 'LIGNE' ;
  62. 'MESS' BL20 'Noms des solutions solides ';
  63. 'MESS' BL20 NOMTB  '.IDEN.NOMSOLSOL' ;
  64. 'LIST' TB1. 'IDEN' . 'NOMSOLSOL' ;
  65. 'SAUT' 'LIGNE' ;
  66.  'FINSI' ;
  67.  'SI' ( 'EXIS' TB1 'IDEN' 'POLE');
  68. 'MESS' BL20 'Identifiants des poles de solutions solides ' ;
  69. 'MESS' BL20 NOMTB  '.IDEN.POLE' ;
  70. 'LIST' TB1.  'IDEN' . 'POLE' ;
  71. 'SAUT' 'LIGNE' ;
  72. 'MESS' BL20 'Noms des poles de solutions solides ' ;
  73. 'MESS' BL20 NOMTB  '.IDEN.NOMPOLE' ;
  74. 'LIST' TB1. 'IDEN' . 'NOMPOLE' ;
  75. 'SAUT' 'LIGNE' ;
  76. 'FINSI' ;   
  77.  'SI' ( 'EXIS' TB1 'IDEN' 'SURF');
  78. 'MESS' BL20 'Identifiants des espèces de surface ';
  79. 'MESS' BL20 NOMTB  '.IDEN.SURF' ;
  80. 'LIST' TB1. 'IDEN' . 'SURF' ;
  81. 'SAUT' 'LIGNE' ;
  82. 'MESS' BL20 'Noms des espèces de surface ';
  83. 'MESS' BL20 NOMTB  '.IDEN.NOMSURF' ;
  84. 'LIST' TB1.'IDEN' . 'NOMSURF' ;
  85. 'SAUT' 'LIGNE' ;
  86.  'FINSI' ;
  87.  'SI' ( 'EXIS'  TB1 'IDEN' 'TYP3' );
  88. 'MESS' BL20 'Identifiants des espèces de type 3 ';
  89. 'MESS' BL20  NOMTB  '.IDEN.TYP3';
  90. 'LIST' TB1. 'IDEN' . 'TYP3' ;
  91. 'SAUT' 'LIGNE' ;
  92. 'MESS' BL20 'Noms des espèces de type 3 ';
  93. 'MESS' BL20 NOMTB  '.IDEN.NOMTYP3' ;
  94. 'LIST' TB1. 'IDEN' . 'NOMTYP3' ;
  95. 'SAUT' 'LIGNE' ;
  96.  'FINSI' ;
  97.  'SI' ( 'EXIS' TB1 'IDEN'  'TYP6' );
  98. 'MESS' BL20 'Identifiants des espèces de type 6 ';
  99. 'MESS' BL20  NOMTB  '.IDEN.TYP6' ;
  100. 'LIST' TB1. 'IDEN' . 'TYP6' ;
  101. 'SAUT' 'LIGNE' ;
  102. 'MESS' BL20 'Noms des espèces de type 6 ';
  103. 'MESS' BL20  NOMTB  '.IDEN.NOMTYP6' ;
  104. 'LIST' TB1. 'IDEN' . 'NOMTYP6' ;
  105. 'SAUT' 'LIGNE' ;
  106.  'FINSI' ;
  107.  'SI' ( 'EXIS' TB1 'IDEN' 'PARF');
  108. 'MESS' BL20 'Identifiants des composants non réactifs ';
  109. 'MESS' BL20 NOMTB '.IDEN.PARF' ;
  110. 'LIST' TB1. 'IDEN' . 'PARF' ;
  111. 'SAUT' 'LIGNE' ;
  112.  'FINSI' ;
  113.  'SI'( 'EXIS' TB1 'IDEN' 'REAC' ) ;
  114. 'MESS' BL20 'Identifiants des composants réactifs ';
  115. 'MESS' BL20 NOMTB  '.IDEN.REAC' ;
  116. 'LIST' TB1. 'IDEN' . 'REAC' ;
  117. 'SAUT' 'LIGNE' ;
  118.  'FINSI' ;
  119.  'SI'( 'EXIS' TB1 'IDEN' 'IMMO');
  120. 'MESS' BL20  'Identifiants des composants non transportés ';
  121. 'MESS' BL20  NOMTB '.IDEN.IMMO' ;
  122. 'LIST' TB1. 'IDEN' . 'IMMO' ;
  123. 'SAUT' 'LIGNE' ;
  124.  'FINSI' ;
  125.  'SI' ( 'EXIS' TB1 'REDOX');
  126. 'MESS'  BL20 'Table des données relatives aux redox ' ;
  127. 'MESS' BL20 NOMTB  '.REDOX' ;
  128. 'LIST' TB1.'REDOX' ;
  129. 'SAUT' 'LIGNE' ;
  130. 'MESS'  BL20 'Identifiant du composant mobile ' ;
  131. 'MESS' BL20 NOMTB  '.REDOX.I1' ;
  132. 'LIST' TB1. 'REDOX' . 'I1' ;
  133. 'SAUT' 'LIGNE' ;
  134. 'MESS'  BL20 'Identifiant du composant lié au composant mobile ' ;
  135. 'MESS' BL20 NOMTB  '.REDOX.I2' ;
  136. 'LIST' TB1.'REDOX' . 'I2' ;
  137. 'SAUT' 'LIGNE' ;
  138. 'MESS'  BL20 'Coefficient stoechiométrique de l electron e- ' ;
  139. 'MESS' BL20 NOMTB  '.REDOX.A1' ;
  140. 'LIST' TB1.'REDOX' . 'A1' ;
  141. 'SAUT' 'LIGNE' ;
  142. 'MESS'  BL20 'Coefficient stoechiométrique du proton H+ ' ;
  143. 'MESS' BL20 NOMTB  '.REDOX.A2' ;
  144. 'LIST' TB1.'REDOX' . 'A2' ;
  145. 'SAUT' 'LIGNE' ;
  146.  'FINSI' ;
  147.  'SI'( 'EXIS' TB1 'TEMPE');
  148. 'MESS'  BL20 'Table des données relatives à la température ' ;
  149. 'MESS' BL20 NOMTB  '.TEMPE' ;
  150. 'LIST' TB1.'TEMPE' ;
  151. 'SAUT' 'LIGNE' ;
  152.  'FINSI' ;
  153. 'FINPROC'  ;
  154.  
  155.  
  156.  
  157.  

© Cast3M 2003 - Tous droits réservés.
Mentions légales