SROTMG - Online Linux Manual PageSection : 1
Updated : November 2008
Source : BLAS routine
Note : BLAS routine

---

NAMESROTMG - CONSTRUCT THE MODIFIED GIVENS TRANSFORMATION MATRIX H WHICH ZEROS THE SECOND COMPONENT OF THE 2-VECTOR (SQRT(SD1)*SX1,SQRT(SD2)*

---

SYNOPSISSUBROUTINE SROTMG(SD1,SD2,SX1,SY1,SPARAM)    REAL SD1,SD2,SX1,SY1  REAL SPARAM(5)

---

PURPOSE
   CONSTRUCT THE MODIFIED GIVENS TRANSFORMATION MATRIX H WHICH ZEROS
   THE SECOND COMPONENT OF THE 2-VECTOR (SQRT(SD1)*SX1,SQRT(SD2)*
   SY2)**T.

   WITH SPARAM(1)=SFLAG, H HAS ONE OF THE FOLLOWING FORMS..
   SFLAG=-1.E0 SFLAG=0.E0 SFLAG=1.E0 SFLAG=-2.E0
     (SH11 SH12) (1.E0 SH12) (SH11 1.E0) (1.E0 0.E0)
   H=( ) ( ) ( ) ( )
     (SH21 SH22), (SH21 1.E0), (-1.E0 SH22), (0.E0 1.E0).
   LOCATIONS 2-4 OF SPARAM CONTAIN SH11,SH21,SH12, AND SH22
   RESPECTIVELY. (VALUES OF 1.E0, -1.E0, OR 0.E0 IMPLIED BY THE
   VALUE OF SPARAM(1) ARE NOT STORED IN SPARAM.)

   THE VALUES OF GAMSQ AND RGAMSQ SET IN THE DATA STATEMENT MAY BE
   INEXACT. THIS IS OK AS THEY ARE ONLY USED FOR TESTING THE SIZE
   OF SD1 AND SD2. ALL ACTUAL SCALING OF DATA IS DONE USING GAM.

---

ARGUMENTSSD1 (input/output) REAL  SD2 (input/output) REAL  SX1 (input/output) REAL  SY1 (input) REAL  SPARAM (input/output) REAL array, dimension 5 SPARAM(1)=SFLAG SPARAM(2)=SH11 SPARAM(3)=SH21 SPARAM(4)=SH12 SPARAM(5)=SH22 0

---

Johanes Gumabo

---

Data Size   :   6,267 byte
man-srotmg.lBuild   :   2024-12-05, 20:55   :  
Visitor Screen   :   x
Visitor Counter ( page / site )   :   2 / 236,741
Visitor ID   :     :  
Visitor IP   :   13.58.53.112   :  
Visitor Provider   :   AMAZON-02   :  
Provider Position ( lat x lon )   :   39.962500 x -83.006100   :   x
Provider Accuracy Radius ( km )   :   1000   :  
Provider City   :   Columbus   :  
Provider Province   :   Ohio ,   :   ,
Provider Country   :   United States   :  
Provider Continent   :   North America   :  
Visitor Recorder   :   Version   :  
Visitor Recorder   :   Library   :  
Online Linux Manual Page   :   Version   :   Online Linux Manual Page - Fedora.40 - march=x86-64 - mtune=generic - 24.12.05
Online Linux Manual Page   :   Library   :   lib_c - 24.10.03 - march=x86-64 - mtune=generic - Fedora.40
Online Linux Manual Page   :   Library   :   lib_m - 24.10.03 - march=x86-64 - mtune=generic - Fedora.40
Data Base   :   Version   :   Online Linux Manual Page Database - 24.04.13 - march=x86-64 - mtune=generic - fedora-38
Data Base   :   Library   :   lib_c - 23.02.07 - march=x86-64 - mtune=generic - fedora.36

---

Very long time ago, I have the best tutor, Wenzel Svojanovsky . If someone knows the email address of Wenzel Svojanovsky , please send an email to johanes_gumabo@yahoo.co.id .

---

If error, please print screen and send to johanes_gumabo@yahoo.co.id
Under development. Support me via PayPal.

---