[General]
SILevel=0
MFTimer=3
CreationTime=01D575F10F0658E0
Feature0=Hypercomplex
Feature1=Hyperator
Version=0.03

[Globals]
:0=V C 3 1 3 '{quad}DM'
:1=V C 0 1 0 ''
:2=V C 7 1 7 '.,*0_{overbar}J'
:3=V I 5 1 5 0 0 0 0 0
Count=46
:4=V I 29 1 29 3 4 3 2 2 1 2 2 2 2 2 2 2 4 3 1 2 0 3 2 2 1 2 2 1 5 2 2 2
:5=V C 8 1 8 'describe'
:7=F 7.init
:9=F 9.DFT
:11=F 11.iDFT
:13=F 13.hDFT
:15=F 15.hiDFT
:17=F 17.hFourierSine
:19=F 19.hFourierCosine
:21=F 21.hHartley
:23=F 23.hLaplace
:25=F 25.hMellin
:27=F 27.hStirling
:29=F 29.hWeierstrass
:31=F 31.hBinomial
:35=F 35.dto
:37=F 37.run
:39=F 39.hDFT0
:41=F 41.hiDFT0
:43=F 43.describe
:45=F 45.find

[Vars.0]
Count=17
0={quad}alx=:0
1={quad}ct=F 1 0 3E-15
2={quad}dm=:1
3={quad}lr=C 1 0 'r'
4={quad}dt=C 1 0 'r'
5={quad}elx=:0
6={quad}fc=:2
7={quad}feature=:3
8={quad}fpc=I 1 0 512
9={quad}ic=:4
10={quad}io=B 1 0 0
11={quad}lx=:5
12={quad}pp=I 1 0 8
13={quad}pr=C 1 0 ' '
14={quad}pw=I 1 0 50
15={quad}rl=I 1 0 1745365914586
16={quad}sa=:1

[Fcns.0]
Count=20
0=init=2=:7
1=DFT=3=:9
2=iDFT=3=:11
3=hDFT=3=:13
4=hiDFT=3=:15
5=hFourierSine=3=:17
6=hFourierCosine=3=:19
7=hHartley=3=:21
8=hLaplace=3=:23
9=hMellin=3=:25
10=hStirling=3=:27
11=hWeierstrass=3=:29
12=hBinomial=3=:31
13=hChebyshev=3=:19
14=dto=9=:35
15=run=2=:37
16=hDFT0=2=:39
17=hiDFT0=2=:41
18=describe=2=:43
19=find=3=:45

[7.init]
0=init
1={quad}IO{leftarrow}0
2=DFT {leftarrow} {leftbrace}{omega}+.{times} *({iota}{rho}{omega}){jot}.{times}({iota}{rho}{omega}){times}{circle}0J{overbar}2{colonbar}{rho}{omega}{rightbrace}
3=iDFT{leftarrow} {leftbrace}{omega}+.{times}(*({iota}{rho}{omega}){jot}.{times}({iota}{rho}{omega}){times}{circle}0J2 {colonbar}{rho}{omega}){colonbar}{rho}{omega}{rightbrace}
4=hDFT  {leftarrow} {leftbrace}   *({iota}{rho}{omega}){jot}.{times}({iota}{rho}{omega}){times}{circle}0J{overbar}2{colonbar}{rho}{omega}    {rightbrace}
5=hiDFT {leftarrow} {leftbrace}(  *({iota}{rho}{omega}){jot}.{times}({iota}{rho}{omega}){times}{circle}0J2 {colonbar}{rho}{omega}){colonbar}{rho}{omega}{rightbrace}
6=hFourierSine {leftarrow} {leftbrace}1{circle}(1+{iota}{rho}{omega}){jot}.{times}{circle}(1+{iota}{rho}{omega}){colonbar}1+{rho}{omega}{rightbrace}
7=hFourierCosine {leftarrow} {leftbrace}2{circle}(0.5+{iota}{rho}{omega}){jot}.{times}{circle}({iota}{rho}{omega}){colonbar}{rho}{omega}{rightbrace}
8=hHartley {leftarrow} {leftbrace}+{slashbar}2 1{jot}.{circle}({iota}{rho}{omega}){jot}.{times}({iota}{rho}{omega}){times}{circle}2{colonbar}{rho}{omega}{rightbrace}
9=hLaplace {leftarrow} {leftbrace}*({iota}{rho}{omega}){jot}.{times}-{iota}{rho}{omega}{rightbrace}
10=hMellin {leftarrow} {leftbrace}(1+{iota}{rho}{omega}){jot}.*{iota}{rho}{omega}{rightbrace}
11=hStirling {leftarrow} {leftbrace}102{\x203C}{dieresis}({iota}{rho}{omega}){jot}.,{iota}{rho}{omega}{rightbrace}
12=hWeierstrass {leftarrow} {leftbrace}*{overbar}0.25{times}(({iota}{rho}{omega}){jot}.-{iota}{rho}{omega})*2{rightbrace}
13=hBinomial {leftarrow} {leftbrace}({iota}{rho}{omega}){jot}.!{iota}{rho}{omega}{rightbrace}
14=hChebyshev {leftarrow} hFourierCosine
15=dto {leftarrow} {leftbrace}{alpha}{alpha} {alpha}{alpha}{alpha}{transform}{omega}{omega} {omega}{rightbrace}
Count=16
UserDefined=1
Undo=135 D 4 6 0, D 6 48 1, D 48 50 0, D 50 241 2, S 96 97 3, I 96 0 3 ')', S 95 96 4, I 95 0 4 '1', S 94 95 5, I 94 0 5 '1', S 93 94 6, I 93 0 6 '(', S 92 93 7, I 92 0 7 '{space}', S 138 139 8, I 138 0 8 ')', S 137 138 9, I 137 0 9 '2', S 136 137 10, I 136 0 10 '1', S 135 136 11, I 135 0 11 '(', S 134 135 12, I 134 0 12 '{space}', S 166 167 13, I 166 0 13 ')', S 165 166 14, I 165 0 14 '3', S 164 165 15, I 164 0 15 '1', S 163 164 16, I 163 0 16 '(', S 162 163 17, I 162 0 17 '{space}', S 193 194 18, I 193 0 18 ')', S 192 193 19, I 192 0 19 '4', S 191 192 20, I 191 0 20 '1', S 190 191 21, I 190 0 21 '(', S 189 190 22, I 189 0 22 '{space}', D 221 223 0, D 223 262 23, D 262 264 0, D 264 323 24, S 293 294 25, I 293 0 25 ')', S 292 293 26, I 292 0 26 '7', S 291 292 27, I 291 0 27 '1', S 290 291 28, I 290 0 28 '(', S 289 290 29, I 289 0 29 '{space}', N 0 0 0, D 318 320 0, D 320 321 1, D 321 322 2, D 322 323 3, D 323 324 4, D 324 325 5, D 325 326 6, D 326 327 7, S 326 327 8, I 326 0 8 '{leftbrace}', D 326 339 8, N 0 0 0, D 6 8 0, D 6 94 1, S 49 50 2, I 49 0 2 ')', S 48 49 3, I 48 0 3 '0', S 47 48 4, I 47 0 4 '2', S 46 47 5, I 46 0 5 '(', S 45 46 6, I 45 0 6 'ý', S 44 45 7, I 44 0 7 'ý', S 46 47 8, I 46 0 8 '{space}', S 46 47 9, I 46 0 9 '{space}', S 46 47 10, I 46 0 10 '{space}', S 46 47 11, I 46 0 11 '{space}', N 0 0 0, S 34 35 1, I 34 0 1 '{overbar}', D 73 74 2, D 35 36 3, S 76 77 4, I 76 0 4 '{space}', N 0 0 0, D 4 6 0, D 6 41 1, D 53 54 2, D 72 73 3, S 113 114 4, I 113 0 4 '{overbar}', D 95 96 5, S 74 75 6, I 74 0 6 '{space}', D 114 115 7, N 0 0 0, D 4 6 0, D 6 7 1, D 7 8 2, D 8 9 3, D 9 10 4, D 10 11 5, N 0 0 0, D 48 50 0, D 50 85 1, D 50 51 2, S 54 55 3, I 54 0 3 '{space}', D 61 62 4, D 24 25 5, D 100 101 6, D 142 143 7, S 81 82 8, I 81 0 8 '{overbar}', D 82 83 9, D 86 87 10, D 87 88 11, D 88 89 12, D 89 90 13
CreationTime=01D4FC46C1FF47B0
LastModTime=01D56CE50DE83510

[9.DFT]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}{del}{omega}
1={omega}+.{times} *({iota}{rho}{omega}){jot}.{times}({iota}{rho}{omega}){times}{circle}0J{overbar}2{colonbar}{rho}{omega}
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510060C00
LastModTime=01D56CE510060C00

[11.iDFT]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}{del}{omega}
1={omega}+.{times}(*({iota}{rho}{omega}){jot}.{times}({iota}{rho}{omega}){times}{circle}0J2 {colonbar}{rho}{omega}){colonbar}{rho}{omega}
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510060C00
LastModTime=01D56CE510060C00

[13.hDFT]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}{del}{omega}
1=   *({iota}{rho}{omega}){jot}.{times}({iota}{rho}{omega}){times}{circle}0J{overbar}2{colonbar}{rho}{omega}
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510060C00
LastModTime=01D56CE510060C00

[15.hiDFT]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}{del}{omega}
1=(  *({iota}{rho}{omega}){jot}.{times}({iota}{rho}{omega}){times}{circle}0J2 {colonbar}{rho}{omega}){colonbar}{rho}{omega}
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510060C00
LastModTime=01D56CE510060C00

[17.hFourierSine]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}{del}{omega}
1=1{circle}(1+{iota}{rho}{omega}){jot}.{times}{circle}(1+{iota}{rho}{omega}){colonbar}1+{rho}{omega}
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510063310
LastModTime=01D56CE510063310

[19.hFourierCosine]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}{del}{omega}
1=2{circle}(0.5+{iota}{rho}{omega}){jot}.{times}{circle}({iota}{rho}{omega}){colonbar}{rho}{omega}
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510063310
LastModTime=01D56CE510063310

[21.hHartley]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}{del}{omega}
1=+{slashbar}2 1{jot}.{circle}({iota}{rho}{omega}){jot}.{times}({iota}{rho}{omega}){times}{circle}2{colonbar}{rho}{omega}
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510063310
LastModTime=01D56CE510063310

[23.hLaplace]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}{del}{omega}
1=*({iota}{rho}{omega}){jot}.{times}-{iota}{rho}{omega}
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510063310
LastModTime=01D56CE510063310

[25.hMellin]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}{del}{omega}
1=(1+{iota}{rho}{omega}){jot}.*{iota}{rho}{omega}
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510063310
LastModTime=01D56CE510063310

[27.hStirling]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}{del}{omega}
1=102{\x203C}{dieresis}({iota}{rho}{omega}){jot}.,{iota}{rho}{omega}
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510063310
LastModTime=01D56CE510063310

[29.hWeierstrass]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}{del}{omega}
1=*{overbar}0.25{times}(({iota}{rho}{omega}){jot}.-{iota}{rho}{omega})*2
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510063310
LastModTime=01D56CE510063310

[31.hBinomial]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}{del}{omega}
1=({iota}{rho}{omega}){jot}.!{iota}{rho}{omega}
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510063310
LastModTime=01D56CE510063310

[35.dto]
0={quad}Z{leftarrow}{leftbrace}{alpha}{rightbrace}({alpha}{alpha}({alpha}{alpha}{alpha}{del}{del}{del}){omega}{omega}){omega}
1={alpha}{alpha} {alpha}{alpha}{alpha}{transform}{omega}{omega} {omega}
Count=2
UserDefined=1
AFO=1
Undo=0
CreationTime=01D56CE510065A20
LastModTime=01D56CE510065A20

[37.run]
0=run
Count=1
UserDefined=1
Undo=0
CreationTime=01D53E7BF7C74970
LastModTime=01D53FDFA956C2B0

[39.hDFT0]
0=hDFT0
Count=1
UserDefined=1
Undo=0
CreationTime=01D53E2FA2052990
LastModTime=01D53FDFA9569BA0

[41.hiDFT0]
0=hiDFT0
Count=1
UserDefined=1
Undo=0
CreationTime=01D53E2FA206FE50
LastModTime=01D53FDFA9569BA0

[43.describe]
0=describe
Count=1
UserDefined=1
Undo=0
CreationTime=01D53FC10E23C180
LastModTime=01D53FDFA9569BA0

[45.find]
0={leftbrace}L314159{rightbrace} find R314159;{quad}IO nr314159 v314159
1={lamp} Find the text R in any of the UDFOs in the workspace
2={quad}IO{leftarrow}0
3=
4=:if 0={quad}NC {apostrophe}L314159{apostrophe} {diamond} L314159{leftarrow}{quad}NL 3 4 {diamond} :end
5=
6={lamp} Loop through the UDFOs
7=:forlcl fnop314159 :in {leftshoe}[1] ({overbar}2{uparrow}1 1,{rho}L314159){rho}L314159
8=nr314159{leftarrow}1 {quad}cr fnop314159 {lamp} Get the Nested Representation
9=v314159{leftarrow}{downcaret}/{dieresis}R314159{jot}{epsilonunderbar}{dieresis}nr314159   {lamp} Is the text found per line?
10=:if 1{epsilon}v314159       {lamp} If the text is on some line, ...
11=  (fnop314159~{apostrophe} {apostrophe}),,{apostrophe}P<(>Q<)>I5{apostrophe} {quad}fmt +/v314159
12={lamp}{lamp}(2{downarrow},{quad}TCNL,{quad}TCLF,{leftbrace}a{leftarrow}{omega} {diamond} a[{iotaunderbar}{circlestile}{upcaret}{slope}{circlestile}a={apostrophe} {apostrophe}]{leftarrow}{quad}TCNUL {diamond} a{rightbrace}{dieresisjot}1 (0 1){downarrow}{downtackjot}({apostrophe}P<[>Q<]>I5{apostrophe} {quad}fmt {iotaunderbar}v),v/nr)~{quad}TCNUL
13={lamp}{lamp}{commabar}{leftbrace}(~{circlestile}{upcaret}{slope}{circlestile}{omega}={apostrophe} {apostrophe})/{omega}{rightbrace}{dieresis}{leftshoe}[1] 0 1{downarrow}{downtackjot}({apostrophe}P<[>Q<]>I5{apostrophe} {quad}fmt {iotaunderbar}v),v/nr
14={lamp}{lamp}{lamp}{lamp}{epsilon}2{downarrow}{dieresis},{dieresis}{quad}TCNL,{dieresis}{quad}TCLF,{dieresis}{leftbrace}(~{circlestile}{upcaret}{slope}{circlestile}{omega}={apostrophe} {apostrophe})/{omega}{rightbrace}{dieresis}{leftshoe}[1] 0 1{downarrow}{downtackjot}({apostrophe}P<[>Q<]>I5{apostrophe} {quad}fmt {iotaunderbar}v),v/nr
15=  {overbar}2{downarrow}{rightshoe},/({leftbrace}(~{circlestile}{upcaret}{slope}{circlestile}{omega}={apostrophe} {apostrophe})/{omega}{rightbrace}{dieresis}{leftshoe}[1] 0 1{downarrow}{downtackjot}({apostrophe}P<[>Q<]>I5{apostrophe} {quad}fmt {iotaunderbar}v314159),v314159/nr314159),{dieresis}{quad}TCNL,{dieresis}{quad}TCLF
16=:endif
17=:endforlcl
Count=18
UserDefined=1
Undo=255 T 371 372 0, T 371 372 0, D 371 372 1, D 372 373 2, D 373 374 3, D 374 375 4, D 375 376 5, D 376 377 6, N 0 0 0, S 363 364 1, I 363 0 1 '1', D 363 364 2, N 0 0 0, D 362 363 1, D 363 364 2, D 457 459 0, D 459 514 3, T 480 481 0, R 480 0 4 '(', S 484 485 5, I 484 0 5 ')', T 459 460 0, D 459 460 6, D 460 461 7, D 461 462 8, S 461 462 9, I 461 0 9 '{downarrow}', S 460 461 10, I 460 0 10 '1', D 509 510 11, D 510 511 12, S 510 511 13, I 510 0 13 '{lamp}', S 509 510 14, I 509 0 14 '{lamp}', N 0 0 0, D 514 516 0, D 516 590 1, D 459 460 2, D 460 461 3, D 461 462 4, D 462 463 5, S 459 460 6, I 459 0 6 '{lamp}', S 459 460 7, I 459 0 7 '{lamp}', S 459 460 8, I 459 0 8 '{lamp}', S 459 460 9, I 459 0 9 '{lamp}', D 516 517 10, D 517 518 11, D 518 519 12, D 519 520 13, D 459 460 14, D 460 461 15, D 596 598 0, D 598 672 16, S 598 599 17, I 598 0 17 '{epsilon}', S 598 599 18, I 598 0 18 '2', S 598 599 19, I 598 0 19 '{downarrow}', S 598 599 20, I 598 0 20 '{dieresis}', S 598 599 21, I 598 0 21 '{comma}', S 598 599 22, I 598 0 22 '{dieresis}', S 598 599 23, I 598 0 23 '{quad}', S 598 599 24, I 598 0 24 'T', S 598 599 25, I 598 0 25 'C', S 598 599 26, I 598 0 26 'N', S 598 599 27, I 598 0 27 'L', S 598 599 28, I 598 0 28 '{comma}', S 598 599 29, I 598 0 29 '{dieresis}', S 598 599 30, I 598 0 30 '{quad}', S 598 599 31, I 598 0 31 'T', S 598 599 32, I 598 0 32 'C', S 598 599 33, I 598 0 33 'L', S 598 599 34, I 598 0 34 'F', S 598 599 35, I 598 0 35 '{comma}', S 598 599 36, I 598 0 36 '{dieresis}', D 598 599 37, D 599 600 38, D 600 601 39, D 601 602 40, D 602 603 41, D 603 604 42, D 604 605 43, D 605 606 44, D 606 607 45, D 607 608 46, D 608 609 47, D 602 603 48, D 603 604 49, D 604 605 50, D 605 606 51, D 606 607 52, D 607 608 53, S 607 608 54, I 607 0 54 '{jot}', D 607 608 55, D 608 609 56, D 602 603 57, S 602 603 58, I 602 0 58 '{epsilon}', D 602 603 59, D 603 604 60, S 602 603 61, I 602 0 61 '.', D 602 603 62, D 602 603 63, S 602 603 64, I 602 0 64 '{rightshoe}', S 602 603 65, I 602 0 65 '{comma}', S 602 603 66, I 602 0 66 '/', D 327 328 67, S 327 328 68, I 327 0 68 '{zilde}', D 327 328 69, D 328 329 70, S 603 604 71, I 603 0 71 '{leftarrow}', S 602 603 72, I 602 0 72 '{quad}', S 601 602 73, I 601 0 73 '{dieresis}', S 600 601 74, I 600 0 74 '{rho}', S 328 329 75, I 328 0 75 '{leftarrow}', S 327 328 76, I 327 0 76 '{quotequad}', S 670 671 77, I 670 0 77 '\'', S 669 670 78, I 669 0 78 '{space}', S 668 669 79, I 668 0 79 '\'', D 612 613 80, D 667 668 81, D 668 669 82, D 669 670 83, D 670 671 84, D 671 672 85, D 672 673 86, D 673 674 87, D 674 675 88, D 675 676 89, S 675 676 90, I 675 0 90 ':', D 675 676 91, D 676 677 92, D 677 678 93, D 678 679 94, D 679 680 95, D 680 681 96, D 681 682 97, S 598 599 98, I 598 0 98 '{quad}', S 598 599 99, I 598 0 99 'T', S 598 599 100, I 598 0 100 'C', S 598 599 101, I 598 0 101 'N', S 598 599 102, I 598 0 102 'L', S 598 599 103, I 598 0 103 '{comma}', S 598 599 104, I 598 0 104 '{dieresis}', S 598 599 105, I 598 0 105 '{quad}', S 598 599 106, I 598 0 106 'T', S 598 599 107, I 598 0 107 'C', S 598 599 108, I 598 0 108 'L', S 598 599 109, I 598 0 109 'F', S 598 599 110, I 598 0 110 '{comma}', S 598 599 111, I 598 0 111 '{dieresis}', N 0 0 0, D 2 3 1, D 3 4 2, D 4 5 3, D 5 6 4, D 6 7 5, D 7 8 6, D 16 17 7, D 17 18 8, D 18 19 9, D 19 20 10, D 20 21 11, D 21 22 12, D 31 32 13, D 32 33 14, D 33 34 15, D 34 35 16, D 35 36 17, D 36 37 18, D 116 122 19, D 127 133 20, D 210 216 21, D 219 225 22, D 275 281 23, D 286 292 24, D 338 344 25, D 387 388 26, D 388 389 27, D 422 428 28, D 715 721 29, D 724 730 30, D 733 739 31, D 29 35 32, D 672 673 33, D 673 674 34, S 764 766 35, I 764 0 35 '\r', I 764 0 35 '\n', D 303 309 36, D 235 241 37, D 196 202 38, D 258 264 39, D 424 430 40, N 0 0 0, D 704 705 1, N 0 0 0, D 704 705 1, D 705 706 2, D 706 707 3, D 708 709 4, D 709 710 5
CreationTime=01CB8110FCDDDF50
LastModTime=01D575F0EB87E410