Vector: Difference between revisions

Content added Content deleted

Inline

@@ Line 708: / Line 708: @@
 =={{header|EasyLang}}==
 <syntaxhighlight>
-proc vadd a[] b[] . r[] .
+func[] vadd a[] b[] .
-   r[] = [ ]
    for i to len a[]
       r[] &= a[i] + b[i]
    .
+   return r[]
 .
-proc vsub a[] b[] . r[] .
+func[] vsub a[] b[] .
-   r[] = [ ]
    for i to len a[]
       r[] &= a[i] - b[i]
    .
+   return r[]
 .
-proc vmul a[] b . r[] .
+func[] vmul a[] b .
-   r[] = [ ]
    for i to len a[]
       r[] &= a[i] * b
    .
+   return r[]
 .
-proc vdiv a[] b . r[] .
+func[] vdiv a[] b .
-   r[] = [ ]
    for i to len a[]
       r[] &= a[i] / b
    .
+   return r[]
 .
-vadd [ 5 7 ] [ 2 3 ] r[]
+print vadd [ 5 7 ] [ 2 3 ]
-print r[]
+print vsub [ 5 7 ] [ 2 3 ]
-vsub [ 5 7 ] [ 2 3 ] r[]
+print vmul [ 5 7 ] 11
-print r[]
+print vdiv [ 5 7 ] 2
-vmul [ 5 7 ] 11 r[]
-print r[]
-vdiv [ 5 7 ] 2 r[]
-print r[]
 </syntaxhighlight>