src/tool/Utilitaire/utb301.h

   1 c
   2 10100 format(/,5x,68('*'))
   3 10200 format(  5x,68('*'))
   4 c
   5 11100 format(  5x,'* ',a54,11x,'*')
   6 11101 format(  5x,'* ',a37,a14,14x,'*')
   7 c
   8 12100 format(  5x,'* ',6i9,' *')
   9 12101 format(  5x,'* ',a14,' :',49x,'*')
  10 12102 format(  5x,'* ',2a8,1x,a14,i10,', ',2a8,':',5x,'*')
  11 c
  12 14101 format(
  13      >5x,'*',5x,'X = ',g13.6,44x,'*')
  14 14102 format(
  15      >5x,'*',5x,'X = ',g13.6,' Y = ',g13.6,26x,'*')
  16 14103 format(
  17      >5x,'*',5x,'X = ',g13.6,' Y = ',g13.6,' Z = ',g13.6,8x,'*')
  18 14201 format(
  19      >5x,'*',i10,' : X = ',g13.6,36x,'*')
  20 14202 format(
  21      >5x,'*',i10,' : X = ',g13.6,' Y = ',g13.6,18x,'*')
  22 14203 format(
  23      >5x,'*',i10,' : X = ',g13.6,' Y = ',g13.6,' Z = ',g13.6,'*')