How to resolve the algorithm Cantor set step by step in the Phixmonti programming language

Published on 12 May 2024 09:40 PM
#Phixmonti

How to resolve the algorithm Cantor set step by step in the Phixmonti programming language

Table of Contents

Problem Statement

Draw a Cantor set.

See details at this Wikipedia webpage:   Cantor set

Let's start with the solution:

Step by Step solution about How to resolve the algorithm Cantor set step by step in the Phixmonti programming language

Source code in the phixmonti programming language

include ..\Utilitys.pmt

5 >ps
3 tps 1 - power var w
"#" 1 get nip w repeat var line

ps> for
    3 swap 1 - power
    w over / int var step
    true >ps
    for var j
    	tps not if
            step for var k
            	line 32 j 1 - step * k + set var line
            endfor
        endif
        ps> not >ps
    endfor
    cps
    line ?
endfor

include ..\Utilitys.pmt

5 >ps
3 tps 1 - power var w
"#" 1 get nip w repeat var line

( 2 ps> ) for
    line ?
    3 swap 1 - power
    w over / int var step
    2 swap 2 3 tolist for var j
        step for var k
            line 32 j 1 - step * k + set var line
        endfor
    endfor
endfor
line ?

You may also check:How to resolve the algorithm Intersecting number wheels step by step in the Julia programming language
You may also check:How to resolve the algorithm Conditional structures step by step in the ColdFusion programming language
You may also check:How to resolve the algorithm Start from a main routine step by step in the XPL0 programming language
You may also check:How to resolve the algorithm Random numbers step by step in the REXX programming language
You may also check:How to resolve the algorithm Pythagorean triples step by step in the CoffeeScript programming language