Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
15
Task/Arrays/ACL2/arrays.acl2
Normal file
15
Task/Arrays/ACL2/arrays.acl2
Normal file
|
|
@ -0,0 +1,15 @@
|
|||
;; Create an array and store it in array-example
|
||||
(assign array-example
|
||||
(compress1 'array-example
|
||||
(list '(:header :dimensions (10)
|
||||
:maximum-length 11))))
|
||||
|
||||
;; Set a[5] to 22
|
||||
(assign array-example
|
||||
(aset1 'array-example
|
||||
(@ array-example)
|
||||
5
|
||||
22))
|
||||
|
||||
;; Get a[5]
|
||||
(aref1 'array-example (@ array-example) 5)
|
||||
Loading…
Add table
Add a link
Reference in a new issue