H ? « »

Language peer sets for DAP Fortran:
United Kingdom
United Kingdom/1975
Designed 1975
1970s languages
Fourth generation
High Cold War
Genus Non Standard FIV
Numerical Scientific
Non Standard FIV
Generation of Fortran IV
Fortran family
Non Standard FIV/1975
Generation of Fortran IV/1975
Fortran family/1975
Non Standard FIV/United Kingdom
Generation of Fortran IV/United Kingdom
Fortran family/United Kingdom
Numerical Scientific
Numerical Scientific/1975
Numerical Scientific/uk

DAP Fortran(ID:753/dap006)

Parallel fortran 

alternate simple view
Country: United Kingdom
Designed 1975
Genus: Non Standard FIV
Sammet category: Numerical Scientific


Fortran-Plus FOR ICL 2900

Structures:
Related languages
FORTRAN-PLUS enhanced DAP Fortran   Implementation
DAP Fortran APAL   Target language for

References:
  • [ICL] (1975) [ICL] DAP: FORTRAN Language Manual, International Computers Limited Technical Publication 6918 ICL, Putney, London
  • Flanders, P.M. (1977) Flanders, P.M. et al, Efficient High Speed Computing with the Distributed Array Processor, pp.113-127 (1977).
  • Parkinson, Dennis (1982) Parkinson, Dennis "Using the ICL DAP" Computer Physics Communications 26(3-4) June 1982 pp227-232 Abstract
  • Parkinson, D. (1983) Parkinson, D. "The Distributed Array Processor (DAP)"Computer Physics Communications 28(4) February 1983, pp325-336 Abstract
    Resources
    • Slides on DAP Fortran at UCS Indiana

      Constrained arrays in DAP FORTRAN



      • First one or two extents could be omitted:



              DIMENSION A(), BB(,)


              INTEGER II(,)

              REAL AA(,3), BBB(,,5)

      • A is a vector.



      • BB and II are matrices.



      • AA an array of vectors.  BBB an array of matrices.



      • Extents of constrained dimensions 64 again (vectors of 4096 also possible).




    • Slides on DAP Fortran at UCS Indiana

      Array assignments in DAP Fortran



      • Leave subscripts empty for array expression.  + or ? subscript used for nearest neighbour access:



              U(,) = 0.25 * (U(,-) + U(,+) + U(-,) + U(+,))


      • Masked assignment by using logical matrix as subscript:



              LOGICAL L(,)


              ...

              L(,) = BB(,) .LT. 0

              B(L) = -B(,)


    Search in: Google  Google scholar  World Cat  Yahoo  Overture  DBLP  Monash bib  NZ  IEEE  ACM portal  CiteSeer  CSB  ncstrl  jstor  Bookfinder