src/tool/Includes_Generaux/impr01.h

   1       texte(1,1) = '(/,a,'' du sous-programme '',a,/)'
   2       texte(1,2) = '(''Probleme : code retour ='',i6,/)'
   3       texte(1,3) = '(a,'' est appele par '',a)'
   4 c
   5       texte(2,1) = '(/,a,'' of '',a,'' subroutine'',/)'
   6       texte(2,2) = '(''Problem : error code ='',i6,/)'
   7       texte(2,3) = '(a,'' is called by '',a)'