module_libmassv::vsqrt Interface Reference

Public Member Functions
subroutine	vsqrt_d (y, x, n)
subroutine	vsqrt_s (y, x, n)

Member Function/Subroutine Documentation

vsqrt_d()

subroutine module_libmassv::vsqrt::vsqrt_d	(	real(kind=r8kind), dimension(*), intent(out)	y,
		real(kind=r8kind), dimension(*), intent(in)	x,
		integer, intent(in)	n
	)

!=================================================================================================================
 integer,intent(in):: n
 real(kind=r8kind),dimension(*),intent(in):: x
 real(kind=r8kind),dimension(*),intent(out):: y
 
 integer:: j
!-----------------------------------------------------------------------------------------------------------------
 
 do j=1,n
    y(j)=sqrt(x(j))
 enddo
 

vsqrt_s()

subroutine module_libmassv::vsqrt::vsqrt_s	(	real(kind=r4kind), dimension(*), intent(out)	y,
		real(kind=r4kind), dimension(*), intent(in)	x,
		integer, intent(in)	n
	)

!=================================================================================================================
 
 integer,intent(in):: n
 real(kind=r4kind),dimension(*),intent(in):: x
 real(kind=r4kind),dimension(*),intent(out):: y
 
 integer:: j
 
!-----------------------------------------------------------------------------------------------------------------
 
 do j=1,n
    y(j)=sqrt(x(j))
 enddo
 

---

The documentation for this interface was generated from the following file:

• Source/Microphysics/WSM6/ERF_module_libmassv.F90