I hereby claim:
- I am BeRo1985 on github.
- I am bero (https://keybase.io/bero) on keybase.
- I have a public key whose fingerprint is 82D7 1927 94C1 94CB F680 8627 DDA2 6B2E 4E80 9446
To claim this, I am signing this object:
d:\Projects\POCA\trunk\src>lua53.exe primes.lua | |
time: 0.18200000 seconds, primes: 17984.000000 | |
time: 54.92000000 seconds, primes: 17984.000000 | |
time: 50.26400000 seconds, primes: 17984.000000 | |
d:\Projects\POCA\trunk\src>pocarun primes.poca | |
time: 0.032 seconds, primes: 17984 | |
time: 14.741 seconds, primes: 17984 | |
time: 13.948 seconds, primes: 17984 |
I hereby claim:
To claim this, I am signing this object:
///////// Fragment shader: ////////// | |
#version 430 | |
in vec2 vTexCoord; | |
uniform vec2 resolution; // the canvas resolution size | |
layout(location = 0) out vec4 oColor; | |
#if 1 | |
float opUnion(const in float d1, const in float d2){ |
// n-rook anti-aliasing - based on the idea from http://mlab.uiah.fi/~kkallio/antialiasing/ | |
// GLSL implementation by Benjamin 'BeRo' Rosseaux | |
// licensed under CC0 1.0 Universal (CC0 1.0) Public Domain Dedication ( http://creativecommons.org/publicdomain/zero/1.0/ ) | |
#version 150 | |
#define nrookSamples 8 | |
uniform vec2 resolution; | |
vec4 realMainContent(vec2 p){ | |
vec4 c = vec4(0.); | |
// ... | |
return c; |
// Copyright (C) 2017, Benjamin 'BeRo' Rosseaux - benjamin@rosseaux.de | |
// License: CC0 | |
vec4 matrixToQTangent(mat3 m){ | |
float f = 1.0; | |
if(((((((m[0][0]*m[1][1]*m[2][2])+ | |
(m[0][1]*m[1][2]*m[2][0]) | |
)+ | |
(m[0][2]*m[1][0]*m[2][1]) | |
)- |
function MinifyCSS(const aInput:ansistring):ansistring; | |
var Position,Len,TemporaryPosition:longint; | |
TemporaryInput:string; | |
begin | |
Position:=1; | |
Len:=length(aInput); | |
TemporaryInput:=''; | |
while Position<=Len do begin | |
if ((Position+2)<=Len) and ((aInput[Position]='/') and (aInput[Position+1]='*')) then begin | |
inc(Position,2); |
// ---------- | |
// | | | |
// | | | |
// | | | |
// | | | |
// | | | |
// ---HEAD--- | |
// | | | |
// _______________________________/--NECK--\______________________________ |
function TpvVulkanShaderModule.GetVariables:TpvVulkanShaderModuleVariables; | |
// https://www.khronos.org/registry/spir-v/specs/1.1/SPIRV.html | |
type PUInt32Array=^TUInt32Array; | |
TUInt32Array=array[0..65535] of TpvUInt32; | |
var Position,Size:TpvInt32; | |
Opcode,Index,NameIndex,Count,CountIDs,CountNames:TpvUInt32; | |
Opcodes:PUInt32Array; | |
Endian:boolean; | |
Variable:PpvVulkanShaderModuleVariable; | |
Bindings,Locations,DescriptorSets:array of TpvUInt32; |
This line will replace the last octet of ipv4 adresses in a given file with a zero:
sed -i '' -e 's/(([0-9]{1,3}.){3})[0-9]{1,3}/\10/g'
unit MiniSoftFP32; // Copyright (C) 2018, Benjamin "BeRo" Rosseaux (benjamin@rosseaux.de) - License: CC0 | |
// Declaimer / Notice of caution: | |
// Attention, this code implements only the basic functions, but for example not the correct handling of | |
// Infinity, NaN, division-by-zero special cases and so on. | |
// In short, this code is only intended for demystifying the base floating point arithmetics (using 32-bit | |
// single precision floating point values in this implementation). | |
{$ifdef fpc} | |
{$mode delphi} | |
{$if defined(cpu386) or defined(cpuamd64)} | |
{$asmmode intel} |