I have just started learning ironclad and would like to convert a small go code to Common Lisp to benchmark the speed but I am struggling to make it work.

How would I do it?

package main

import ("fmt" "os" "strconv" "github.com/ethereum/go-ethereum/crypto/secp256k1")

func main() {
n := 1
if len(os.Args) > 1 {
var err error
n, err = strconv.Atoi(os.Args[1])
_ = err
}

privateKey := []byte{45, 238, 146, 112, 121, 40, 60, 60, 79, 202, 62, 249, 112, 255, 77, 56, 182, 69, 146, 227, 254, 10, 176, 218, 217, 19, 45, 112, 181, 188, 118, 147}

curve := secp256k1.S256()
px := curve.Gx
py := curve.Gy
for _i := 0; _i < n; _i++ {
px, py = curve.ScalarMult(px, py, privateKey)
}

fmt.Printf("%x,%x\n", px, py)
}

On Friday, December 31, 2021 at 11:06:29 AM UTC+1, Bela Pecsek wrote:
> I have just started learning ironclad and would like to convert a small go code to Common Lisp to benchmark the speed but I am struggling to make it work.
>
> How would I do it?
>
> package main
>
> import ("fmt" "os" "strconv" "github.com/ethereum/go-ethereum/crypto/secp256k1")
>
> func main() {
> n := 1
> if len(os.Args) > 1 {
> var err error
> n, err = strconv.Atoi(os.Args[1])
> _ = err
> }
>
> privateKey := []byte{45, 238, 146, 112, 121, 40, 60, 60, 79, 202, 62, 249, 112, 255, 77, 56, 182, 69, 146, 227, 254, 10, 176, 218, 217, 19, 45, 112, 181, 188, 118, 147}
>
> curve := secp256k1.S256()
> px := curve.Gx
> py := curve.Gy
> for _i := 0; _i < n; _i++ {
> px, py = curve.ScalarMult(px, py, privateKey)
> }
>
> fmt.Printf("%x,%x\n", px, py)
> }
I've forgotten to mention that this should be the result for n=10
a6f7cbeb7125279820188fd73631f14e11789c665362b2f7464f53eb041d2329,3ed07e8738690958d8089d6dd7efdeda5dd9e9c9d8446513e42a17d3c553db49

On Friday, December 31, 2021 at 3:03:50 AM UTC-8, bela....@gmail.com wrote:
> On Friday, December 31, 2021 at 11:06:29 AM UTC+1, Bela Pecsek wrote:
> > I have just started learning ironclad and would like to convert a small go code to Common Lisp to benchmark the speed but I am struggling to make it work.
> >
> > How would I do it?
> >
> > package main
> >
> > import ("fmt" "os" "strconv" "github.com/ethereum/go-ethereum/crypto/secp256k1")

This Github link returns a 404 error.
That makes it very difficult to figure out what secp256k1.S256() and its associated methods Gx, Gy and ScalarMult do.

> >
> > func main() {
> > n := 1
> > if len(os.Args) > 1 {
> > var err error
> > n, err = strconv.Atoi(os.Args[1])
> > _ = err
> > }
> >
> > privateKey := []byte{45, 238, 146, 112, 121, 40, 60, 60, 79, 202, 62, 249, 112, 255, 77, 56, 182, 69, 146, 227, 254, 10, 176, 218, 217, 19, 45, 112, 181, 188, 118, 147}
> >
> > curve := secp256k1.S256()
> > px := curve.Gx
> > py := curve.Gy
> > for _i := 0; _i < n; _i++ {
> > px, py = curve.ScalarMult(px, py, privateKey)
> > }
> >
> > fmt.Printf("%x,%x\n", px, py)
> > }
> I've forgotten to mention that this should be the result for n=10
> a6f7cbeb7125279820188fd73631f14e11789c665362b2f7464f53eb041d2329,3ed07e8738690958d8089d6dd7efdeda5dd9e9c9d8446513e42a17d3c553db49

On Saturday, January 1, 2022 at 2:26:19 AM UTC+1, Tom Russ wrote:
> On Friday, December 31, 2021 at 3:03:50 AM UTC-8, bela....@gmail.com wrote:
> > On Friday, December 31, 2021 at 11:06:29 AM UTC+1, Bela Pecsek wrote:
> > > I have just started learning ironclad and would like to convert a small go code to Common Lisp to benchmark the speed but I am struggling to make it work.
> > >
> > > How would I do it?
> > >
> > > package main
> > >
> > > import ("fmt" "os" "strconv" "github.com/ethereum/go-ethereum/crypto/secp256k1")
> This Github link returns a 404 error.
> That makes it very difficult to figure out what secp256k1.S256() and its associated methods Gx, Gy and ScalarMult do.
> > >
> > > func main() {
> > > n := 1
> > > if len(os.Args) > 1 {
> > > var err error
> > > n, err = strconv.Atoi(os.Args[1])
> > > _ = err
> > > }
> > >
> > > privateKey := []byte{45, 238, 146, 112, 121, 40, 60, 60, 79, 202, 62, 249, 112, 255, 77, 56, 182, 69, 146, 227, 254, 10, 176, 218, 217, 19, 45, 112, 181, 188, 118, 147}
> > >
> > > curve := secp256k1.S256()
> > > px := curve.Gx
> > > py := curve.Gy
> > > for _i := 0; _i < n; _i++ {
> > > px, py = curve.ScalarMult(px, py, privateKey)
> > > }
> > >
> > > fmt.Printf("%x,%x\n", px, py)
> > > }
> > I've forgotten to mention that this should be the result for n=10
> > a6f7cbeb7125279820188fd73631f14e11789c665362b2f7464f53eb041d2329,3ed07e8738690958d8089d6dd7efdeda5dd9e9c9d8446513e42a17d3c553db49

Sorry about this. Please note that this is not my code.

The code actually compiles without problem.

The github repo I thing is here
https://github.com/ethereum/go-ethereum/tree/master/crypto/secp256k1