diff options
Diffstat (limited to 'macros/latex/contrib/profcollege/metapost/PfCScratch.mp')
-rw-r--r-- | macros/latex/contrib/profcollege/metapost/PfCScratch.mp | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/macros/latex/contrib/profcollege/metapost/PfCScratch.mp b/macros/latex/contrib/profcollege/metapost/PfCScratch.mp index 2a7ce304e2..6e2e7beb59 100644 --- a/macros/latex/contrib/profcollege/metapost/PfCScratch.mp +++ b/macros/latex/contrib/profcollege/metapost/PfCScratch.mp @@ -1689,8 +1689,11 @@ $=image( fill cadre withcolor if print : coefprint*White else : if unknown colControle : LightOrange else : colControle fi fi; draw cadre withcolor if print : coefprint*White else : if unknown colControle : LightOrange else : colControle fi fi; AA:=ahangle; - ahangle:=90; - drawarrow (lrcorner texto+(-0.625cm,0.15cm)){dir-15}..{dir90}(urcorner texto+(-0.25cm,-0.1cm)) withpen pencircle scaled2bp if print=false : withcolor white fi; + BB:=ahlength; + ahangle:=90;%90 + ahlength:=ahlength/2; +% drawarrow (lrcorner texto+(-0.625cm,0.15cm)){dir-15}..{dir90}(urcorner texto+(-0.25cm,-0.1cm)) withpen pencircle scaled1.5 if print=false : withcolor white fi; + drawarrow (lrcorner texto+(-0.25cm,0.15cm)){dir-30}..{dir90}(urcorner texto+(-0.125cm,-0.1cm)) withpen pencircle scaled1 if print=false : withcolor white fi; ahangle:=AA; draw (coindebutbloc[numblocrep]+(0.0625+0.5cm+eb,0.125)){dir180}.. {dir-90}(coindebutbloc[numblocrep]+(0.5cm,-eb))-- |