How can I automatically replace [[ and ]] with the [LeftDoubleBracket] and [RightDoubleBracket] operators?












6












$begingroup$


When you type ->, it is automatically turned into the [Rule] character. Can we configure our frontends to do the same for the [[ and ]] characters, which could be turned into [LeftDoubleBracket] and [RightDoubleBracket]?



You can easily do this manually by typing <esc>[[<esc>, but I would like to do this automatically.



This question was originally asked by me in the chat and has answers there; this question is so that those answers can be added and kept for the community.










share|improve this question











$endgroup$








  • 2




    $begingroup$
    Do you really want that when writing func[func2[arg]]? I changed KeyEventTranslations.tr to have <kbd>Alt gr</kbd>+<kbd>i</kbd>/<kbd>o</kbd>.
    $endgroup$
    – Coolwater
    yesterday












  • $begingroup$
    Yes, this is part of the problem. Ideally it would only happen after you have typed the matching [[, but more than likely it needs to be done at shift-enter at the earliest. For [[ the problem is simpler because there is no time when you would type [[ except for as part of a Part expression.
    $endgroup$
    – Carl Lange
    yesterday








  • 1




    $begingroup$
    closely related: 98175
    $endgroup$
    – Kuba
    yesterday










  • $begingroup$
    @Kuba That's so closely related I suppose you could make an argument for this being a duplicate, what do you think?
    $endgroup$
    – Carl Lange
    yesterday






  • 1




    $begingroup$
    Related using KeyEventTranslations 5221
    $endgroup$
    – Rohit Namjoshi
    yesterday
















6












$begingroup$


When you type ->, it is automatically turned into the [Rule] character. Can we configure our frontends to do the same for the [[ and ]] characters, which could be turned into [LeftDoubleBracket] and [RightDoubleBracket]?



You can easily do this manually by typing <esc>[[<esc>, but I would like to do this automatically.



This question was originally asked by me in the chat and has answers there; this question is so that those answers can be added and kept for the community.










share|improve this question











$endgroup$








  • 2




    $begingroup$
    Do you really want that when writing func[func2[arg]]? I changed KeyEventTranslations.tr to have <kbd>Alt gr</kbd>+<kbd>i</kbd>/<kbd>o</kbd>.
    $endgroup$
    – Coolwater
    yesterday












  • $begingroup$
    Yes, this is part of the problem. Ideally it would only happen after you have typed the matching [[, but more than likely it needs to be done at shift-enter at the earliest. For [[ the problem is simpler because there is no time when you would type [[ except for as part of a Part expression.
    $endgroup$
    – Carl Lange
    yesterday








  • 1




    $begingroup$
    closely related: 98175
    $endgroup$
    – Kuba
    yesterday










  • $begingroup$
    @Kuba That's so closely related I suppose you could make an argument for this being a duplicate, what do you think?
    $endgroup$
    – Carl Lange
    yesterday






  • 1




    $begingroup$
    Related using KeyEventTranslations 5221
    $endgroup$
    – Rohit Namjoshi
    yesterday














6












6








6





$begingroup$


When you type ->, it is automatically turned into the [Rule] character. Can we configure our frontends to do the same for the [[ and ]] characters, which could be turned into [LeftDoubleBracket] and [RightDoubleBracket]?



You can easily do this manually by typing <esc>[[<esc>, but I would like to do this automatically.



This question was originally asked by me in the chat and has answers there; this question is so that those answers can be added and kept for the community.










share|improve this question











$endgroup$




When you type ->, it is automatically turned into the [Rule] character. Can we configure our frontends to do the same for the [[ and ]] characters, which could be turned into [LeftDoubleBracket] and [RightDoubleBracket]?



You can easily do this manually by typing <esc>[[<esc>, but I would like to do this automatically.



This question was originally asked by me in the chat and has answers there; this question is so that those answers can be added and kept for the community.







syntax custom-notation






share|improve this question















share|improve this question













share|improve this question




share|improve this question








edited yesterday







Carl Lange

















asked yesterday









Carl LangeCarl Lange

5,18411141




5,18411141








  • 2




    $begingroup$
    Do you really want that when writing func[func2[arg]]? I changed KeyEventTranslations.tr to have <kbd>Alt gr</kbd>+<kbd>i</kbd>/<kbd>o</kbd>.
    $endgroup$
    – Coolwater
    yesterday












  • $begingroup$
    Yes, this is part of the problem. Ideally it would only happen after you have typed the matching [[, but more than likely it needs to be done at shift-enter at the earliest. For [[ the problem is simpler because there is no time when you would type [[ except for as part of a Part expression.
    $endgroup$
    – Carl Lange
    yesterday








  • 1




    $begingroup$
    closely related: 98175
    $endgroup$
    – Kuba
    yesterday










  • $begingroup$
    @Kuba That's so closely related I suppose you could make an argument for this being a duplicate, what do you think?
    $endgroup$
    – Carl Lange
    yesterday






  • 1




    $begingroup$
    Related using KeyEventTranslations 5221
    $endgroup$
    – Rohit Namjoshi
    yesterday














  • 2




    $begingroup$
    Do you really want that when writing func[func2[arg]]? I changed KeyEventTranslations.tr to have <kbd>Alt gr</kbd>+<kbd>i</kbd>/<kbd>o</kbd>.
    $endgroup$
    – Coolwater
    yesterday












  • $begingroup$
    Yes, this is part of the problem. Ideally it would only happen after you have typed the matching [[, but more than likely it needs to be done at shift-enter at the earliest. For [[ the problem is simpler because there is no time when you would type [[ except for as part of a Part expression.
    $endgroup$
    – Carl Lange
    yesterday








  • 1




    $begingroup$
    closely related: 98175
    $endgroup$
    – Kuba
    yesterday










  • $begingroup$
    @Kuba That's so closely related I suppose you could make an argument for this being a duplicate, what do you think?
    $endgroup$
    – Carl Lange
    yesterday






  • 1




    $begingroup$
    Related using KeyEventTranslations 5221
    $endgroup$
    – Rohit Namjoshi
    yesterday








2




2




$begingroup$
Do you really want that when writing func[func2[arg]]? I changed KeyEventTranslations.tr to have <kbd>Alt gr</kbd>+<kbd>i</kbd>/<kbd>o</kbd>.
$endgroup$
– Coolwater
yesterday






$begingroup$
Do you really want that when writing func[func2[arg]]? I changed KeyEventTranslations.tr to have <kbd>Alt gr</kbd>+<kbd>i</kbd>/<kbd>o</kbd>.
$endgroup$
– Coolwater
yesterday














$begingroup$
Yes, this is part of the problem. Ideally it would only happen after you have typed the matching [[, but more than likely it needs to be done at shift-enter at the earliest. For [[ the problem is simpler because there is no time when you would type [[ except for as part of a Part expression.
$endgroup$
– Carl Lange
yesterday






$begingroup$
Yes, this is part of the problem. Ideally it would only happen after you have typed the matching [[, but more than likely it needs to be done at shift-enter at the earliest. For [[ the problem is simpler because there is no time when you would type [[ except for as part of a Part expression.
$endgroup$
– Carl Lange
yesterday






1




1




$begingroup$
closely related: 98175
$endgroup$
– Kuba
yesterday




$begingroup$
closely related: 98175
$endgroup$
– Kuba
yesterday












$begingroup$
@Kuba That's so closely related I suppose you could make an argument for this being a duplicate, what do you think?
$endgroup$
– Carl Lange
yesterday




$begingroup$
@Kuba That's so closely related I suppose you could make an argument for this being a duplicate, what do you think?
$endgroup$
– Carl Lange
yesterday




1




1




$begingroup$
Related using KeyEventTranslations 5221
$endgroup$
– Rohit Namjoshi
yesterday




$begingroup$
Related using KeyEventTranslations 5221
$endgroup$
– Rohit Namjoshi
yesterday










1 Answer
1






active

oldest

votes


















3












$begingroup$

You can use CellEpilog to modify the contents of the cell upon evaluation:



SetOptions[EvaluationNotebook,
CellEpilog :> If[
! TrueQ[
Max@CurrentValue[CellChangeTimes] <=
CurrentValue[EvaluationCell, {TaggingRules, "autoreplaceTime"}]
],
CurrentValue[EvaluationCell, {TaggingRules, "autoreplaceTime"}] =
Max@CurrentValue[CellChangeTimes];
NotebookWrite[
EvaluationCell,
Replace[NotebookRead[EvaluationCell],
RowBox@{head_, "[", RowBox@{"[", part_, "]"}, "]"} :>
RowBox@{head, "[LeftDoubleBracket]", part, "[RightDoubleBracket]"}, All]
]
]
]


Demonstration:
https://i.stack.imgur.com/4V5WJ.gif



This could of course be extended to do similar replacements for <|…|> etc. To minimize the performance hit, we keep track of the last CellChangeTimes value and only rerun the replacement code when it changed.



The nice thing about an approach like this (i.e. manipulation of the cell's box structure) is that it's rather straightforward to identify the bracket pairs to replace, since the front-end does all the necessary parsing for us.



An alternative to putting the code into CellEpilog might be to create a menu item for it, one could also modify the "Evaluate cells" menu item to run this code on all selected cells first.






share|improve this answer











$endgroup$














    Your Answer





    StackExchange.ifUsing("editor", function () {
    return StackExchange.using("mathjaxEditing", function () {
    StackExchange.MarkdownEditor.creationCallbacks.add(function (editor, postfix) {
    StackExchange.mathjaxEditing.prepareWmdForMathJax(editor, postfix, [["$", "$"], ["\\(","\\)"]]);
    });
    });
    }, "mathjax-editing");

    StackExchange.ready(function() {
    var channelOptions = {
    tags: "".split(" "),
    id: "387"
    };
    initTagRenderer("".split(" "), "".split(" "), channelOptions);

    StackExchange.using("externalEditor", function() {
    // Have to fire editor after snippets, if snippets enabled
    if (StackExchange.settings.snippets.snippetsEnabled) {
    StackExchange.using("snippets", function() {
    createEditor();
    });
    }
    else {
    createEditor();
    }
    });

    function createEditor() {
    StackExchange.prepareEditor({
    heartbeatType: 'answer',
    autoActivateHeartbeat: false,
    convertImagesToLinks: false,
    noModals: true,
    showLowRepImageUploadWarning: true,
    reputationToPostImages: null,
    bindNavPrevention: true,
    postfix: "",
    imageUploader: {
    brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
    contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
    allowUrls: true
    },
    onDemand: true,
    discardSelector: ".discard-answer"
    ,immediatelyShowMarkdownHelp:true
    });


    }
    });














    draft saved

    draft discarded


















    StackExchange.ready(
    function () {
    StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f194775%2fhow-can-i-automatically-replace-and-with-the-leftdoublebracket-and-ri%23new-answer', 'question_page');
    }
    );

    Post as a guest















    Required, but never shown

























    1 Answer
    1






    active

    oldest

    votes








    1 Answer
    1






    active

    oldest

    votes









    active

    oldest

    votes






    active

    oldest

    votes









    3












    $begingroup$

    You can use CellEpilog to modify the contents of the cell upon evaluation:



    SetOptions[EvaluationNotebook,
    CellEpilog :> If[
    ! TrueQ[
    Max@CurrentValue[CellChangeTimes] <=
    CurrentValue[EvaluationCell, {TaggingRules, "autoreplaceTime"}]
    ],
    CurrentValue[EvaluationCell, {TaggingRules, "autoreplaceTime"}] =
    Max@CurrentValue[CellChangeTimes];
    NotebookWrite[
    EvaluationCell,
    Replace[NotebookRead[EvaluationCell],
    RowBox@{head_, "[", RowBox@{"[", part_, "]"}, "]"} :>
    RowBox@{head, "[LeftDoubleBracket]", part, "[RightDoubleBracket]"}, All]
    ]
    ]
    ]


    Demonstration:
    https://i.stack.imgur.com/4V5WJ.gif



    This could of course be extended to do similar replacements for <|…|> etc. To minimize the performance hit, we keep track of the last CellChangeTimes value and only rerun the replacement code when it changed.



    The nice thing about an approach like this (i.e. manipulation of the cell's box structure) is that it's rather straightforward to identify the bracket pairs to replace, since the front-end does all the necessary parsing for us.



    An alternative to putting the code into CellEpilog might be to create a menu item for it, one could also modify the "Evaluate cells" menu item to run this code on all selected cells first.






    share|improve this answer











    $endgroup$


















      3












      $begingroup$

      You can use CellEpilog to modify the contents of the cell upon evaluation:



      SetOptions[EvaluationNotebook,
      CellEpilog :> If[
      ! TrueQ[
      Max@CurrentValue[CellChangeTimes] <=
      CurrentValue[EvaluationCell, {TaggingRules, "autoreplaceTime"}]
      ],
      CurrentValue[EvaluationCell, {TaggingRules, "autoreplaceTime"}] =
      Max@CurrentValue[CellChangeTimes];
      NotebookWrite[
      EvaluationCell,
      Replace[NotebookRead[EvaluationCell],
      RowBox@{head_, "[", RowBox@{"[", part_, "]"}, "]"} :>
      RowBox@{head, "[LeftDoubleBracket]", part, "[RightDoubleBracket]"}, All]
      ]
      ]
      ]


      Demonstration:
      https://i.stack.imgur.com/4V5WJ.gif



      This could of course be extended to do similar replacements for <|…|> etc. To minimize the performance hit, we keep track of the last CellChangeTimes value and only rerun the replacement code when it changed.



      The nice thing about an approach like this (i.e. manipulation of the cell's box structure) is that it's rather straightforward to identify the bracket pairs to replace, since the front-end does all the necessary parsing for us.



      An alternative to putting the code into CellEpilog might be to create a menu item for it, one could also modify the "Evaluate cells" menu item to run this code on all selected cells first.






      share|improve this answer











      $endgroup$
















        3












        3








        3





        $begingroup$

        You can use CellEpilog to modify the contents of the cell upon evaluation:



        SetOptions[EvaluationNotebook,
        CellEpilog :> If[
        ! TrueQ[
        Max@CurrentValue[CellChangeTimes] <=
        CurrentValue[EvaluationCell, {TaggingRules, "autoreplaceTime"}]
        ],
        CurrentValue[EvaluationCell, {TaggingRules, "autoreplaceTime"}] =
        Max@CurrentValue[CellChangeTimes];
        NotebookWrite[
        EvaluationCell,
        Replace[NotebookRead[EvaluationCell],
        RowBox@{head_, "[", RowBox@{"[", part_, "]"}, "]"} :>
        RowBox@{head, "[LeftDoubleBracket]", part, "[RightDoubleBracket]"}, All]
        ]
        ]
        ]


        Demonstration:
        https://i.stack.imgur.com/4V5WJ.gif



        This could of course be extended to do similar replacements for <|…|> etc. To minimize the performance hit, we keep track of the last CellChangeTimes value and only rerun the replacement code when it changed.



        The nice thing about an approach like this (i.e. manipulation of the cell's box structure) is that it's rather straightforward to identify the bracket pairs to replace, since the front-end does all the necessary parsing for us.



        An alternative to putting the code into CellEpilog might be to create a menu item for it, one could also modify the "Evaluate cells" menu item to run this code on all selected cells first.






        share|improve this answer











        $endgroup$



        You can use CellEpilog to modify the contents of the cell upon evaluation:



        SetOptions[EvaluationNotebook,
        CellEpilog :> If[
        ! TrueQ[
        Max@CurrentValue[CellChangeTimes] <=
        CurrentValue[EvaluationCell, {TaggingRules, "autoreplaceTime"}]
        ],
        CurrentValue[EvaluationCell, {TaggingRules, "autoreplaceTime"}] =
        Max@CurrentValue[CellChangeTimes];
        NotebookWrite[
        EvaluationCell,
        Replace[NotebookRead[EvaluationCell],
        RowBox@{head_, "[", RowBox@{"[", part_, "]"}, "]"} :>
        RowBox@{head, "[LeftDoubleBracket]", part, "[RightDoubleBracket]"}, All]
        ]
        ]
        ]


        Demonstration:
        https://i.stack.imgur.com/4V5WJ.gif



        This could of course be extended to do similar replacements for <|…|> etc. To minimize the performance hit, we keep track of the last CellChangeTimes value and only rerun the replacement code when it changed.



        The nice thing about an approach like this (i.e. manipulation of the cell's box structure) is that it's rather straightforward to identify the bracket pairs to replace, since the front-end does all the necessary parsing for us.



        An alternative to putting the code into CellEpilog might be to create a menu item for it, one could also modify the "Evaluate cells" menu item to run this code on all selected cells first.







        share|improve this answer














        share|improve this answer



        share|improve this answer








        edited yesterday

























        answered yesterday









        Lukas LangLukas Lang

        7,0301931




        7,0301931






























            draft saved

            draft discarded




















































            Thanks for contributing an answer to Mathematica Stack Exchange!


            • Please be sure to answer the question. Provide details and share your research!

            But avoid



            • Asking for help, clarification, or responding to other answers.

            • Making statements based on opinion; back them up with references or personal experience.


            Use MathJax to format equations. MathJax reference.


            To learn more, see our tips on writing great answers.




            draft saved


            draft discarded














            StackExchange.ready(
            function () {
            StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f194775%2fhow-can-i-automatically-replace-and-with-the-leftdoublebracket-and-ri%23new-answer', 'question_page');
            }
            );

            Post as a guest















            Required, but never shown





















































            Required, but never shown














            Required, but never shown












            Required, but never shown







            Required, but never shown

































            Required, but never shown














            Required, but never shown












            Required, but never shown







            Required, but never shown







            Popular posts from this blog

            Identifying “long and narrow” polygons in with PostGISlength and width of polygonWhy postgis st_overlaps reports Qgis' “avoid intersections” generated polygon as overlapping with others?Adjusting polygons to boundary and filling holesDrawing polygons with fixed area?How to remove spikes in Polygons with PostGISDeleting sliver polygons after difference operation in QGIS?Snapping boundaries in PostGISSplit polygon into parts adding attributes based on underlying polygon in QGISSplitting overlap between polygons and assign to nearest polygon using PostGIS?Expanding polygons and clipping at midpoint?Removing Intersection of Buffers in Same Layers

            Masuk log Menu navigasi

            อาณาจักร (ชีววิทยา) ดูเพิ่ม อ้างอิง รายการเลือกการนำทาง10.1086/39456810.5962/bhl.title.447410.1126/science.163.3863.150576276010.1007/BF01796092408502"Phylogenetic structure of the prokaryotic domain: the primary kingdoms"10.1073/pnas.74.11.5088432104270744"Towards a natural system of organisms: proposal for the domains Archaea, Bacteria, and Eucarya"1990PNAS...87.4576W10.1073/pnas.87.12.4576541592112744PubMedJump the queueexpand by handPubMedJump the queueexpand by handPubMedJump the queueexpand by hand"A revised six-kingdom system of life"10.1111/j.1469-185X.1998.tb00030.x9809012"Only six kingdoms of life"10.1098/rspb.2004.2705169172415306349"Kingdoms Protozoa and Chromista and the eozoan root of the eukaryotic tree"10.1098/rsbl.2009.0948288006020031978เพิ่มข้อมูล