profcollege (27apr24)

git-svn-id: svn://tug.org/texlive/trunk@71100 c570f23f-e606-0410-a88d-b1316a301751

7 files changed, 82 insertions, 15 deletions

diff --git a/Master/texmf-dist/doc/latex/profcollege/ProfCollege-doc.pdf b/Master/texmf-dist/doc/latex/profcollege/ProfCollege-doc.pdf
index 206f5547a10..d71cc56e940 100644
--- a/Master/texmf-dist/doc/latex/profcollege/ProfCollege-doc.pdf
+++ b/Master/texmf-dist/doc/latex/profcollege/ProfCollege-doc.pdf
diff --git a/Master/texmf-dist/tex/latex/profcollege/PfCAssemblagesSolides.tex b/Master/texmf-dist/tex/latex/profcollege/PfCAssemblagesSolides.tex
index 9ac580e6443..5521dbb4193 100644
--- a/Master/texmf-dist/tex/latex/profcollege/PfCAssemblagesSolides.tex
+++ b/Master/texmf-dist/tex/latex/profcollege/PfCAssemblagesSolides.tex
@@ -435,8 +435,6 @@
       boolean Trace;
       Trace=\useKV[Assemblage]{Trace};
       
-      Initialisation(1500,22,20,50);
-
       nb:=36;
       subh:=1;
       incolor:=white;
@@ -455,6 +453,10 @@
       AffichageObjetCylindreSansBase1;
       AffichageObjetCalotte2;
       AffichageObjetCalotte3;
+      % 
+      if Trace:
+      \useKV[Assemblage]{Traces};
+      fi;
     \end{mplibcode}
   \fi
 }%
@@ -477,8 +479,6 @@
       boolean Trace;
       Trace=\useKV[Assemblage]{Trace};
       
-      Initialisation(1500,22,20,50);
-      
       nb:=72;%36
       subh:=1;%
       incolor:=white;
@@ -488,10 +488,14 @@
       angx:=180+angx;
       nb:=12;
       subh:=72;%
-      Objetcalotte2("R="&"Rayon","phib="&"0","phih="&"pi/2");
+      Objetcalotte2("R="&"Rayon","phib="&"-pi/144","phih="&"pi/2");
       TR:=(0,0,0);
       AffichageObjetConeAvecBase1;
       AffichageObjetCalotte2;%Cone3;
+      % 
+      if Trace:
+      \useKV[Assemblage]{Traces};
+      fi;
     \end{mplibcode}
   \fi
 }%
\ No newline at end of file
diff --git a/Master/texmf-dist/tex/latex/profcollege/PfCCartographie.tex b/Master/texmf-dist/tex/latex/profcollege/PfCCartographie.tex
index ec56dceb899..2b5ef28fbc2 100644
--- a/Master/texmf-dist/tex/latex/profcollege/PfCCartographie.tex
+++ b/Master/texmf-dist/tex/latex/profcollege/PfCCartographie.tex
@@ -1,7 +1,7 @@
 %%%
 % Cartographie
 %%%
-\setKVdefault[Cartographie]{Echelle=1,Carte=false,All=false,Europe=false,Asie=false,Amsud=false,Amnord=false,Amcentre=false,Caraibes=false,Afrique=false,AfficheEchelle=false,PaysSeul=false,VillesSup=false,VillesSupI=false,Capitales=false,Impression=false,Fleuves=false,CouleurFond=ciel,Largeur=12,Hauteur=12,Arborescence="/usr/local/texlive/2023/texmf-dist/metapost/profcollege/",Projection=false,TypeProjection="mercator",CouleurPays=Cornsilk,Pasl=2,PasL=2,Codes=false,Epaisseur=2,ModeleCouleur,Boussole=false,Allegee=1}
+\setKVdefault[Cartographie]{Echelle=1,Carte=false,All=false,Europe=false,Asie=false,Amsud=false,Amnord=false,Amcentre=false,Caraibes=false,Afrique=false,AfficheEchelle=false,PaysSeul=false,VillesSup=false,VillesSupI=false,Capitales=false,Impression=false,Fleuves=false,CouleurFond=ciel,Largeur=12,Hauteur=12,Arborescence="/usr/local/texlive/2023/texmf-dist/metapost/profcollege/",Projection=false,TypeProjection="mercator",CouleurPays=Cornsilk,Pasl=2,PasL=2,Codes=false,Epaisseur=2,ModeleCouleur=5,Boussole=false,Allegee=1}
 \defKV[Cartographie]{EchelleCarte=\setKV[Cartographie]{Carte}}
 \defKV[Cartographie]{Pays=\setKV[Cartographie]{PaysSeul}}
 \defKV[Cartographie]{Villes=\setKV[Cartographie]{VillesSup}}
@@ -233,10 +233,11 @@
       Epaisseur:=\useKV[Cartographie]{Epaisseur};
       distanceecran=100*\useKV[Cartographie]{Echelle};
       fleuves:=\useKV[Cartographie]{Fleuves};
-      boolean Carte,Impression,VillesSup,Codes;
+      boolean Carte,Impression,VillesSup,VillesSupI,Codes;
       Carte=\useKV[Cartographie]{Carte};
       Impression=\useKV[Cartographie]{Impression};
       VillesSup=\useKV[Cartographie]{VillesSup};
+      VillesSupI=\useKV[Cartographie]{VillesSupI};
       Codes=\useKV[Cartographie]{Codes};
       if defaultcolormodel=7:
       cmykcolor couleurfond,white,payscolor,couleurfleuve;
@@ -268,6 +269,53 @@
       Amcentrale:=\useKV[Cartographie]{Amcentre};
       Caraibes:=\useKV[Cartographie]{Caraibes};
       Afrique:=\useKV[Cartographie]{Afrique};
+
+      vardef Villes(text t)=
+      pair CoordVille;
+      string NomVille;
+      n:=0;
+      for p_:=t:
+      n:=n+1;
+      if n=1:
+      %nblec:=p;
+      else:
+      if pair p_:
+      if projection="mercator":
+      CoordVille:=mercatorc(ypart(p_),xpart(p_));
+      elseif projection="winkel":
+      CoordVille:=winkelc(ypart(p_),xpart(p_));
+      elseif projection="cylindrique":
+      CoordVille:=cylindriquec(ypart(p_),xpart(p_));
+      elseif projection="simple":
+      CoordVille:=simplec(ypart(p_),xpart(p_));
+      elseif projection="bonne":
+      CoordVille:=bonnec(ypart(p_),xpart(p_));
+      fi;
+      elseif string p_:
+      NomVille:=p_;
+      else:
+      marque_p:="croix";
+      pointe(CoordVille);
+      label.position(p_)(TEX(""&NomVille&""),CoordVille);
+      fi;
+      fi;
+      endfor;
+      drawoptions();
+      enddef;
+
+      def position(expr t)=
+      if t=1:rt
+      elseif t=2:urt
+      elseif t=3:top
+      elseif t=4:ulft
+      elseif t=5:lft
+      elseif t=6:llft
+      elseif t=7:bot
+      elseif t=8:lrt
+      fi
+      enddef;
+      
+      
       if Carte:
         Echelle:=\useKV[Cartographie]{AfficheEchelle};
         figure(-0.5u*LargeurCadre,-0.5u*HauteurCadre,0.5u*LargeurCadre,0.5u*HauteurCadre);
@@ -308,10 +356,14 @@
           endfor;
           drawoptions();
           closefrom nomfichiermul;
-        fi;
+          fi;
+                if VillesSupI:
+       Villes(\useKV[Cartographie]{VillesI});
+      fi;
         if Codes:
         \useKV[Cartographie]{Traces};
         fi;
+        
       else:
         draw(0,0)--(50,50);
         mappemonde(#2,#3);
diff --git a/Master/texmf-dist/tex/latex/profcollege/PfCProgrammeCalcul.tex b/Master/texmf-dist/tex/latex/profcollege/PfCProgrammeCalcul.tex
index 216d44d8ec7..f1bdc0307fe 100644
--- a/Master/texmf-dist/tex/latex/profcollege/PfCProgrammeCalcul.tex
+++ b/Master/texmf-dist/tex/latex/profcollege/PfCProgrammeCalcul.tex
@@ -212,7 +212,7 @@
                \StrSubstitute{\tempab}{*}{\div}[\tempac]%
                \StrSubstitute{\tempac}{/}{\times}[\tempad]%
                \StrSubstitute{\tempad}{-}{+}[\tempae]%
-               \StrSubstitute{\tempae}{+}{-}[\tempaf]%
+               \StrSubstitute{\tempae}{++}{-}[\tempaf]%
                \ifnum\fpeval{\useKV[ClesProg]{Reponses}}>0\relax%
                  \ifnum\fpeval{\listlen\ListeProg[2]-\compteurcnt}<\fpeval{\useKV[ClesProg]{Reponses}}\relax%
                    \ifboolKV[ClesProg]{OpReciproques}{%
diff --git a/Master/texmf-dist/tex/latex/profcollege/PfCRepresenterTableur.tex b/Master/texmf-dist/tex/latex/profcollege/PfCRepresenterTableur.tex
index 35eed814310..0e6162aa765 100644
--- a/Master/texmf-dist/tex/latex/profcollege/PfCRepresenterTableur.tex
+++ b/Master/texmf-dist/tex/latex/profcollege/PfCRepresenterTableur.tex
@@ -1,7 +1,7 @@
 %%%
 % Tableur
 %%%
-\setKVdefault[Tableur]{Colonnes=4,Largeur=30pt,LargeurUn=30pt,Bandeau=true,Formule={},Cellule=A1,Ligne=0,Colonne=0,PasL=1,PasC=1,Selection=false,DebutColonnes=0,DebutLignes=0}%
+\setKVdefault[Tableur]{Colonnes=4,Largeur=30pt,LargeurUn=30pt,Bandeau=true,Formule={},Cellule=A1,Ligne=0,Colonne=0,PasL=1,PasC=1,Selection=false,DebutColonnes=0,DebutLignes=0,LargeurNombre=10pt}%
 %Idee de P. Nuns
 \defKV[Tableur]{Couleur=\setKV[Tableur]{Selection}}%
 %
@@ -41,12 +41,14 @@
 \newlength\PfCLongInter%
 \newlength\PfCTableurLargeurUn%
 \newlength\PfCTableurLargeur%
+\newlength\PfCTableurLargeurZero%
 
 \NewDocumentEnvironment{Tableur}{so}{%
   \useKVdefault[Tableur]%
   \setKV[Tableur]{#2}%
   \setlength{\PfCTableurLargeurUn}{\fpeval{\useKV[Tableur]{LargeurUn}}pt}%
   \setlength{\PfCTableurLargeur}{\fpeval{\useKV[Tableur]{Largeur}}pt}%
+  \setlength{\PfCTableurLargeurZero}{\fpeval{\useKV[Tableur]{LargeurNombre}}pt}%
   \ifnum\useKV[Tableur]{DebutColonnes}=0\relax
     \Affichecntcol\z@%
   \else
@@ -61,7 +63,8 @@
   \newcolumntype{A}{>{\centering\arraybackslash}m{\PfCTableurLargeurUn}}%
   \newcolumntype{B}{>{\centering\arraybackslash}m{\PfCTableurLargeur}}%
   \IfBooleanTF{#1}{%
-    \setlength{\PfCLongInter}{-40pt+\fpeval{\useKV[Tableur]{LargeurUn}}pt+\fpeval{(\useKV[Tableur]{Colonnes}-2)*\useKV[Tableur]{Largeur}}pt+\fpeval{2*\useKV[Tableur]{Colonnes}-6}\tabcolsep+\fpeval{\useKV[Tableur]{Colonnes}-3}\arrayrulewidth}%
+    %%Bandeau avec 20pt :( en largeurZero
+    \setlength{\PfCLongInter}{-60pt+\fpeval{\useKV[Tableur]{LargeurNombre}}pt+\fpeval{\useKV[Tableur]{LargeurUn}}pt+\fpeval{(\useKV[Tableur]{Colonnes}-2)*\useKV[Tableur]{Largeur}}pt+\fpeval{2*\useKV[Tableur]{Colonnes}-6}\tabcolsep+\fpeval{\useKV[Tableur]{Colonnes}-3}\arrayrulewidth}%
   \ifboolKV[Tableur]{Bandeau}{%
     \begin{tabular}{|p{\PfCTableurLargeur}|p{10pt}|p{50pt}|p{\PfCLongInter}|}%
       \hhline{--~-}%
@@ -81,7 +84,7 @@
           \centering\arraybackslash%
           \ifnum\cntlin>\@ne%
           \fpeval{\cntlin+\Affichecntlin-1}\fi}%
-      wc{20pt}|A|*{\fpeval{\useKV[Tableur]{Colonnes}-1}}{B|}}%
+      wc{\PfCTableurLargeurZero}|A|*{\fpeval{\useKV[Tableur]{Colonnes}-1}}{B|}}%
       \hline%
       \rowcolor{gray!15}%
       }%
diff --git a/Master/texmf-dist/tex/latex/profcollege/PfCStatistiques.tex b/Master/texmf-dist/tex/latex/profcollege/PfCStatistiques.tex
index 6223f887cd4..98566be426a 100644
--- a/Master/texmf-dist/tex/latex/profcollege/PfCStatistiques.tex
+++ b/Master/texmf-dist/tex/latex/profcollege/PfCStatistiques.tex
@@ -515,7 +515,7 @@ ModeleCouleur=5%
   fi;
   endfor;
   if DonneesSup:
-  maxAxey:=floor(maxy/10)*10+4*PasGrilley;
+  maxAxey:=maxy;%floor(maxy/10)*10+4*PasGrilley;
   else:
   maxAxey:=maxy;
   fi;
@@ -586,15 +586,23 @@ ModeleCouleur=5%
     if Date:
     label.bot(TEX(decimal(xpart(p_))) rotated AngleRotation,A[l]);
     else:
+    if GrandNombrex:
+    label.bot(TEX("\num{\fpeval{\useKV[ClesStat]{GrandNombreA}*"&decimal(xpart(p_))&"}}") rotated AngleRotation,A[l]);
+    else:
     label.bot(TEX("\num{"&decimal(xpart(p_))&"}") rotated AngleRotation,A[l]);
     fi;
+    fi;
     else :
     if Date:
     label.bot(TEX(decimal(xpart(p_))),A[l]);
     else:
+    if GrandNombrex:
+
+    else:
     label.bot(TEX("\num{"&decimal(xpart(p_))&"}"),A[l]);
     fi;
     fi;
+    fi;
     if Reponses:
     if DonneesSup:
     Test(l);
diff --git a/Master/texmf-dist/tex/latex/profcollege/ProfCollege.sty b/Master/texmf-dist/tex/latex/profcollege/ProfCollege.sty
index 3963e71e7d6..7c1bad8c3d9 100644
--- a/Master/texmf-dist/tex/latex/profcollege/ProfCollege.sty
+++ b/Master/texmf-dist/tex/latex/profcollege/ProfCollege.sty
@@ -2,9 +2,9 @@
 % licence    : Released under the LaTeX Project Public License v1.3c
 % or later, see http://www.latex-project.org/lppl.txtf
 \NeedsTeXFormat{LaTeX2e}%
-\def\filedate{2024/04/20}%
+\def\filedate{2024/04/26}%
 \let\PfCfiledate\filedate%
-\def\fileversion{0.99-A-c}%
+\def\fileversion{0.99-A-d}%
 \let\PfCfileversion\fileversion%
 \ProvidesPackage{ProfCollege}[\filedate\space v\fileversion\space Aide pour utiliser LaTeX au college]%