mulwwc90.s
上传用户:qaz666999
上传日期:2022-08-06
资源大小:2570k
文件大小:8k
源码类别:

数学计算

开发平台:

Unix_Linux

  1. *     Helper for mpn_mul_1, mpn_addmul_1, and mpn_submul_1 for Cray PVP.
  2. *     Copyright 1996, 2000 Free Software Foundation, Inc.
  3. *     This file is generated from mulww.f in this same directory.
  4. *     This file is part of the GNU MP Library.
  5. *     The GNU MP Library is free software; you can redistribute it and/or
  6. *     modify it under the terms of the GNU Lesser General Public License as
  7. *     published by the Free Software Foundation; either version 3 of the
  8. *     License, or (at your option) any later version.
  9. *     The GNU MP Library is distributed in the hope that it will be useful,
  10. *     but WITHOUT ANY WARRANTY; without even the implied warranty of
  11. *     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12. *     Lesser General Public License for more details.
  13. *     You should have received a copy of the GNU Lesser General Public License
  14. *     along with the GNU MP Library.  If not, see http://www.gnu.org/licenses/.
  15.             IDENT           GMPN_MULWW
  16. **********************************************
  17. *      Assemble with Cal Version 2.0         *
  18. *                                            *
  19. * Generated by CFT77   6.0.4.19              *
  20. *           on 06/27/00 at 04:34:13          *
  21. *                                            *
  22. **********************************************
  23. * ALLOW UNDERSCORES IN IDENTIFIERS
  24.             EDIT            OFF
  25.             FORMAT          NEW
  26. @DATA       SECTION         DATA,CM
  27. @DATA       =               W.*
  28.             CON             O'0000000000040000000000
  29.             CON             O'0435152404713723252514
  30.             CON             O'0535270000000000000000
  31.             CON             O'0000000000000001200012
  32.             VWD             32/0,32/P.GMPN_MULWW
  33.             CON             O'0014003000000000001416
  34.             CON             O'0000000000000000000011
  35.             CON             O'0000000000000000000215
  36.             BSSZ            1
  37. @CODE       SECTION         CODE
  38. @CODE       =               P.*
  39. L3          =               P.*
  40.             A0              A6
  41.             A5              6
  42.             B03,A5          0,A0
  43.             A0              A1+A2
  44.             A5              1
  45.             0,A0            T00,A5
  46.             B02             A2
  47.             B66             A3
  48.             B01             A6
  49.             A7              P.L4
  50.             B00             A7
  51.             A6              @DATA
  52.             J               $STKOFEN
  53. GMPN_MULWW  =               P.*
  54.             A0              @DATA+3
  55.             B77             A0
  56.             A1              13
  57.             A0              B66
  58.             A2              B66
  59.             A4              B67
  60.             0,A0            B77,A1
  61.             A7              782
  62.             A3              A2+A7
  63.             A0              A4-A3
  64.             JAM             L3
  65.             A0              A6
  66.             A5              6
  67.             B03,A5          0,A0
  68.             A0              A1+A2
  69.             A5              1
  70.             0,A0            T00,A5
  71.             B02             A2
  72.             B66             A3
  73.             B01             A6
  74. L4          =               P.*
  75.             A7              B07
  76.             S7              0,A7
  77.             A6              B10
  78.             S6              0,A6
  79.             S5              1
  80.             S4              <22
  81.             S7              S7-S5
  82.             S5              #S7
  83.             T00             S6
  84.             S6              S6>22
  85.             S7              T00
  86.             S7              S7>44
  87.             S3              T00
  88.             S3              S3&S4
  89.             S6              S6&S4
  90.             S7              S7&S4
  91.             S3              S3<24
  92.             S6              S6<24
  93.             S7              S7<24
  94.             S0              S5
  95.             S4              S5
  96.             S1              S6
  97.             S2              S3
  98.             S3              S7
  99.             JSP             L5
  100. L6          =               P.*
  101.             S7              -S4
  102.             A2              S7
  103.             VL              A2
  104.             A3              B06
  105.             A5              B05
  106.             A4              B04
  107.             A1              VL
  108.             A2              S4
  109. L7          =               P.*
  110.             A0              A3
  111.             VL              A1
  112.             V7              ,A0,1
  113.             B11             A5
  114.             A7              22
  115.             B12             A4
  116.             V6              V7>A7
  117.             B13             A3
  118.             S7              <22
  119.             A3              B02
  120.             V5              S7&V6
  121.             A6              24
  122.             V4              V5<A6
  123.             V3              S1*FV4
  124.             V2              S7&V7
  125.             V1              V2<A6
  126.             V0              S3*FV1
  127.             V6              V0+V3
  128.             A5              44
  129.             V5              V7>A5
  130.             V2              S1*FV1
  131.             V3              S7&V5
  132.             A0              14
  133.             B77             A0
  134.             A4              B77
  135.             A0              A4+A3
  136.             ,A0,1           V2
  137.             V0              V3<A6
  138.             V7              S2*FV1
  139.             A4              142
  140.             A0              A4+A3
  141.             ,A0,1           V7
  142.             V5              V7>A7
  143.             V2              S2*FV0
  144.             V3              V6+V2
  145.             S7              <20
  146.             V1              S7&V3
  147.             A4              270
  148.             A0              A4+A3
  149.             ,A0,1           V0
  150.             A4              14
  151.             A0              A4+A3
  152.             V7              ,A0,1
  153.             V6              V1<A7
  154.             V2              S2*FV4
  155.             V0              V7+V2
  156.             S7              <42
  157.             V1              S7&V0
  158.             A4              398
  159.             A0              A4+A3
  160.             ,A0,1           V0
  161.             V7              S3*FV4
  162.             V2              V5+V1
  163.             V0              V3<A5
  164.             A5              526
  165.             A0              A5+A3
  166.             ,A0,1           V0
  167.             A5              270
  168.             A0              A5+A3
  169.             V4              ,A0,1
  170.             V5              V2+V6
  171.             A5              20
  172.             V1              V3>A5
  173.             V0              S1*FV4
  174.             A5              654
  175.             A0              A5+A3
  176.             ,A0,1           V1
  177.             V6              V7+V0
  178.             A5              2
  179.             V2              V6<A5
  180.             V3              S3*FV4
  181.             A5              142
  182.             A0              A5+A3
  183.             V1              ,A0,1
  184.             A5              526
  185.             A0              A5+A3
  186.             V7              ,A0,1
  187.             V0              V1+V7
  188.             V6              V3<A6
  189.             V4              V6+V2
  190.             A6              42
  191.             V7              V5>A6
  192.             A5              654
  193.             CPW
  194.             A0              A5+A3
  195.             V1              ,A0,1
  196.             A5              398
  197.             A0              A5+A3
  198.             V3              ,A0,1
  199.             V6              V4+V1
  200.             V2              V3>A6
  201.             V5              V6+V2
  202.             A6              B12
  203.             V4              V3<A7
  204.             A7              B13
  205.             A3              A7+A1
  206.             A7              B11
  207.             A5              A7+A1
  208.             A4              A6+A1
  209.             A7              A2+A1
  210.             A0              A2+A1
  211.             A2              128
  212.             B13             A0
  213.             V1              V0+V4
  214.             A0              B11
  215.             ,A0,1           V1
  216.             V6              V5+V7
  217.             A0              A6
  218.             ,A0,1           V6
  219.             A0              B13
  220.             A1              A2
  221.             A2              A7
  222.             JAN             L7
  223. L8          =               P.*
  224. L5          =               P.*
  225.             S1              0
  226.             A0              B02
  227.             A2              B02
  228.             A1              13
  229.             B66             A0
  230.             B77,A1          0,A0
  231.             A0              A2+A1
  232.             A1              1
  233.             T00,A1          0,A0
  234.             J               B00
  235.             EXT             $STKOFEN:p
  236.             ENTRY           GMPN_MULWW
  237.             END