Function definition: Difference between revisions
→{{header|langur}}
Langurmonkey (talk | contribs) |
|||
(11 intermediate revisions by 7 users not shown) | |||
Line 419:
end</syntaxhighlight>
A function in AppleScript is called a "handler". It can take one of three different forms, depending on what the scripter finds most convenient. Calls to it must match the form used in the handler definition
Handler names followed by zero or more parameters within parentheses are called "positional" -- the number and order of the parameters in the caller must match those in the handler definition.
<syntaxhighlight lang="applescript">on multiply(a, b)
Line 427 ⟶ 429:
multiply(2, 3)</syntaxhighlight>
AppleScript also offers handlers with "
These prepositions can be used: <code>about, above, against, apart from, around, aside from, at, below, beneath, beside, between, by, for, from, instead of, into, on, onto, out of, over, since, thru, through, and under</code>. Also, <code>of</code> is available, but if used it must be the first parameter.
Example:
<syntaxhighlight lang="applescript">on multiplication of a by b
Line 656 ⟶ 662:
=={{header|BASIC}}==
==={{header|ANSI BASIC}}===
In ANSI BASIC, functions can be defined as either formulas or multi-line external or internal subroutines. External functions are independent program units that can be called from within the program. Internal functions are considered part of the program unit they are contained in and can only be called from within that unit. External functions do not share any information with other program units and exchange information through parameters and returned values. Internal functions share everything with their surrounding program unit except for their parameters. Internal functions do not have local variables.
{{works with|Decimal BASIC}}
<syntaxhighlight lang="basic">
100 DEF Multiply(A,
120 DECLARE EXTERNAL FUNCTION MultiplyE
130 PRINT Multiply(3, 1.23456)
140 PRINT MultiplyI(3, 1.23456)
150 PRINT MultiplyE(3, 1.23456)
160 FUNCTION MultiplyI(X, Y)
170 LET MultiplyI = X * Y
180 END FUNCTION
190 END
200 EXTERNAL FUNCTION MultiplyE(A, B)
210 LET MultiplyE = A * B
220 END FUNCTION
</syntaxhighlight>
{{out}}
<pre>
3.70368
3.70368
3.70368
</pre>
==={{header|Applesoft BASIC}}===
Line 764 ⟶ 788:
<syntaxhighlight lang="freebasic">#Define multiply(d1, d2) (d1) * (d2)</syntaxhighlight>
==={{header|FutureBasic}}===
<syntaxhighlight lang="futurebasic">window 1
local fn multiply( a as long, b as long ) as long
end fn = a * b
print fn multiply( 3, 9 )
HandleEvents</syntaxhighlight>
Output:
<pre>
27
</pre>
==={{header|Gambas}}===
Line 952 ⟶ 990:
{{out}}
<pre> 3.703680038452148</pre>
==={{header|QuickBASIC}}===
{{works with|QBasic}}
<syntaxhighlight lang="qbasic">DECLARE FUNCTION multiply% (a AS INTEGER, b AS INTEGER)
FUNCTION multiply% (a AS INTEGER, b AS INTEGER)
multiply = a * b
END FUNCTION</syntaxhighlight>
==={{header|REALbasic}}===
Line 1,041 ⟶ 1,087:
return a * b
end sub</syntaxhighlight>
==={{header|Xojo}}===
<syntaxhighlight lang="vbnet">Function Multiply(ByVal a As Integer, ByVal b As Integer) As Integer
Return a * b
End Function</syntaxhighlight>
Call the function
<syntaxhighlight lang="vbnet">Dim I As Integer = Multiply(7, 6)</syntaxhighlight>
==={{header|ZX Spectrum Basic}}===
Line 1,096 ⟶ 1,149:
print multiply(3, 2)</syntaxhighlight>
=={{header|Binary Lambda Calculus}}==
In lambda calculus, multiplication on Church numerals is <code>mul = \m \n \f. m (n f)</code> which in BLC is
<pre>00 00 00 01 1110 01 110 10</pre>
If mul is used several times within an expression E, then they can share the same definition by using <code>(\mul. E)(\m\n\f. m (n f))</code>. For example, the cube function is <code>\n. (\mul. mul n (mul n n)) (\m\n\f. m (n f))</code> which in BLC is
<pre>00 01 00 01 01 10 110 01 01 10 110 110 0000000111100111010</pre>
=={{header|BQN}}==
Line 1,811 ⟶ 1,874:
let multiply (x: i32, y: i32) : i32 = x * y
</syntaxhighlight>
=={{header|GAP}}==
Line 2,134 ⟶ 2,183:
=={{header|langur}}==
Langur functions are first-order. They are pure in terms of setting values and in terms of I/O (unless declared impure).
A return statement may be used, but a function's last value is its implicit return value.
=== parameters ===
Parameters are defined within parentheses after the fn token. To specify no parameters, use an empty set of parentheses.
<syntaxhighlight lang="langur">val .multiply = fn(.x, .y) { .x * .y }
.multiply(3, 4)</syntaxhighlight>
=== operator implied functions ===
Operator implied functions are built using an infix operator between curly braces on an
<syntaxhighlight lang="langur">val .multiply = fn{*}
.multiply(3, 4)</syntaxhighlight>
=== nil left partially implied functions ===
These are built with an infix operator and
<syntaxhighlight lang="langur">val .times3 = fn{* 3}
map .times3, [1, 2, 3]</syntaxhighlight>
=== impure functions (I/O) ===
Impure functions must be declared as such.
<syntaxhighlight>val .writeit = impure fn(.x) { writeln .x }</syntaxhighlight>
Impure functions cannot be passed to pure functions.
=={{header|Lasso}}==
Line 3,491 ⟶ 3,535:
The following 'multiply' function will work for any type(s) that support the '*' operator.
However, it will produce a runtime error otherwise, as demonstrated by the final example.
<syntaxhighlight lang="
System.print(multiply.call(3, 7))
Line 3,593 ⟶ 3,637:
<syntaxhighlight lang="scheme">(define multiply
(lambda (x y) (* x y)))</syntaxhighlight>
=={{header|XPL0}}==
Line 3,674 ⟶ 3,711:
pop bc
ret</syntaxhighlight>
=={{header|zig}}==
<syntaxhighlight lang="zig">fun multiply(x: i64, y: i64) i64 {
return x * y;
}
//example call
const x: i64 = 4;
const y: i64 = 23;
_ = multipy(x, y); // --> 93</syntaxhighlight>
=={{header|zkl}}==
|