setroots Interface

public interface setroots

Module Procedures

private subroutine setroots_1d(x, F10, Zr, Fs)

Arguments

Type IntentOptional Attributes Name
real(kind=r_2), intent(in), DIMENSION(:) :: x
real(kind=r_2), intent(in) :: F10
real(kind=r_2), intent(in) :: Zr
real(kind=r_2), intent(out), DIMENSION(:) :: Fs

private subroutine setroots_2d(x, F10, Zr, Fs)

Arguments

Type IntentOptional Attributes Name
real(kind=r_2), intent(in), DIMENSION(:,:) :: x
real(kind=r_2), intent(in), DIMENSION(:) :: F10
real(kind=r_2), intent(in), DIMENSION(:) :: Zr
real(kind=r_2), intent(out), DIMENSION(:,:) :: Fs