Set of real numbers: Difference between revisions

Content added Content deleted
m (→‎{{header|REXX}}: used alternating quoted literals.)
Line 359: Line 359:


=={{header|Elena}}==
=={{header|Elena}}==
ELENA 3.3 :
ELENA 3.4 :
<lang elena>import extensions.
<lang elena>import extensions.
Line 365: Line 365:
{
{
union : func
union : func
= (:val)( self eval:val || func eval:val ).
= (:val)( self(val) || func(val) ).
intersection : func
intersection : func
= (:val)( self eval:val && func eval:val ).
= (:val)( self(val) && func(val) ).
difference : func
difference : func
= (:val)( self eval:val && func eval:val; not ).
= (:val)( self(val) && (func(val)) inverted ).
}
}
program =
public program
[
[
// union
// union
Line 393: Line 393:
var set3 := (:x)( (x >= 0.0r) && (x < 3.0r) ) difference(:x) ( (x >= 0.0r) && (x <= 1.0r) ).
var set3 := (:x)( (x >= 0.0r) && (x < 3.0r) ) difference(:x) ( (x >= 0.0r) && (x <= 1.0r) ).
set3 (0.0r) assertFalse.
set3(0.0r) assertFalse.
set3 (1.0r) assertFalse.
set3(1.0r) assertFalse.
set3 (2.0r) assertTrue.
set3(2.0r) assertTrue.
].</lang>
]</lang>


=={{header|Go}}==
=={{header|Go}}==