This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(define evens-only*&co | |
(lambda (l col) | |
(cond | |
[(null? l) (col '() 1 0)] | |
[(atom? (car l)) | |
(cond | |
[(not (even? (car l))) | |
(evens-only*&co (cdr l) | |
(lambda (newlat E U) | |
(col newlat E (+ U (car l)))))] |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#lang racket | |
(module constants racket | |
(provide e pi) | |
(define e 2.1718281828) | |
(define pi (* 355/113 1.0))) | |
(require 'constants) | |
pi | |
; (set! pi (+ pi 1)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#lang racket | |
;; The racket/draw libraries provide imperative drawing functions. | |
;; http://docs.racket-lang.org/draw/index.html | |
(require racket/draw) | |
;; To create an image with width and height, use the make-bitmap | |
;; function. | |
;; For example, let's make a small image here: |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
taglib https://github.com/takikawa/taglib-racket/blob/master/taglib/taglib.rkt | |
libsdl http://planet.racket-lang.org/package-source/pb82/sdl4racket.plt/1/1/src/ | |
allegro https://github.com/kazzmir/racket-allegro-5/blob/master/allegro.rkt | |
libgit2 https://github.com/jarnaldich/racket-git/blob/master/libgit2.rkt | |
opencl http://planet.racket-lang.org/package-source/jaymccarthy/opencl.plt/3/4/c/ | |
openmpi http://planet.racket-lang.org/package-source/jaymccarthy/openmpi.plt/1/1/ffi/ | |
zeroqm http://planet.racket-lang.org/package-source/jaymccarthy/zeromq.plt/2/1/zmq.rkt | |
svn http://planet.racket-lang.org/package-source/jaymccarthy/svn-prop.plt/1/0/main.ss | |
chipmunk http://planet.racket-lang.org/package-source/jaymccarthy/chipmunk.plt/1/0/chipmunk-ffi.ss | |
opencv https://github.com/oetr/racket-opencv |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#lang racket | |
(require db) | |
(define package-text "conviasc.db") | |
(define connection (mysql-connect #:user "root" #:database "colegio" #:password "admin")) | |
(define str string-append) | |
;class template, requires class name and fields | |
(define class-template (str "package " package-text ";\n\npublic class ~a {\n ~a}")) | |
;1.- Route, 2.- Table Name ,3.- Class Name, | |
(define route-all-template "get(\"/db/~a\", RouteHelper.dbRouteAll(\"~a\", ~a.class), new JsonTransformer());\n") |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
using System; | |
using System.Collections.Generic; | |
using System.ComponentModel; | |
using System.Data; | |
using System.Drawing; | |
using System.Linq; | |
using System.Text; | |
using System.Windows.Forms; | |
namespace ParametroExtra |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
<html> | |
<head> | |
<script src="https://code.jquery.com/jquery-3.1.1.min.js"></script> | |
<script src="https://cdnjs.cloudflare.com/ajax/libs/moment.js/2.15.2/moment.min.js"></script> | |
<title>pruebs</title> | |
</head> | |
<body> | |
<div id="resultado"> | |
</div> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#lang racket/base | |
(require racket/list) | |
(require racket/match) | |
;; LEAFS HERE | |
;; a leaf is a simple tagged list with the symbol 'leaf | |
;; as its first element, the second is the symbol and the | |
;; third is the weight |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#lang racket/base | |
(require (for-syntax syntax/parse racket/base)) | |
(require syntax/strip-context racket/port racket/string) | |
(provide | |
interp | |
read-syntax | |
#%app #%datum #%top #%top-interaction | |
module+ print-results | |
#%module-begin |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/** packages to install | |
<ItemGroup> | |
<PackageReference Include="PDFiumCore" Version="120.0.6056" /> | |
<PackageReference Include="ppy.SDL2-CS" Version="1.0.82" /> | |
</ItemGroup> | |
*/ | |
using PDFiumCore; | |
using static SDL2.SDL; |