adituv

#!/usr/bin/python3

from math import floor
from math import pi

def getExpansion(y):
  x = y
  while True:
    z = floor(x)
    yield z

adituv

//The code that runs on the graphics card is included in the program here as a plaintext string
//It's also possible to include it as a binary, but I don't know how to do that.
const char* source=
"__kernel                                                                    \n"
"void sum(__global float* source, __global float* dest, uint n)              \n"
"  int idx = get_global_id(0);                                               \n"
"  int iter = 2;                                                             \n"
"                                                                            \n"
"  while(iter < n && idx % iter == 0) {                                      \n"
"    dest[min(iter*idx,n)] = source[min(iter*idx,n)] + source[(iter-1)*idx]; \n"

adituv

1.25@130.8127827
0.25@174.6141157
0.25@164.8137785
0.25@174.6141157
0.75@195.9977180
0.25@207.6523488
1.00@195.9977180
1.25@0
0.25@174.6141157
0.25@195.9977180

adituv

# Assumed that sin(x) ~ x
0.837900
0.626022
0.395107
0.171615
-0.024014
-0.178162
-0.284002
-0.340814
-0.352829

adituv

Please enter the following parameters:
	Timestep /s: 0.1
	Simulation length /timesteps: 100
	Pendulum length /m: 1
	Pendulum mass /kg: 0.25
	Gravitational acceleration /m s^-2: 9.81
	Damping constant /?: 0
	Initial pendulum angle /rad: 1
	Initial pendulum angular velocity /rad s^-1: -0.8

adituv

#include <iostream>
#include <fstream>
#include <limits>

using namespace std;

int main() {
  float val1, val2;
  int line = 0;
  ifstream file("temp.txt", ifstream::in);

adituv

"BEGIN Vundle stuff
set nocompatible
filetype off

set rtp+=~/.vim/bundle/Vundle.vim
call vundle#begin()

Plugin 'gmarik/Vundle.vim'

Plugin 'kien/ctrlp.vim'

adituv

{-# LANGUAGE NamedFieldPuns #-}
module Main where
import qualified MyRecord as M

someFunction :: M.MyRecordType -> Int
someFunction (MyRecordType { M.someVal }) = M.someVal * M.someVal

main :: IO ()
main = print . someFunction . MyRecordType $ 3

adituv

{-# LANGUAGE ConstraintKinds, GADTs, RankNTypes #-}
module CList where

infixr 5 :>

data CList c where
  Nil  :: CList c
  (:>) :: forall c t. (c t) => t -> CList c -> CList c
  
-- "Monomorphic map instance" (ish) for CList.  Converts to normal list.

adituv

This requires Microsoft Visual Studio 2012 SDK and Microsoft Visual Studio 2012 Visualization & Modeling SDK, which come separately from Visual Studio 2012. Other version combinations are probably possible, and maybe compatible, but untested. The core of the method is this:

• Add AssemblyInfo.tt to MyProject\Properties, filling out the "Your xxxxxx" sections.
• Open up the project file (e.g. MyProject.csproj) in a text editor (e.g. Notepad++), and locate the line that defines the build targets for the language ("import project... microsoft.csharp.targets")
• Insert the contents of MyProject.csproj there
• Finally, if you build the AssemblyInfo.tt template within Visual Studio, make sure to set AssemblyInfo1.cs to Build Action: None in the File Properties window. This will fix any errors about duplicate definitions.