Scripts divers et variés (exemple + code Polar et Lisp)

Chateau
Messages : 20
Inscription : Jeu Oct 06, 2011 10:10 am

Scripts divers et variés (exemple + code Polar et Lisp)

Message par Chateau » Sam Déc 24, 2011 4:26 pm

Francis: quelles sont les conséquences de Fukushima ?

Marlowe : Il y a plusieurs façons de répondre à cette entrée par les conséquences ... On peut regarder les formes que
prennent la mention de conséquences concernant Fukushima : conséquences de l ' accident de Fukushima, conséquences de
Fukushima, conséquences de la catastrophe de Fukushima, conséquences de Tchernobyl puis de Fukushima, conséquences du
panache radioactif de Fukushima, conséquences du drame de Fukushima, conséquences des évènements de Fukushima,
conséquences dramatiques de la catastrophe nucléaire de Fukushima, conséquences sanitaires de l ' accident de Fukushima,
conséquences de l ' accident nucléaire de Fukushima, impact de Fukushima, ... ; ou les auteurs-acteurs qui engagent le plus
fortement les conséquences associées à Fukushima : Novethic, Leclerc, Actu-Environnement, Huet, Global Chance, OPECST, Réseau
Sortir du nucléaire, notre-planete.info, Cabanel, ... ; ou ce qui revient presque au même mais pas tout à fait, entrer par les textes les
plus typiques :

Nous voulons que la sécurité nucléaire sorte de la souveraineté nationale " ( Novethic 7/ 4/2011 )
Michèle Rivasi : « aucune protection n'est prise pour les habitants du Japon » ( Novethic 24/ 6/2011 )
DES PROMESSES N’ENGAGEANT QUE CEUX À QUI ELLES SONT FAITES ( Leclerc 7/ 7/2011 )
Après Fukushima, la gouvernance nucléaire en crise ( Actu-Environnement 24/ 5/2011 )
Fukushima : de l'azote dans le réacteur n°1 ( Huet 7/ 4/2011 )

Enfin, bien évidemment , on peut examiner des énoncés :

conséquences de l ' accident de Fukushima :
Comment percevez-vous les conséquences de l ' accident de Fukushima sur les députés européens ? Michèle Rivasi .
Auteur :Novethic Date :07/04/2011 Titre :Nous voulons que la sécurité nucléaire sorte de la souveraineté nationale "

conséquences de Fukushima :
Alors que l ' AIEA vient de rendre son rapport final dans lequel elle estime que le Japon a bien géré la crise , la députée européenne
EELV affirme au contraire que les populations sont laissées dans l ' ignorance la plus complète du danger .Et s'inquiète de voir que
les conséquences de Fukushima n ' ébranlent pas plus les autorités françaises , qui semblent prêtes à prolonger la vie de la
centrale de Fessenheim .
Auteur :Novethic Date :24/06/2011 Titre :Michèle Rivasi : « aucune protection n'est prise pour les habitants du Japon »

conséquences de la catastrophe de Fukushima :
Le Physicien Chris Busby expert en nucléaire , affirme que les conséquences de la catastrophe de Fukushima ont été largement
sous-évaluées , en terme de santé : il estime que dans les 50 prochaines années , il y aura 200000 cas de cancer de plus au Japon ,
et que les retombées de l ' accident dépasseront largement celles de Tchernobyl .
Auteur :Cabanel Date :26/07/2011 Titre :On a retrouvé le corium de Fukushima

conséquences de Tchernobyl puis de Fukushima :
Selon le site IndependantWHO , qui milite en faveur de l ' indépendance de l ' OMS , l ' accord OMS-AIEA explique pourquoi l ' OMS a
minimisé les conséquences de Tchernobyl puis de Fukushima .
Auteur :Actu-Environnement Date :24/05/2011 Titre :Après Fukushima, la gouvernance nucléaire en crise

conséquences du panache radioactif de Fukushima :
Les conséquences du panache radioactif de Fukushima .
Auteur :Huet Date :07/04/2011 Titre :Fukushima : de l'azote dans le réacteur n°1

conséquences du drame de Fukushima :
Il y manque surtout l ' analyse des conséquences du drame de Fukushima dont les répercussions environnementales ,
économiques et sociales sont encore loin d'être imaginées et comprises aujourd'hui .
Auteur :Global Chance Date :30/04/2011 Titre :Nucléaire : le déclin de l'empire français

conséquences des évènements de Fukushima :
Il va de soi que nos travaux seront coordonnés avec , d'une part , la mission d ' expertise confiée à l ' ASN , dont le cahier des
charges devrait être connu début mai , et les premiers résultats en fin d'année , et , d'autre part , avec les travaux du groupe , créé
au sein de l ' Académie des sciences , pour tirer les conséquences des évènements de Fukushima , lequel remettra ses conclusions
au mois de juillet prochain .
Auteur :OPECST Date :30/06/2011 Titre : Rapport d'étape de la mission parlementaire sur la sécurité nucléaire , la place de la filière
et son avenir

conséquences dramatiques de la catastrophe nucléaire de Fukushima :
Le Réseau "Sortir du nucléaire" dénonce le cynisme dont fait preuve AREVA au moment même où la population japonaise souffre
des conséquences dramatiques de la catastrophe nucléaire de Fukushima .
Auteur :Réseau Sortir du nucléaire Date :01/04/2011 Titre :Fukushima : un document interne d'AREVA démontre tout le cynisme de l
industriel

conséquences sanitaires de l ' accident de Fukushima :
En France , quel est l ' état du risque sismique ? Comment se comporteraient les centrales ? Si les conséquences sanitaires de l '
accident de Fukushima génèrent pour l'instant peu d ' inquiétudes pour la population française , l ' accident survenu dans cette
centrale nucléaire japonaise à la suite d ' un très violent séisme a déjà des conséquences politiques en France .
Auteur :TF1 Date :13/03/2011 Titre :Séisme : les centrales françaises résisteraient-elles ?

conséquences de l ' accident nucléaire de Fukushima :
Com http://www.brest.maville
com/actu/actudet_-NUCLeAIRE-Fukushima-l-equivalent-d-une-region-francaise-devenue-radioactive_47217-2058215_actu.Htm À
Hitachinaka , à une centaine de km de la centrale , le taux de radiation est de 40000 becquerels/m² , près d ' un million de fois
supérieur à la radioactivité naturelle locale , avant la catastrophe [ 2]. Après l ' accident de Tchernobyl , les zones où les niveaux de
radioactivité dépassaient 37000 becquerels/m² étaient considérées comme " contaminées " , rappelle le journal Asahi , principal
quotidien du Japon Les conséquences de l ' accident nucléaire de Fukushima sur la population commencent à montrer leur étendue .

Auteur :Maville.com Date :10/12/2011 Titre :NUCLÉAIRE Fukushima : l’équivalent d’une région française devenue radioactive


%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
Le code du script qui utilise une classe de formule avec $sfrm
%%%%%%%%%%%%%%%%%%%%

[DIALFOR]
CSQ-DE-X M X
REP_CSQ-DE-X M X
les conséquences /!M /VAR=VarDeDuDesDeLa /!X /ENTITE ?
les conséquences /VAR=VarDeDuDesDeLa /T=1 /ENTITE /!M /VAR=VarDeDuDesDeLa /!X /ENTITE ?
[REPEVAL]
REP_CSQ-DE-X M X
$M=M $X=X
(reset ' ($XF))
(setq $XF $X)
(setq $VALENT (eval (getsem $XF) '.val))
(setq $NBTXTENT (eval (getsem $XF) '.nbtxt))
F_CODE
::(eq $sfrm.Conséquences.X=$XF.forme1 nil):: $sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt
$sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt <br><br> $sfrm.Conséquences.X=$XF.forme1 :<br> $sfrm.Conséquences.X=$XF.forme1.phadt
$sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt <br><br> $sfrm.Conséquences.X=$XF.forme1 :<br> $sfrm.Conséquences.X=$XF.forme1.phadt <br><br> $sfrm.Conséquences.X=$XF.forme2 :<br> $sfrm.Conséquences.X=$XF.forme2.phadt
$sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt <br><br> $sfrm.Conséquences.X=$XF.forme1 :<br> $sfrm.Conséquences.X=$XF.forme1.phadt <br><br> $sfrm.Conséquences.X=$XF.forme2 :<br> $sfrm.Conséquences.X=$XF.forme2.phadt <br><br> $sfrm.Conséquences.X=$XF.forme3 :<br> $sfrm.Conséquences.X=$XF.forme3.phadt
La liste des conséquences $M $XF est sans doute impossible à fixer !<br><br> $sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt0 <br> $sfrm.Conséquences.X=$XF.forme0.phadt[-1] <br>
Le raisonnement par les conséquences est en effet dominant dans nos /VAR=VarCorpus2 ...<br><br> $sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt0 <br> $sfrm.Conséquences.X=$XF.forme0.phadt1 <br> $sfrm.Conséquences.X=$XF.forme0.phadt2 <br> $sfrm.Conséquences.X=$XF.forme0.phadt3 <br>
Soyons pragmatiques en effet, raisonnons par les conséquences ! Voici de quoi nourrir le raisonnement ...<br><br> $sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt0 <br> $sfrm.Conséquences.X=$XF.forme0.phadt1 <br> $sfrm.Conséquences.X=$XF.forme0.phadt2 <br> $sfrm.Conséquences.X=$XF.forme0.phadt3 <br> >br> $sfrm.Conséquences.X=$XF.forme1 :<br> $sfrm.Conséquences.X=$XF.forme1.phadt0 <br> $sfrm.Conséquences.X=$XF.forme1.phadt1 <br> $sfrm.Conséquences.X=$XF.forme1.phadt2 <br> $sfrm.Conséquences.X=$XF.forme1.phadt3 <br>
::(neq $sfrm.Conséquences.X=$XF.forme3 nil):: $sfrm.Conséquences.X=$XF.forme[0:9] ...ça argumente pas mal par les conséquences dans ce /VAR=VarCorpus $nom_corpus :<br><br> $sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt <br> <br> $sfrm.Conséquences.X=$XF.forme1 :<br> $sfrm.Conséquences.X=$XF.forme1.phadt <br><br> $sfrm.Conséquences.X=$XF.forme2 :<br> $sfrm.Conséquences.X=$XF.forme2.phadt <br><br> $sfrm.Conséquences.X=$XF.forme3 :<br> $sfrm.Conséquences.X=$XF.forme3.phadt
::(neq $sfrm.Conséquences.X=$XF.forme5 nil):: $sfrm.Conséquences.X=$XF.forme[0:14] ... L'argumentation par les conséquences, ou "conséquentialisme", est largement activée dans ce /VAR=VarCorpus $nom_corpus :<br><br> $sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt <br> <br> $sfrm.Conséquences.X=$XF.forme1 :<br> $sfrm.Conséquences.X=$XF.forme1.phadt <br><br> $sfrm.Conséquences.X=$XF.forme2 :<br> $sfrm.Conséquences.X=$XF.forme2.phadt <br><br> $sfrm.Conséquences.X=$XF.forme3 :<br> $sfrm.Conséquences.X=$XF.forme3.phadt <br><br> $sfrm.Conséquences.X=$XF.forme4 :<br> $sfrm.Conséquences.X=$XF.forme4.phadt <br><br> $sfrm.Conséquences.X=$XF.forme5 :<br> $sfrm.Conséquences.X=$XF.forme5.phadt
Comme dirait l'autre : " $vd.bonsmots.+conséquences " <br><br> Si j'en viens à notre /VAR=VarCorpus $nom_corpus , les conséquences associées à $XF sont nombreuses et font l'objet d'intenses /VAR=VarControverses ... /VAR=VarUnPeuDeVerbatim : <br><br> $sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt <br> <br> $sfrm.Conséquences.X=$XF.forme1 :<br> $sfrm.Conséquences.X=$XF.forme1.phadt <br><br> $sfrm.Conséquences.X=$XF.forme2 :<br> $sfrm.Conséquences.X=$XF.forme2.phadt <br><br> $sfrm.Conséquences.X=$XF.forme3 :<br> $sfrm.Conséquences.X=$XF.forme3.phadt <br><br> $sfrm.Conséquences.X=$XF.forme4 :<br> $sfrm.Conséquences.X=$XF.forme4.phadt <br><br> $sfrm.Conséquences.X=$XF.forme5 :<br> $sfrm.Conséquences.X=$XF.forme5.phadt <br><br> $sfrm.Conséquences.X=$XF.forme6 :<br> $sfrm.Conséquences.X=$XF.forme6.phadt <br><br> $sfrm.Conséquences.X=$XF.forme7 :<br> $sfrm.Conséquences.X=$XF.forme7.phadt
Bon, /VAR=VarCommeDHabitude , je ne réponds pas vraiment et je fonce sur des exemples ... Dans le /VAR=VarCorpus $nom_corpus , les conséquences associées à $XF sont nombreuses et font l'objet d'intenses /VAR=VarControverses ... /VAR=VarUnPeuDeVerbatim : <br><br> $sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt <br> <br> $sfrm.Conséquences.X=$XF.forme1 :<br> $sfrm.Conséquences.X=$XF.forme1.phadt <br><br> $sfrm.Conséquences.X=$XF.forme2 :<br> $sfrm.Conséquences.X=$XF.forme2.phadt <br><br> $sfrm.Conséquences.X=$XF.forme3 :<br> $sfrm.Conséquences.X=$XF.forme3.phadt <br><br> $sfrm.Conséquences.X=$XF.forme4 :<br> $sfrm.Conséquences.X=$XF.forme4.phadt <br><br> $sfrm.Conséquences.X=$XF.forme5 :<br> $sfrm.Conséquences.X=$XF.forme5.phadt <br><br> $sfrm.Conséquences.X=$XF.forme6 :<br> $sfrm.Conséquences.X=$XF.forme6.phadt <br><br> $sfrm.Conséquences.X=$XF.forme7 :<br> $sfrm.Conséquences.X=$XF.forme7.phadt <br><br> $sfrm.Conséquences.X=$XF.forme8 :<br> $sfrm.Conséquences.X=$XF.forme8.phadt <br><br> <br><br> $sfrm.Conséquences.X=$XF.forme9 :<br> $sfrm.Conséquences.X=$XF.forme9.phadt
Si je regarde les auteurs-acteurs de ce /VAR=VarCorpus qui semblent raisonner ou argumenter le plus en termes de "conséquences" à propos de $XF , je note : $sfrm.Conséquences.X=$XF.aut[0:6] ... /VAR=VarUnPeuDeVerbatim :
<br><br> $sfrm.Conséquences.X=$XF.aut0 :<br> $sfrm.Conséquences.X=$XF.aut0.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.aut1 :<br> $sfrm.Conséquences.X=$XF.aut1.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.aut2 :<br> $sfrm.Conséquences.X=$XF.aut2.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.aut3 :<br> $sfrm.Conséquences.X=$XF.aut3.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.aut4 :<br> $sfrm.Conséquences.X=$XF.aut4.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.aut5 :<br> $sfrm.Conséquences.X=$XF.aut5.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.aut6 :<br> $sfrm.Conséquences.X=$XF.aut6.phadt[-1]
::(eq $sfrm.Conséquences.X=$XF.aut5 nil):: Voyons ... les /VAR=VarRetombées de " $XF " ... Les auteurs-acteurs que cela concerne le plus dans ce /VAR=VarCorpus $nom_corpus sont $sfrm.Conséquences.X=$XF.aut[0:4] :<br><br> $sfrm.Conséquences.X=$XF.aut0 :<br> $sfrm.Conséquences.X=$XF.aut0.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.aut1 :<br> $sfrm.Conséquences.X=$XF.aut1.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.aut2 :<br> $sfrm.Conséquences.X=$XF.aut2.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.aut3 :<br> $sfrm.Conséquences.X=$XF.aut3.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.aut4 :<br> $sfrm.Conséquences.X=$XF.aut4.phadt[-1]
Il y a plusieurs façons de répondre à cette entrée par les conséquences ... On peut regarder les formes que prennent la mention de conséquences concernant $XF : $sfrm.Conséquences.X=$XF.forme[0:14] ... ; ou les auteurs-acteurs qui engagent le plus fortement les conséquences associées à $XF : $sfrm.Conséquences.X=$XF.aut[0:9] ... ; ou ce qui revient presque au même mais pas tout à fait, entrer par les textes les plus typiques :<br><br> $sfrm.Conséquences.X=$XF.txt0.titre_txt ( $sfrm.Conséquences.X=$XF.txt0.auteur_txt $sfrm.Conséquences.X=$XF.txt0.date_txt )<br> $sfrm.Conséquences.X=$XF.txt1.titre_txt ( $sfrm.Conséquences.X=$XF.txt1.auteur_txt $sfrm.Conséquences.X=$XF.txt1.date_txt )<br> $sfrm.Conséquences.X=$XF.txt2.titre_txt ( $sfrm.Conséquences.X=$XF.txt2.auteur_txt $sfrm.Conséquences.X=$XF.txt2.date_txt )<br> $sfrm.Conséquences.X=$XF.txt3.titre_txt ( $sfrm.Conséquences.X=$XF.txt3.auteur_txt $sfrm.Conséquences.X=$XF.txt3.date_txt )<br> $sfrm.Conséquences.X=$XF.txt4.titre_txt ( $sfrm.Conséquences.X=$XF.txt4.auteur_txt $sfrm.Conséquences.X=$XF.txt4.date_txt )<br><br> Enfin, /VAR=VarNaturellementSoft , on peut examiner des énoncés :<br><br> $sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt <br> <br> $sfrm.Conséquences.X=$XF.forme1 :<br> $sfrm.Conséquences.X=$XF.forme1.phadt <br><br> $sfrm.Conséquences.X=$XF.forme2 :<br> $sfrm.Conséquences.X=$XF.forme2.phadt <br><br> $sfrm.Conséquences.X=$XF.forme3 :<br> $sfrm.Conséquences.X=$XF.forme3.phadt <br><br> $sfrm.Conséquences.X=$XF.forme4 :<br> $sfrm.Conséquences.X=$XF.forme4.phadt <br><br> $sfrm.Conséquences.X=$XF.forme5 :<br> $sfrm.Conséquences.X=$XF.forme5.phadt <br><br> $sfrm.Conséquences.X=$XF.forme6 :<br> $sfrm.Conséquences.X=$XF.forme6.phadt <br><br> $sfrm.Conséquences.X=$XF.forme7 :<br> $sfrm.Conséquences.X=$XF.forme7.phadt <br><br> $sfrm.Conséquences.X=$XF.forme8 :<br> $sfrm.Conséquences.X=$XF.forme8.phadt <br><br> <br><br> $sfrm.Conséquences.X=$XF.forme9 :<br> $sfrm.Conséquences.X=$XF.forme9.phadt
::(and (> $VALENT 50) (> $NBTXTENT 3) ):: La liste des conséquences est toujours difficile à fixer /VAR=VarPatron , surtout si l'on considère $XF qui a un poids certain dans ce /VAR=VarCorpus $nom_corpus ... Les auteurs-acteurs qui engagent le plus fortement les conséquences associées à $XF sont assez attendus puisqu'il s'agit de $sfrm.Conséquences.X=$XF.aut[0:9] ...<br> J'approfondis ce micro-rapport sur les conséquences en indiquant les textes les plus typiques :<br><br> $sfrm.Conséquences.X=$XF.txt0.titre_txt ( $sfrm.Conséquences.X=$XF.txt0.auteur_txt $sfrm.Conséquences.X=$XF.txt0.date_txt )<br> $sfrm.Conséquences.X=$XF.txt1.titre_txt ( $sfrm.Conséquences.X=$XF.txt1.auteur_txt $sfrm.Conséquences.X=$XF.txt1.date_txt )<br> $sfrm.Conséquences.X=$XF.txt2.titre_txt ( $sfrm.Conséquences.X=$XF.txt2.auteur_txt $sfrm.Conséquences.X=$XF.txt2.date_txt )<br> $sfrm.Conséquences.X=$XF.txt3.titre_txt ( $sfrm.Conséquences.X=$XF.txt3.auteur_txt $sfrm.Conséquences.X=$XF.txt3.date_txt )<br> $sfrm.Conséquences.X=$XF.txt4.titre_txt ( $sfrm.Conséquences.X=$XF.txt4.auteur_txt $sfrm.Conséquences.X=$XF.txt4.date_txt )<br><br> Enfin, /VAR=VarNaturellementSoft , voici des énoncés :<br><br> <br><br> $sfrm.Conséquences.X=$XF.forme0 :<br> $sfrm.Conséquences.X=$XF.forme0.phadt[-1] <br> <br> $sfrm.Conséquences.X=$XF.forme1 :<br> $sfrm.Conséquences.X=$XF.forme1.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.forme2 :<br> $sfrm.Conséquences.X=$XF.forme2.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.forme3 :<br> $sfrm.Conséquences.X=$XF.forme3.phadt[-1] <br><br> $sfrm.Conséquences.X=$XF.forme4 :<br> $sfrm.Conséquences.X=$XF.forme4.phadt[-1] <br><br>

Qui est en ligne ?

Utilisateurs parcourant ce forum : Aucun utilisateur inscrit et 2 invités