14 lines
193 B
Text
14 lines
193 B
Text
import extensions.
|
|
|
|
func1 extension op
|
|
{
|
|
compose(BaseFunction1 f)
|
|
= (:x)(self(f(x))).
|
|
}
|
|
|
|
program =
|
|
[
|
|
var fg := (:x)(x + 1) compose(:x)(x * x).
|
|
|
|
console printLine(fg(3)).
|
|
].
|