← Back to branch summary

~alifson/chiralityflow/trunk 

1
2
3
4
5
6
7
8

      subroutine qlI3fin(Ival0,xpi,ier)
      implicit none
      double complex Ival0 
      double precision xpi(6)
      integer ier 
      ier = 0 
      call ffxc0(Ival0, xpi, ier)
      end