BOSS_7.0.2: /home/bes3soft/bes3soft/Boss/7.0.2/dist/7.0.2/Generator/KKMC/KKMC-00-00-55/src/bornv/BXformat.h Source File

00001 *
00002 * BoX-FORMATs for nice and flexible outputs
00003       CHARACTER*80      bxope,bxclo,bxtxt,bxl1i,bxl1f,bxl2f,bxl1g,bxl2g
00004       PARAMETER (
00005      $  bxope ='(//1x,15(5h*****)    )',
00006      $  bxtxt ='(1x,1h*,                  a48,25x,    1h*)',
00007      $  bxl1i ='(1x,1h*,i17,                 16x, a20,a12,a7, 1x,1h*)',
00008      $  bxl1f ='(1x,1h*,f17.8,               16x, a20,a12,a7, 1x,1h*)',
00009      $  bxl2f ='(1x,1h*,f17.8, 4h  +-, f11.8, 1x, a20,a12,a7, 1x,1h*)',
00010      $  bxl1g ='(1x,1h*,g17.8,               16x, a20,a12,a7, 1x,1h*)',
00011      $  bxl2g ='(1x,1h*,g17.8, 4h  +-, f11.8, 1x, a20,a12,a7, 1x,1h*)',
00012      $  bxclo ='(1x,15(5h*****)/   )'
00013      $ )
00014 *