O2C + OQL
o2query ( <> , <> [, < d'expressions>])
o2 Station nouvelle_station;
o2 set(Station) les_stations;
o2query ( les_stations ,
"select s from s in Les_stations where s-> = $1",
nouvelle_station->);
if (count (les_stations))
display ("Il existe deja une station avec ce nom");