home *** CD-ROM | disk | FTP | other *** search
/ Programmer's ROM - The Computer Language Library / programmersrom.iso / ada / news / asr003.doc < prev    next >
Encoding:
Text File  |  1988-05-03  |  31.7 KB  |  661 lines

  1.                      ASR Newsletter, Issue 3, June 1986
  2.  
  3.  
  4.  Ada (tm) Software Repository (ASR) Newsletter     Issue 3, June 1986
  5.  Richard Conn, Newsletter Editor                   Published by Echelon, Inc.
  6.  
  7.                                    THIS ISSUE
  8.                                                                     Page
  9.    I. THE ADA SOFTWARE REPOSITORY                                     1
  10.       A. Who is Using the ASR?
  11.       B. The Magnitude of the ASR
  12.   II. GENERAL INFORMATION                                             4
  13.       A. Some Feedback on the Usage of the Army's ALS
  14.       B. Standardization at AFIT
  15.       C. Acquiring DDN Users Guides
  16.  III. NEWS ITEMS CONCERNING THE ADA SOFTWARE REPOSITORY               7
  17.       A. Capacity Data
  18.       B. Third Snapshot of the ASR
  19.       C. Hardcopy Documentation from Echelon
  20.       D. Talks on the ASR
  21.       E. Access to the ASR from Europe
  22.       F. Air Force Ada Course and the ASR
  23.   IV. NEW SUBMISSIONS IN MAY                                          8
  24.    V. HIGHLIGHTS OF SELECTED SUBMISSIONS                              8
  25.  
  26.  ==============================================================================
  27.    I. THE ADA SOFTWARE REPOSITORY
  28.       A.  WHO  IS USING THE ASR?   It is virtually impossible to determine  the 
  29.  full extent of the ASR user community,  but the ADA-SW electronic mailing list 
  30.  provides a starting point.  There are now over 260 subscription entries in the 
  31.  ADA-SW email list.  Some entries are for individuals ... other entries are for 
  32.  electronic bulletin boards and subordinate electronic mailing lists.  With the 
  33.  redistribution  that is taking place within this community,  the  distribution 
  34.  through  the  tape copy service,  and the activities of other interest  groups 
  35.  such  as Ada Europe,  the Defense Data Network (DDN)-based community  probably 
  36.  represents the tip of the iceburg.
  37.       I have a policy of not allowing people to see the ADA-SW email list file.  
  38.  I feel that such disclosure could result in a violation of the privacy of  the 
  39.  subscribers  and,  for  those who know how to access the  Network  Information 
  40.  Center  of  the  DDN,  this  information could be used  for  commercial  gain.  
  41.  However,  I  do not object to simply naming the organizations listed  in  this 
  42.  file.   This  report  lists many of the organizations that have at  least  one 
  43.  subscriber  named in the ADA-SW email list.   This report is not comprehensive 
  44.  (I  did  not  recognize several acronyms),  and it  covers  the  entire  list, 
  45.  including those subscribers on the DDN, BITNET, USENET, and CSNET.
  46.       The  following  listing is divided into three  categories:  (1)  military 
  47.  organizations, research labs, and other government agencies, (2) corporations, 
  48.  and   (3)  educational  institutions.    An  asterisk  (*)  indicates  that  a 
  49.  subscription  entry  is  to  an  electronic  bulletin  board  or   subordinate 
  50.  electronic mailing list.
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.                                     Page 1
  62.  
  63.  
  64.  
  65.  
  66.  
  67.                      ASR Newsletter, Issue 3, June 1986
  68.  
  69.  
  70.       MILITARY ORGANIZATIONS, RESEARCH LABS, and OTHER GOVERNMENT AGENCIES
  71.            Aberdeen Proving Ground
  72.            Ada Joint Program Office and AJPO-Sponsored Individuals (> 20)
  73.            Air Force Systems Command
  74.            Argonne National Lab
  75.            Army Armament Research Development and Engineering Center
  76.            Army Research and Development Center
  77.            Army Research Institute
  78.            Ballistic Research Lab (US Army)
  79.            David Taylor Naval Ship Research and Development Center
  80.            Defense Communications Agency
  81.            Eglin Air Force Base,         Gunter Air Force Base
  82.            Lawrence Livermore Labs
  83.           *NASA Ames Research Center
  84.            NASA Jet Propulstion Lab
  85.            National Bureau of Standards
  86.            Naval Air Development Center
  87.            Naval Electronics Systems Command
  88.            Naval Oceans Systems Center
  89.            Naval Personnel Research and Development Center
  90.            Naval Underwater Systems Center
  91.            Naval Weapons Center
  92.            Rome Air Development Center
  93.            SANDIA National Labs
  94.            Software Engineering Institute
  95.           *Stanford Research Institute
  96.            White Sands Missile Range
  97.            Wright-Patterson Air Force Base
  98.  
  99.                   CORPORATIONS                EDUCATIONAL INSTITUTIONS
  100.         Aerospace Corporation, The         Air Force Institute of Technology
  101.         ALCOA                              California Institute of Technology
  102.         American Telephone and Telegraph   Carnegie-Mellon University
  103.         Computer Thought                   Cornell,   Dartmouth,  Georgia Tech
  104.         Digital Equipment Corporation     *Massachusetts Institute of
  105.         Ford Aerospace                        Technology
  106.         General Electric                   New York University
  107.         Hewlett-Packard                    Pennsylvania State University
  108.        *Honeywell                          Princeton University
  109.         International Business Machines    Rutgers, The State University
  110.         MITRE                              Southern Methodist University
  111.         Softech                            Stanford University
  112.        *Sperry                             United States Naval Academy
  113.        *Tartan Labs                        Univ of California, Berkeley
  114.         Tektronix                          Univ of California, Irvine
  115.        *Telesoft                           Univ of California, San Diego
  116.        *Texas Instruments                 *Univ of Connecticut
  117.         Tolerant Computers                *Univ of Delaware
  118.         TRW                                Univ of Houston, Clear Lake
  119.         Verdix                             Univ of Maryland
  120.         XEROX                             *Univ of Massachusetts
  121.                                           *Univ of Southern California
  122.                                            Univ of Texas
  123.                                            Univ of Wisconsin
  124.  
  125.  
  126.  
  127.                                     Page 2
  128.  
  129.  
  130.  
  131.  
  132.  
  133.                      ASR Newsletter, Issue 3, June 1986
  134.  
  135.  
  136.       B.  THE  MAGNITUDE  OF  THE  ASR.   This information  is  extracted  from 
  137.  SNAP03.DOC,  the latest SNAPSHOT taken of the ASR on 5 June 86 (see article in 
  138.  section III).
  139.  
  140.            -----------------------------------------------------------
  141.            |        The Size of the Ada Software Repository          |
  142.            |    25,560,502 bytes of source code (over 97% in Ada)    |
  143.            |    10,491,622 bytes of documentation                    |
  144.            |    ==========                                           |
  145.            |    36,052,124 bytes                                     |
  146.            -----------------------------------------------------------
  147.        Subdirectory            Size of Code        Size of Documentation
  148.            Name                   (bytes)                (bytes)
  149.       --------------           ------------        ---------------------
  150.       ADA-SQL                   1,117,750                  248,404
  151.       AI                          250,984                  320,107
  152.       ANSI-LRM                          0                1,201,050
  153.       BENCHMARKS                  302,163                   56,750
  154.       CAIS                      1,719,047                   10,742
  155.       CAIS-TOOLS                  152,675                    7,140
  156.       COMPILATION-ORDER           359,990                   86,428
  157.       COMPONENTS                2,014,771                  134,956
  158.       CROSS-REFERENCE              23,786                    4,457
  159.       DBMS                         81,285                    5,314
  160.       DDN                       1,959,099                  135,474
  161.       DEBUGGER                    889,057                  512,159
  162.       EDITORS                   1,615,008                  219,584
  163.       EDUCATION                         0                  259,690
  164.       EXTERNAL-TOOLS (no Ada)      92,404                   47,265
  165.       FORMGEN                     318,402                  152,458
  166.       GENERAL                           0                  328,182
  167.       GKS                       1,991,575                  273,777
  168.       MANAGEMENT-TOOLS          1,347,705                  643,121
  169.       MATH                        953,284                1,559,212
  170.       MENU                        453,562                  297,293
  171.       MESSAGE-HANDLING            977,501                  222,916
  172.       METRICS                   1,390,255                  289,293
  173.       NEWS                              0                   64,206
  174.       NOSC-TOOLS                        0                      156
  175.       ONLINE-DOC                   63,360                  171,021
  176.       PAGER                        98,377                   28,338
  177.       PDL                       1,382,728                  898,199
  178.       POINTERS                          0                  143,250
  179.       PRETTY-PRINTERS           1,037,841                   99,222
  180.       SIMULATION                  337,803                  170,261
  181.       SPELLER                     893,957                  466,092
  182.       STARTER-KIT                       0                      522
  183.       STUBBER                      81,309                    5,754
  184.       STYLE                     2,021,624                  212,703
  185.       TOOLS                     1,320,403                  395,771
  186.       VIRTERM                     312,797                  642,761
  187.       WIS-ADA-TOOLS                     0                  177,594
  188.                                ==========               ==========
  189.       Totals =>                25,560,502               10,491,622
  190.  
  191.  
  192.  
  193.                                     Page 3
  194.  
  195.  
  196.  
  197.  
  198.  
  199.                      ASR Newsletter, Issue 3, June 1986
  200.  
  201.  
  202.  ==============================================================================
  203.   II. GENERAL INFORMATION
  204.       A.  SOME FEEDBACK ON THE USAGE OF THE ARMY'S ALS.  On May 29, 1986, Jerry 
  205.  Brookshire  (JBROOKSHIRE@USC-ISIF.ARPA) posted the following message to  INFO-
  206.  ADA.  I feel this message is of general interest.  Jerry's message (with minor 
  207.  editing):
  208.  
  209.  "I  recently  sent an enquiry to this list about status/experience/use of  the 
  210.  Army Ada Language System (ALS), and promised to summarize the results, if any.  
  211.  Well,  the results are fairly sparse, but may themselves prompt more response, 
  212.  so here they are:
  213.  
  214.  "1. Reply-To: "CALLAND" <calland@nosc-tecr>
  215.         "I believe the Army is in the process of winding down the ALS  program.  
  216.  I  have  been told the Army cancelled it about 6 wks ago,  then changed  their 
  217.  minds,  and now is investigating the costs of contract cancellation and having 
  218.  a tiger team study the situation simultaneously.
  219.         "The  Navy is basing its Ada development on the ALS - this  program  is 
  220.  called  ALS/N.   The project engineer is Bill Wilder of the Naval Sea  Systems 
  221.  Command,  PMS 408.   I believe his net address is WILDER@NUSC-NPT.   His phone 
  222.  number is 202 692 8204. The target computers are the AN/AYK-14, AN/UYK-43, and 
  223.  AN/UYK-44.
  224.  
  225.  "2. From: larry@Jpl-VLSI.ARPA
  226.       "I  attended  the  most recent ALS users group.   The  general  consensus 
  227.  seemed to be that the current version 2.something is a major improvement  over 
  228.  version 1.0, but that a fair amount of work still needs to be done before it's 
  229.  really  production  quality.   One of the problems is the runtime module  that 
  230.  lets  you execute outside the ALS environment,  an important consideration  if 
  231.  you  want  to  distribute SW to non-ALS  systems.   Another  is  the  enormous 
  232.  resources  used by the ALS.   You pretty much have to have a VAX dedicated  to 
  233.  the ALS.
  234.       "As  for targets,  the only one they officially support is to bare  Intel 
  235.  8086/8, using (as I recall--don't have documentation here) the Intel MDS as an 
  236.  intermediary.
  237.       "Who's using it?   Not very many people,  apparently.  I'm providing help 
  238.  to two DoD prjects, one USAF and one Army.  Both have the ALS, but have bought 
  239.  the DEC Ada compiler and are using it for their real work.  When they complete 
  240.  the  baseline systems,  they will then convert it to the ALS and deliver that. 
  241.  I've talked to people who are doing something similar using the Verdix system.
  242.       "Eventually the ALS will be a very nice system.  They're closer to having 
  243.  a full Stoneman CAIS than the commercial people, but they also need to develop 
  244.  more optimized compiler and run-time system.   They also need to develop hooks 
  245.  to off-the-shelf SW such as DBMSs, graphics packages, and the like.
  246.  
  247.  "3. From: prindle@NADC
  248.       "The  ALS is currently being used as the baseline for the Navy  ALS/N,  a 
  249.  substantial retargeting effort intended to support Ada applications running on 
  250.  one  of the three Navy standard computer  architectures,  the  AN/UYK-44,  the 
  251.  AN/UYK-43,  and the AN/AYK-14.   In addition to straightforward retargeting of 
  252.  the  compiler,  both  the  Programming Support Environment  and  the  Run-Time 
  253.  Environment  are  being customized to specific Navy tactical embedded  systems 
  254.  requirements;  nonetheless,  the ALS compiler front end  (Machine-Independent) 
  255.  section and the MAPSE are to be used with only minor modifications.  The major 
  256.  modifications  are  in the compiler back-end (code  generator),  the  run-time 
  257.  
  258.  
  259.                                     Page 4
  260.  
  261.  
  262.  
  263.  
  264.  
  265.                      ASR Newsletter, Issue 3, June 1986
  266.  
  267.  
  268.  support, and the addition of tools and capabilities not currently supported by 
  269.  ALS.  The ALS/N, in turn, will become the Navy's principal High-Order-Language 
  270.  for development of tactical embedded applications, thereby replacing CMS-2.
  271.  
  272.  "4. From: Rob Spray <rob%ct.csnet@CSNET-RELAY.ARPA>
  273.       "There  was  an  article  on the ALS in the May 1986  issue  of  The  DEC 
  274.  Professional  written  by Dennis Turner who is "chief of  Software  Technology 
  275.  Development  Division  within the Center for Tactical Computer  Systems,  Fort 
  276.  Monmouth".
  277.       "On p122 he states:   "The ALS is currently hosted on the VAX-11/780 with 
  278.  the VMS operating system.  The version of the compiler that is targeted to the 
  279.  host  was validated by the Ada Joint Program Office (AJPO) in  December  1984. 
  280.  Continuing  development activities will produce targets for the Intel  iAPX286 
  281.  and  a "bare" (no resident operating system) VAX.  Plans are also underway  to 
  282.  retarget the ALS to the Motorola 68000 family."
  283.       "A  footnote  states:   "Request for copies of the Ada  Language  System, 
  284.  documentation  or  any of the Ada or ALS training material developed at  CECOM 
  285.  should be directed to:
  286.                 Commander, U.S. Army CECOM
  287.                 ATTN: AMSEL-TCS-ADA
  288.                 Fort Monmouth, NJ 07703-5204"
  289.       "Couple of rumors:
  290.          "1) Heard at a SIGAda conference that any Govt contractor could  get 
  291.  an free evaluation copy of the ALS
  292.          "2) A local site reports that the ALS performance is getting better."
  293.  
  294.       B.  STANDARDIZATION  AT  AFIT.   In  my recent visit  to  the  Air  Force 
  295.  Institute  of Technology (AFIT),  it was quite interesting to note the variety 
  296.  of  outstanding computer resources available and the degree to which AFIT  has 
  297.  standardized on software.   Hardware resources include several VAXen, an ELXSI 
  298.  (a 64-bit ECL processor),  DUAL workstations, SUN workstations, and many other 
  299.  systems  (with  two HYPERCUBEs and several more SUNs about  to  be  acquired).  
  300.  Many  of  these  systems are interconnected via a local area  network  and  an 
  301.  interface  to  the  Defense  Data Network is  available.   Areas  of  software 
  302.  standardization  include:   (1)  TCP/IP  and  UUCP  as  common  communications 
  303.  protocols,  (2) 4.2 BSD UNIX as the common operating system,  (3) EMACS as the 
  304.  common editor,  and (4) Ada (which is taught to incoming graduate students  in 
  305.  lieu of other languages) as the common computer language.
  306.  
  307.       C. ACQUIRING DDN USERS GUIDES.  Five guides for users of the Defense Data 
  308.  Network  are  available from the DDN Network Information Center (NIC) and  the 
  309.  Defense Technical Information Center (DTIC).   Details on the content of these 
  310.  guides and how to acquire these guides (extracted from the NIC) are presented. 
  311.  These guides are:  (1) the DDN New User Guide,  (2) the TAC Users' Guide,  (3) 
  312.  the DDN Directory,  (4) the Defense Data Network Brochure, and (5) Logical and 
  313.  Geographic Maps of ARPANET and MILNET.
  314.            1.  DDN  NEW USER GUIDE.   This is a "how-to" guide to the  DDN  for 
  315.  network  users,  including use of network tools,  such as electronic mail  and 
  316.  file transfer.
  317.                      DDN NIC, SRI International, Menlo Park, CA
  318.                      NIC 50001, December 1985
  319.                      Price: $10.00 domestic, $13.00 foreign.
  320.                      DTIC:  [AD-A166 368]
  321.            2.  TAC USERS' GUIDE.   This is a guide to using the Terminal Access 
  322.  Controller (TAC), including TAC commands and features.
  323.  
  324.  
  325.                                     Page 5
  326.  
  327.  
  328.  
  329.  
  330.  
  331.                      ASR Newsletter, Issue 3, June 1986
  332.  
  333.  
  334.                      Bolt Beranek and Newman Inc., Report No. 4780,
  335.                           October 1982
  336.                      Price: $10.00 domestic, $13.00 foreign.
  337.                      DTIC:  [AD-A147 366]
  338.            3. DDN DIRECTORY.  This is a directory of users and hosts on the DDN 
  339.  including the name,  network mailbox, US mail address and telephone number for 
  340.  each registered network user.
  341.                      DDN NIC, SRI International, Menlo Park, CA
  342.                      NIC 50000, June 1984.
  343.                      Price: $10.00 domestic, $13.00 foreign.
  344.                      DTIC:  [AD-A148 213]
  345.            4.  DEFENSE DATA NETWORK BROCHURE.   This is an overview of the DDN, 
  346.  focusing  on its origin,  technology,  performance,  interface and  subscriber 
  347.  costs.
  348.                      Defense Communications Agency
  349.                      Price: No charge
  350.            5.  LOGICAL  and GEOGRAPHIC MAPS of MILNET and ARPANET.   These  are 
  351.  maps of MILNET and ARPANET geographic locations and logical connections.
  352.                      Price: No charge.
  353.  
  354.                            -- ORDERING INFORMATION --
  355.  
  356.  To  Order:  DCA CIRCULARS/DTIC.   Military personnel may obtain many of  these 
  357.  documents  as  DCA Circulars or from the Defense Technical Information  Center 
  358.  (DTIC).   Refer to the document descriptions for DTIC numbers.  DTIC's address 
  359.  and telephone number is:
  360.                      Defense Technical Information Center
  361.                      Cameron Station
  362.                      Alexandria, VA  22314
  363.                      (202) 274-7633
  364.  To  Order:  NIC.   Send a check,  money order or purchase order for the  total 
  365.  amount of the order in US dollars,  made payable to SRI  International.   Cash 
  366.  payments  or charge cards are not accepted.   For all orders,  please  include 
  367.  your full name, US mailing address with zip code, telephone number and network 
  368.  mailbox (if available) and send to:
  369.                      DDN Network Information Center
  370.                      SRI International, Room EJ291
  371.                      333 Ravenswood Avenue
  372.                      Menlo Park, CA  94025
  373.                      (800) 235-3155 or (415) 859-3695
  374.  Send online requests for an order form to NIC@SRI-NIC.ARPA, or call the NIC at 
  375.  one of the above telephone numbers.
  376.  
  377.                            -- SHIPPING INFORMATION --
  378.  
  379.  DOMESTIC:   Our prices include postage.   We ship via 4th class mail.   Please 
  380.  allow 4-6 weeks for delivery.
  381.  
  382.  OVERSEAS:  Overseas orders are shipped via "surface printed matter".
  383.  
  384.  SPECIAL:   Orders  will  be  shipped via Federal Express  or  UPS  by  special 
  385.  arrangement  only.   If you want your order to be shipped via either of  these 
  386.  methods, please request a document order form from the NIC.
  387.  
  388.  
  389.  
  390.  
  391.                                     Page 6
  392.  
  393.  
  394.  
  395.  
  396.  
  397.                      ASR Newsletter, Issue 3, June 1986
  398.  
  399.  
  400.  ==============================================================================
  401.  III. NEWS ITEMS CONCERNING THE ADA SOFTWARE REPOSITORY
  402.       A.  CAPACITY DATA.   The Ada Software Repository resides on the  SIMTEL20 
  403.  host  computer at White Sands Missile Range on a space-available  basis.   The 
  404.  disk  on  which  the  ASR resides is funded by the  Logistics  System  Support 
  405.  Activity (LSSA),  an organization within the Army Materiel Command.   See  ASR 
  406.  Newsletter  1  for  further details.   It is of interest to  track  the  total 
  407.  utilization  of  the LSSA-funded disk (PD:) on which the  ASR  resides.   This 
  408.  disk,  which holds the ASR and eight other software repositories, is currently 
  409.  at 74% utilization.
  410.       B.  THE THIRD SNAPSHOT OF THE ASR.  SNAP03.DOC, the third snapshot of the 
  411.  ASR,  is  now in the GENERAL subdirectory (PD:<ADA.GENERAL>).   This  snapshot 
  412.  contains  the information in the "Magnitude of the ASR" article in this  issue 
  413.  of  the  ASR  Newsletter  as  well as descriptions of  the  contents  of  each 
  414.  subdirectory.  These snapshots provide an interesting history of the growth of 
  415.  the ASR.
  416.                                  Source Code      Documentation
  417.            Snapshot    Date        (bytes)            (bytes)
  418.            --------  ---------   -----------      -------------
  419.           ASR Formed 25 Nov 84            0                 0
  420.            SNAP01    19 Sep 85   12,834,956         4,931,284
  421.            SNAP02    10 Feb 86   19,542,458         6,366,629
  422.            SNAP03     5 Jun 86   25,560,502        10,491,622
  423.  
  424.       C.  HARDCOPY DOCUMENTATION FROM ECHELON.   The Master Index to the ASR is 
  425.  now  being  prepared and should be available from Echelon in July  or  August.  
  426.  This is a minor slip from the original plan,  which called for availability of 
  427.  this  document  by  1 July 86.   There will be a  cost  associated  with  this 
  428.  document; contact Echelon in July for details.
  429.       D.  TALKS  ON  THE ASR.   In light of the success and popularity  of  the 
  430.  previous  presentations  on  the  ASR,  more talks on the ASR  are  now  being 
  431.  scheduled.   Details  will  be  announced  in  this  newsletter  as  they  are 
  432.  finalized.   The presentation lasts for about 1 hour and is packed with useful 
  433.  information  on  the  ASR  and the DDN.   Information  tailored  to  the  host 
  434.  organization and additional consultation with people at the host  organization 
  435.  (as time permits) is included.  There is no charge for this presentation other 
  436.  than (possibly) travel expenses.
  437.            The  last  series  of talks was made at Wright-Patterson  Air  Force 
  438.  Base.   It  included a presentation at the Air Force Institute  of  Technology 
  439.  (AFIT)  and  consultations at AFIT,  the Jovial/Ada Language Control  Facility 
  440.  (JALCF), and the Air Force Wright Aeronautical Labs (AFWAL).
  441.       E. ACCESS TO THE ASR FROM EUROPE.  The ASR is now available online at the 
  442.  Stockholm Computing Center (QZ) in Sweden.  Tapes are being shipped to members 
  443.  of the Ada Europe organization.  Points of contact:
  444.                 Mats Ohlin (Mats_Ohlin_FOA2%QZCOM.MAILNET@MIT-MULTICS.ARPA)
  445.                 or Else-Karin Boestad-Nilsson
  446.                 Ada in Sweden Secreteriat
  447.                 c/o Swedish National Defense Research Institute
  448.                 Box 27 322
  449.                 S-102 54 Stockholm, Sweden
  450.            Else-Karin Boestad-Nilsson is secretary in AiS as well as editor for 
  451.  the Ada Europe Newsletter.
  452.       F.  AIR  FORCE  ADA  COURSE  AND THE ASR.   The Air  Force  Institute  of 
  453.  Technology (AFIT) has developed a short course on Ada which includes a section 
  454.  on the Ada Software Repository.  This course will soon be open to personnel at 
  455.  
  456.  
  457.                                     Page 7
  458.  
  459.  
  460.  
  461.  
  462.  
  463.                      ASR Newsletter, Issue 3, June 1986
  464.  
  465.  
  466.  Wright-Patterson Air Force Base,  and AFIT plans to make this course available 
  467.  Air Force wide.  Contact:
  468.                 Lt Col Harold Carter, PhD
  469.                 AFIT/ENG, Bldg 640
  470.                 Wright-Patterson Air Force Base, OH  45433
  471.                 513/255-6913
  472.                 hcarter@AFIT-AB     -- electronic mail is preferred
  473.  
  474.  ==============================================================================
  475.   IV. NEW SUBMISSIONS IN MAY
  476.       May 86 was a slow month for the ASR,  and it included a two-week  absense 
  477.  on  my  part  due  to  travel.   This  in no way  indicates  a  slack  in  the 
  478.  submissions.  I am aware of many new submissions now being prepared;  at least 
  479.  five of them will be reported in the next ASR newsletter.
  480.  
  481.  ------------------------------------------------------------------------------
  482.  1. PROGERRS
  483.  Files and Sizes (in Bytes):
  484.     PD:<ADA.EDUCATION>
  485.   PROGERRS.DOC     75861   
  486.  
  487.       John  Goodenough of the Wang Institute has submitted a  new  PROGERRS.DOC 
  488.  file, outlining common Ada programming errors.
  489.  
  490.  
  491.  ==============================================================================
  492.    V. HIGHLIGHTS OF SELECTED SUBMISSIONS
  493.       The  Math Library in the Ada Software Repository contains implementations 
  494.  in Ada of a variety of useful math routines.  The following Ada code fragments 
  495.  are parts of the package specifications of four submissions in  PD:<ADA.MATH>: 
  496.  (1) BIT.ADA (Bit Manipulation Routines),  (2) GSET.ADA (Generic Set Routines), 
  497.  (3) MATRIX.ADA (Matrix Manipulation Routines), and (4) MLIBDEC.ADA (Trig, Log, 
  498.  Exponential,  etc,  Routines).   The  package  bodies implement the  indicated 
  499.  functions in Ada.
  500.  
  501.       1. From BIT.ADA --
  502.  
  503.      function BIT_EXTRACT (ITEM, START_AT, NBITS : INTEGER) return INTEGER;
  504.  --      Return the bit field extracted from ITEM, as a signed integer;
  505.  
  506.      function UBIT_EXTRACT (ITEM, START_AT, NBITS : INTEGER) return INTEGER;
  507.  --      return the bit field extracted from ITEM, unsigned integer;
  508.  
  509.      function BIT_INSERT (THIS_ITEM, NBITS, INTO_ITEM, START_AT : INTEGER)
  510.                            return INTEGER;
  511.  --      insert NBITS from THIS_ITEM into the object INTO_ITEM,
  512.  --      with the rightmost bit identified by START_AT.
  513.  
  514.      function BIT_REMOVE (ITEM, START_AT, NBITS : INTEGER) return INTEGER;
  515.  --      BIT_REMOVE will zero out NBITS of ITEM at position START_AT
  516.  
  517.      function SHIFT_LEFT (ITEM, NBITS : INTEGER) return INTEGER;
  518.  --      return ITEM shifted left by NBITS
  519.  
  520.      function SHIFT_RIGHT (ITEM, NBITS : INTEGER) return INTEGER;
  521.  
  522.  
  523.                                     Page 8
  524.  
  525.  
  526.  
  527.  
  528.  
  529.                      ASR Newsletter, Issue 3, June 1986
  530.  
  531.  
  532.  --      return ITEM shifted right by NBITS
  533.      function BIT_AND (WORD1, WORD2 : INTEGER) return INTEGER;
  534.  --      return the AND of the two objects
  535.  
  536.      function BIT_OR (WORD1, WORD2 : INTEGER) return INTEGER;
  537.  --      return the OR of the two objects
  538.  
  539.      function BIT_MASK (NBITS : INTEGER) return INTEGER;
  540.  --      return an object with NBITS of one bits, right justified
  541.  
  542.       2. From GSET.ADA --
  543.  
  544.    FUNCTION "*"  (Set_1 : Set; Set_2 : Set) RETURN Set;
  545.    FUNCTION "+"  (Element : Universe; Set_1 : Set) RETURN Set;
  546.    FUNCTION "+"  (Set_1 : Set; Set_2 : Set) RETURN Set;
  547.    FUNCTION "+"  (Set_1 : Set; Element : Universe) RETURN Set;
  548.    FUNCTION "-"  (Set_1 : Set; Set_2 : Set) RETURN Set;
  549.    FUNCTION "-"  (Set_1 : Set; Element : Universe) RETURN Set;
  550.    FUNCTION "<"  (Set_1 : Set; Set_2 : Set) RETURN Boolean;
  551.    FUNCTION "<=" (Set_1 : Set; Set_2 : Set) RETURN Boolean;
  552.  
  553.    FUNCTION Is_A_Member (Element : Universe; Of_Set : Set) RETURN Boolean;
  554.    FUNCTION Is_Empty    (Set_1 : Set) RETURN Boolean;
  555.  
  556.    SUBTYPE Number IS Integer
  557.                        RANGE 0 .. (Universe'Pos (Universe'Last) -
  558.                                    Universe'Pos (Universe'First) + 1);
  559.  
  560.    FUNCTION Number_In (Set_1 : Set) RETURN Number;
  561.  
  562.       3. From MATRIX.ADA --
  563.  
  564.       type VECTOR is array(INTEGER range<>) of FLOAT ;
  565.       type MATRIX is array(INTEGER range<>,INTEGER range <>) of FLOAT;
  566.       INCOMPARABLE_DIMENSION :exception; -- the dimension of matrices
  567.                                -- or vectors to be operated are 
  568.                                -- incomparable
  569.       SINGULAR : exception;    -- matrix to be inverted is singular
  570.       function TRANSPOSE(A : MATRIX) return MATRIX ; -- transpose of matrix
  571.       function TRANSPOSE(A : VECTOR) return VECTOR ; -- transpose of vector
  572.       function "+" (A : VECTOR; B : VECTOR) return VECTOR ; -- sum of vector
  573.       function "+" (A : MATRIX; B : MATRIX) return MATRIX ; -- sum of matrix
  574.       function "-" (A : VECTOR; B : VECTOR) return VECTOR ; 
  575.                                -- difference of vector
  576.       function "-" (A : MATRIX; B : MATRIX) return MATRIX ; 
  577.                                -- difference of matrix
  578.       function "*" (A : FLOAT;  B : VECTOR) return VECTOR ; 
  579.                                -- scalar, vector multiplication
  580.       function "*" (A : VECTOR; B : FLOAT)  return VECTOR ; 
  581.                                -- vector, scalar multiplication
  582.       function "*" (A : VECTOR; B : VECTOR) return FLOAT ;  
  583.                                -- inner(dot) product of two vectors
  584.       function "*" (A : MATRIX; B : VECTOR) return VECTOR ; 
  585.                                -- matrix,column vector multiplication
  586.  
  587.  
  588.  
  589.                                     Page 9
  590.  
  591.  
  592.  
  593.  
  594.  
  595.                      ASR Newsletter, Issue 3, June 1986
  596.  
  597.  
  598.       function "*" (A : VECTOR; B : MATRIX) return VECTOR ; 
  599.                                -- row vector,matrix multiplication
  600.       function "*" (A : FLOAT;  B : MATRIX) return MATRIX ; 
  601.                                -- scalar, matrix multiplication
  602.       function "*" (A : MATRIX; B : FLOAT)  return MATRIX ; 
  603.                                -- matrix, scalar multiplication
  604.       function "*" (A : MATRIX; B : MATRIX) return MATRIX ; 
  605.                                -- matrix, matrix multiplication
  606.       function "**"(A : MATRIX; P : INTEGER) return MATRIX; 
  607.                                -- square matrix raised to integer 
  608.                                -- power
  609.  
  610.       4. From MLIBDEC.ADA --
  611.  
  612.     function SQRT(X : FLOAT) return FLOAT;
  613.     function CBRT(X : FLOAT) return FLOAT;
  614.     function LOG(X : FLOAT) return FLOAT;
  615.     function LOG10(X : FLOAT) return FLOAT;
  616.     function EXP(X : FLOAT) return FLOAT;
  617.     function "**"(X, Y : FLOAT) return FLOAT;
  618.  
  619.     function SIN(X : FLOAT) return FLOAT;
  620.     function COS(X : FLOAT) return FLOAT;
  621.     function TAN(X : FLOAT) return FLOAT;
  622.     function COT(X : FLOAT) return FLOAT;
  623.  
  624.     function ASIN(X : FLOAT) return FLOAT;
  625.     function ACOS(X : FLOAT) return FLOAT;
  626.     function ATAN(X : FLOAT) return FLOAT;
  627.     function ATAN2(V, U : FLOAT) return FLOAT;
  628.  
  629.     function SINH(X : FLOAT) return FLOAT;
  630.     function COSH(X : FLOAT) return FLOAT;
  631.     function TANH(X : FLOAT) return FLOAT;
  632.  
  633.  ==============================================================================
  634.  Ada is a registered trademark, U.S. Government - Ada Joint Program Office. The 
  635.  following are trademarks of Digital Equipment Corporation:  DEC, DECSYSTEM-20, 
  636.  ULTRIX,  VAX,  VMS.   UNIX  is  a trademark of AT&T  Bell  Laboratories.   The 
  637.  following are trademarks of Data General Corporation:  AOS, ROLM.  Verdix is a 
  638.  trademark of Verdix Corporation.
  639.  
  640.  The Ada Software Repository Newsletter is Copyright 1986  Echelon,  Inc.   All 
  641.  Rights Reserved.  Permission to reprint, wholly or partially, is automatically 
  642.  granted if source credit is given to Echelon.
  643.                                                                   Echelon, Inc.
  644.                                                         885 N. San Antonio Road
  645.                                                         Los Altos, CA 94022 USA
  646.                                                         Telephone: 415/948-3820
  647.  
  648.  
  649.  
  650.  
  651.  
  652.  
  653.  
  654.  
  655.                                     Page 10
  656.  
  657.  
  658.  
  659.  
  660.  
  661.