Quad-PLOT slight problems

Thu, 13 Aug 2020 21:07:54 -0700 

I've included a "Plot" workspace, self contained, to show the tiny problems I 
encountered.

First I was very surprized that ⎕PLOT was ⎕IO sensitive, but I overcome that 
(as a feature),
and I concluded that with ⎕IO=0 was the kind of plot I wanted.

Second, I wrote (still in work) a function named "Plot" that can plot matrix 
lines on a graph
but I discovered that some "point_style-N:" do not resize well with some 
"point_size-N:"

"line_color-N:" work fine as I can tell (I'm a bit colorblind btw)

To see what I mean, use the line below in the workspace:

      Plot sort_by_lines 1 makemat 24

and increase the "1" to "2"   and continue up to "7"

      Plot sort_by_lines 7 makemat 24

at that point it should display a graph with seven lines (enlarge the plot 
window as needed)

you will notice that some of the (0..6) lines have different "point_size-N:"
and at least 2 of thems are displaying Huge and one is looking absent.

my 2 usual cents,

Xtian.

<?xml version='1.0' encoding='UTF-8' standalone='yes'?>

<!DOCTYPE Workspace
[
    <!ELEMENT Workspace (Value*,Ravel*,SymbolTable,Symbol*,Commands,StateIndicator)>
    <!ATTLIST Workspace  wsid       CDATA #REQUIRED>
    <!ATTLIST Workspace  year       CDATA #REQUIRED>
    <!ATTLIST Workspace  month      CDATA #REQUIRED>
    <!ATTLIST Workspace  day        CDATA #REQUIRED>
    <!ATTLIST Workspace  hour       CDATA #REQUIRED>
    <!ATTLIST Workspace  minute     CDATA #REQUIRED>
    <!ATTLIST Workspace  second     CDATA #REQUIRED>
    <!ATTLIST Workspace  timezone   CDATA #REQUIRED>
    <!ATTLIST Workspace  saving_SVN CDATA #REQUIRED>

        <!ELEMENT Value (#PCDATA)>
        <!ATTLIST Value flg    CDATA #REQUIRED>
        <!ATTLIST Value vid    CDATA #REQUIRED>
        <!ATTLIST Value parent CDATA #IMPLIED>
        <!ATTLIST Value rk     CDATA #REQUIRED>
        <!ATTLIST Value sh-0   CDATA #IMPLIED>
        <!ATTLIST Value sh-1   CDATA #IMPLIED>
        <!ATTLIST Value sh-2   CDATA #IMPLIED>
        <!ATTLIST Value sh-3   CDATA #IMPLIED>
        <!ATTLIST Value sh-4   CDATA #IMPLIED>
        <!ATTLIST Value sh-5   CDATA #IMPLIED>
        <!ATTLIST Value sh-6   CDATA #IMPLIED>
        <!ATTLIST Value sh-7   CDATA #IMPLIED>

        <!ELEMENT Ravel (#PCDATA)>
        <!ATTLIST Ravel vid    CDATA #REQUIRED>
        <!ATTLIST Ravel cells  CDATA #REQUIRED>

        <!ELEMENT SymbolTable (Symbol*)>
        <!ATTLIST SymbolTable size CDATA #REQUIRED>

            <!ELEMENT Symbol (unused-name|Variable|Function|Label|Shared-Variable)*>
            <!ATTLIST Symbol name       CDATA #REQUIRED>
            <!ATTLIST Symbol stack-size CDATA #REQUIRED>

                <!ELEMENT unused-name EMPTY>

                <!ELEMENT Variable (#PCDATA)>
                <!ATTLIST Variable vid CDATA #REQUIRED>

                <!ELEMENT Function (UCS)>
                <!ATTLIST Function creation-time   CDATA #IMPLIED>
                <!ATTLIST Function exec-properties CDATA #IMPLIED>

                <!ELEMENT Label (#PCDATA)>
                <!ATTLIST Label value CDATA #REQUIRED>

                <!ELEMENT Shared-Variable (#PCDATA)>
                <!ATTLIST Shared-Variable key CDATA #REQUIRED>

        <!ELEMENT UCS (#PCDATA)>
        <!ATTLIST UCS uni CDATA #REQUIRED>

        <!ELEMENT Commands (Command*)>
        <!ATTLIST Commands size CDATA #REQUIRED>

            <!ELEMENT Command (#PCDATA)>
            <!ATTLIST Command name       CDATA #REQUIRED>
            <!ATTLIST Command mode       CDATA #REQUIRED>
            <!ATTLIST Command fun       CDATA #REQUIRED>

        <!ELEMENT StateIndicator (SI-entry*)>
        <!ATTLIST StateIndicator levels CDATA #REQUIRED>

            <!ELEMENT SI-entry ((Execute|Statements|UserFunction),Parser+)>
            <!ATTLIST SI-entry level     CDATA #REQUIRED>
            <!ATTLIST SI-entry pc        CDATA #REQUIRED>
            <!ATTLIST SI-entry line      CDATA #REQUIRED>

                <!ELEMENT Statements (UCS)>

                <!ELEMENT Execute (UCS)>

                <!ELEMENT UserFunction (#PCDATA)>
                <!ATTLIST UserFunction ufun-name       CDATA #IMPLIED>
                <!ATTLIST UserFunction macro-num       CDATA #IMPLIED>
                <!ATTLIST UserFunction lambda-name     CDATA #IMPLIED>
                <!ATTLIST UserFunction symbol-level    CDATA #IMPLIED>

                <!ELEMENT Parser (Token*)>
                <!ATTLIST Parser size           CDATA #REQUIRED>
                <!ATTLIST Parser assign-pending CDATA #REQUIRED>
                <!ATTLIST Parser lookahead-high CDATA #REQUIRED>
                <!ATTLIST Parser action         CDATA #REQUIRED>
                    <!ELEMENT Token (#PCDATA)>
                    <!ATTLIST Token pc           CDATA #REQUIRED>
                    <!ATTLIST Token tag          CDATA #REQUIRED>
                    <!ATTLIST Token char         CDATA #IMPLIED>
                    <!ATTLIST Token int          CDATA #IMPLIED>
                    <!ATTLIST Token float        CDATA #IMPLIED>
                    <!ATTLIST Token real         CDATA #IMPLIED>
                    <!ATTLIST Token imag         CDATA #IMPLIED>
                    <!ATTLIST Token sym          CDATA #IMPLIED>
                    <!ATTLIST Token line         CDATA #IMPLIED>
                    <!ATTLIST Token vid          CDATA #IMPLIED>
                    <!ATTLIST Token index        CDATA #IMPLIED>
                    <!ATTLIST Token fun-id       CDATA #IMPLIED>
                    <!ATTLIST Token ufun-name    CDATA #IMPLIED>
                    <!ATTLIST Token symbol-level CDATA #IMPLIED>
                    <!ATTLIST Token comment      CDATA #IMPLIED>

]>


    <!-- hour/minute/second is )SAVE time in UTC (aka. GMT).
         timezone is offset to UTC in seconds.
         local time is UTC + offset -->
<Workspace wsid="Plot" year="2020" month="8" day="14"
           hour="3" minute="38" second="8" timezone="-14400"
           saving_SVN=" 1319">

  <Value flg="0x400" vid="0" parent="-1" rk="1" sh-0="21"/>
  <Value flg="0x400" vid="1" parent="-1" rk="1" sh-0="5"/>
  <Value flg="0x400" vid="2" parent="-1" rk="1" sh-0="256"/>
  <Value flg="0x400" vid="3" parent="-1" rk="1" sh-0="6"/>
  <Value flg="0x400" vid="4" parent="-1" rk="0"/>
  <Value flg="0x400" vid="5" parent="-1" rk="1" sh-0="61"/>
  <Value flg="0x400" vid="6" parent="-1" rk="0"/>
  <Value flg="0x400" vid="7" parent="-1" rk="0"/>
  <Value flg="0x400" vid="8" parent="-1" rk="0"/>
  <Value flg="0x400" vid="9" parent="-1" rk="0"/>
  <Value flg="0x400" vid="10" parent="-1" rk="0"/>
  <Value flg="0x400" vid="11" parent="-1" rk="0"/>
  <Value flg="0x400" vid="12" parent="-1" rk="1" sh-0="3"/>
  <Value flg="0x400" vid="13" parent="-1" rk="0"/>
  <Value flg="0x400" vid="14" parent="-1" rk="0"/>
  <Value flg="0x400" vid="15" parent="-1" rk="0"/>
  <Value flg="0x400" vid="16" parent="-1" rk="0"/>
  <Value flg="0x400" vid="17" parent="-1" rk="0"/>
  <Value flg="0x400" vid="18" parent="-1" rk="1" sh-0="2"/>
  <Value flg="0x400" vid="19" parent="-1" rk="0"/>
  <Value flg="0x400" vid="20" parent="-1" rk="1" sh-0="16"/>
  <Value flg="0x400" vid="21" parent="-1" rk="1" sh-0="3"/>
  <Value flg="0x400" vid="22" parent="-1" rk="0"/>
  <Value flg="0x400" vid="23" parent="-1" rk="0"/>
  <Value flg="0x400" vid="24" parent="-1" rk="1" sh-0="2"/>
  <Value flg="0x400" vid="25" parent="-1" rk="0"/>
  <Value flg="0x400" vid="26" parent="-1" rk="1" sh-0="2"/>
  <Value flg="0x400" vid="27" parent="-1" rk="0"/>
  <Value flg="0x400" vid="28" parent="26" rk="1" sh-0="2"/>
  <Value flg="0x400" vid="29" parent="-1" rk="0"/>
  <Value flg="0x400" vid="30" parent="-1" rk="0"/>
  <Value flg="0x400" vid="31" parent="-1" rk="1" sh-0="2"/>
  <Value flg="0x400" vid="32" parent="-1" rk="0"/>
  <Value flg="0x400" vid="33" parent="-1" rk="0"/>
  <Value flg="0x400" vid="34" parent="-1" rk="0"/>
  <Value flg="0x400" vid="35" parent="26" rk="1" sh-0="2"/>
  <Value flg="0x400" vid="36" parent="-1" rk="1" sh-0="14"/>
  <Value flg="0x400" vid="37" parent="-1" rk="0"/>
  <Value flg="0x400" vid="38" parent="-1" rk="1" sh-0="16"/>
  <Value flg="0x400" vid="39" parent="-1" rk="0"/>
  <Value flg="0x400" vid="40" parent="-1" rk="0"/>
  <Value flg="0x400" vid="41" parent="-1" rk="0"/>
  <Value flg="0x400" vid="42" parent="-1" rk="1" sh-0="3"/>
  <Value flg="0x400" vid="43" parent="-1" rk="1" sh-0="16"/>
  <Value flg="0x400" vid="44" parent="-1" rk="1" sh-0="3"/>
  <Value flg="0x400" vid="45" parent="-1" rk="0"/>
  <Value flg="0x400" vid="46" parent="-1" rk="0"/>
  <Value flg="0x400" vid="47" parent="-1" rk="1" sh-0="16"/>
  <Value flg="0x400" vid="48" parent="-1" rk="1" sh-0="13"/>
  <Value flg="0x400" vid="49" parent="-1" rk="1" sh-0="28"/>
  <Value flg="0x400" vid="50" parent="-1" rk="0"/>
  <Value flg="0x400" vid="51" parent="-1" rk="0"/>
  <Value flg="0x400" vid="52" parent="-1" rk="0"/>
  <Value flg="0x400" vid="53" parent="-1" rk="0"/>
  <Value flg="0x400" vid="54" parent="-1" rk="1" sh-0="14"/>
  <Value flg="0x400" vid="55" parent="-1" rk="1" sh-0="13"/>
  <Value flg="0x400" vid="56" parent="-1" rk="0"/>
  <Value flg="0x400" vid="57" parent="-1" rk="0"/>
  <Value flg="0x400" vid="58" parent="-1" rk="0"/>
  <Value flg="0x400" vid="59" parent="-1" rk="0"/>
  <Value flg="0x400" vid="60" parent="-1" rk="0"/>
  <Value flg="0x400" vid="61" parent="-1" rk="0"/>
  <Value flg="0x400" vid="62" parent="-1" rk="0"/>
  <Value flg="0x400" vid="63" parent="-1" rk="1" sh-0="3"/>
  <Value flg="0x400" vid="64" parent="-1" rk="1" sh-0="16"/>
  <Value flg="0x400" vid="65" parent="-1" rk="0"/>
  <Value flg="0x400" vid="66" parent="-1" rk="0"/>
  <Value flg="0x400" vid="67" parent="-1" rk="0"/>
  <Value flg="0x400" vid="68" parent="-1" rk="0"/>
  <Value flg="0x400" vid="69" parent="-1" rk="0"/>
  <Value flg="0x400" vid="70" parent="-1" rk="0"/>
  <Value flg="0x400" vid="71" parent="-1" rk="0"/>
  <Value flg="0x400" vid="72" parent="-1" rk="0"/>
  <Value flg="0x400" vid="73" parent="-1" rk="1" sh-0="2"/>
  <Value flg="0x400" vid="74" parent="-1" rk="0"/>
  <Value flg="0x400" vid="75" parent="-1" rk="0"/>
  <Value flg="0x400" vid="76" parent="-1" rk="0"/>
  <Value flg="0x400" vid="77" parent="-1" rk="0"/>
  <Value flg="0x400" vid="78" parent="-1" rk="1" sh-0="14"/>
  <Value flg="0x400" vid="79" parent="-1" rk="0"/>
  <Value flg="0x400" vid="80" parent="-1" rk="1" sh-0="13"/>
  <Value flg="0x400" vid="81" parent="-1" rk="0"/>
  <Value flg="0x400" vid="82" parent="-1" rk="0"/>
  <Value flg="0x400" vid="83" parent="-1" rk="1" sh-0="16"/>
  <Value flg="0x400" vid="84" parent="-1" rk="1" sh-0="13"/>
  <Value flg="0x400" vid="85" parent="-1" rk="1" sh-0="14"/>
  <Value flg="0x400" vid="86" parent="-1" rk="1" sh-0="14"/>
  <Value flg="0x400" vid="87" parent="-1" rk="1" sh-0="13"/>
  <Value flg="0x400" vid="88" parent="-1" rk="1" sh-0="3"/>
  <Value flg="0x400" vid="89" parent="-1" rk="1" sh-0="1"/>
  <Value flg="0x400" vid="90" parent="-1" rk="1" sh-0="3"/>
  <Value flg="0x400" vid="91" parent="-1" rk="1" sh-0="0"/>
  <Value flg="0x400" vid="92" parent="-1" rk="1" sh-0="13"/>
  <Value flg="0x400" vid="93" parent="-1" rk="1" sh-0="14"/>
  <Value flg="0x400" vid="94" parent="-1" rk="1" sh-0="16"/>
  <Value flg="0x400" vid="95" parent="-1" rk="0"/>
  <Value flg="0x400" vid="96" parent="-1" rk="1" sh-0="27"/>
  <Value flg="0x400" vid="97" parent="-1" rk="1" sh-0="3"/>
  <Value flg="0x400" vid="98" parent="-1" rk="1" sh-0="14"/>
  <Value flg="0x400" vid="99" parent="-1" rk="1" sh-0="13"/>
  <Value flg="0x400" vid="100" parent="-1" rk="1" sh-0="14"/>
  <Value flg="0x400" vid="101" parent="-1" rk="0"/>
  <Value flg="0x400" vid="102" parent="-1" rk="1" sh-0="16"/>
  <Ravel vid="0" cells="²SystemVariable.cc:740⁰"/>
  <Ravel vid="1" cells="³-1³0³0³0³0"/>
  <Ravel vid="2" cells="¹0¹1¹2¹3¹4¹5¹6¹7¹8¹9¹A
    ¹B¹C¹D¹E¹F¹10¹11¹12¹13¹14¹15¹16¹17¹18¹19¹1A¹1B¹1C¹1D¹1E¹1F² !⁰¹22²#$⁰
    ²%⁰¹26²'()*+,-./0123456789:;⁰¹3C²=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_⁰
    ²`abcdefghijklmnopqrstuvwxyz{|}~¥€⇄∧∼≬⋆⋸⌸⌺⌼μ⍁¡⍣⍅⎕⍞⌹⍆⍤⍇⍈⍊⊤λ⍍⍏£⊥⍶⌶⍐⍑χ⁰
    ²≢⍖⍗⍘⍚⍛⌈⍜⍢∪⍨⍕⍎⍬⍪∣│┤⍟∆∇→╣║╗╝←⌊┐└┴┬├─┼↑↓╔╚╩╦╠═╬≡⍸⍷∵⌷⍂⌻⊢⊣◊┘┌█▄▌▐▀⍺⍹⊂⊃⍝⍲⁰
    ²⍴⍱⌽⊖○∨⍳⍉∈∩⌿⍀≥≤≠×÷⍙∘⍵⍫⍋⍒¯¨ ⁰"/>
  <Ravel vid="3" cells="².,⋆0_¯⁰"/>
  <Ravel vid="4" cells="³1"/>
  <Ravel vid="5" cells="²⎕RL←⎕FIO[⁰¹22²random⁰¹22²] 8 ⋄ ⎕PW←⎕FIO ¯8 ⋄ ⊣⁰
    ¹22²libedif.so.0⁰¹22² ⎕FX ⁰¹22²vi⁰¹22"/>
  <Ravel vid="6" cells="³0"/>
  <Ravel vid="7" cells="³10"/>
  <Ravel vid="8" cells="³184"/>
  <Ravel vid="9" cells="² ⁰"/>
  <Ravel vid="10" cells="³0"/>
  <Ravel vid="11" cells="³0"/>
  <Ravel vid="12" cells="¹8¹D¹A
    "/>
  <Ravel vid="13" cells="³0"/>
  <Ravel vid="14" cells="³0"/>
  <Ravel vid="15" cells="³1"/>
  <Ravel vid="16" cells="³-4"/>
  <Ravel vid="17" cells="³0"/>
  <Ravel vid="18" cells="³0³0"/>
  <Ravel vid="19" cells="³0"/>
  <Ravel vid="20" cells="²point_style-3: 4⁰"/>
  <Ravel vid="21" cells="³0³255³0"/>
  <Ravel vid="22" cells="³16"/>
  <Ravel vid="23" cells="²λ⁰"/>
  <Ravel vid="24" cells="³3³4"/>
  <Ravel vid="25" cells="² ⁰"/>
  <Ravel vid="26" cells="⁶28⁶35"/>
  <Ravel vid="27" cells="³97"/>
  <Ravel vid="28" cells="²df⁰"/>
  <Ravel vid="29" cells="³1"/>
  <Ravel vid="30" cells="³10000"/>
  <Ravel vid="31" cells="³2³26"/>
  <Ravel vid="32" cells="³65"/>
  <Ravel vid="33" cells="³26"/>
  <Ravel vid="34" cells="³26"/>
  <Ravel vid="35" cells="²vi⁰"/>
  <Ravel vid="36" cells="²line_color-6: ⁰"/>
  <Ravel vid="37" cells="³0"/>
  <Ravel vid="38" cells="²point_style-5: 6⁰"/>
  <Ravel vid="39" cells="³1"/>
  <Ravel vid="40" cells="³2"/>
  <Ravel vid="41" cells="³4"/>
  <Ravel vid="42" cells="³63³63³63"/>
  <Ravel vid="43" cells="²point_style-6: 7⁰"/>
  <Ravel vid="44" cells="³0³0³127"/>
  <Ravel vid="45" cells="³1"/>
  <Ravel vid="46" cells="³1"/>
  <Ravel vid="47" cells="²point_style-2: 3⁰"/>
  <Ravel vid="48" cells="²point_size-6:⁰"/>
  <Ravel vid="49" cells="²Calling ⎕PLOT with left arg:⁰"/>
  <Ravel vid="50" cells="³1"/>
  <Ravel vid="51" cells="³2"/>
  <Ravel vid="52" cells="³2"/>
  <Ravel vid="53" cells="³22"/>
  <Ravel vid="54" cells="²line_color-3: ⁰"/>
  <Ravel vid="55" cells="²point_size-2:⁰"/>
  <Ravel vid="56" cells="³0"/>
  <Ravel vid="57" cells="³-2"/>
  <Ravel vid="58" cells="³1"/>
  <Ravel vid="59" cells="² ⁰"/>
  <Ravel vid="60" cells="³1000"/>
  <Ravel vid="61" cells="³1"/>
  <Ravel vid="62" cells="⁴1e-13"/>
  <Ravel vid="63" cells="³0³127³0"/>
  <Ravel vid="64" cells="²0123456789ABCDEF⁰"/>
  <Ravel vid="65" cells="³1"/>
  <Ravel vid="66" cells="² ⁰"/>
  <Ravel vid="67" cells="²;⁰"/>
  <Ravel vid="68" cells="²}⁰"/>
  <Ravel vid="69" cells="³0"/>
  <Ravel vid="70" cells="³-8"/>
  <Ravel vid="71" cells="³0"/>
  <Ravel vid="72" cells="² ⁰"/>
  <Ravel vid="73" cells="²←{⁰"/>
  <Ravel vid="74" cells="² ⁰"/>
  <Ravel vid="75" cells="³2"/>
  <Ravel vid="76" cells="³-569148378135517824"/>
  <Ravel vid="77" cells="³0"/>
  <Ravel vid="78" cells="²And right arg:⁰"/>
  <Ravel vid="79" cells="³16"/>
  <Ravel vid="80" cells="²point_size-1:⁰"/>
  <Ravel vid="81" cells="³2"/>
  <Ravel vid="82" cells="³0"/>
  <Ravel vid="83" cells="²point_style-1: 2⁰"/>
  <Ravel vid="84" cells="²point_size-5:⁰"/>
  <Ravel vid="85" cells="²line_color-4: ⁰"/>
  <Ravel vid="86" cells="²line_color-5: ⁰"/>
  <Ravel vid="87" cells="²point_size-4:⁰"/>
  <Ravel vid="88" cells="³0³0³255"/>
  <Ravel vid="89" cells="²#⁰"/>
  <Ravel vid="90" cells="³255³0³0"/>
  <Ravel vid="91" cells="² ⁰"/>
  <Ravel vid="92" cells="²point_size-0:⁰"/>
  <Ravel vid="93" cells="²line_color-1: ⁰"/>
  <Ravel vid="94" cells="²point_style-4: 5⁰"/>
  <Ravel vid="95" cells="³0"/>
  <Ravel vid="96" cells="²Unsupported feature yet !!!⁰"/>
  <Ravel vid="97" cells="³127³0³0"/>
  <Ravel vid="98" cells="²line_color-0: ⁰"/>
  <Ravel vid="99" cells="²point_size-3:⁰"/>
  <Ravel vid="100" cells="²line_color-2: ⁰"/>
  <Ravel vid="101" cells="³0"/>
  <Ravel vid="102" cells="²point_style-0: 1⁰"/>
  <SymbolTable size="6">
    <Symbol name="Plot" stack-size="1">
      <Function creation-time="1597376020173282" exec-properties="0,0,0,0">
        <UCS uni="²z←Plot mat;rank;⎕IO;hex;rgb;ops;lc;ps;pS;lines;PS⁰¹A
                  ²⎕IO←0⁰¹A
                  ²hex←{⁰¹22²0123456789ABCDEF⁰¹22²[(⌊⍵÷16),(16|⍵)]}⁰¹A
                  ²rgb←{⁰¹22²#⁰¹22²,(hex(⍵[0])),(hex(⍵[1])),(hex(⍵[2]))}⁰¹A
                  ²lc←ps←pS←0⍴⁰¹22¹22¹A
                  ²lc←lc,⊂⁰¹22²line_color-0: ⁰¹22²,rgb   0 255   0⁰¹A
                  ²lc←lc,⊂⁰¹22²line_color-1: ⁰¹22²,rgb   0   0 255⁰¹A
                  ²lc←lc,⊂⁰¹22²line_color-2: ⁰¹22²,rgb 255   0   0⁰¹A
                  ²lc←lc,⊂⁰¹22²line_color-3: ⁰¹22²,rgb   0 127   0⁰¹A
                  ²lc←lc,⊂⁰¹22²line_color-4: ⁰¹22²,rgb   0   0 127⁰¹A
                  ²lc←lc,⊂⁰¹22²line_color-5: ⁰¹22²,rgb 127   0   0⁰¹A
                  ²lc←lc,⊂⁰¹22²line_color-6: ⁰¹22²,rgb  63  63  63⁰¹A
                  ¹A
                  ²PS←4⁰¹A
                  ²ps←ps,⊂⁰¹22²point_style-0: 1⁰¹22² ⋄ pS←pS,⊂⁰¹22²point⁰
                  ²_size-0:⁰¹22²,⍕PS⁰¹A
                  ²ps←ps,⊂⁰¹22²point_style-1: 2⁰¹22² ⋄ pS←pS,⊂⁰¹22²point⁰
                  ²_size-1:⁰¹22²,⍕PS⁰¹A
                  ²ps←ps,⊂⁰¹22²point_style-2: 3⁰¹22² ⋄ pS←pS,⊂⁰¹22²point⁰
                  ²_size-2:⁰¹22²,⍕PS⁰¹A
                  ²ps←ps,⊂⁰¹22²point_style-3: 4⁰¹22² ⋄ pS←pS,⊂⁰¹22²point⁰
                  ²_size-3:⁰¹22²,⍕PS⁰¹A
                  ²ps←ps,⊂⁰¹22²point_style-4: 5⁰¹22² ⋄ pS←pS,⊂⁰¹22²point⁰
                  ²_size-4:⁰¹22²,⍕PS⁰¹A
                  ²ps←ps,⊂⁰¹22²point_style-5: 6⁰¹22² ⋄ pS←pS,⊂⁰¹22²point⁰
                  ²_size-5:⁰¹22²,⍕PS⁰¹A
                  ²ps←ps,⊂⁰¹22²point_style-6: 7⁰¹22² ⋄ pS←pS,⊂⁰¹22²point⁰
                  ²_size-6:⁰¹22²,⍕PS⁰¹A
                  ¹A
                  ²⍝ V lc ps pS  ⍝ Uncomment for debugging⁰¹A
                  ¹A
                  ²rank←⍴⍴ mat⁰¹A
                  ²→(0=rank)/scalar⁰¹A
                  ²→(1=rank)/vector⁰¹A
                  ²→(2=rank)/matrix⁰¹A
                  ²error:  ⎕ES ⁰¹22²Unsupported feature yet !!!⁰¹22²   ⍝⁰
                  ² temporary⁰¹A
                  ¹A
                  ²scalar: mat=,mat⁰¹A
                  ²vector: lines←1 ⋄ → common⁰¹A
                  ²matrix: lines←1↑⍴mat⁰¹A
                  ²common:⁰¹A
                  ¹22²Calling ⎕PLOT with left arg:⁰¹22² ((lines↑lc),(lin⁰
                  ²es↑ps),(lines↑pS))⁰¹A
                  ¹22²And right arg:⁰¹22² mat⁰¹A
                  ²z←((lines↑lc),(lines↑ps),(lines↑pS)) ⎕PLOT mat⁰¹A
                  "/>
      </Function>
    </Symbol>

    <Symbol name="V" stack-size="1">
      <Function creation-time="1482454815005529" exec-properties="0,0,0,0">
        <UCS uni="²λ←λ0 ⍵⁰¹A
                  ²λ←,[⍳0] ⍵⁰¹A
                  "/>
      </Function>
    </Symbol>

    <Symbol name="df" stack-size="1">
      <Function creation-time="1595399959291244" exec-properties="0,0,0,0">
        <UCS uni="²df;names;func;lambda;⎕pw;t;sort_order⁰¹A
                  ²⎕pw←10000 ⋄ sort_order←,⍉2 26⍴(⎕ucs 65+⎕IO-⍨⍳26),(⎕uc⁰
                  ²s 97+⎕IO-⍨⍳26)⁰¹A
                  ²names←((⊂[⎕io+1]⎕nl 3 4)~¨' ')~ ⁰¹22²df⁰¹22² ⁰¹22²vi⁰
                  ¹22²           ⍝ if only one eg: ⁰¹22²df⁰¹22² then use⁰
                  ² ⊂⁰¹22²df⁰¹22¹A
                  ²lambda←({'λ'=↑⎕cr ⍵}¨names)/names⁰¹A
                  ²→(2>⍴lambda)/nosrtl⁰¹A
                  ²lambda←{⍵[sort_order⍋⊃⍵]} lambda⁰¹A
                  ²nosrtl: func←names~lambda⁰¹A
                  ²→(2>⍴func)/nosrtf⁰¹A
                  ²func←{⍵[sort_order⍋⊃⍵]} func⁰¹A
                  ²nosrtf: func←{⍵ (22 ⎕cr ⎕cr ⍵)} ¨ func⁰¹A
                  ²lambda←{⍵,'←{',({⌽ {(+/^\' '=⍵)↓⍵} ⌽ ⍵} 2↓((⎕cr ⍵)[1+⁰
                  ²⎕io;])),({{⌽ {(+/^\' '=⍵)↓⍵} ⌽ ⍵} {(∨\t=';')/t←(⎕cr ⍵⁰
                  ²)[⎕io;]} ⍵} ⍵),'}'} ¨ lambda⁰¹A
                  ²⎕←,[⍳0] {((⍴,⍵)⌊(¯2+⎕fio ¯8))↑,⍵} ¨ ⊂[⎕io+1]⍕ ,[⍳0] ,⁰
                  ²func,(⊂' '),lambda,(⊂' ')⁰¹A
                  "/>
      </Function>
    </Symbol>

    <Symbol name="makemat" stack-size="1">
      <Function creation-time="1597374475217513" exec-properties="0,0,0,0">
        <UCS uni="²λ←⍺ λ0 ⍵⁰¹A
                  ²λ←(⍺,⍵) ⍴ (⍺×⍵)?1000⁰¹A
                  "/>
      </Function>
    </Symbol>

    <Symbol name="sort_by_lines" stack-size="1">
      <Function creation-time="1597371279327497" exec-properties="0,0,0,0">
        <UCS uni="²λ←λ0 ⍵⁰¹A
                  ²λ←{⍵[⍋⍵]}⍤1 ⍵⁰¹A
                  "/>
      </Function>
    </Symbol>

    <Symbol name="vi" stack-size="1">
      <Function creation-time="0" exec-properties="1,1,1,0" native="1">
        <UCS uni="²libedif.so.0⁰"/>
      </Function>
    </Symbol>

  </SymbolTable>

  <Symbol name="⎕AI" stack-size="1">
    <Variable vid="1"/>
  </Symbol>

  <Symbol name="⎕ARG" stack-size="1">
    <unused-name/>
  </Symbol>

  <Symbol name="⎕AV" stack-size="1">
    <Variable vid="2"/>
  </Symbol>

  <Symbol name="⎕CT" stack-size="1">
    <Variable vid="62"/>
  </Symbol>

  <Symbol name="⎕EM" stack-size="1">
    <unused-name/>
  </Symbol>

  <Symbol name="⎕ET" stack-size="1">
    <unused-name/>
  </Symbol>

  <Symbol name="⎕FC" stack-size="1">
    <Variable vid="3"/>
  </Symbol>

  <Symbol name="⎕IO" stack-size="1">
    <Variable vid="4"/>
  </Symbol>

  <Symbol name="⎕L" stack-size="1">
    <Variable vid="19"/>
  </Symbol>

  <Symbol name="⎕LC" stack-size="1">
    <Variable vid="6"/>
  </Symbol>

  <Symbol name="⎕LX" stack-size="1">
    <Variable vid="5"/>
  </Symbol>

  <Symbol name="⎕PP" stack-size="1">
    <Variable vid="7"/>
  </Symbol>

  <Symbol name="⎕PR" stack-size="1">
    <Variable vid="9"/>
  </Symbol>

  <Symbol name="⎕PS" stack-size="1">
    <Variable vid="18"/>
  </Symbol>

  <Symbol name="⎕PW" stack-size="1">
    <Variable vid="8"/>
  </Symbol>

  <Symbol name="⎕R" stack-size="1">
    <Variable vid="11"/>
  </Symbol>

  <Symbol name="⎕RL" stack-size="1">
    <Variable vid="76"/>
  </Symbol>

  <Symbol name="⎕SVE" stack-size="1">
    <Variable vid="10"/>
  </Symbol>

  <Symbol name="⎕SYL" stack-size="1">
    <Variable vid="14"/>
  </Symbol>

  <Symbol name="⎕TC" stack-size="1">
    <Variable vid="12"/>
  </Symbol>

  <Symbol name="⎕TS" stack-size="1">
    <Variable vid="13"/>
  </Symbol>

  <Symbol name="⎕TZ" stack-size="1">
    <Variable vid="16"/>
  </Symbol>

  <Symbol name="⎕UL" stack-size="1">
    <Variable vid="15"/>
  </Symbol>

  <Symbol name="⎕X" stack-size="1">
    <Variable vid="101"/>
  </Symbol>

  <Symbol name="⎕WA" stack-size="1">
    <Variable vid="17"/>
  </Symbol>

  <Symbol name="λ" stack-size="1">
    <unused-name/>
  </Symbol>

  <Symbol name="⍺" stack-size="1">
    <unused-name/>
  </Symbol>

  <Symbol name="⍵" stack-size="1">
    <unused-name/>
  </Symbol>

  <Symbol name="χ" stack-size="1">
    <unused-name/>
  </Symbol>

  <Symbol name="⍶" stack-size="1">
    <unused-name/>
  </Symbol>

  <Symbol name="⍹" stack-size="1">
    <unused-name/>
  </Symbol>

  <StateIndicator levels="0">
  </StateIndicator>

</Workspace>

Reply via email to