Metaxal

#lang racket/base

(require quickscript
         racket/list
         racket/class
         racket/gui/event)

(script-help-string "Like pressing Enter, but keeps the comments at the end of the line")

;;; Author: Laurent Orseau <laurent.orseau@gmail.com>

Metaxal

#lang racket/base

;;; Author: Laurent Orseau https://github.com/Metaxal
;;; License: [Apache License, Version 2.0](http://www.apache.org/licenses/LICENSE-2.0) or
;;;          [MIT license](http://opensource.org/licenses/MIT) at your option.

(require quickscript
         racket/string
         racket/class)

Metaxal

#lang racket/gui

(define fr (new frame% [label "Tab example"]))

(define (tab-panel-set-tab tp idx)
  (send tp change-children
                           (λ (previous-children)
                             (list (list-ref tab-contents idx)))))

(define tp (new tab-panel%

Metaxal

#lang racket/base

;;; Author: Laurent Orseau
;;; License: [Apache License, Version 2.0](http://www.apache.org/licenses/LICENSE-2.0) or
;;;         [MIT license](http://opensource.org/licenses/MIT) at your option.

(require quickscript
         quickscript/utils
         racket/file
         racket/path

Metaxal

#lang racket
(require racket/fixnum
         math/base)

;;; Conclusion: hasheq-ref is (slightly) faster than a custom binary search
;;; (It's actually probably implemented as a binary search, with some more optimization,
;;;  as the bin search is within a factor 2)

(#%declare #:unsafe)

Metaxal

#lang racket/base

(require quickscript
         racket/class
         racket/list
         racket/gui/base
         racket/string
         framework)

;;; Author: Laurent Orseau - laurent.orseau at gmail.com

Metaxal

#lang racket
(require racket/fasl
         racket/fixnum)

;;; Author: Laurent Orseau
;;; License: [Apache License, Version 2.0](http://www.apache.org/licenses/LICENSE-2.0) or
;;;          [MIT license](http://opensource.org/licenses/MIT) at your option.

#| Usage:

Metaxal

#lang racket/base
(require racket/flonum
         (only-in math/flonum flvector-sum) ; slow due to type/untype boundary
         racket/fixnum
         racket/future)

#;(#%declare #:unsafe) ; doesn't make much difference

(provide softmax-ref/unstable
         softmax-ref/stable)

Metaxal

#lang scribble/manual
 
@(require scribble/core
          scribble/html-properties
          racket
          scribble/example)

@(define the-eval (make-base-eval))
@examples[#:eval the-eval #:hidden
          (require racket/string)]

Metaxal

#lang racket/gui
(require plot
         pict)

;;; Author: Laurent Orseau
;;; License: [Apache License, Version 2.0](http://www.apache.org/licenses/LICENSE-2.0) or
;;;          [MIT license](http://opensource.org/licenses/MIT) at your option.

;;; See in particular this blog bost:
;;; https://alex-hhh.github.io/2019/09/map-snip.html#2019-09-08-map-snip-footnote-2-return