Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.

Messages - John Spikowski

Pages: 1 ... 10 11 [12] 13 14 ... 16

166

Programming Challenges / Re: SALC Rasbian 32

« on: December 03, 2019, 05:01:29 AM »

JADE (AIR submission)

Code: C++

#include <jade.hpp>
 
MAIN
    STRING s,t,r;
    ARRAY<int> a;
 
    FOR( VAR x = 0 TO x<1000001 STEP x++ ) DO
        a.push_back(x);
        s += (CHAR)(x%26)+65;
 
        IF ( LEN(s) == 26 ) THEN
            t += s;
            s = "";
        END
    END
 
    r = REVERSE$(t);
 
    PRINT("r LEN: ",LEN(t));
    PRINT("Front: ", LEFT$(r,26));
    PRINT("Back:  ", RIGHT$(r,26));
    PRINT("UBVal: ",a[1000000]);
END
 

pi@RPi4B:~/jade-dev/examples $ g++ -O3 -std=c++11 mil.cpp -ljade -o mil pi@RPi4B:~/jade-dev/examples $ /usr/bin/time ./mil r LEN: 999986 Front: ZYXWVUTSRQPONMLKJIHGFEDCBA Back: ZYXWVUTSRQPONMLKJIHGFEDCBA UBVal: 1000000 0.08user 0.04system 0:00.12elapsed 98%CPU (0avgtext+0avgdata 9012maxresident)k 0inputs+0outputs (0major+3762minor)pagefaults 0swaps pi@RPi4B:~/jade-dev/examples $

167

Programming Challenges / Re: SALC Rasbian 32

« on: December 03, 2019, 01:42:35 AM »

JavaScript

Code: Javascript

// JavaScript - 1mil3.js
 
function reverseString(str){
    let strn ="";
    for(let char of str){
        strn = char + strn;
    }
    return strn;
}
 
var s = "";
var t = "";
var a = [1000001];
 
for (x = 1; x <= 1000000; x++) {
  s += String.fromCharCode(((x - 1) % 26) + 65);
  a[x] = x;
  if(s.length == 26) {
        t += s;
        s = "";
  }
}
 
r = reverseString(t);
 
console.log("r LEN: " + r.length);
console.log("Front: " + r.substring(0, 26));
console.log("Back:  " + r.substring(-0, 26));
console.log("UBVal: " + a[1000000]);
 

pi@RPi4B:~/javascript-dev/examples $ /usr/bin/time node 1mil3.js r LEN: 999986 Front: ZYXWVUTSRQPONMLKJIHGFEDCBA Back: ZYXWVUTSRQPONMLKJIHGFEDCBA UBVal: 1000000 2.50user 0.27system 0:03.13elapsed 88%CPU (0avgtext+0avgdata 78340maxresident)k 38664inputs+0outputs (153major+19367minor)pagefaults 0swaps pi@RPi4B:~/javascript-dev/examples $

168

General Discussion / MS Rust

« on: December 02, 2019, 06:52:49 PM »

Microsoft: We're creating a new Rust-based programming language for secure coding

That should make Heater feel whole again.

169

Swift / Re: Swift RPi

« on: December 02, 2019, 03:50:31 PM »

I'm going to pass my findings over to the RPi Swift maintainer and hope he can find out why Swift runs so slow on the RPi.

170

Programming Challenges / Re: SALC Rasbian 32

« on: December 02, 2019, 05:26:34 AM »

Nim (AIR submission)

Code: Text

proc reverse*(str: string): string =
  result = ""
  for index in countdown(str.high, 0):
    result.add(str[index])
 
type
    milarray = array[1000001, int]
 
var
    s = ""
    t = ""
    r:string
    a:milarray
 
for x in 0..1000000:
    a[x] = x
 
    s &= chr((x mod 26) + 65)
 
    if s.len == 26:
        t &= s
        s = ""
 
 
r = t.reverse
echo "r Len: ",r.len
echo "Front: ",r[0..25]
echo "Back:  ",r[r.len-26..r.len-1]
echo "UBVal: ",a[1000000]
 

pi@RPi4B:~/nim-dev/examples $ nim c -d:release onemil3.nim Hint: used config file '/etc/nim/nim.cfg' [Conf] Hint: system [Processing] Hint: onemil3 [Processing] Hint: [Link] Hint: operation successful (12410 lines compiled; 0.566 sec total; 10.754MiB peakmem; Release Build) [SuccessX] pi@RPi4B:~/nim-dev/examples $ ls -l onemil3 -rwxr-xr-x 1 pi pi 57548 Dec 1 21:21 onemil3 pi@RPi4B:~/nim-dev/examples $ /usr/bin/time ./onemil3 r Len: 999986 Front: ZYXWVUTSRQPONMLKJIHGFEDCBA Back: ZYXWVUTSRQPONMLKJIHGFEDCBA UBVal: 1000000 0.06user 0.05system 0:00.12elapsed 99%CPU (0avgtext+0avgdata 10048maxresident)k 0inputs+0outputs (0major+2294minor)pagefaults 0swaps pi@RPi4B:~/nim-dev/examples $

171

Swift / Re: Swift RPi

« on: December 02, 2019, 04:11:35 AM »

I installed Swift 5.1.2 on my Ubuntu 19.10 LIVE (persistent) that runs off my laptop and here are the results of 1mil3.swift compiled.

ubuntu@ubuntu:~/swift-dev/examples$ /usr/bin/time ./main r LEN: 999986 Front: ZYXWVUTSRQPONMLKJIHGFEDCBA Back: ZYXWVUTSRQPONMLKJIHGFEDCBA UBVal: 100000 0.45user 0.01system 0:00.47elapsed 99%CPU (0avgtext+0avgdata 20132maxresident)k 0inputs+8outputs (0major+5273minor)pagefaults 0swaps ubuntu@ubuntu:~/swift-dev/examples$

172

Swift / Re: Swift RPi

« on: December 02, 2019, 02:18:22 AM »

Swift Online Playground

It runs almost instantly online as well.

173

Swift / Re: Swift RPi

« on: December 02, 2019, 01:46:49 AM »

I installed Swift for Windows and ran the 1mil3.swift (compiled) on my new laptop running Windows 10 Pro.

PS C:\Swift\examples> Measure-Command {.\main.exe | Out-Default} r LEN: 999986 Front: ZYXWVUTSRQPONMLKJIHGFEDCBA Back: ZYXWVUTSRQPONMLKJIHGFEDCBA UBVal: 100000 Days : 0 Hours : 0 Minutes : 0 Seconds : 1 Milliseconds : 305 Ticks : 13053398 TotalDays : 1.5108099537037E-05 TotalHours : 0.000362594388888889 TotalMinutes : 0.0217556633333333 TotalSeconds : 1.3053398 TotalMilliseconds : 1305.3398 PS C:\Swift\examples>

No idea why this is so slow on the RPi 4B.

174

Programming Challenges / Re: SALC Rasbian 32

« on: December 02, 2019, 12:50:07 AM »

GO Update (AIR submission)

Code: Go

// GO - 1mil3-2.go - AIR
 
package main
 
import (
    "fmt"
    "strings"
)
 
// Reverse returns its argument string reversed rune-wise left to right.
// From: https://github.com/golang/example/blob/master/stringutil/reverse.go
func Reverse(s string) string {
    r := []rune(s)
    for i, j := 0, len(r)-1; i < len(r)/2; i, j = i+1, j-1 {
        r[i], r[j] = r[j], r[i]
    }
    return string(r)
}
 
func main() {
    var s strings.Builder
    var r = ""
    var t strings.Builder
    var a [1000001]int
 
    for x := 0; x < 1000001; x++ {
        a[x] = x
 
        s.WriteByte(byte((x % 26) + 65))
 
        if s.Len() == 26 {
            t.WriteString(s.String())
            s.Reset()
        }
    }
 
    r = Reverse(t.String())
 
    fmt.Println("r LEN: ", len(r))
    fmt.Println("Front: ", r[0:26])
    fmt.Println("Back:  ", r[len(r)-26:])
    fmt.Println("UBVal: ", a[1000000])
 
}
 

pi@RPi4B:~/go-dev/examples $ go build 1mil3-2.go pi@RPi4B:~/go-dev/examples $ ls -l 1mil3-2 -rwxr-xr-x 1 pi pi 1763559 Dec 4 18:33 1mil3-2 pi@RPi4B:~/go-dev/examples $ /usr/bin/time ./1mil3-2 r LEN: 999986 Front: ZYXWVUTSRQPONMLKJIHGFEDCBA Back: ZYXWVUTSRQPONMLKJIHGFEDCBA UBVal: 1000000 0.10user 0.08system 0:00.16elapsed 112%CPU (0avgtext+0avgdata 16868maxresident)k 0inputs+0outputs (0major+4032minor)pagefaults 0swaps pi@RPi4B:~/go-dev/examples $

175

Programming Challenges / Re: SALC Rasbian 32

« on: December 01, 2019, 09:45:22 PM »

Swift 5.1.2

Looking for a faster string reverse.

Code: Text

// Swift 5.1.2 - 1mil3.swift
 
var s = ""
var t = ""
var a = [Int]()
var r = ""
 
for x in 1...1000000 {
  s += String(UnicodeScalar(UInt8(((x - 1) % 26) + 65)))
    a.append(x)
  if s.count == 26 {
//  t += s
    r += s   
    s = ""
  }
}
 
// let r = String(t.reversed())
 
print("r LEN: ", r.count)
print("Front: \(r.prefix(26))")
print("Back:  \(r.suffix(26))")
print("UBVal: ", a[100000 - 1])
 

with string reverse
pi@RPi4B:~/swift-dev/examples $ /usr/bin/time ./main r LEN: 999986 Front: ZYXWVUTSRQPONMLKJIHGFEDCBA Back: ZYXWVUTSRQPONMLKJIHGFEDCBA UBVal: 100000 322.51user 0.07system 5:22.70elapsed 99%CPU (0avgtext+0avgdata 13836maxresident)k 0inputs+0outputs (0major+3470minor)pagefaults 0swaps pi@RPi4B:~/swift-dev/examples $

without string reverse
pi@RPi4B:~/swift-dev/examples $ /usr/bin/time ./main r LEN: 999986 Front: ABCDEFGHIJKLMNOPQRSTUVWXYZ Back: ABCDEFGHIJKLMNOPQRSTUVWXYZ UBVal: 100000 36.12user 0.04system 0:36.17elapsed 99%CPU (0avgtext+0avgdata 12800maxresident)k 0inputs+0outputs (0major+2925minor)pagefaults 0swaps pi@RPi4B:~/swift-dev/examples $

176

Programming Challenges / Re: SALC Rasbian 32

« on: December 01, 2019, 07:28:32 PM »

C (AIR submission)

Code: C

// C - 1mil3.c - AIR
 
#define _GNU_SOURCE
 
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
#define join(write_to,  ...) {           \
    char *tmp_string_for_extend = (write_to); \
    asprintf(&(write_to), __VA_ARGS__);       \
    free(tmp_string_for_extend);              \
}
 
char *strrev(char *str)
{
    if (!str || ! *str)
        return str;
 
    int i = strlen(str) - 1, j = 0;
 
    char ch;
    while (i > j) {
        ch = str[i];
        str[i] = str[j];
        str[j] = ch;
        i--;
        j++;
    }
    return str;
}
 
 
int main() {
    int a[1000001] = {0};
    int i;
    char *s=NULL,*t=NULL;
 
    join(s,"");
    join(t,"");
 
    for (int x = 0; x < 1000001; x++) {
        a[x] = x;
 
        join(s,"%s%c",s,(x%26)+65);
 
        if (strlen(s) == 26) {
            join(t,"%s%s",t,s);
            join(s,"");
        }
    }
 
    free(s);
    strrev(t);
 
    printf("r LEN: %lu\n",strlen(t));
    printf("Front: %.*s\n", 26, t);
    printf("Back: %s\n", t + strlen(t) - 26);
    printf("UBVal: %d\n",a[1000000]);
 
}
 

pi@RPi4B:~/c-dev/examples $ gcc -O3 1mil3.c -o 1mil3 pi@RPi4B:~/c-dev/examples $ ls -l 1mil3 -rwxr-xr-x 1 pi pi 8140 Dec 1 11:23 1mil3 pi@RPi4B:~/c-dev/examples $ /usr/bin/time ./1mil3 r LEN: 999986 Front: ZYXWVUTSRQPONMLKJIHGFEDCBA Back: ZYXWVUTSRQPONMLKJIHGFEDCBA UBVal: 1000000 45.56user 63.56system 1:49.17elapsed 99%CPU (0avgtext+0avgdata 23956maxresident)k 0inputs+0outputs (0major+7535448minor)pagefaults 0swaps pi@RPi4B:~/c-dev/examples $

177

Swift / Re: Swift RPi

« on: November 30, 2019, 10:34:14 PM »

I built and uploaded Swift 5.1.2 released on November 7, 2019 and put it on the server. I plan to create a Swift child board under Other Languages that I will added to the forum. The goal to find a mentor for each of the languages.

swift-5.1.2_armv7.tgz Download

Extract to your user directory and add PATH="$HOME/usr/bin:$PATH" to the system path.

Install dependencies. sudo apt install clang libicu-dev libcurl4-nss-dev curl

I attached a tar -t listing of the release if you want to see what is included.

I'm looking forward to hear your experience with Swift on the RPi.

178

Programming Challenges / Re: SALC Rasbian 32

« on: November 30, 2019, 09:26:43 PM »

8th (Jalih submission)

Code: Text

1000000 constant LIMIT
 
a:new 0 a:push var, a
"" var, s
"" var, t
 
: rev  \ s -- s
  b:new b:rev >s ;
 
: iterate
  s @ over n:1- 26 n:mod 65 n:+ s:+ s !
  s @ s:len 26 n:< not if
    t @ swap s:+ t !
    "" s !
  else
    drop
  then
  a:push ;
 
: app:main
  a @ ' iterate 1 LIMIT loop
  t @ rev s:len "r LEN: %d\n" s:strfmt .
  dup 26 s:lsub "Front: %s\n" s:strfmt .
  26 s:rsub "Back:  %s\n" s:strfmt .
  LIMIT a:@ nip "UBVal: %d\n" s:strfmt .
  bye ;
 

pi@RPi4B:~/8th-dev/examples $ /usr/bin/time ./1mil3 r LEN: 999986 Front: ZYXWVUTSRQPONMLKJIHGFEDCBA Back: ZYXWVUTSRQPONMLKJIHGFEDCBA UBVal: 1000000 10.33user 30.38system 0:40.75elapsed 99%CPU (0avgtext+0avgdata 61464maxresident)k 0inputs+0outputs (0major+3677030minor)pagefaults 0swaps pi@RPi4B:~/8th-dev/examples $

179

Programming Challenges / Re: SALC Rasbian 32

« on: November 30, 2019, 07:42:29 PM »

The Swift round two post has been updated. The compiler now correctly prints middle.

The swift-5.1.2_armv7.tgz file is 206 MB. I will have to upload it to the server and provide a link to download. This build is the current release with the latest updates as of build time.

AIR submitted an improvement to the Python script to not require numpy.

180

Swift / Re: Swift RPi

« on: November 30, 2019, 05:54:07 PM »

The Swift 5.12 build was successful and it built the distribution tar.gz. I screwed up with 5.11 and installed it in /usr/bin instead of /home/pi/user/bin. One should add this directory to their path.

I'll post a link or attach 5.12 once I do some basic testing.

Pages: 1 ... 10 11 [12] 13 14 ... 16

News:

Show Posts

Messages - John Spikowski

Programming Challenges / Re: SALC Rasbian 32

Programming Challenges / Re: SALC Rasbian 32

General Discussion / MS Rust

Swift / Re: Swift RPi

Programming Challenges / Re: SALC Rasbian 32

Swift / Re: Swift RPi

Swift / Re: Swift RPi

Swift / Re: Swift RPi

Programming Challenges / Re: SALC Rasbian 32

Programming Challenges / Re: SALC Rasbian 32

Programming Challenges / Re: SALC Rasbian 32

Swift / Re: Swift RPi

Programming Challenges / Re: SALC Rasbian 32

Programming Challenges / Re: SALC Rasbian 32

Swift / Re: Swift RPi