Pooh program example 06-func-obj-call.p
# function invokes argument callback over range of numbers; prints result as ASCII graph sub myfunc( num ) return sqr( ~num num ) + num * num end sub get_data( func, from, to, step ) ret = [] i = from while i <= to push( ~array ret ~top func( ~num i ) ) i = i + step end return ret end sub draw_graph( data ) min = maxfloat() max = minfloat() i = 1 while i <= size( ~arg data ) x = data[ i ] if x < min min = x end if x > max max = x end i = i + 1 end i = 1 while i <= size( ~arg data ) x = data[ i ] val = 80 * ( x - min ) / ( max - min ) j = 1 while j <= val print( ~msg ' ' ) j = j + 1 end println( ~msg '*' ) i = i + 1 end end println( ~msg 'graph of cos function' ) data = get_data( ~func cos ~from 0 ~to 4 ~step 0.1 ) draw_graph( ~data data ) println( ~msg 'graph of user defined function' ) data = get_data( ~func myfunc ~from 0 ~to 4 ~step 0.2 ) draw_graph( ~data data )
graph of cos function * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * graph of user defined function * * * * * * * * * * * * * * * * * * * *Trace output for 06-func-obj-call.p
051|println( ~msg 'graph of cos function' )... 052|... = get_data( ~func sub cos(~num) ~from 0 ~to 4 ~step 1.000000e-01 )... 009| ret = [ ] 011| i = from:0 012| while (i:0 <= to:4):true 013| push( ~array ret:[ ] ~top func:sub cos(( ~num i:0 )... 013| push( ~array ret:[ ] ~top func:sub cos(( ~num i:0 ):1.000000e+00 )... 014| i = (i:0 + step:1.000000e-01):1.000000e-01 015| end 012| while (i:1.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00 ] ~top func:sub cos(( ~num i:1.000000e-01 )... 013| push( ~array ret:[ -> 1.000000e+00 ] ~top func:sub cos(( ~num i:1.000000e-01 ):9.950042e-01 )... 014| i = (i:1.000000e-01 + step:1.000000e-01):2.000000e-01 015| end 012| while (i:2.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01 ] ~top func:sub cos(( ~num i:2.000000e-01 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01 ] ~top func:sub cos(( ~num i:2.000000e-01 ):9.800666e-01 )... 014| i = (i:2.000000e-01 + step:1.000000e-01):3.000000e-01 015| end 012| while (i:3.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01 ] ~top func:sub cos(( ~num i:3.000000e-01 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01 ] ~top func:sub cos(( ~num i:3.000000e-01 ):9.553365e-01 )... 014| i = (i:3.000000e-01 + step:1.000000e-01):4.000000e-01 015| end 012| while (i:4.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01 ] ~top func:sub cos(( ~num i:4.000000e-01 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01 ] ~top func:sub cos(( ~num i:4.000000e-01 ):9.210610e-01 )... 014| i = (i:4.000000e-01 + step:1.000000e-01):5.000000e-01 015| end 012| while (i:5.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01 ] ~top func:sub cos(( ~num i:5.000000e-01 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01 ] ~top func:sub cos(( ~num i:5.000000e-01 ):8.775826e-01 )... 014| i = (i:5.000000e-01 + step:1.000000e-01):6.000000e-01 015| end 012| while (i:6.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01 ] ~top func:sub cos(( ~num i:6.000000e-01 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01 ] ~top func:sub cos(( ~num i:6.000000e-01 ):8.253356e-01 )... 014| i = (i:6.000000e-01 + step:1.000000e-01):7.000000e-01 015| end 012| while (i:7.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01 ] ~top func:sub cos(( ~num i:7.000000e-01 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01 ] ~top func:sub cos(( ~num i:7.000000e-01 ):7.648422e-01 )... 014| i = (i:7.000000e-01 + step:1.000000e-01):8.000000e-01 015| end 012| while (i:8.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01 ] ~top func:sub cos(( ~num i:8.000000e-01 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01 ] ~top func:sub cos(( ~num i:8.000000e-01 ):6.967067e-01 )... 014| i = (i:8.000000e-01 + step:1.000000e-01):9.000000e-01 015| end 012| while (i:9.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01 ] ~top func:sub cos(( ~num i:9.000000e-01 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01 ] ~top func:sub cos(( ~num i:9.000000e-01 ):6.216100e-01 )... 014| i = (i:9.000000e-01 + step:1.000000e-01):1.000000e+00 015| end 012| while (i:1.000000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01 ] ~top func:sub cos(( ~num i:1.000000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01 ] ~top func:sub cos(( ~num i:1.000000e+00 ):5.403023e-01 )... 014| i = (i:1.000000e+00 + step:1.000000e-01):1.100000e+00 015| end 012| while (i:1.100000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01 ] ~top func:sub cos(( ~num i:1.100000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01 ] ~top func:sub cos(( ~num i:1.100000e+00 ):4.535961e-01 )... 014| i = (i:1.100000e+00 + step:1.000000e-01):1.200000e+00 015| end 012| while (i:1.200000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01 ] ~top func:sub cos(( ~num i:1.200000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01 ] ~top func:sub cos(( ~num i:1.200000e+00 ):3.623578e-01 )... 014| i = (i:1.200000e+00 + step:1.000000e-01):1.300000e+00 015| end 012| while (i:1.300000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01 ] ~top func:sub cos(( ~num i:1.300000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01 ] ~top func:sub cos(( ~num i:1.300000e+00 ):2.674988e-01 )... 014| i = (i:1.300000e+00 + step:1.000000e-01):1.400000e+00 015| end 012| while (i:1.400000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01 ] ~top func:sub cos(( ~num i:1.400000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01 ] ~top func:sub cos(( ~num i:1.400000e+00 ):1.699671e-01 )... 014| i = (i:1.400000e+00 + step:1.000000e-01):1.500000e+00 015| end 012| while (i:1.500000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01 ] ~top func:sub cos(( ~num i:1.500000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01 ] ~top func:sub cos(( ~num i:1.500000e+00 ):7.073720e-02 )... 014| i = (i:1.500000e+00 + step:1.000000e-01):1.600000e+00 015| end 012| while (i:1.600000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02 ] ~top func:sub cos(( ~num i:1.600000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02 ] ~top func:sub cos(( ~num i:1.600000e+00 ):-2.919952e-02 )... 014| i = (i:1.600000e+00 + step:1.000000e-01):1.700000e+00 015| end 012| while (i:1.700000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02 ] ~top func:sub cos(( ~num i:1.700000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02 ] ~top func:sub cos(( ~num i:1.700000e+00 ):-1.288445e-01 )... 014| i = (i:1.700000e+00 + step:1.000000e-01):1.800000e+00 015| end 012| while (i:1.800000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01 ] ~top func:sub cos(( ~num i:1.800000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01 ] ~top func:sub cos(( ~num i:1.800000e+00 ):-2.272021e-01 )... 014| i = (i:1.800000e+00 + step:1.000000e-01):1.900000e+00 015| end 012| while (i:1.900000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01 ] ~top func:sub cos(( ~num i:1.900000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01 ] ~top func:sub cos(( ~num i:1.900000e+00 ):-3.232896e-01 )... 014| i = (i:1.900000e+00 + step:1.000000e-01):2.000000e+00 015| end 012| while (i:2.000000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01 ] ~top func:sub cos(( ~num i:2.000000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01 ] ~top func:sub cos(( ~num i:2.000000e+00 ):-4.161468e-01 )... 014| i = (i:2.000000e+00 + step:1.000000e-01):2.100000e+00 015| end 012| while (i:2.100000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01 ] ~top func:sub cos(( ~num i:2.100000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01 ] ~top func:sub cos(( ~num i:2.100000e+00 ):-5.048461e-01 )... 014| i = (i:2.100000e+00 + step:1.000000e-01):2.200000e+00 015| end 012| while (i:2.200000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01 ] ~top func:sub cos(( ~num i:2.200000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01 ] ~top func:sub cos(( ~num i:2.200000e+00 ):-5.885011e-01 )... 014| i = (i:2.200000e+00 + step:1.000000e-01):2.300000e+00 015| end 012| while (i:2.300000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01 ] ~top func:sub cos(( ~num i:2.300000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01 ] ~top func:sub cos(( ~num i:2.300000e+00 ):-6.662760e-01 )... 014| i = (i:2.300000e+00 + step:1.000000e-01):2.400000e+00 015| end 012| while (i:2.400000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01 ] ~top func:sub cos(( ~num i:2.400000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01 ] ~top func:sub cos(( ~num i:2.400000e+00 ):-7.373937e-01 )... 014| i = (i:2.400000e+00 + step:1.000000e-01):2.500000e+00 015| end 012| while (i:2.500000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01 ] ~top func:sub cos(( ~num i:2.500000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01 ] ~top func:sub cos(( ~num i:2.500000e+00 ):-8.011436e-01 )... 014| i = (i:2.500000e+00 + step:1.000000e-01):2.600000e+00 015| end 012| while (i:2.600000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01 ] ~top func:sub cos(( ~num i:2.600000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01 ] ~top func:sub cos(( ~num i:2.600000e+00 ):-8.568888e-01 )... 014| i = (i:2.600000e+00 + step:1.000000e-01):2.700000e+00 015| end 012| while (i:2.700000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01 ] ~top func:sub cos(( ~num i:2.700000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01 ] ~top func:sub cos(( ~num i:2.700000e+00 ):-9.040721e-01 )... 014| i = (i:2.700000e+00 + step:1.000000e-01):2.800000e+00 015| end 012| while (i:2.800000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01 ] ~top func:sub cos(( ~num i:2.800000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01 ] ~top func:sub cos(( ~num i:2.800000e+00 ):-9.422223e-01 )... 014| i = (i:2.800000e+00 + step:1.000000e-01):2.900000e+00 015| end 012| while (i:2.900000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01 ] ~top func:sub cos(( ~num i:2.900000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01 ] ~top func:sub cos(( ~num i:2.900000e+00 ):-9.709582e-01 )... 014| i = (i:2.900000e+00 + step:1.000000e-01):3.000000e+00 015| end 012| while (i:3.000000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01 ] ~top func:sub cos(( ~num i:3.000000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01 ] ~top func:sub cos(( ~num i:3.000000e+00 ):-9.899925e-01 )... 014| i = (i:3.000000e+00 + step:1.000000e-01):3.100000e+00 015| end 012| while (i:3.100000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01 ] ~top func:sub cos(( ~num i:3.100000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01 ] ~top func:sub cos(( ~num i:3.100000e+00 ):-9.991352e-01 )... 014| i = (i:3.100000e+00 + step:1.000000e-01):3.200000e+00 015| end 012| while (i:3.200000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01 ] ~top func:sub cos(( ~num i:3.200000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01 ] ~top func:sub cos(( ~num i:3.200000e+00 ):-9.982948e-01 )... 014| i = (i:3.200000e+00 + step:1.000000e-01):3.300000e+00 015| end 012| while (i:3.300000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01 ] ~top func:sub cos(( ~num i:3.300000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01 ] ~top func:sub cos(( ~num i:3.300000e+00 ):-9.874798e-01 )... 014| i = (i:3.300000e+00 + step:1.000000e-01):3.400000e+00 015| end 012| while (i:3.400000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01 ] ~top func:sub cos(( ~num i:3.400000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01 ] ~top func:sub cos(( ~num i:3.400000e+00 ):-9.667982e-01 )... 014| i = (i:3.400000e+00 + step:1.000000e-01):3.500000e+00 015| end 012| while (i:3.500000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01 ] ~top func:sub cos(( ~num i:3.500000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01 ] ~top func:sub cos(( ~num i:3.500000e+00 ):-9.364567e-01 )... 014| i = (i:3.500000e+00 + step:1.000000e-01):3.600000e+00 015| end 012| while (i:3.600000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01 ] ~top func:sub cos(( ~num i:3.600000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01 ] ~top func:sub cos(( ~num i:3.600000e+00 ):-8.967584e-01 )... 014| i = (i:3.600000e+00 + step:1.000000e-01):3.700000e+00 015| end 012| while (i:3.700000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01 ] ~top func:sub cos(( ~num i:3.700000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01 ] ~top func:sub cos(( ~num i:3.700000e+00 ):-8.481000e-01 )... 014| i = (i:3.700000e+00 + step:1.000000e-01):3.800000e+00 015| end 012| while (i:3.800000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01 ] ~top func:sub cos(( ~num i:3.800000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01 ] ~top func:sub cos(( ~num i:3.800000e+00 ):-7.909677e-01 )... 014| i = (i:3.800000e+00 + step:1.000000e-01):3.900000e+00 015| end 012| while (i:3.900000e+00 <= to:4):true 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01 ] ~top func:sub cos(( ~num i:3.900000e+00 )... 013| push( ~array ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01 ] ~top func:sub cos(( ~num i:3.900000e+00 ):-7.259323e-01 )... 014| i = (i:3.900000e+00 + step:1.000000e-01):4.000000e+00 015| end 012| while (i:4.000000e+00 <= to:4):false 015| end # finish loop 016| return ret:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] 052|data = get_data( ~func sub cos(~num) ~from 0 ~to 4 ~step 1.000000e-01 ):[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] 053|draw_graph( ~data data:[ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 021| ... = maxfloat( )... 021| min = maxfloat( ):1.797693e+308 022| ... = minfloat( )... 022| max = minfloat( ):2.225074e-308 024| i = 1 025| while (i:1 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:1 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:1]:1.000000e+00 027| if (x:1.000000e+00 < min:1.797693e+308):true 028| min = x:1.000000e+00 028| end # if 030| if (x:1.000000e+00 > max:2.225074e-308):true 031| max = x:1.000000e+00 031| end # if 033| i = (i:1 + 1):2 034| end 025| while (i:2 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:2 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:2]:9.950042e-01 027| if (x:9.950042e-01 < min:1.000000e+00):true 028| min = x:9.950042e-01 028| end # if 030| if (x:9.950042e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:2 + 1):3 034| end 025| while (i:3 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:3 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:3]:9.800666e-01 027| if (x:9.800666e-01 < min:9.950042e-01):true 028| min = x:9.800666e-01 028| end # if 030| if (x:9.800666e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:3 + 1):4 034| end 025| while (i:4 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:4 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:4]:9.553365e-01 027| if (x:9.553365e-01 < min:9.800666e-01):true 028| min = x:9.553365e-01 028| end # if 030| if (x:9.553365e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:4 + 1):5 034| end 025| while (i:5 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:5 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:5]:9.210610e-01 027| if (x:9.210610e-01 < min:9.553365e-01):true 028| min = x:9.210610e-01 028| end # if 030| if (x:9.210610e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:5 + 1):6 034| end 025| while (i:6 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:6 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:6]:8.775826e-01 027| if (x:8.775826e-01 < min:9.210610e-01):true 028| min = x:8.775826e-01 028| end # if 030| if (x:8.775826e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:6 + 1):7 034| end 025| while (i:7 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:7 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:7]:8.253356e-01 027| if (x:8.253356e-01 < min:8.775826e-01):true 028| min = x:8.253356e-01 028| end # if 030| if (x:8.253356e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:7 + 1):8 034| end 025| while (i:8 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:8 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:8]:7.648422e-01 027| if (x:7.648422e-01 < min:8.253356e-01):true 028| min = x:7.648422e-01 028| end # if 030| if (x:7.648422e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:8 + 1):9 034| end 025| while (i:9 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:9 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:9]:6.967067e-01 027| if (x:6.967067e-01 < min:7.648422e-01):true 028| min = x:6.967067e-01 028| end # if 030| if (x:6.967067e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:9 + 1):10 034| end 025| while (i:10 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:10 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:10]:6.216100e-01 027| if (x:6.216100e-01 < min:6.967067e-01):true 028| min = x:6.216100e-01 028| end # if 030| if (x:6.216100e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:10 + 1):11 034| end 025| while (i:11 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:11 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:11]:5.403023e-01 027| if (x:5.403023e-01 < min:6.216100e-01):true 028| min = x:5.403023e-01 028| end # if 030| if (x:5.403023e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:11 + 1):12 034| end 025| while (i:12 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:12 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:12]:4.535961e-01 027| if (x:4.535961e-01 < min:5.403023e-01):true 028| min = x:4.535961e-01 028| end # if 030| if (x:4.535961e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:12 + 1):13 034| end 025| while (i:13 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:13 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:13]:3.623578e-01 027| if (x:3.623578e-01 < min:4.535961e-01):true 028| min = x:3.623578e-01 028| end # if 030| if (x:3.623578e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:13 + 1):14 034| end 025| while (i:14 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:14 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:14]:2.674988e-01 027| if (x:2.674988e-01 < min:3.623578e-01):true 028| min = x:2.674988e-01 028| end # if 030| if (x:2.674988e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:14 + 1):15 034| end 025| while (i:15 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:15 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:15]:1.699671e-01 027| if (x:1.699671e-01 < min:2.674988e-01):true 028| min = x:1.699671e-01 028| end # if 030| if (x:1.699671e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:15 + 1):16 034| end 025| while (i:16 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:16 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:16]:7.073720e-02 027| if (x:7.073720e-02 < min:1.699671e-01):true 028| min = x:7.073720e-02 028| end # if 030| if (x:7.073720e-02 > max:1.000000e+00):false 031| end # if 033| i = (i:16 + 1):17 034| end 025| while (i:17 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:17 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:17]:-2.919952e-02 027| if (x:-2.919952e-02 < min:7.073720e-02):true 028| min = x:-2.919952e-02 028| end # if 030| if (x:-2.919952e-02 > max:1.000000e+00):false 031| end # if 033| i = (i:17 + 1):18 034| end 025| while (i:18 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:18 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:18]:-1.288445e-01 027| if (x:-1.288445e-01 < min:-2.919952e-02):true 028| min = x:-1.288445e-01 028| end # if 030| if (x:-1.288445e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:18 + 1):19 034| end 025| while (i:19 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:19 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:19]:-2.272021e-01 027| if (x:-2.272021e-01 < min:-1.288445e-01):true 028| min = x:-2.272021e-01 028| end # if 030| if (x:-2.272021e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:19 + 1):20 034| end 025| while (i:20 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:20 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:20]:-3.232896e-01 027| if (x:-3.232896e-01 < min:-2.272021e-01):true 028| min = x:-3.232896e-01 028| end # if 030| if (x:-3.232896e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:20 + 1):21 034| end 025| while (i:21 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:21 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:21]:-4.161468e-01 027| if (x:-4.161468e-01 < min:-3.232896e-01):true 028| min = x:-4.161468e-01 028| end # if 030| if (x:-4.161468e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:21 + 1):22 034| end 025| while (i:22 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:22 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:22]:-5.048461e-01 027| if (x:-5.048461e-01 < min:-4.161468e-01):true 028| min = x:-5.048461e-01 028| end # if 030| if (x:-5.048461e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:22 + 1):23 034| end 025| while (i:23 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:23 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:23]:-5.885011e-01 027| if (x:-5.885011e-01 < min:-5.048461e-01):true 028| min = x:-5.885011e-01 028| end # if 030| if (x:-5.885011e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:23 + 1):24 034| end 025| while (i:24 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:24 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:24]:-6.662760e-01 027| if (x:-6.662760e-01 < min:-5.885011e-01):true 028| min = x:-6.662760e-01 028| end # if 030| if (x:-6.662760e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:24 + 1):25 034| end 025| while (i:25 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:25 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:25]:-7.373937e-01 027| if (x:-7.373937e-01 < min:-6.662760e-01):true 028| min = x:-7.373937e-01 028| end # if 030| if (x:-7.373937e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:25 + 1):26 034| end 025| while (i:26 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:26 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:26]:-8.011436e-01 027| if (x:-8.011436e-01 < min:-7.373937e-01):true 028| min = x:-8.011436e-01 028| end # if 030| if (x:-8.011436e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:26 + 1):27 034| end 025| while (i:27 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:27 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:27]:-8.568888e-01 027| if (x:-8.568888e-01 < min:-8.011436e-01):true 028| min = x:-8.568888e-01 028| end # if 030| if (x:-8.568888e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:27 + 1):28 034| end 025| while (i:28 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:28 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:28]:-9.040721e-01 027| if (x:-9.040721e-01 < min:-8.568888e-01):true 028| min = x:-9.040721e-01 028| end # if 030| if (x:-9.040721e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:28 + 1):29 034| end 025| while (i:29 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:29 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:29]:-9.422223e-01 027| if (x:-9.422223e-01 < min:-9.040721e-01):true 028| min = x:-9.422223e-01 028| end # if 030| if (x:-9.422223e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:29 + 1):30 034| end 025| while (i:30 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:30 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:30]:-9.709582e-01 027| if (x:-9.709582e-01 < min:-9.422223e-01):true 028| min = x:-9.709582e-01 028| end # if 030| if (x:-9.709582e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:30 + 1):31 034| end 025| while (i:31 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:31 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:31]:-9.899925e-01 027| if (x:-9.899925e-01 < min:-9.709582e-01):true 028| min = x:-9.899925e-01 028| end # if 030| if (x:-9.899925e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:31 + 1):32 034| end 025| while (i:32 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:32 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:32]:-9.991352e-01 027| if (x:-9.991352e-01 < min:-9.899925e-01):true 028| min = x:-9.991352e-01 028| end # if 030| if (x:-9.991352e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:32 + 1):33 034| end 025| while (i:33 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:33 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:33]:-9.982948e-01 027| if (x:-9.982948e-01 < min:-9.991352e-01):false 028| end # if 030| if (x:-9.982948e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:33 + 1):34 034| end 025| while (i:34 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:34 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:34]:-9.874798e-01 027| if (x:-9.874798e-01 < min:-9.991352e-01):false 028| end # if 030| if (x:-9.874798e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:34 + 1):35 034| end 025| while (i:35 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:35 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:35]:-9.667982e-01 027| if (x:-9.667982e-01 < min:-9.991352e-01):false 028| end # if 030| if (x:-9.667982e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:35 + 1):36 034| end 025| while (i:36 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:36 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:36]:-9.364567e-01 027| if (x:-9.364567e-01 < min:-9.991352e-01):false 028| end # if 030| if (x:-9.364567e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:36 + 1):37 034| end 025| while (i:37 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:37 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:37]:-8.967584e-01 027| if (x:-8.967584e-01 < min:-9.991352e-01):false 028| end # if 030| if (x:-8.967584e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:37 + 1):38 034| end 025| while (i:38 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:38 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:38]:-8.481000e-01 027| if (x:-8.481000e-01 < min:-9.991352e-01):false 028| end # if 030| if (x:-8.481000e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:38 + 1):39 034| end 025| while (i:39 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:39 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:39]:-7.909677e-01 027| if (x:-7.909677e-01 < min:-9.991352e-01):false 028| end # if 030| if (x:-7.909677e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:39 + 1):40 034| end 025| while (i:40 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:40 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 026| x = data[i:40]:-7.259323e-01 027| if (x:-7.259323e-01 < min:-9.991352e-01):false 028| end # if 030| if (x:-7.259323e-01 > max:1.000000e+00):false 031| end # if 033| i = (i:40 + 1):41 034| end 025| while (i:41 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 025| while (i:41 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):false 034| end # finish loop 036| i = 1 037| while (i:1 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:1 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:1]:1.000000e+00 039| val = ((80 * (x:1.000000e+00 - min:-9.991352e-01):1.999135e+00):1.599308e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):8.000000e+01 040| j = 1 041| while (j:1 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:65 + 1):66 044| end 041| while (j:66 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:66 + 1):67 044| end 041| while (j:67 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:67 + 1):68 044| end 041| while (j:68 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:68 + 1):69 044| end 041| while (j:69 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:69 + 1):70 044| end 041| while (j:70 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:70 + 1):71 044| end 041| while (j:71 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:71 + 1):72 044| end 041| while (j:72 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:72 + 1):73 044| end 041| while (j:73 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:73 + 1):74 044| end 041| while (j:74 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:74 + 1):75 044| end 041| while (j:75 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:75 + 1):76 044| end 041| while (j:76 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:76 + 1):77 044| end 041| while (j:77 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:77 + 1):78 044| end 041| while (j:78 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:78 + 1):79 044| end 041| while (j:79 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:79 + 1):80 044| end 041| while (j:80 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:80 + 1):81 044| end 041| while (j:81 <= val:8.000000e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:1 + 1):2 047| end 037| while (i:2 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:2 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:2]:9.950042e-01 039| val = ((80 * (x:9.950042e-01 - min:-9.991352e-01):1.994139e+00):1.595311e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):7.980008e+01 040| j = 1 041| while (j:1 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:65 + 1):66 044| end 041| while (j:66 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:66 + 1):67 044| end 041| while (j:67 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:67 + 1):68 044| end 041| while (j:68 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:68 + 1):69 044| end 041| while (j:69 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:69 + 1):70 044| end 041| while (j:70 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:70 + 1):71 044| end 041| while (j:71 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:71 + 1):72 044| end 041| while (j:72 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:72 + 1):73 044| end 041| while (j:73 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:73 + 1):74 044| end 041| while (j:74 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:74 + 1):75 044| end 041| while (j:75 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:75 + 1):76 044| end 041| while (j:76 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:76 + 1):77 044| end 041| while (j:77 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:77 + 1):78 044| end 041| while (j:78 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:78 + 1):79 044| end 041| while (j:79 <= val:7.980008e+01):true 042| print( ~msg ' ' )... 043| j = (j:79 + 1):80 044| end 041| while (j:80 <= val:7.980008e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:2 + 1):3 047| end 037| while (i:3 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:3 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:3]:9.800666e-01 039| val = ((80 * (x:9.800666e-01 - min:-9.991352e-01):1.979202e+00):1.583361e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):7.920232e+01 040| j = 1 041| while (j:1 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:65 + 1):66 044| end 041| while (j:66 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:66 + 1):67 044| end 041| while (j:67 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:67 + 1):68 044| end 041| while (j:68 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:68 + 1):69 044| end 041| while (j:69 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:69 + 1):70 044| end 041| while (j:70 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:70 + 1):71 044| end 041| while (j:71 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:71 + 1):72 044| end 041| while (j:72 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:72 + 1):73 044| end 041| while (j:73 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:73 + 1):74 044| end 041| while (j:74 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:74 + 1):75 044| end 041| while (j:75 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:75 + 1):76 044| end 041| while (j:76 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:76 + 1):77 044| end 041| while (j:77 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:77 + 1):78 044| end 041| while (j:78 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:78 + 1):79 044| end 041| while (j:79 <= val:7.920232e+01):true 042| print( ~msg ' ' )... 043| j = (j:79 + 1):80 044| end 041| while (j:80 <= val:7.920232e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:3 + 1):4 047| end 037| while (i:4 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:4 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:4]:9.553365e-01 039| val = ((80 * (x:9.553365e-01 - min:-9.991352e-01):1.954472e+00):1.563577e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):7.821269e+01 040| j = 1 041| while (j:1 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:65 + 1):66 044| end 041| while (j:66 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:66 + 1):67 044| end 041| while (j:67 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:67 + 1):68 044| end 041| while (j:68 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:68 + 1):69 044| end 041| while (j:69 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:69 + 1):70 044| end 041| while (j:70 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:70 + 1):71 044| end 041| while (j:71 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:71 + 1):72 044| end 041| while (j:72 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:72 + 1):73 044| end 041| while (j:73 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:73 + 1):74 044| end 041| while (j:74 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:74 + 1):75 044| end 041| while (j:75 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:75 + 1):76 044| end 041| while (j:76 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:76 + 1):77 044| end 041| while (j:77 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:77 + 1):78 044| end 041| while (j:78 <= val:7.821269e+01):true 042| print( ~msg ' ' )... 043| j = (j:78 + 1):79 044| end 041| while (j:79 <= val:7.821269e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:4 + 1):5 047| end 037| while (i:5 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:5 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:5]:9.210610e-01 039| val = ((80 * (x:9.210610e-01 - min:-9.991352e-01):1.920196e+00):1.536157e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):7.684107e+01 040| j = 1 041| while (j:1 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:65 + 1):66 044| end 041| while (j:66 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:66 + 1):67 044| end 041| while (j:67 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:67 + 1):68 044| end 041| while (j:68 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:68 + 1):69 044| end 041| while (j:69 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:69 + 1):70 044| end 041| while (j:70 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:70 + 1):71 044| end 041| while (j:71 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:71 + 1):72 044| end 041| while (j:72 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:72 + 1):73 044| end 041| while (j:73 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:73 + 1):74 044| end 041| while (j:74 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:74 + 1):75 044| end 041| while (j:75 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:75 + 1):76 044| end 041| while (j:76 <= val:7.684107e+01):true 042| print( ~msg ' ' )... 043| j = (j:76 + 1):77 044| end 041| while (j:77 <= val:7.684107e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:5 + 1):6 047| end 037| while (i:6 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:6 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:6]:8.775826e-01 039| val = ((80 * (x:8.775826e-01 - min:-9.991352e-01):1.876718e+00):1.501374e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):7.510118e+01 040| j = 1 041| while (j:1 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:65 + 1):66 044| end 041| while (j:66 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:66 + 1):67 044| end 041| while (j:67 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:67 + 1):68 044| end 041| while (j:68 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:68 + 1):69 044| end 041| while (j:69 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:69 + 1):70 044| end 041| while (j:70 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:70 + 1):71 044| end 041| while (j:71 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:71 + 1):72 044| end 041| while (j:72 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:72 + 1):73 044| end 041| while (j:73 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:73 + 1):74 044| end 041| while (j:74 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:74 + 1):75 044| end 041| while (j:75 <= val:7.510118e+01):true 042| print( ~msg ' ' )... 043| j = (j:75 + 1):76 044| end 041| while (j:76 <= val:7.510118e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:6 + 1):7 047| end 037| while (i:7 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:7 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:7]:8.253356e-01 039| val = ((80 * (x:8.253356e-01 - min:-9.991352e-01):1.824471e+00):1.459577e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):7.301040e+01 040| j = 1 041| while (j:1 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:65 + 1):66 044| end 041| while (j:66 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:66 + 1):67 044| end 041| while (j:67 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:67 + 1):68 044| end 041| while (j:68 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:68 + 1):69 044| end 041| while (j:69 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:69 + 1):70 044| end 041| while (j:70 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:70 + 1):71 044| end 041| while (j:71 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:71 + 1):72 044| end 041| while (j:72 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:72 + 1):73 044| end 041| while (j:73 <= val:7.301040e+01):true 042| print( ~msg ' ' )... 043| j = (j:73 + 1):74 044| end 041| while (j:74 <= val:7.301040e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:7 + 1):8 047| end 037| while (i:8 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:8 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:8]:7.648422e-01 039| val = ((80 * (x:7.648422e-01 - min:-9.991352e-01):1.763977e+00):1.411182e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):7.058962e+01 040| j = 1 041| while (j:1 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:65 + 1):66 044| end 041| while (j:66 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:66 + 1):67 044| end 041| while (j:67 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:67 + 1):68 044| end 041| while (j:68 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:68 + 1):69 044| end 041| while (j:69 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:69 + 1):70 044| end 041| while (j:70 <= val:7.058962e+01):true 042| print( ~msg ' ' )... 043| j = (j:70 + 1):71 044| end 041| while (j:71 <= val:7.058962e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:8 + 1):9 047| end 037| while (i:9 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:9 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:9]:6.967067e-01 039| val = ((80 * (x:6.967067e-01 - min:-9.991352e-01):1.695842e+00):1.356673e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):6.786302e+01 040| j = 1 041| while (j:1 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:65 + 1):66 044| end 041| while (j:66 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:66 + 1):67 044| end 041| while (j:67 <= val:6.786302e+01):true 042| print( ~msg ' ' )... 043| j = (j:67 + 1):68 044| end 041| while (j:68 <= val:6.786302e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:9 + 1):10 047| end 037| while (i:10 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:10 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:10]:6.216100e-01 039| val = ((80 * (x:6.216100e-01 - min:-9.991352e-01):1.620745e+00):1.296596e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):6.485785e+01 040| j = 1 041| while (j:1 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:6.485785e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:6.485785e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:10 + 1):11 047| end 037| while (i:11 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:11 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:11]:5.403023e-01 039| val = ((80 * (x:5.403023e-01 - min:-9.991352e-01):1.539437e+00):1.231550e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):6.160414e+01 040| j = 1 041| while (j:1 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:6.160414e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:6.160414e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:11 + 1):12 047| end 037| while (i:12 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:12 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:12]:4.535961e-01 039| val = ((80 * (x:4.535961e-01 - min:-9.991352e-01):1.452731e+00):1.162185e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):5.813439e+01 040| j = 1 041| while (j:1 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:5.813439e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:5.813439e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:12 + 1):13 047| end 037| while (i:13 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:13 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:13]:3.623578e-01 039| val = ((80 * (x:3.623578e-01 - min:-9.991352e-01):1.361493e+00):1.089194e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):5.448328e+01 040| j = 1 041| while (j:1 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:5.448328e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:5.448328e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:13 + 1):14 047| end 037| while (i:14 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:14 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:14]:2.674988e-01 039| val = ((80 * (x:2.674988e-01 - min:-9.991352e-01):1.266634e+00):1.013307e+02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):5.068728e+01 040| j = 1 041| while (j:1 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:5.068728e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:5.068728e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:14 + 1):15 047| end 037| while (i:15 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:15 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:15]:1.699671e-01 039| val = ((80 * (x:1.699671e-01 - min:-9.991352e-01):1.169102e+00):9.352818e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):4.678432e+01 040| j = 1 041| while (j:1 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:4.678432e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:4.678432e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:15 + 1):16 047| end 037| while (i:16 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:16 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:16]:7.073720e-02 039| val = ((80 * (x:7.073720e-02 - min:-9.991352e-01):1.069872e+00):8.558979e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):4.281341e+01 040| j = 1 041| while (j:1 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:4.281341e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:4.281341e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:16 + 1):17 047| end 037| while (i:17 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:17 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:17]:-2.919952e-02 039| val = ((80 * (x:-2.919952e-02 - min:-9.991352e-01):9.699356e-01):7.759485e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):3.881421e+01 040| j = 1 041| while (j:1 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:3.881421e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:3.881421e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:17 + 1):18 047| end 037| while (i:18 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:18 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:18]:-1.288445e-01 039| val = ((80 * (x:-1.288445e-01 - min:-9.991352e-01):8.702907e-01):6.962325e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):3.482669e+01 040| j = 1 041| while (j:1 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:3.482669e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:3.482669e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:18 + 1):19 047| end 037| while (i:19 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:19 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:19]:-2.272021e-01 039| val = ((80 * (x:-2.272021e-01 - min:-9.991352e-01):7.719331e-01):6.175464e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):3.089068e+01 040| j = 1 041| while (j:1 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:3.089068e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:3.089068e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:19 + 1):20 047| end 037| while (i:20 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:20 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:20]:-3.232896e-01 039| val = ((80 * (x:-3.232896e-01 - min:-9.991352e-01):6.758456e-01):5.406765e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):2.704552e+01 040| j = 1 041| while (j:1 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:2.704552e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:2.704552e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:20 + 1):21 047| end 037| while (i:21 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:21 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:21]:-4.161468e-01 039| val = ((80 * (x:-4.161468e-01 - min:-9.991352e-01):5.829883e-01):4.663907e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):2.332962e+01 040| j = 1 041| while (j:1 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:2.332962e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:2.332962e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:21 + 1):22 047| end 037| while (i:22 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:22 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:22]:-5.048461e-01 039| val = ((80 * (x:-5.048461e-01 - min:-9.991352e-01):4.942890e-01):3.954312e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):1.978012e+01 040| j = 1 041| while (j:1 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:1.978012e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:1.978012e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:22 + 1):23 047| end 037| while (i:23 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:23 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:23]:-5.885011e-01 039| val = ((80 * (x:-5.885011e-01 - min:-9.991352e-01):4.106340e-01):3.285072e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):1.643247e+01 040| j = 1 041| while (j:1 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:1.643247e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:1.643247e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:23 + 1):24 047| end 037| while (i:24 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:24 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:24]:-6.662760e-01 039| val = ((80 * (x:-6.662760e-01 - min:-9.991352e-01):3.328591e-01):2.662873e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):1.332013e+01 040| j = 1 041| while (j:1 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:1.332013e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:1.332013e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:24 + 1):25 047| end 037| while (i:25 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:25 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:25]:-7.373937e-01 039| val = ((80 * (x:-7.373937e-01 - min:-9.991352e-01):2.617414e-01):2.093931e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):1.047419e+01 040| j = 1 041| while (j:1 <= val:1.047419e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:1.047419e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:1.047419e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:1.047419e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:1.047419e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:1.047419e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:1.047419e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:1.047419e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:1.047419e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:1.047419e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:1.047419e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:25 + 1):26 047| end 037| while (i:26 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:26 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:26]:-8.011436e-01 039| val = ((80 * (x:-8.011436e-01 - min:-9.991352e-01):1.979915e-01):1.583932e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):7.923088e+00 040| j = 1 041| while (j:1 <= val:7.923088e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:7.923088e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:7.923088e+00):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:7.923088e+00):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:7.923088e+00):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:7.923088e+00):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:7.923088e+00):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:7.923088e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:26 + 1):27 047| end 037| while (i:27 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:27 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:27]:-8.568888e-01 039| val = ((80 * (x:-8.568888e-01 - min:-9.991352e-01):1.422464e-01):1.137971e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):5.692317e+00 040| j = 1 041| while (j:1 <= val:5.692317e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:5.692317e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:5.692317e+00):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:5.692317e+00):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:5.692317e+00):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:5.692317e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:27 + 1):28 047| end 037| while (i:28 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:28 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:28]:-9.040721e-01 039| val = ((80 * (x:-9.040721e-01 - min:-9.991352e-01):9.506301e-02):7.605041e+00 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):3.804165e+00 040| j = 1 041| while (j:1 <= val:3.804165e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:3.804165e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:3.804165e+00):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:3.804165e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:28 + 1):29 047| end 037| while (i:29 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:29 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:29]:-9.422223e-01 039| val = ((80 * (x:-9.422223e-01 - min:-9.991352e-01):5.691281e-02):4.553025e+00 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):2.277497e+00 040| j = 1 041| while (j:1 <= val:2.277497e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:2.277497e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:2.277497e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:29 + 1):30 047| end 037| while (i:30 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:30 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:30]:-9.709582e-01 039| val = ((80 * (x:-9.709582e-01 - min:-9.991352e-01):2.817699e-02):2.254159e+00 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):1.127567e+00 040| j = 1 041| while (j:1 <= val:1.127567e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:1.127567e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:30 + 1):31 047| end 037| while (i:31 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:31 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:31]:-9.899925e-01 039| val = ((80 * (x:-9.899925e-01 - min:-9.991352e-01):9.142654e-03):7.314123e-01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):3.658644e-01 040| j = 1 041| while (j:1 <= val:3.658644e-01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:31 + 1):32 047| end 037| while (i:32 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:32 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:32]:-9.991352e-01 039| val = ((80 * (x:-9.991352e-01 - min:-9.991352e-01):0.000000e+00):0.000000e+00 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):0.000000e+00 040| j = 1 041| while (j:1 <= val:0.000000e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:32 + 1):33 047| end 037| while (i:33 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:33 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:33]:-9.982948e-01 039| val = ((80 * (x:-9.982948e-01 - min:-9.991352e-01):8.403745e-04):6.722996e-02 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):3.362952e-02 040| j = 1 041| while (j:1 <= val:3.362952e-02):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:33 + 1):34 047| end 037| while (i:34 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:34 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:34]:-9.874798e-01 039| val = ((80 * (x:-9.874798e-01 - min:-9.991352e-01):1.165538e-02):9.324304e-01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):4.664169e-01 040| j = 1 041| while (j:1 <= val:4.664169e-01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:34 + 1):35 047| end 037| while (i:35 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:35 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:35]:-9.667982e-01 039| val = ((80 * (x:-9.667982e-01 - min:-9.991352e-01):3.233696e-02):2.586957e+00 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):1.294038e+00 040| j = 1 041| while (j:1 <= val:1.294038e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:1.294038e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:35 + 1):36 047| end 037| while (i:36 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:36 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:36]:-9.364567e-01 039| val = ((80 * (x:-9.364567e-01 - min:-9.991352e-01):6.267846e-02):5.014277e+00 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):2.508223e+00 040| j = 1 041| while (j:1 <= val:2.508223e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:2.508223e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:2.508223e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:36 + 1):37 047| end 037| while (i:37 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:37 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:37]:-8.967584e-01 039| val = ((80 * (x:-8.967584e-01 - min:-9.991352e-01):1.023767e-01):8.190139e+00 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):4.096841e+00 040| j = 1 041| while (j:1 <= val:4.096841e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:4.096841e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:4.096841e+00):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:4.096841e+00):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:4.096841e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:37 + 1):38 047| end 037| while (i:38 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:38 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:38]:-8.481000e-01 039| val = ((80 * (x:-8.481000e-01 - min:-9.991352e-01):1.510351e-01):1.208281e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):6.044018e+00 040| j = 1 041| while (j:1 <= val:6.044018e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:6.044018e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:6.044018e+00):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:6.044018e+00):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:6.044018e+00):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:6.044018e+00):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:6.044018e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:38 + 1):39 047| end 037| while (i:39 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:39 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:39]:-7.909677e-01 039| val = ((80 * (x:-7.909677e-01 - min:-9.991352e-01):2.081674e-01):1.665340e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):8.330300e+00 040| j = 1 041| while (j:1 <= val:8.330300e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:8.330300e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:8.330300e+00):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:8.330300e+00):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:8.330300e+00):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:8.330300e+00):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:8.330300e+00):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:8.330300e+00):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:8.330300e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:39 + 1):40 047| end 037| while (i:40 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:40 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):true 038| x = data[i:40]:-7.259323e-01 039| val = ((80 * (x:-7.259323e-01 - min:-9.991352e-01):2.732028e-01):2.185623e+01 / (max:1.000000e+00 - min:-9.991352e-01):1.999135e+00):1.093284e+01 040| j = 1 041| while (j:1 <= val:1.093284e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:1.093284e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:1.093284e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:1.093284e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:1.093284e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:1.093284e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:1.093284e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:1.093284e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:1.093284e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:1.093284e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:1.093284e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:40 + 1):41 047| end 037| while (i:41 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] )... 037| while (i:41 <= size( ~arg data:-> [ -> 1.000000e+00, -> 9.950042e-01, -> 9.800666e-01, -> 9.553365e-01, -> 9.210610e-01, -> 8.775826e-01, -> 8.253356e-01, -> 7.648422e-01, -> 6.967067e-01, -> 6.216100e-01, -> 5.403023e-01, -> 4.535961e-01, -> 3.623578e-01, -> 2.674988e-01, -> 1.699671e-01, -> 7.073720e-02, -> -2.919952e-02, -> -1.288445e-01, -> -2.272021e-01, -> -3.232896e-01, -> -4.161468e-01, -> -5.048461e-01, -> -5.885011e-01, -> -6.662760e-01, -> -7.373937e-01, -> -8.011436e-01, -> -8.568888e-01, -> -9.040721e-01, -> -9.422223e-01, -> -9.709582e-01, -> -9.899925e-01, -> -9.991352e-01, -> -9.982948e-01, -> -9.874798e-01, -> -9.667982e-01, -> -9.364567e-01, -> -8.967584e-01, -> -8.481000e-01, -> -7.909677e-01, -> -7.259323e-01 ] ):40):false 047| end # finish loop 055|println( ~msg 'graph of user defined function' )... 056|... = get_data( ~func sub myfunc(~num) ~from 0 ~to 4 ~step 2.000000e-01 )... 009| ret = [ ] 011| i = from:0 012| while (i:0 <= to:4):true 013| push( ~array ret:[ ] ~top func:sub myfunc( ~num i:0 )... 004| return (sqr( ~num num:0 )... 004| return (sqr( ~num num:0 ):0.000000e+00 + (num:0 * num:0):0):0.000000e+00 013| push( ~array ret:[ ] ~top func:sub myfunc( ~num i:0 ):0.000000e+00 )... 014| i = (i:0 + step:2.000000e-01):2.000000e-01 015| end 012| while (i:2.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00 ] ~top func:sub myfunc( ~num i:2.000000e-01 )... 004| return (sqr( ~num num:2.000000e-01 )... 004| return (sqr( ~num num:2.000000e-01 ):4.472136e-01 + (num:2.000000e-01 * num:2.000000e-01):4.000000e-02):4.872136e-01 013| push( ~array ret:[ -> 0.000000e+00 ] ~top func:sub myfunc( ~num i:2.000000e-01 ):4.872136e-01 )... 014| i = (i:2.000000e-01 + step:2.000000e-01):4.000000e-01 015| end 012| while (i:4.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01 ] ~top func:sub myfunc( ~num i:4.000000e-01 )... 004| return (sqr( ~num num:4.000000e-01 )... 004| return (sqr( ~num num:4.000000e-01 ):6.324555e-01 + (num:4.000000e-01 * num:4.000000e-01):1.600000e-01):7.924555e-01 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01 ] ~top func:sub myfunc( ~num i:4.000000e-01 ):7.924555e-01 )... 014| i = (i:4.000000e-01 + step:2.000000e-01):6.000000e-01 015| end 012| while (i:6.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01 ] ~top func:sub myfunc( ~num i:6.000000e-01 )... 004| return (sqr( ~num num:6.000000e-01 )... 004| return (sqr( ~num num:6.000000e-01 ):7.745967e-01 + (num:6.000000e-01 * num:6.000000e-01):3.600000e-01):1.134597e+00 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01 ] ~top func:sub myfunc( ~num i:6.000000e-01 ):1.134597e+00 )... 014| i = (i:6.000000e-01 + step:2.000000e-01):8.000000e-01 015| end 012| while (i:8.000000e-01 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00 ] ~top func:sub myfunc( ~num i:8.000000e-01 )... 004| return (sqr( ~num num:8.000000e-01 )... 004| return (sqr( ~num num:8.000000e-01 ):8.944272e-01 + (num:8.000000e-01 * num:8.000000e-01):6.400000e-01):1.534427e+00 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00 ] ~top func:sub myfunc( ~num i:8.000000e-01 ):1.534427e+00 )... 014| i = (i:8.000000e-01 + step:2.000000e-01):1.000000e+00 015| end 012| while (i:1.000000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00 ] ~top func:sub myfunc( ~num i:1.000000e+00 )... 004| return (sqr( ~num num:1.000000e+00 )... 004| return (sqr( ~num num:1.000000e+00 ):1.000000e+00 + (num:1.000000e+00 * num:1.000000e+00):1.000000e+00):2.000000e+00 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00 ] ~top func:sub myfunc( ~num i:1.000000e+00 ):2.000000e+00 )... 014| i = (i:1.000000e+00 + step:2.000000e-01):1.200000e+00 015| end 012| while (i:1.200000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00 ] ~top func:sub myfunc( ~num i:1.200000e+00 )... 004| return (sqr( ~num num:1.200000e+00 )... 004| return (sqr( ~num num:1.200000e+00 ):1.095445e+00 + (num:1.200000e+00 * num:1.200000e+00):1.440000e+00):2.535445e+00 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00 ] ~top func:sub myfunc( ~num i:1.200000e+00 ):2.535445e+00 )... 014| i = (i:1.200000e+00 + step:2.000000e-01):1.400000e+00 015| end 012| while (i:1.400000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00 ] ~top func:sub myfunc( ~num i:1.400000e+00 )... 004| return (sqr( ~num num:1.400000e+00 )... 004| return (sqr( ~num num:1.400000e+00 ):1.183216e+00 + (num:1.400000e+00 * num:1.400000e+00):1.960000e+00):3.143216e+00 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00 ] ~top func:sub myfunc( ~num i:1.400000e+00 ):3.143216e+00 )... 014| i = (i:1.400000e+00 + step:2.000000e-01):1.600000e+00 015| end 012| while (i:1.600000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00 ] ~top func:sub myfunc( ~num i:1.600000e+00 )... 004| return (sqr( ~num num:1.600000e+00 )... 004| return (sqr( ~num num:1.600000e+00 ):1.264911e+00 + (num:1.600000e+00 * num:1.600000e+00):2.560000e+00):3.824911e+00 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00 ] ~top func:sub myfunc( ~num i:1.600000e+00 ):3.824911e+00 )... 014| i = (i:1.600000e+00 + step:2.000000e-01):1.800000e+00 015| end 012| while (i:1.800000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00 ] ~top func:sub myfunc( ~num i:1.800000e+00 )... 004| return (sqr( ~num num:1.800000e+00 )... 004| return (sqr( ~num num:1.800000e+00 ):1.341641e+00 + (num:1.800000e+00 * num:1.800000e+00):3.240000e+00):4.581641e+00 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00 ] ~top func:sub myfunc( ~num i:1.800000e+00 ):4.581641e+00 )... 014| i = (i:1.800000e+00 + step:2.000000e-01):2.000000e+00 015| end 012| while (i:2.000000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00 ] ~top func:sub myfunc( ~num i:2.000000e+00 )... 004| return (sqr( ~num num:2.000000e+00 )... 004| return (sqr( ~num num:2.000000e+00 ):1.414214e+00 + (num:2.000000e+00 * num:2.000000e+00):4.000000e+00):5.414214e+00 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00 ] ~top func:sub myfunc( ~num i:2.000000e+00 ):5.414214e+00 )... 014| i = (i:2.000000e+00 + step:2.000000e-01):2.200000e+00 015| end 012| while (i:2.200000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00 ] ~top func:sub myfunc( ~num i:2.200000e+00 )... 004| return (sqr( ~num num:2.200000e+00 )... 004| return (sqr( ~num num:2.200000e+00 ):1.483240e+00 + (num:2.200000e+00 * num:2.200000e+00):4.840000e+00):6.323240e+00 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00 ] ~top func:sub myfunc( ~num i:2.200000e+00 ):6.323240e+00 )... 014| i = (i:2.200000e+00 + step:2.000000e-01):2.400000e+00 015| end 012| while (i:2.400000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00 ] ~top func:sub myfunc( ~num i:2.400000e+00 )... 004| return (sqr( ~num num:2.400000e+00 )... 004| return (sqr( ~num num:2.400000e+00 ):1.549193e+00 + (num:2.400000e+00 * num:2.400000e+00):5.760000e+00):7.309193e+00 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00 ] ~top func:sub myfunc( ~num i:2.400000e+00 ):7.309193e+00 )... 014| i = (i:2.400000e+00 + step:2.000000e-01):2.600000e+00 015| end 012| while (i:2.600000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00 ] ~top func:sub myfunc( ~num i:2.600000e+00 )... 004| return (sqr( ~num num:2.600000e+00 )... 004| return (sqr( ~num num:2.600000e+00 ):1.612452e+00 + (num:2.600000e+00 * num:2.600000e+00):6.760000e+00):8.372452e+00 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00 ] ~top func:sub myfunc( ~num i:2.600000e+00 ):8.372452e+00 )... 014| i = (i:2.600000e+00 + step:2.000000e-01):2.800000e+00 015| end 012| while (i:2.800000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00 ] ~top func:sub myfunc( ~num i:2.800000e+00 )... 004| return (sqr( ~num num:2.800000e+00 )... 004| return (sqr( ~num num:2.800000e+00 ):1.673320e+00 + (num:2.800000e+00 * num:2.800000e+00):7.840000e+00):9.513320e+00 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00 ] ~top func:sub myfunc( ~num i:2.800000e+00 ):9.513320e+00 )... 014| i = (i:2.800000e+00 + step:2.000000e-01):3.000000e+00 015| end 012| while (i:3.000000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00 ] ~top func:sub myfunc( ~num i:3.000000e+00 )... 004| return (sqr( ~num num:3.000000e+00 )... 004| return (sqr( ~num num:3.000000e+00 ):1.732051e+00 + (num:3.000000e+00 * num:3.000000e+00):9.000000e+00):1.073205e+01 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00 ] ~top func:sub myfunc( ~num i:3.000000e+00 ):1.073205e+01 )... 014| i = (i:3.000000e+00 + step:2.000000e-01):3.200000e+00 015| end 012| while (i:3.200000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01 ] ~top func:sub myfunc( ~num i:3.200000e+00 )... 004| return (sqr( ~num num:3.200000e+00 )... 004| return (sqr( ~num num:3.200000e+00 ):1.788854e+00 + (num:3.200000e+00 * num:3.200000e+00):1.024000e+01):1.202885e+01 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01 ] ~top func:sub myfunc( ~num i:3.200000e+00 ):1.202885e+01 )... 014| i = (i:3.200000e+00 + step:2.000000e-01):3.400000e+00 015| end 012| while (i:3.400000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01 ] ~top func:sub myfunc( ~num i:3.400000e+00 )... 004| return (sqr( ~num num:3.400000e+00 )... 004| return (sqr( ~num num:3.400000e+00 ):1.843909e+00 + (num:3.400000e+00 * num:3.400000e+00):1.156000e+01):1.340391e+01 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01 ] ~top func:sub myfunc( ~num i:3.400000e+00 ):1.340391e+01 )... 014| i = (i:3.400000e+00 + step:2.000000e-01):3.600000e+00 015| end 012| while (i:3.600000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01 ] ~top func:sub myfunc( ~num i:3.600000e+00 )... 004| return (sqr( ~num num:3.600000e+00 )... 004| return (sqr( ~num num:3.600000e+00 ):1.897367e+00 + (num:3.600000e+00 * num:3.600000e+00):1.296000e+01):1.485737e+01 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01 ] ~top func:sub myfunc( ~num i:3.600000e+00 ):1.485737e+01 )... 014| i = (i:3.600000e+00 + step:2.000000e-01):3.800000e+00 015| end 012| while (i:3.800000e+00 <= to:4):true 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01 ] ~top func:sub myfunc( ~num i:3.800000e+00 )... 004| return (sqr( ~num num:3.800000e+00 )... 004| return (sqr( ~num num:3.800000e+00 ):1.949359e+00 + (num:3.800000e+00 * num:3.800000e+00):1.444000e+01):1.638936e+01 013| push( ~array ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01 ] ~top func:sub myfunc( ~num i:3.800000e+00 ):1.638936e+01 )... 014| i = (i:3.800000e+00 + step:2.000000e-01):4.000000e+00 015| end 012| while (i:4.000000e+00 <= to:4):false 015| end # finish loop 016| return ret:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] 056|data = get_data( ~func sub myfunc(~num) ~from 0 ~to 4 ~step 2.000000e-01 ):[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] 057|draw_graph( ~data data:[ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 021| ... = maxfloat( )... 021| min = maxfloat( ):1.797693e+308 022| ... = minfloat( )... 022| max = minfloat( ):2.225074e-308 024| i = 1 025| while (i:1 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:1 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:1]:0.000000e+00 027| if (x:0.000000e+00 < min:1.797693e+308):true 028| min = x:0.000000e+00 028| end # if 030| if (x:0.000000e+00 > max:2.225074e-308):false 031| end # if 033| i = (i:1 + 1):2 034| end 025| while (i:2 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:2 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:2]:4.872136e-01 027| if (x:4.872136e-01 < min:0.000000e+00):false 028| end # if 030| if (x:4.872136e-01 > max:2.225074e-308):true 031| max = x:4.872136e-01 031| end # if 033| i = (i:2 + 1):3 034| end 025| while (i:3 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:3 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:3]:7.924555e-01 027| if (x:7.924555e-01 < min:0.000000e+00):false 028| end # if 030| if (x:7.924555e-01 > max:4.872136e-01):true 031| max = x:7.924555e-01 031| end # if 033| i = (i:3 + 1):4 034| end 025| while (i:4 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:4 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:4]:1.134597e+00 027| if (x:1.134597e+00 < min:0.000000e+00):false 028| end # if 030| if (x:1.134597e+00 > max:7.924555e-01):true 031| max = x:1.134597e+00 031| end # if 033| i = (i:4 + 1):5 034| end 025| while (i:5 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:5 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:5]:1.534427e+00 027| if (x:1.534427e+00 < min:0.000000e+00):false 028| end # if 030| if (x:1.534427e+00 > max:1.134597e+00):true 031| max = x:1.534427e+00 031| end # if 033| i = (i:5 + 1):6 034| end 025| while (i:6 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:6 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:6]:2.000000e+00 027| if (x:2.000000e+00 < min:0.000000e+00):false 028| end # if 030| if (x:2.000000e+00 > max:1.534427e+00):true 031| max = x:2.000000e+00 031| end # if 033| i = (i:6 + 1):7 034| end 025| while (i:7 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:7 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:7]:2.535445e+00 027| if (x:2.535445e+00 < min:0.000000e+00):false 028| end # if 030| if (x:2.535445e+00 > max:2.000000e+00):true 031| max = x:2.535445e+00 031| end # if 033| i = (i:7 + 1):8 034| end 025| while (i:8 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:8 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:8]:3.143216e+00 027| if (x:3.143216e+00 < min:0.000000e+00):false 028| end # if 030| if (x:3.143216e+00 > max:2.535445e+00):true 031| max = x:3.143216e+00 031| end # if 033| i = (i:8 + 1):9 034| end 025| while (i:9 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:9 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:9]:3.824911e+00 027| if (x:3.824911e+00 < min:0.000000e+00):false 028| end # if 030| if (x:3.824911e+00 > max:3.143216e+00):true 031| max = x:3.824911e+00 031| end # if 033| i = (i:9 + 1):10 034| end 025| while (i:10 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:10 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:10]:4.581641e+00 027| if (x:4.581641e+00 < min:0.000000e+00):false 028| end # if 030| if (x:4.581641e+00 > max:3.824911e+00):true 031| max = x:4.581641e+00 031| end # if 033| i = (i:10 + 1):11 034| end 025| while (i:11 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:11 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:11]:5.414214e+00 027| if (x:5.414214e+00 < min:0.000000e+00):false 028| end # if 030| if (x:5.414214e+00 > max:4.581641e+00):true 031| max = x:5.414214e+00 031| end # if 033| i = (i:11 + 1):12 034| end 025| while (i:12 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:12 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:12]:6.323240e+00 027| if (x:6.323240e+00 < min:0.000000e+00):false 028| end # if 030| if (x:6.323240e+00 > max:5.414214e+00):true 031| max = x:6.323240e+00 031| end # if 033| i = (i:12 + 1):13 034| end 025| while (i:13 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:13 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:13]:7.309193e+00 027| if (x:7.309193e+00 < min:0.000000e+00):false 028| end # if 030| if (x:7.309193e+00 > max:6.323240e+00):true 031| max = x:7.309193e+00 031| end # if 033| i = (i:13 + 1):14 034| end 025| while (i:14 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:14 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:14]:8.372452e+00 027| if (x:8.372452e+00 < min:0.000000e+00):false 028| end # if 030| if (x:8.372452e+00 > max:7.309193e+00):true 031| max = x:8.372452e+00 031| end # if 033| i = (i:14 + 1):15 034| end 025| while (i:15 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:15 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:15]:9.513320e+00 027| if (x:9.513320e+00 < min:0.000000e+00):false 028| end # if 030| if (x:9.513320e+00 > max:8.372452e+00):true 031| max = x:9.513320e+00 031| end # if 033| i = (i:15 + 1):16 034| end 025| while (i:16 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:16 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:16]:1.073205e+01 027| if (x:1.073205e+01 < min:0.000000e+00):false 028| end # if 030| if (x:1.073205e+01 > max:9.513320e+00):true 031| max = x:1.073205e+01 031| end # if 033| i = (i:16 + 1):17 034| end 025| while (i:17 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:17 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:17]:1.202885e+01 027| if (x:1.202885e+01 < min:0.000000e+00):false 028| end # if 030| if (x:1.202885e+01 > max:1.073205e+01):true 031| max = x:1.202885e+01 031| end # if 033| i = (i:17 + 1):18 034| end 025| while (i:18 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:18 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:18]:1.340391e+01 027| if (x:1.340391e+01 < min:0.000000e+00):false 028| end # if 030| if (x:1.340391e+01 > max:1.202885e+01):true 031| max = x:1.340391e+01 031| end # if 033| i = (i:18 + 1):19 034| end 025| while (i:19 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:19 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:19]:1.485737e+01 027| if (x:1.485737e+01 < min:0.000000e+00):false 028| end # if 030| if (x:1.485737e+01 > max:1.340391e+01):true 031| max = x:1.485737e+01 031| end # if 033| i = (i:19 + 1):20 034| end 025| while (i:20 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:20 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 026| x = data[i:20]:1.638936e+01 027| if (x:1.638936e+01 < min:0.000000e+00):false 028| end # if 030| if (x:1.638936e+01 > max:1.485737e+01):true 031| max = x:1.638936e+01 031| end # if 033| i = (i:20 + 1):21 034| end 025| while (i:21 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 025| while (i:21 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):false 034| end # finish loop 036| i = 1 037| while (i:1 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:1 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:1]:0.000000e+00 039| val = ((80 * (x:0.000000e+00 - min:0.000000e+00):0.000000e+00):0.000000e+00 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):0.000000e+00 040| j = 1 041| while (j:1 <= val:0.000000e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:1 + 1):2 047| end 037| while (i:2 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:2 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:2]:4.872136e-01 039| val = ((80 * (x:4.872136e-01 - min:0.000000e+00):4.872136e-01):3.897709e+01 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):2.378195e+00 040| j = 1 041| while (j:1 <= val:2.378195e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:2.378195e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:2.378195e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:2 + 1):3 047| end 037| while (i:3 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:3 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:3]:7.924555e-01 039| val = ((80 * (x:7.924555e-01 - min:0.000000e+00):7.924555e-01):6.339644e+01 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):3.868147e+00 040| j = 1 041| while (j:1 <= val:3.868147e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:3.868147e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:3.868147e+00):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:3.868147e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:3 + 1):4 047| end 037| while (i:4 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:4 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:4]:1.134597e+00 039| val = ((80 * (x:1.134597e+00 - min:0.000000e+00):1.134597e+00):9.076773e+01 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):5.538211e+00 040| j = 1 041| while (j:1 <= val:5.538211e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:5.538211e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:5.538211e+00):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:5.538211e+00):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:5.538211e+00):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:5.538211e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:4 + 1):5 047| end 037| while (i:5 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:5 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:5]:1.534427e+00 039| val = ((80 * (x:1.534427e+00 - min:0.000000e+00):1.534427e+00):1.227542e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):7.489870e+00 040| j = 1 041| while (j:1 <= val:7.489870e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:7.489870e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:7.489870e+00):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:7.489870e+00):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:7.489870e+00):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:7.489870e+00):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:7.489870e+00):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:7.489870e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:5 + 1):6 047| end 037| while (i:6 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:6 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:6]:2.000000e+00 039| val = ((80 * (x:2.000000e+00 - min:0.000000e+00):2.000000e+00):1.600000e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):9.762432e+00 040| j = 1 041| while (j:1 <= val:9.762432e+00):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:9.762432e+00):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:9.762432e+00):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:9.762432e+00):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:9.762432e+00):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:9.762432e+00):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:9.762432e+00):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:9.762432e+00):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:9.762432e+00):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:9.762432e+00):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:6 + 1):7 047| end 037| while (i:7 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:7 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:7]:2.535445e+00 039| val = ((80 * (x:2.535445e+00 - min:0.000000e+00):2.535445e+00):2.028356e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):1.237606e+01 040| j = 1 041| while (j:1 <= val:1.237606e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:1.237606e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:1.237606e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:1.237606e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:1.237606e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:1.237606e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:1.237606e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:1.237606e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:1.237606e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:1.237606e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:1.237606e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:1.237606e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:1.237606e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:7 + 1):8 047| end 037| while (i:8 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:8 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:8]:3.143216e+00 039| val = ((80 * (x:3.143216e+00 - min:0.000000e+00):3.143216e+00):2.514573e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):1.534272e+01 040| j = 1 041| while (j:1 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:1.534272e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:1.534272e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:8 + 1):9 047| end 037| while (i:9 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:9 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:9]:3.824911e+00 039| val = ((80 * (x:3.824911e+00 - min:0.000000e+00):3.824911e+00):3.059929e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):1.867022e+01 040| j = 1 041| while (j:1 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:1.867022e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:1.867022e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:9 + 1):10 047| end 037| while (i:10 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:10 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:10]:4.581641e+00 039| val = ((80 * (x:4.581641e+00 - min:0.000000e+00):4.581641e+00):3.665313e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):2.236398e+01 040| j = 1 041| while (j:1 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:2.236398e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:2.236398e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:10 + 1):11 047| end 037| while (i:11 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:11 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:11]:5.414214e+00 039| val = ((80 * (x:5.414214e+00 - min:0.000000e+00):5.414214e+00):4.331371e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):2.642795e+01 040| j = 1 041| while (j:1 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:2.642795e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:2.642795e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:11 + 1):12 047| end 037| while (i:12 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:12 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:12]:6.323240e+00 039| val = ((80 * (x:6.323240e+00 - min:0.000000e+00):6.323240e+00):5.058592e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):3.086510e+01 040| j = 1 041| while (j:1 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:3.086510e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:3.086510e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:12 + 1):13 047| end 037| while (i:13 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:13 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:13]:7.309193e+00 039| val = ((80 * (x:7.309193e+00 - min:0.000000e+00):7.309193e+00):5.847355e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):3.567775e+01 040| j = 1 041| while (j:1 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:3.567775e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:3.567775e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:13 + 1):14 047| end 037| while (i:14 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:14 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:14]:8.372452e+00 039| val = ((80 * (x:8.372452e+00 - min:0.000000e+00):8.372452e+00):6.697961e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):4.086774e+01 040| j = 1 041| while (j:1 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:4.086774e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:4.086774e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:14 + 1):15 047| end 037| while (i:15 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:15 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:15]:9.513320e+00 039| val = ((80 * (x:9.513320e+00 - min:0.000000e+00):9.513320e+00):7.610656e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):4.643657e+01 040| j = 1 041| while (j:1 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:4.643657e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:4.643657e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:15 + 1):16 047| end 037| while (i:16 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:16 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:16]:1.073205e+01 039| val = ((80 * (x:1.073205e+01 - min:0.000000e+00):1.073205e+01):8.585641e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):5.238546e+01 040| j = 1 041| while (j:1 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:5.238546e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:5.238546e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:16 + 1):17 047| end 037| while (i:17 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:17 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:17]:1.202885e+01 039| val = ((80 * (x:1.202885e+01 - min:0.000000e+00):1.202885e+01):9.623084e+02 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):5.871544e+01 040| j = 1 041| while (j:1 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:5.871544e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:5.871544e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:17 + 1):18 047| end 037| while (i:18 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:18 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:18]:1.340391e+01 039| val = ((80 * (x:1.340391e+01 - min:0.000000e+00):1.340391e+01):1.072313e+03 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):6.542737e+01 040| j = 1 041| while (j:1 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:6.542737e+01):true 042| print( ~msg ' ' )... 043| j = (j:65 + 1):66 044| end 041| while (j:66 <= val:6.542737e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:18 + 1):19 047| end 037| while (i:19 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:19 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:19]:1.485737e+01 039| val = ((80 * (x:1.485737e+01 - min:0.000000e+00):1.485737e+01):1.188589e+03 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):7.252201e+01 040| j = 1 041| while (j:1 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:65 + 1):66 044| end 041| while (j:66 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:66 + 1):67 044| end 041| while (j:67 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:67 + 1):68 044| end 041| while (j:68 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:68 + 1):69 044| end 041| while (j:69 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:69 + 1):70 044| end 041| while (j:70 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:70 + 1):71 044| end 041| while (j:71 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:71 + 1):72 044| end 041| while (j:72 <= val:7.252201e+01):true 042| print( ~msg ' ' )... 043| j = (j:72 + 1):73 044| end 041| while (j:73 <= val:7.252201e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:19 + 1):20 047| end 037| while (i:20 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:20 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):true 038| x = data[i:20]:1.638936e+01 039| val = ((80 * (x:1.638936e+01 - min:0.000000e+00):1.638936e+01):1.311149e+03 / (max:1.638936e+01 - min:0.000000e+00):1.638936e+01):8.000000e+01 040| j = 1 041| while (j:1 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:1 + 1):2 044| end 041| while (j:2 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:2 + 1):3 044| end 041| while (j:3 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:3 + 1):4 044| end 041| while (j:4 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:4 + 1):5 044| end 041| while (j:5 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:5 + 1):6 044| end 041| while (j:6 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:6 + 1):7 044| end 041| while (j:7 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:7 + 1):8 044| end 041| while (j:8 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:8 + 1):9 044| end 041| while (j:9 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:9 + 1):10 044| end 041| while (j:10 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:10 + 1):11 044| end 041| while (j:11 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:11 + 1):12 044| end 041| while (j:12 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:12 + 1):13 044| end 041| while (j:13 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:13 + 1):14 044| end 041| while (j:14 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:14 + 1):15 044| end 041| while (j:15 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:15 + 1):16 044| end 041| while (j:16 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:16 + 1):17 044| end 041| while (j:17 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:17 + 1):18 044| end 041| while (j:18 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:18 + 1):19 044| end 041| while (j:19 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:19 + 1):20 044| end 041| while (j:20 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:20 + 1):21 044| end 041| while (j:21 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:21 + 1):22 044| end 041| while (j:22 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:22 + 1):23 044| end 041| while (j:23 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:23 + 1):24 044| end 041| while (j:24 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:24 + 1):25 044| end 041| while (j:25 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:25 + 1):26 044| end 041| while (j:26 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:26 + 1):27 044| end 041| while (j:27 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:27 + 1):28 044| end 041| while (j:28 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:28 + 1):29 044| end 041| while (j:29 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:29 + 1):30 044| end 041| while (j:30 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:30 + 1):31 044| end 041| while (j:31 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:31 + 1):32 044| end 041| while (j:32 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:32 + 1):33 044| end 041| while (j:33 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:33 + 1):34 044| end 041| while (j:34 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:34 + 1):35 044| end 041| while (j:35 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:35 + 1):36 044| end 041| while (j:36 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:36 + 1):37 044| end 041| while (j:37 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:37 + 1):38 044| end 041| while (j:38 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:38 + 1):39 044| end 041| while (j:39 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:39 + 1):40 044| end 041| while (j:40 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:40 + 1):41 044| end 041| while (j:41 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:41 + 1):42 044| end 041| while (j:42 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:42 + 1):43 044| end 041| while (j:43 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:43 + 1):44 044| end 041| while (j:44 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:44 + 1):45 044| end 041| while (j:45 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:45 + 1):46 044| end 041| while (j:46 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:46 + 1):47 044| end 041| while (j:47 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:47 + 1):48 044| end 041| while (j:48 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:48 + 1):49 044| end 041| while (j:49 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:49 + 1):50 044| end 041| while (j:50 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:50 + 1):51 044| end 041| while (j:51 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:51 + 1):52 044| end 041| while (j:52 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:52 + 1):53 044| end 041| while (j:53 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:53 + 1):54 044| end 041| while (j:54 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:54 + 1):55 044| end 041| while (j:55 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:55 + 1):56 044| end 041| while (j:56 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:56 + 1):57 044| end 041| while (j:57 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:57 + 1):58 044| end 041| while (j:58 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:58 + 1):59 044| end 041| while (j:59 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:59 + 1):60 044| end 041| while (j:60 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:60 + 1):61 044| end 041| while (j:61 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:61 + 1):62 044| end 041| while (j:62 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:62 + 1):63 044| end 041| while (j:63 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:63 + 1):64 044| end 041| while (j:64 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:64 + 1):65 044| end 041| while (j:65 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:65 + 1):66 044| end 041| while (j:66 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:66 + 1):67 044| end 041| while (j:67 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:67 + 1):68 044| end 041| while (j:68 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:68 + 1):69 044| end 041| while (j:69 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:69 + 1):70 044| end 041| while (j:70 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:70 + 1):71 044| end 041| while (j:71 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:71 + 1):72 044| end 041| while (j:72 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:72 + 1):73 044| end 041| while (j:73 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:73 + 1):74 044| end 041| while (j:74 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:74 + 1):75 044| end 041| while (j:75 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:75 + 1):76 044| end 041| while (j:76 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:76 + 1):77 044| end 041| while (j:77 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:77 + 1):78 044| end 041| while (j:78 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:78 + 1):79 044| end 041| while (j:79 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:79 + 1):80 044| end 041| while (j:80 <= val:8.000000e+01):true 042| print( ~msg ' ' )... 043| j = (j:80 + 1):81 044| end 041| while (j:81 <= val:8.000000e+01):false 044| end # finish loop 045| println( ~msg '*' )... 046| i = (i:20 + 1):21 047| end 037| while (i:21 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] )... 037| while (i:21 <= size( ~arg data:-> [ -> 0.000000e+00, -> 4.872136e-01, -> 7.924555e-01, -> 1.134597e+00, -> 1.534427e+00, -> 2.000000e+00, -> 2.535445e+00, -> 3.143216e+00, -> 3.824911e+00, -> 4.581641e+00, -> 5.414214e+00, -> 6.323240e+00, -> 7.309193e+00, -> 8.372452e+00, -> 9.513320e+00, -> 1.073205e+01, -> 1.202885e+01, -> 1.340391e+01, -> 1.485737e+01, -> 1.638936e+01 ] ):20):false 047| end # finish loop