home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2001 May / SGI IRIX Base Documentation 2001 May.iso / usr / share / catman / p_man / cat3 / libblas / scal.z / scal
Encoding:
Text File  |  1998-10-30  |  7.5 KB  |  133 lines
  1.  
  2.  
  3.  
  4. ____SSSSCCCCAAAALLLL((((3333FFFF))))                                                            ____SSSSCCCCAAAALLLL((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      dscal, sscal, zscal, cscal, zdscal, csscal - BLAS level ONE scaling
  10.      subroutines
  11.  
  12.  
  13. FFFFOOOORRRRTTTTRRRRAAAANNNN 77777777 SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  14.      ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ddddssssccccaaaallll(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  15.      iiiinnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn
  16.      ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn  aaaa
  17.      ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn  xxxx(((( 1111 ))))
  18.  
  19.      ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ssssssssccccaaaallll(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  20.      iiiinnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn
  21.      rrrreeeeaaaallll              aaaa
  22.      rrrreeeeaaaallll              xxxx(((( 1111 ))))
  23.  
  24.      ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee zzzzssssccccaaaallll(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  25.      iiiinnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn
  26.      ccccoooommmmpppplllleeeexxxx****11116666        aaaa
  27.      ccccoooommmmpppplllleeeexxxx****11116666        xxxx(((( 1111 ))))
  28.  
  29.      ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ccccssssccccaaaallll(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  30.      iiiinnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn
  31.      ccccoooommmmpppplllleeeexxxx           aaaa
  32.      ccccoooommmmpppplllleeeexxxx           xxxx(((( 1111 ))))
  33.  
  34.      ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee zzzzddddssssccccaaaallll(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  35.      iiiinnnntttteeeeggggeeeerrrr            iiiinnnnccccxxxx,,,, nnnn
  36.      ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn   aaaa
  37.      ccccoooommmmpppplllleeeexxxx****11116666         xxxx(((( 1111 ))))
  38.  
  39.      ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ccccssssssssccccaaaallll(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  40.      iiiinnnntttteeeeggggeeeerrrr            iiiinnnnccccxxxx,,,, nnnn
  41.      rrrreeeeaaaallll               aaaa
  42.      ccccoooommmmpppplllleeeexxxx            xxxx(((( 1111 ))))
  43.  
  44.  
  45. CCCC SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  46.      vvvvooooiiiidddd ddddssssccccaaaallll(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  47.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn;;;;
  48.      ddddoooouuuubbbblllleeee            aaaa;;;;
  49.      ddddoooouuuubbbblllleeee            ((((****xxxx))))[[[[ nnnn ]]]];;;;
  50.  
  51.      vvvvooooiiiidddd ssssccccaaaallll(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  52.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn;;;;
  53.      ffffllllooooaaaatttt             aaaa;;;;
  54.      ffffllllooooaaaatttt             ((((****xxxx))))[[[[ nnnn ]]]];;;;
  55.  
  56.      vvvvooooiiiidddd zzzzssssccccaaaallll(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  57.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn;;;;
  58.      CCCCoooommmmpppplllleeeexxxx           aaaa;;;;
  59.      CCCCoooommmmpppplllleeeexxxx           ((((****xxxx))))[[[[ nnnn ]]]];;;;
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. ____SSSSCCCCAAAALLLL((((3333FFFF))))                                                            ____SSSSCCCCAAAALLLL((((3333FFFF))))
  71.  
  72.  
  73.  
  74.      vvvvooooiiiidddd ccccssssccccaaaallll(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  75.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn;;;;
  76.      CCCCoooommmmpppplllleeeexxxx           aaaa;;;;
  77.      CCCCoooommmmpppplllleeeexxxx           ((((****xxxx))))[[[[ nnnn ]]]];;;;
  78.  
  79.      vvvvooooiiiidddd zzzzddddssssccccaaaallll(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  80.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn;;;;
  81.      ddddoooouuuubbbblllleeee            aaaa;;;;
  82.      CCCCoooommmmpppplllleeeexxxx           ((((****xxxx))))[[[[ nnnn ]]]];;;;
  83.  
  84.      vvvvooooiiiidddd ccccssssssssccccaaaallll(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  85.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn;;;;
  86.      ffffllllooooaaaatttt             aaaa;;;;
  87.      CCCCoooommmmpppplllleeeexxxx           ((((****xxxx))))[[[[ nnnn ]]]];;;;
  88.  
  89.  
  90.  
  91. DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
  92.      ddddssssccccaaaallll, ssssssssccccaaaallll, zzzzssssccccaaaallll, ccccssssccccaaaallll, zzzzddddssssccccaaaallll, and ccccssssssssccccaaaallll scale the vector xxxx of
  93.      length nnnn and increment iiiinnnnccccxxxx by the constant aaaa.
  94.  
  95.      For ddddssssccccaaaallll, ssssssssccccaaaallll, zzzzssssccccaaaallll and ccccssssccccaaaallll the constant aaaa is of the same type as
  96.      the vector xxxx.  zzzzddddssssccccaaaallll and ccccssssssssccccaaaallll scale a "complex" vector by "real"
  97.      constant.
  98.  
  99.  
  100. AAAAUUUUTTTTHHHHOOOORRRRSSSS
  101.           Jack Dongarra, linpack, 3/11/78.
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.