drotmg Subroutine

public subroutine drotmg(dd1, dd2, dx1, dy1, dparam)

construct the modified givens transformation matrix H

Arguments

Type IntentOptional Attributes Name
real(kind=wp) :: dd1
real(kind=wp) :: dd2
real(kind=wp) :: dx1
real(kind=wp) :: dy1
real(kind=wp) :: dparam(5)

Called by

proc~~drotmg~~CalledByGraph proc~drotmg drotmg proc~dwnlit dwnlit proc~dwnlit->proc~drotmg proc~dwnlsm dwnlsm proc~dwnlsm->proc~drotmg proc~dwnlsm->proc~dwnlit proc~dwnnls dwnnls proc~dwnnls->proc~dwnlsm proc~dlpdp dlpdp proc~dlpdp->proc~dwnnls proc~dlsi dlsi proc~dlsi->proc~dlpdp proc~dlsei dlsei proc~dlsei->proc~dlsi proc~dfcmn dfcmn proc~dfcmn->proc~dlsei proc~dfc dfc proc~dfc->proc~dfcmn

Source Code

      subroutine drotmg(d1, d2, x1, y1, dparam)
         import
         implicit none
         real(wp) :: d1, d2, x1, y1
         real(wp) :: dparam(5)
      end subroutine drotmg