hto_real_ln Module Reference

Data Types
interface	operator(.rln.)

Functions/Subroutines
real *8 function	rln (x, ep)

Function/Subroutine Documentation

rln()

real*8 function hto_real_ln::rln	(	real*8, intent(in)	x,
		real*8, intent(in)	ep
	)

Definition at line 430 of file CALLING_cpHTO.f.

      IMPLICIT NONE
      real*8 rln
      real*8, INTENT(IN) :: x,ep
      rln= log(abs(x))