cmBremF2.f File Reference

Go to the source code of this file.

Functions/Subroutines
real *8 function	cmbremf2 (up, v)

Function/Subroutine Documentation

cmbremf2()

real*8 function cmbremf2	(	real*8	up,
		real*8	v
	)

Definition at line 6 of file cmBremF2.f.

References d0.

      implicit none
      real*8 up  !  input. upsilon
      real*8 v   !  input. faractional energy.
      real*8 zeta2, ck23
      
      zeta2 = v/(1.d0-v) /3.d0/up * 2.d0
      cmbremf2 = v * ck23(zeta2)*zeta2