POWP Subroutine

subroutine POWP(NNNN, XXXX, YYYY)

Uses

  • proc~~powp~~UsesGraph proc~powp POWP module~real_precision REAL_PRECISION proc~powp->module~real_precision

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: NNNN
real(kind=R8), intent(in), DIMENSION(2) :: XXXX
real(kind=R8), intent(inout), DIMENSION(2) :: YYYY

Variables

Type Visibility Attributes Name Initial
real(kind=R8), public :: R
real(kind=R8), public :: RR
real(kind=R8), public :: T
real(kind=R8), public :: TT
real(kind=R8), public :: DNRM2

Source Code

        SUBROUTINE POWP(NNNN,XXXX,YYYY)
        USE REAL_PRECISION
        INTEGER, INTENT(IN):: NNNN
        REAL (KIND=R8), DIMENSION(2), INTENT(IN):: XXXX
        REAL (KIND=R8), DIMENSION(2), INTENT(IN OUT):: YYYY
        END SUBROUTINE POWP