6.16 Strictness
parameter
(array-strictness strictness) → void? strictness : Boolean
See Nonstrict Arrays for a discussion on nonstrict arrays.
procedure
(array-strict? arr) → Boolean
arr : (Array A)
> (define arr (parameterize ([array-strictness #f]) (array+ (array 10) (array #[0 1 2 3])))) > (array-strict? arr) - : Boolean
#f
> (array-strict! arr) > (array-strict? arr) - : Boolean
#t
procedure
(array-strict! arr) → Void
arr : (Array A)
If arr is already strict, (array-strict! arr) does nothing.
syntax
(array-strict arr)
arr : (Array A)
This is a macro so that Typed Racket will preserve arr’s type exactly. If it were a function, (array-strict arr) would always have the type (Array A), even if arr were a subtype of (Array A), such as (Mutable-Array A).
procedure
(array-default-strict! arr) → Void
arr : (Array A)
syntax
(array-default-strict arr)
arr : (Array A)
Apply one of these to return values from library functions to ensure that users get strict arrays by default. See Nonstrict Arrays for details.
procedure
(build-simple-array ds proc) → (Array A)
ds : In-Indexes proc : (Indexes -> A)
Use build-simple-array to create arrays that represent simple functions of their indexes. For example, basic array constructors such as make-array are defined in terms of this or its unsafe counterpart.
Be careful with this function. While it creates arrays that are always memory-efficient, it is easy to ruin your program’s performance by using it to define arrays for which element lookup is permanently expensive. In the wrong circumstances, using it instead of build-array can turn a linear algorithm into an exponential one!
Computing an element is never more expensive than computing a row-major index followed by applying vector-ref. An example is index-array, which only computes row-major indexes.
Computing an element is independent of any other array’s elements. In this circumstance, it is impossible to compose some unbounded number of possibly expensive array procedures.
You can prove that each element will be computed at most once, throughout the entire life of your program. This is true, for example, when the result is sent only to a function that makes a copy of it, such as array-lazy or array->mutable-array.
procedure
(array-lazy arr) → (Array A)
arr : (Array A)
> (define: fibs : (Array Natural) (array-lazy (build-simple-array #(10) (λ: ([js : Indexes]) (define j (vector-ref js 0)) (cond [(j . < . 2) j] [else (+ (array-ref fibs (vector (- j 1))) (array-ref fibs (vector (- j 2))))]))))) > fibs
- : #(struct:Array
(Indexes
Index
(Boxof Boolean)
(-> Void)
(-> Indexes Nonnegative-Integer))
#<syntax:build/user/8.5/pkgs/math-lib/math/private/array/typed-array-struct.rkt:56:13 prop:equal+hash>
#<syntax:build/user/8.5/pkgs/math-lib/math/private/array/typed-array-struct.rkt:55:13 prop:custom-write>
#<syntax:build/user/8.5/pkgs/math-lib/math/private/array/typed-array-struct.rkt:54:13 prop:custom-print-quotable>)
(array #[0 1 1 2 3 5 8 13 21 34])
Printing a lazy array computes and caches all of its elements, as does applying array-strict! or array-strict to it.
Except for arrays returned by build-simple-array, it is useless to apply array-lazy to a strict array. Using the lazy copy instead of the original only degrades performance.
> (: array-maybe-lazy (All (A) ((Array A) -> (Array A))))
> (define (array-maybe-lazy arr) (if (array-strict? arr) arr (array-lazy arr))) > (define arr (mutable-array #[0 1 2 3])) > (define brr (array-maybe-lazy arr)) > (array-set! arr #(0) -1000) > brr
- : #(struct:Array
(Indexes Index (Boxof Boolean) (-> Void) (-> Indexes Integer))
#<syntax:build/user/8.5/pkgs/math-lib/math/private/array/typed-array-struct.rkt:56:13 prop:equal+hash>
#<syntax:build/user/8.5/pkgs/math-lib/math/private/array/typed-array-struct.rkt:55:13 prop:custom-write>
#<syntax:build/user/8.5/pkgs/math-lib/math/private/array/typed-array-struct.rkt:54:13 prop:custom-print-quotable>)
(array #[-1000 1 2 3])