src/tool/Gestion_MTU/gmtoas.h

   1 c                                    copyright edf 1999
   2 c
   3 c  gmtoas : les Tableaux pour les Objets Alloues en String
   4 c
   5 c nomobj : nom des objets strutures crees
   6 c nomobc : nom des objets attaches aux champs des objets strutures crees
   7 c nomtbp : nom des types simples de base et des types structures crees
   8 c
   9       character*8 nomobj(nobjx), nomobc(nobcx)
  10       character*8 nomtbp( -ntybma : nobjx )
  11 c
  12       common / gmtoas / nomobj,  nomobc, nomtbp