123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106 |
- define printarray(a[], len) {
- auto i
- for (i = 0; i < len; ++i) {
- a[i]
- }
- }
- define a2(a[], len) {
- auto i
- for (i = 0; i < len; ++i) {
- a[i] = a[i] * a[i]
- }
- printarray(a[], len)
- }
- define a4(a__[], len) {
- auto i
- for (i = 0; i < len; ++i) {
- a__[i] = a__[i] * a__[i]
- }
- printarray(a__[], len)
- }
- define a6(*a__[], len) {
- auto i
- for (i = 0; i < len; ++i) {
- a__[i] = a__[i] * a__[i]
- }
- printarray(a__[], len)
- }
- define a1(*a[], len) {
- auto i
- for (i = 0; i < len; ++i) {
- a[i] = i
- }
- a2(a[], len)
- printarray(a[], len)
- }
- define a3(*a__[], len) {
- auto i
- for (i = 0; i < len; ++i) {
- a__[i] = i
- }
- a4(a__[], len)
- printarray(a__[], len)
- }
- define a5(*a__[], len) {
- auto i
- for (i = 0; i < len; ++i) {
- a__[i] = i
- }
- a2(a__[], len)
- printarray(a__[], len)
- }
- define a7(*a__[], len) {
- auto i
- for (i = 0; i < len; ++i) {
- a__[i] = i
- }
- a6(a__[], len)
- printarray(a__[], len)
- }
- len = 16
- a1(a[], len)
- printarray(a[], len)
- a3(a[], len)
- printarray(a[], len)
- a5(a[], len)
- printarray(a[], len)
- a7(a[], len)
- printarray(a[], len)
- halt
|