Trjtdtk

How to implement float hashing with approximate equality

Why is Arya visibly scared in the library in S8E3?

Is it cheaper to drop cargo than to land it?

Disabling Resource Governor in SQL Server

Showing the sample mean is a sufficient statistics from an exponential distribution

Airbnb - host wants to reduce rooms, can we get refund?

If 1. e4 c6 is considered as a sound defense for black, why is 1. c3 so rare?

I caught several of my students plagiarizing. Could it be my fault as a teacher?

Packet sniffer for MacOS Mojave and above

Can commander tax be proliferated?

What is the limiting factor for a CAN bus to exceed 1Mbps bandwidth?

My ID is expired, can I fly to the Bahamas with my passport?

What are the differences between credential stuffing and password spraying?

Is lying to get "gardening leave" fraud?

A non-technological, repeating, phenomenon in the sky, holding its position in the sky for hours

How to improve/restore vintage peugeot bike, or is it even worth it?

Attending a conference where my ex-supervisor and his collaborator are present, should I attend?

Would "lab meat" be able to feed a much larger global population

Any examples of headwear for races with animal ears?

What are the spoon bit of a spoon and fork bit of a fork called?

How did Arya get back her dagger from Sansa?

Was Hulk present at this event?

Is it always OK to ask for a copy of the lecturer's slides?

What precisely is a link?

Typesetting a double Over Dot on top of a symbol

Single dot textual formFixing quirky typesetting in plot labelsAn issue with formulas typesetting in Grid & ColumnTypesetting - entering derivative in traditional formTypesetting helpTypesetting for different powersTypesetting a formulaWhy doesn't the keyboard shortcut Insert->Typesetting->Nudge Up work for x[Prime]?Typesetting text with mathHow to stop font size reduction in typesetting fractions and sub- and superscripts

6

$begingroup$

I wanted to make a notation with a double dot over a symbol in Mathematica. Searching online or in the documentation did not yield any results. However, just randomly attempting to give a second parameter to the OverDot function surprisingly did exactly what I needed:

I assume the red font suggests that Mathematica perceives this as a syntax mistake at some level, even though the output is as desired. Unfortunately, this does not work for three dots and more.

Is there a proper way to do this without red font appearing?

formatting

share|improve this question

asked Apr 9 at 1:08

KagaratschKagaratsch

4,92231350

$endgroup$

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  $begingroup$
  Overscript[x, ".."], Overscript[x, "..."], Overscript[x, "[Ellipsis]"]
  $endgroup$
  – Bob Hanlon
  Apr 9 at 1:35
  

  
  
  
  


• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  $begingroup$
  The code editor and documentation are not always completely in sync with the actual typesetting. This is only one of several examples. Ignore the code coloring.
  $endgroup$
  – m_goldberg
  Apr 9 at 2:35
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  @BobHanlon as a German speaker I perceive your Overscript[x, ".."] Umlaut to be very improperly typeset. Overscript[x, "¨"] is bad as well. They work, yes; but not for publication. Cheers!
  $endgroup$
  – Roman
  Apr 9 at 9:43
  
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  @Roman Why not just literally use the German character set for that? The double dot over a symbol has e.g. the meaning of a second time derivative in Physics -- which is typeset properly.
  $endgroup$
  – Kagaratsch
  Apr 9 at 12:37
  
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  For Umlaut characters you only get äëïöüÿ from the font set but not the others. That wasn't my point though. All I'm saying is that the size of the dots and their distance must be appropriate for the chosen font, otherwise it looks very bad for a native speaker of German, Turkish, Swedish, French, etc. If you don't care about the aesthetics, then all the given solutions work, sure.
  $endgroup$
  – Roman
  Apr 9 at 13:46
  

  
  
  
  

add a comment | 

6

$begingroup$

I wanted to make a notation with a double dot over a symbol in Mathematica. Searching online or in the documentation did not yield any results. However, just randomly attempting to give a second parameter to the OverDot function surprisingly did exactly what I needed:

I assume the red font suggests that Mathematica perceives this as a syntax mistake at some level, even though the output is as desired. Unfortunately, this does not work for three dots and more.

Is there a proper way to do this without red font appearing?

formatting

share|improve this question

asked Apr 9 at 1:08

KagaratschKagaratsch

4,92231350

$endgroup$

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  $begingroup$
  Overscript[x, ".."], Overscript[x, "..."], Overscript[x, "[Ellipsis]"]
  $endgroup$
  – Bob Hanlon
  Apr 9 at 1:35
  

  
  
  
  


• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  $begingroup$
  The code editor and documentation are not always completely in sync with the actual typesetting. This is only one of several examples. Ignore the code coloring.
  $endgroup$
  – m_goldberg
  Apr 9 at 2:35
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  @BobHanlon as a German speaker I perceive your Overscript[x, ".."] Umlaut to be very improperly typeset. Overscript[x, "¨"] is bad as well. They work, yes; but not for publication. Cheers!
  $endgroup$
  – Roman
  Apr 9 at 9:43
  
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  @Roman Why not just literally use the German character set for that? The double dot over a symbol has e.g. the meaning of a second time derivative in Physics -- which is typeset properly.
  $endgroup$
  – Kagaratsch
  Apr 9 at 12:37
  
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  For Umlaut characters you only get äëïöüÿ from the font set but not the others. That wasn't my point though. All I'm saying is that the size of the dots and their distance must be appropriate for the chosen font, otherwise it looks very bad for a native speaker of German, Turkish, Swedish, French, etc. If you don't care about the aesthetics, then all the given solutions work, sure.
  $endgroup$
  – Roman
  Apr 9 at 13:46
  

  
  
  
  

add a comment | 

$begingroup$

I wanted to make a notation with a double dot over a symbol in Mathematica. Searching online or in the documentation did not yield any results. However, just randomly attempting to give a second parameter to the OverDot function surprisingly did exactly what I needed:

I assume the red font suggests that Mathematica perceives this as a syntax mistake at some level, even though the output is as desired. Unfortunately, this does not work for three dots and more.

Is there a proper way to do this without red font appearing?

formatting

share|improve this question

asked Apr 9 at 1:08

KagaratschKagaratsch

4,92231350

$endgroup$

share|improve this question

asked Apr 9 at 1:08

KagaratschKagaratsch

4,92231350

share|improve this question

asked Apr 9 at 1:08

KagaratschKagaratsch

4,92231350

asked Apr 9 at 1:08

KagaratschKagaratsch

4,92231350

asked Apr 9 at 1:08

KagaratschKagaratsch

4,92231350

3 Answers
3

active

oldest

votes

13

$begingroup$

Use ToBoxes to find the boxes generated for OverDot[x, 2]:

OverDot[x,2] //ToBoxes

OverscriptBox["x", "¨"]

You can reproduce these boxes using Overscript:

Overscript[x, RawBoxes @ "¨"]

You can use the same approach for triple dots:

Overscript[x, RawBoxes @ "[TripleDot]"]

For more dots, you will have to use a different mechanism to generate the dots, e.g.:

Overscript[x, Style[Row[".",".",".","."],FontTracking->"Condensed"]]

Update

You could also overload OverDot to work with the 3 and higher versions (I also included @Michael's syntax information fix):

SyntaxInformation[OverDot] = "ArgumentsPattern" -> _, _.;
MakeBoxes[OverDot[a_, n_Integer?(GreaterThan[2])], StandardForm] := If[n==3,
 OverscriptBox[MakeBoxes[a], "[TripleDot]"],
 OverscriptBox[
 MakeBoxes[a],
 ToBoxes @ Style[Row[ConstantArray[".", n]], FontTracking->"Condensed"]
 ]
]

Then:

share|improve this answer

edited Apr 9 at 7:53

answered Apr 9 at 2:12

Carl WollCarl Woll

76.5k3100201

$endgroup$

add a comment | 

8

$begingroup$

You could fix the syntax highlighting, or ignore it. Here's a fix:

SyntaxInformation[OverDot] = "ArgumentsPattern" -> _, _.;

share|improve this answer

answered Apr 9 at 2:12

Michael E2Michael E2

151k12203484

$endgroup$

add a comment | 

3

$begingroup$

Go to the Basic math assistant palette and click on the template.

share|improve this answer

edited Apr 9 at 1:19

answered Apr 9 at 1:10

David G. StorkDavid G. Stork

25k22155

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  There indeed is a [DoubleDot] template, but it actually leads to an expression with the FullForm OverDot[X,2]! So the syntax is in fact intended, then I'm confused why Mathematica marks it in red font when typed in directly?
  $endgroup$
  – Kagaratsch
  Apr 9 at 1:13
  
  

  
  
  
  


• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  $begingroup$
  Yes... confusing. The documentation for OverDot shows only one argument... so the $2$ is somehow treated extraneously. (Perhaps a bug report is in order.)
  $endgroup$
  – David G. Stork
  Apr 9 at 1:21
  

  
  
  
  

add a comment | 

Your Answer

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

Sign up or log in

StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);

Sign up using Google

Sign up using Facebook

Sign up using Email and Password

Post as a guest

Name

Email

Required, but never shown

StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f194850%2ftypesetting-a-double-over-dot-on-top-of-a-symbol%23new-answer', 'question_page');

);

Post as a guest

Name

Email

Required, but never shown

13

$begingroup$

Use ToBoxes to find the boxes generated for OverDot[x, 2]:

OverDot[x,2] //ToBoxes

OverscriptBox["x", "¨"]

You can reproduce these boxes using Overscript:

Overscript[x, RawBoxes @ "¨"]

You can use the same approach for triple dots:

Overscript[x, RawBoxes @ "[TripleDot]"]

For more dots, you will have to use a different mechanism to generate the dots, e.g.:

Overscript[x, Style[Row[".",".",".","."],FontTracking->"Condensed"]]

Update

You could also overload OverDot to work with the 3 and higher versions (I also included @Michael's syntax information fix):

SyntaxInformation[OverDot] = "ArgumentsPattern" -> _, _.;
MakeBoxes[OverDot[a_, n_Integer?(GreaterThan[2])], StandardForm] := If[n==3,
 OverscriptBox[MakeBoxes[a], "[TripleDot]"],
 OverscriptBox[
 MakeBoxes[a],
 ToBoxes @ Style[Row[ConstantArray[".", n]], FontTracking->"Condensed"]
 ]
]

Then:

share|improve this answer

edited Apr 9 at 7:53

answered Apr 9 at 2:12

Carl WollCarl Woll

76.5k3100201

$endgroup$

add a comment | 

13

$begingroup$

Use ToBoxes to find the boxes generated for OverDot[x, 2]:

OverDot[x,2] //ToBoxes

OverscriptBox["x", "¨"]

You can reproduce these boxes using Overscript:

Overscript[x, RawBoxes @ "¨"]

You can use the same approach for triple dots:

Overscript[x, RawBoxes @ "[TripleDot]"]

For more dots, you will have to use a different mechanism to generate the dots, e.g.:

Overscript[x, Style[Row[".",".",".","."],FontTracking->"Condensed"]]

Update

You could also overload OverDot to work with the 3 and higher versions (I also included @Michael's syntax information fix):

SyntaxInformation[OverDot] = "ArgumentsPattern" -> _, _.;
MakeBoxes[OverDot[a_, n_Integer?(GreaterThan[2])], StandardForm] := If[n==3,
 OverscriptBox[MakeBoxes[a], "[TripleDot]"],
 OverscriptBox[
 MakeBoxes[a],
 ToBoxes @ Style[Row[ConstantArray[".", n]], FontTracking->"Condensed"]
 ]
]

Then:

share|improve this answer

edited Apr 9 at 7:53

answered Apr 9 at 2:12

Carl WollCarl Woll

76.5k3100201

$endgroup$

add a comment | 

$begingroup$

Use ToBoxes to find the boxes generated for OverDot[x, 2]:

OverDot[x,2] //ToBoxes

OverscriptBox["x", "¨"]

You can reproduce these boxes using Overscript:

Overscript[x, RawBoxes @ "¨"]

You can use the same approach for triple dots:

Overscript[x, RawBoxes @ "[TripleDot]"]

For more dots, you will have to use a different mechanism to generate the dots, e.g.:

Overscript[x, Style[Row[".",".",".","."],FontTracking->"Condensed"]]

Update

You could also overload OverDot to work with the 3 and higher versions (I also included @Michael's syntax information fix):

SyntaxInformation[OverDot] = "ArgumentsPattern" -> _, _.;
MakeBoxes[OverDot[a_, n_Integer?(GreaterThan[2])], StandardForm] := If[n==3,
 OverscriptBox[MakeBoxes[a], "[TripleDot]"],
 OverscriptBox[
 MakeBoxes[a],
 ToBoxes @ Style[Row[ConstantArray[".", n]], FontTracking->"Condensed"]
 ]
]

Then:

share|improve this answer

edited Apr 9 at 7:53

answered Apr 9 at 2:12

Carl WollCarl Woll

76.5k3100201

$endgroup$

OverDot[x,2] //ToBoxes

Overscript[x, RawBoxes @ "¨"]

Overscript[x, RawBoxes @ "[TripleDot]"]

Overscript[x, Style[Row[".",".",".","."],FontTracking->"Condensed"]]

SyntaxInformation[OverDot] = "ArgumentsPattern" -> _, _.;
MakeBoxes[OverDot[a_, n_Integer?(GreaterThan[2])], StandardForm] := If[n==3,
 OverscriptBox[MakeBoxes[a], "[TripleDot]"],
 OverscriptBox[
 MakeBoxes[a],
 ToBoxes @ Style[Row[ConstantArray[".", n]], FontTracking->"Condensed"]
 ]
]

share|improve this answer

edited Apr 9 at 7:53

answered Apr 9 at 2:12

Carl WollCarl Woll

76.5k3100201

answered Apr 9 at 2:12

Carl WollCarl Woll

76.5k3100201

answered Apr 9 at 2:12

Carl WollCarl Woll

76.5k3100201

8

$begingroup$

You could fix the syntax highlighting, or ignore it. Here's a fix:

SyntaxInformation[OverDot] = "ArgumentsPattern" -> _, _.;

share|improve this answer

answered Apr 9 at 2:12

Michael E2Michael E2

151k12203484

$endgroup$

add a comment | 

8

$begingroup$

You could fix the syntax highlighting, or ignore it. Here's a fix:

SyntaxInformation[OverDot] = "ArgumentsPattern" -> _, _.;

share|improve this answer

answered Apr 9 at 2:12

Michael E2Michael E2

151k12203484

$endgroup$

add a comment | 

$begingroup$

You could fix the syntax highlighting, or ignore it. Here's a fix:

SyntaxInformation[OverDot] = "ArgumentsPattern" -> _, _.;

share|improve this answer

answered Apr 9 at 2:12

Michael E2Michael E2

151k12203484

$endgroup$

SyntaxInformation[OverDot] = "ArgumentsPattern" -> _, _.;

share|improve this answer

answered Apr 9 at 2:12

Michael E2Michael E2

151k12203484

answered Apr 9 at 2:12

Michael E2Michael E2

151k12203484

answered Apr 9 at 2:12

Michael E2Michael E2

151k12203484

3

$begingroup$

Go to the Basic math assistant palette and click on the template.

share|improve this answer

edited Apr 9 at 1:19

answered Apr 9 at 1:10

David G. StorkDavid G. Stork

25k22155

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  There indeed is a [DoubleDot] template, but it actually leads to an expression with the FullForm OverDot[X,2]! So the syntax is in fact intended, then I'm confused why Mathematica marks it in red font when typed in directly?
  $endgroup$
  – Kagaratsch
  Apr 9 at 1:13
  
  

  
  
  
  


• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  $begingroup$
  Yes... confusing. The documentation for OverDot shows only one argument... so the $2$ is somehow treated extraneously. (Perhaps a bug report is in order.)
  $endgroup$
  – David G. Stork
  Apr 9 at 1:21
  

  
  
  
  

add a comment | 

3

$begingroup$

Go to the Basic math assistant palette and click on the template.

share|improve this answer

edited Apr 9 at 1:19

answered Apr 9 at 1:10

David G. StorkDavid G. Stork

25k22155

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  There indeed is a [DoubleDot] template, but it actually leads to an expression with the FullForm OverDot[X,2]! So the syntax is in fact intended, then I'm confused why Mathematica marks it in red font when typed in directly?
  $endgroup$
  – Kagaratsch
  Apr 9 at 1:13
  
  

  
  
  
  


• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  $begingroup$
  Yes... confusing. The documentation for OverDot shows only one argument... so the $2$ is somehow treated extraneously. (Perhaps a bug report is in order.)
  $endgroup$
  – David G. Stork
  Apr 9 at 1:21
  

  
  
  
  

add a comment | 

$begingroup$

Go to the Basic math assistant palette and click on the template.

share|improve this answer

edited Apr 9 at 1:19

answered Apr 9 at 1:10

David G. StorkDavid G. Stork

25k22155

$endgroup$

share|improve this answer

edited Apr 9 at 1:19

answered Apr 9 at 1:10

David G. StorkDavid G. Stork

25k22155

answered Apr 9 at 1:10

David G. StorkDavid G. Stork

25k22155

answered Apr 9 at 1:10

David G. StorkDavid G. Stork

25k22155