mail@sub-rec.ch
exploration par robot (ou "ROV" Remote Operated Vehicle)
lac Léman leman
Le Léman, avec ses 310m de profondeur, n’est certes pas le lac Baïkal, qui lui est le plus profond du monde avec 1637 mètres. Mais si ce dernier contient 20% des réserves d’eau douce mondiales, le Léman, lui, est la plus grande réserve d’eau douce d’Europe.
Le 2è apport (actuellemment 8) de "Sub-rec" à "eLemo"
a été de fournir la position de l'épave du Rhône (coulé ensuite de collision en 1883.)
Découverte faite par Sub-rec et son robot LEM01 en 1983.
Cela afin que les sous-marins "Mir" : 
19.06.11 puissent visiter l'épave lors de la plongée inaugurale du 14 juin et par la suite,
soit 15 fois 2 sous-marins à 2 places = 6o personnes qui ont eu cet honneur, ce plaisir (sans compter les pilotes).
Ils vont aussi explorer les canyons des lits désaffectés du Rhône. Ils font des prélèvements, des mesures, des observations dans la baie de Vidy, devant l'exutoire de la Step. Ainsi que dans la plaine centrale.
epave épave de vapeur voilier avion bateau moteur épaves epaves
Rhône - Cygne - Hirondelle - Aigle II / Simplon - Nemo
wagons de chemin de fer, wagon
...des Compagnies de la Ligne d'Italie, Ligne du Simplon, Ligne du Tonkin.
s
limnologie: etude du poisson, de la sédimentation
patrimoine lacustre lemanique
et ferroviaire
.
Copyright Sub-rec © 1998-2011
PAILLEX Gilbert
CH Lausanne
compteur : 200'000 +
<%
' Compteur ASP de hits
' Création de l'objet
Set FSO=CreateObject("Scripting.FileSystemObject")
Set FSO=Server.CreateObject("Scripting.FileSystemObject")
fichier=Server.MapPath("/data") & "\compteur.txt"
fichier=Server.MapPath("/_private/cgi-bin") & "\hitcounter.txt"
fichier=Server.MapPath("\_private") & "\cgi-bin" & "\hitcounter.txt"
fichier=Server.MapPath("\_private\cgi-bin") & "\hitcounter.txt"
fichier=Server.MapPath("/_private") & "\compteur.txt"
' Lecture du fichier s'il existe et incrémente
cpt = 1
if FSO.FileExists(fichier) then
set inF = FSO.OpenTextFile(fichier,1,false)
cpt = cLng(inF.readLine) + 1 ' jusqu'à 2 milliards
inF.close
end if
' Sauvegarde du compteur
set inF = FSO.createTextFile(fichier)
inF.writeLine(cpt)
inF.close
cpt = 111
%>
Visite n° <%=cpt%>
+