& 0.0d0,0.0,0.0d0,0.0d0,0.0d0,0.0d0,0.0d0/
data nprint_ene /22/
data print_order /1,2,3,18,11,12,13,14,4,5,6,7,8,9,10,19,
- & 16,15,17,20,21,24,22,23,26/
+ & 16,15,17,20,21,24,22,23,26,0/
end
c---------------------------------------------------------------------------
subroutine init_int_table