View pd0.pdf
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
View dm4.pdf
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
View dm3.pdf
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
View chaos.ps
/randomseed { (/dev/random)(r)file read pop srand } bind def | |
/random { % max => 0<num<max | |
rand 16#7fffffff div mul | |
} bind def | |
/genpoly { % n => [ [x0 y0] ... [xn-1 yn-1] ] | |
2 dict begin | |
/n exch def | |
/da 360 n div def |
View parsing.typescript
josh@LAPTOP-ILO10OOF ~/inca/olmec | |
$ cat ex.h | |
// predicate table contains predicate functions | |
// and associated enum values | |
#define PREDTAB(_) \ | |
_( ANY = 1, qa, 1 ) \ | |
_( VAR = 2, qp, gettag(x)==PROG \ | |
|| (gettag(x)==PCHAR && getval(x)!=0x2190 /*leftarrow*/ ) ) \ | |
_( NOUN = 4, qn, gettag(x)==LITERAL \ |
View mask.c
/* test program for cairo bit mask | |
makes a big blue turkey */ | |
#include <stdint.h> | |
#include <stdio.h> | |
#include <stdlib.h> | |
#include <cairo.h> | |
#include <X11/Xlib.h> | |
#include <cairo-xlib.h> | |
#include <unistd.h> |
View a8086pi.c
typedef intptr_t I; | |
typedef uintptr_t U; | |
typedef short S; | |
typedef unsigned short US; | |
typedef signed char C; | |
typedef unsigned char UC; | |
typedef void V; | |
U o, w, d, f; | |
U x, y, z; | |
void *p; |
View a8086p.c
#include<ctype.h> | |
#include<stdint.h> | |
#include<stdio.h> | |
#include<stdlib.h> | |
#include<string.h> | |
#include<sys/stat.h> | |
#include<unistd.h> | |
typedef intptr_t I; typedef uintptr_t U; | |
typedef short S; typedef unsigned short US; | |
typedef signed char C; typedef unsigned char UC; |
View shapes.ps
%polygon.ps | |
%rad n {proc} atpoly - | |
%call proc having rotated+scaled | |
%so (1,0) is each vertex of rad-radius n-polygon | |
/atpoly { | |
%3 args (atpoly)= | |
4 dict begin /p exch def /n exch def % rad | |
/m matrix currentmatrix def | |
%(rad2=)print rad2 = | |
%dup (atpoly: rad=)print = |
View font_transform_test.c
//make font_transform_test CFLAGS=`freetype-config --cflags ` LDLIBS=`freetype-config --libs` LDLIBS+=`pkg-config fontconfig --libs` LDLIBS+='-lm' | |
/* | |
* Xpost - a Level-2 Postscript interpreter | |
* Copyright (C) 2013, Michael Joshua Ryan | |
* Copyright (C) 2013, Vincent Torri | |
* All rights reserved. | |
* | |
* Redistribution and use in source and binary forms, with or without | |
* modification, are permitted provided that the following conditions are met: |
NewerOlder