@@ -55,7 +55,7 @@ void tiling_export(
5555 {
5656 long int rhombCounter = 0 , pathCounter = 0 ;
5757 for ( rhId = 0 ; rhId < tlngP -> numFats + tlngP -> numThins ; rhId ++ )
58- if ( tlngP -> rhombii [rhId ].wantedPostScript )
58+ if ( tlngP -> rhombi [rhId ].wantedPostScript )
5959 tlngP -> wantedPostScriptRhombNum [rhId ] = (rhombCounter ++ );
6060 else
6161 tlngP -> wantedPostScriptRhombNum [rhId ] = -1 ;
@@ -68,9 +68,9 @@ void tiling_export(
6868
6969 (* numCharsThisFileP ) += fIndent (fp , indentDepth );
7070 (* numCharsThisFileP ) += fprintf (fp ,
71- "<< %% + tilingId=%" PRIi8 ", in which numFats=%li, numThins=%li, numPathsClosed=%li, numPathsOpen=%li, numWantedRhombii =%li, NumWantedPaths=%li\n" ,
71+ "<< %% + tilingId=%" PRIi8 ", in which numFats=%li, numThins=%li, numPathsClosed=%li, numPathsOpen=%li, numWantedRhombi =%li, NumWantedPaths=%li\n" ,
7272 tilingId , tlngP -> numFats , tlngP -> numThins , tlngP -> numPathsClosed , tlngP -> numPathsOpen ,
73- tlngP -> wantedPostScriptNumberRhombii , tlngP -> wantedPostScriptNumberPaths
73+ tlngP -> wantedPostScriptNumberRhombi , tlngP -> wantedPostScriptNumberPaths
7474 );
7575 (* numLinesThisFileP ) ++ ;
7676
@@ -108,8 +108,8 @@ void tiling_export(
108108
109109 (* numCharsThisFileP ) += fIndent (fp , 1 + indentDepth );
110110 (* numCharsThisFileP ) += fprintf (fp ,
111- "/wantedPostScriptNumberRhombii %li /wantedPostScriptNumberPaths %li %% [ WhollyOutside RhombOutPathIn RhombPartlyIn RhombWhollyIn ]\n" ,
112- tlngP -> wantedPostScriptNumberRhombii , tlngP -> wantedPostScriptNumberPaths
111+ "/wantedPostScriptNumberRhombi %li /wantedPostScriptNumberPaths %li %% [ WhollyOutside RhombOutPathIn RhombPartlyIn RhombWhollyIn ]\n" ,
112+ tlngP -> wantedPostScriptNumberRhombi , tlngP -> wantedPostScriptNumberPaths
113113 );
114114 (* numLinesThisFileP ) ++ ;
115115
@@ -174,32 +174,32 @@ void tiling_export(
174174 } // if exportPaths
175175
176176
177- if ( exportQ (Rhombii , exportFormat , tlngP , * numLinesThisFileP ) )
177+ if ( exportQ (Rhombi , exportFormat , tlngP , * numLinesThisFileP ) )
178178 {
179179 (* numCharsThisFileP ) += fIndent (fp , 1 + indentDepth );
180180 (* numCharsThisFileP ) += fprintf (fp ,
181- "/Rhombii %li array %% + /Rhombii : tilingId=%" PRIi8 ", numFats=%li, numThins=%li, wantedPostScriptNumberRhombii =%li, wantedPostScriptNumberPaths=%li\n" ,
182- tlngP -> wantedPostScriptNumberRhombii ,
181+ "/Rhombi %li array %% + /Rhombi : tilingId=%" PRIi8 ", numFats=%li, numThins=%li, wantedPostScriptNumberRhombi =%li, wantedPostScriptNumberPaths=%li\n" ,
182+ tlngP -> wantedPostScriptNumberRhombi ,
183183 tlngP -> tilingId , tlngP -> numFats , tlngP -> numThins ,
184- tlngP -> wantedPostScriptNumberRhombii , tlngP -> wantedPostScriptNumberPaths
184+ tlngP -> wantedPostScriptNumberRhombi , tlngP -> wantedPostScriptNumberPaths
185185 );
186186 (* numLinesThisFileP ) ++ ;
187187 // PostScript arrays limited to 2^16 elements, so outputting only those wanted.
188188 for (rhNumOutput = rhId = 0 ; rhId < tlngP -> numFats + tlngP -> numThins ; rhId ++ )
189- if ( tlngP -> rhombii [rhId ].wantedPostScript )
189+ if ( tlngP -> rhombi [rhId ].wantedPostScript )
190190 {
191191 (* numCharsThisFileP ) += fIndent (fp , 2 + indentDepth );
192192 (* numCharsThisFileP ) += fprintf (fp , "dup %li " , rhNumOutput ++ );
193- rhombus_export (fp , exportFormat , tlngP , tlngP -> rhombii + rhId , (rhId < tlngP -> numFats + tlngP -> numThins - 1 ), numCharsThisFileP );
193+ rhombus_export (fp , exportFormat , tlngP , tlngP -> rhombi + rhId , (rhId < tlngP -> numFats + tlngP -> numThins - 1 ), numCharsThisFileP );
194194 (* numCharsThisFileP ) += fprintf (fp , " put\n" );
195195 (* numLinesThisFileP ) ++ ;
196196 }
197197 (* numCharsThisFileP ) += fIndent (fp , 1 + indentDepth );
198198 (* numCharsThisFileP ) += fprintf (fp ,
199- "%% - /Rhombii : tilingId=%" PRIi8 ", numFats=%li, numThins=%li, numPathsClosed=%li, "
200- "numPathsOpen=%li, wantedPostScriptNumberRhombii =%li, wantedPostScriptNumberPaths=%li\n" ,
199+ "%% - /Rhombi : tilingId=%" PRIi8 ", numFats=%li, numThins=%li, numPathsClosed=%li, "
200+ "numPathsOpen=%li, wantedPostScriptNumberRhombi =%li, wantedPostScriptNumberPaths=%li\n" ,
201201 tilingId , tlngP -> numFats , tlngP -> numThins , tlngP -> numPathsClosed , tlngP -> numPathsOpen ,
202- tlngP -> wantedPostScriptNumberRhombii , tlngP -> wantedPostScriptNumberPaths
202+ tlngP -> wantedPostScriptNumberRhombi , tlngP -> wantedPostScriptNumberPaths
203203 );
204204 (* numLinesThisFileP ) ++ ;
205205 (* numCharsThisFileP ) += fprintf (fp ,
@@ -209,15 +209,15 @@ void tiling_export(
209209 TextLicence , TextURL , TextAuthor
210210 );
211211 (* numLinesThisFileP ) += 3 ;
212- } // if exportRhombii
212+ } // if exportRhombi
213213
214214 (* numCharsThisFileP ) += fIndent (fp , indentDepth );
215215 (* numCharsThisFileP ) += fprintf (fp , ">> %% - tilingId=%" PRIi8 "\n" , tilingId );
216216 (* numLinesThisFileP ) ++ ;
217217 (* numCharsThisFileP ) += fIndent (fp , indentDepth );
218218 (* numCharsThisFileP ) += fprintf (fp ,
219- "(After ) usertime usertimeStart sub 1000 div 12 string cvs Concatenate ( seconds execution, interpreted tilingId=%" PRIi8 ", containing %li rhombii ) Concatenate = flush\n" ,
220- tilingId , tlngP -> wantedPostScriptNumberRhombii
219+ "(After ) usertime usertimeStart sub 1000 div 12 string cvs Concatenate ( seconds execution, interpreted tilingId=%" PRIi8 ", containing %li rhombi ) Concatenate = flush\n" ,
220+ tilingId , tlngP -> wantedPostScriptNumberRhombi
221221 );
222222 (* numLinesThisFileP ) ++ ;
223223
@@ -290,9 +290,9 @@ void tiling_export(
290290
291291 (* numCharsThisFileP ) += fIndent (fp , 1 + indentDepth );
292292 (* numCharsThisFileP ) += fprintf (fp ,
293- "\"WantedPostScriptNumberRhombii \":%li, \"WantedPostScriptNumberPaths\":%li,"
293+ "\"WantedPostScriptNumberRhombi \":%li, \"WantedPostScriptNumberPaths\":%li,"
294294 "\"Licence\":\"%s\", \"URL\":\"%s\", \"Author\":\"%s\"," "\n" ,
295- tlngP -> wantedPostScriptNumberRhombii , tlngP -> wantedPostScriptNumberPaths ,
295+ tlngP -> wantedPostScriptNumberRhombi , tlngP -> wantedPostScriptNumberPaths ,
296296 TextLicence , TextURL , TextAuthor
297297 );
298298 (* numLinesThisFileP ) ++ ;
@@ -330,23 +330,23 @@ void tiling_export(
330330 (* numLinesThisFileP ) ++ ;
331331 } // if exportPaths
332332
333- if ( exportQ (Rhombii , exportFormat , tlngP , * numLinesThisFileP ) )
333+ if ( exportQ (Rhombi , exportFormat , tlngP , * numLinesThisFileP ) )
334334 {
335335 (* numCharsThisFileP ) += fIndent (fp , 1 + indentDepth );
336- (* numCharsThisFileP ) += fprintf (fp , "\"Rhombii \":[\n" );
336+ (* numCharsThisFileP ) += fprintf (fp , "\"Rhombi \":[\n" );
337337 (* numLinesThisFileP ) ++ ;
338338 for (rhId = 0 ; rhId < tlngP -> numFats + tlngP -> numThins ; rhId ++ )
339339 {
340340 (* numCharsThisFileP ) += fIndent (fp , 2 + indentDepth );
341- rhombus_export ( fp , exportFormat , tlngP , & (tlngP -> rhombii [rhId ]), (rhId < tlngP -> numFats + tlngP -> numThins - 1 ), numCharsThisFileP );
341+ rhombus_export ( fp , exportFormat , tlngP , & (tlngP -> rhombi [rhId ]), (rhId < tlngP -> numFats + tlngP -> numThins - 1 ), numCharsThisFileP );
342342 (* numCharsThisFileP ) += fprintf (fp , "\n" );
343343 (* numLinesThisFileP ) ++ ;
344344 } // rhId
345345
346346 (* numCharsThisFileP ) += fIndent (fp , 1 + indentDepth );
347347 (* numCharsThisFileP ) += fprintf (fp , "]\n" );
348348 (* numLinesThisFileP ) ++ ;
349- } // if exportRhombii
349+ } // if exportRhombi
350350
351351 (* numCharsThisFileP ) += fIndent (fp , indentDepth );
352352 (* numCharsThisFileP ) += fprintf (fp , notLast ? "},\n" : "}\n" );
@@ -362,7 +362,7 @@ void tiling_export(
362362 "\tT_%02" PRIi8 ".NumFats" "\tT_%02" PRIi8 ".NumThins" "\tT_%02" PRIi8 ".NumPathsClosed" "\tT_%02" PRIi8 ".NumPathsOpen" "\tT_%02" PRIi8 ".NumPathStats"
363363 "\tT_%02" PRIi8 ".MinX" "\tT_%02" PRIi8 ".MaxX" "\tT_%02" PRIi8 ".MinY" "\tT_%02" PRIi8 ".MaxY"
364364 "\tT_%02" PRIi8 ".WantedPostScriptCentreX" "\tT_%02" PRIi8 ".WantedPostScriptCentreY" "\tT_%02" PRIi8 ".WantedPostScriptAspect" "\tT_%02" PRIi8 ".WantedPostScriptHalfWidth" "\tT_%02" PRIi8 ".WantedPostScriptHalfHeight"
365- "\tT_%02" PRIi8 ".WantedPostScriptNumberRhombii " "\tT_%02" PRIi8 ".WantedPostScriptNumberPaths"
365+ "\tT_%02" PRIi8 ".WantedPostScriptNumberRhombi " "\tT_%02" PRIi8 ".WantedPostScriptNumberPaths"
366366 "\tT_%02" PRIi8 ".Licence" "\tT_%02" PRIi8 ".URL" "\tT_%02" PRIi8 ".Author" "\n" ,
367367 tlngP -> tilingId , tlngP -> tilingId , tlngP -> tilingId ,
368368 tlngP -> tilingId , tlngP -> tilingId , tlngP -> tilingId , tlngP -> tilingId , tlngP -> tilingId ,
@@ -386,7 +386,7 @@ void tiling_export(
386386 (* numCharsThisFileP ) += fprintf (fp , "%s" , scratchString );
387387 (* numCharsThisFileP ) += fprintf (fp ,
388388 "\t%li" "\t%li \t%s" "\t%s" "\t%s" "\n\n" ,
389- tlngP -> wantedPostScriptNumberRhombii , tlngP -> wantedPostScriptNumberPaths ,
389+ tlngP -> wantedPostScriptNumberRhombi , tlngP -> wantedPostScriptNumberPaths ,
390390 TextLicence , TextURL , TextAuthor // Do not stringClean() these, as that would mess with dots.
391391 );
392392 (* numLinesThisFileP ) += 2 ;
@@ -429,7 +429,7 @@ void tiling_export(
429429 } // pathId
430430 } // if ... exportQ(Paths, ...)
431431
432- if ( (tlngP -> numThins > 0 || tlngP -> numFats > 0 ) && exportQ (Rhombii , exportFormat , tlngP , * numLinesThisFileP ) )
432+ if ( (tlngP -> numThins > 0 || tlngP -> numFats > 0 ) && exportQ (Rhombi , exportFormat , tlngP , * numLinesThisFileP ) )
433433 {
434434 (* numCharsThisFileP ) += fprintf (fp , "\n" );
435435 (* numLinesThisFileP ) ++ ;
@@ -438,11 +438,11 @@ void tiling_export(
438438 (* numLinesThisFileP ) ++ ;
439439 for (rhId = 0 ; rhId < tlngP -> numFats + tlngP -> numThins ; rhId ++ )
440440 {
441- rhombus_export (fp , exportFormat , tlngP , & (tlngP -> rhombii [rhId ]), (rhId < tlngP -> numFats + tlngP -> numThins - 1 ), numCharsThisFileP );
441+ rhombus_export (fp , exportFormat , tlngP , & (tlngP -> rhombi [rhId ]), (rhId < tlngP -> numFats + tlngP -> numThins - 1 ), numCharsThisFileP );
442442 (* numCharsThisFileP ) += fprintf (fp , "\n" );
443443 (* numLinesThisFileP ) ++ ;
444444 } // rhId
445- } // if ... exportQ(Rhombii , ...)
445+ } // if ... exportQ(Rhombi , ...)
446446
447447 (* numCharsThisFileP ) += fprintf (fp , "\n\n\n" );
448448 (* numLinesThisFileP ) += 3 ;
0 commit comments