cls

#include <stdio.h>

enum { I, V, X, L, C, D, M, StackSize };

const int values[] = { 1, 5, 10, 50, 100, 500, 1000 };

int
unroman(const char *s)
{
	int stack[StackSize];

cls

import Control.Applicative (liftA2)

data Term a = App (Term a) (Term a)
            | Lam (Term (Maybe a))
            | Var a

instance Functor Term where
  fmap f (App s t) = App (fmap f s) (fmap f t)
  fmap f (Lam t)   = Lam (fmap (fmap f) t)
  fmap f (Var x)   = Var (f x)

cls

#!/bin/sh

dir=${1%/*}
bin=${1##*/}
shift

unset flag
set -f
IFS=:

cls

import java.util.Iterator;

public class CovariantIterator<T extends U, U> implements Iterator<U>
{
	private Iterator<T> iter;

	public CovariantIterator(Iterator<T> it)
	{
		this.iter = it;
	}

cls

#include <limits.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

const char *
intern(const char *s)
{
	union tree {
		const char *str;

cls

#include <ctype.h>

#define BIT(X)  (1 << (X))
#define CTRL(X) ((X) - '@')

enum { None = -1 };

enum {
	Bold   = CTRL('B'),
	Colour = CTRL('C'),

cls

#!/bin/sh

pattern="$1"
shift

if [ $# -gt 1 ]
then
	GREP_OPTIONS="$GREP_OPTIONS --with-filename"
	export GREP_OPTIONS
fi

cls

import re
import sre_compile
import sre_parse
from sre_constants import *

opcodes = dict((v,k) for (k,v) in OPCODES.items())
atcodes = dict((v,k) for (k,v) in ATCODES.items())
chcodes = dict((v,k) for (k,v) in CHCODES.items())

def print_dis(s, indent):

cls

from queue import PriorityQueue

class Field:
    def __init__(self, size, align):
        self.size = size
        self.align = align

class Struct:
    def __init__(self, fields):
        size = 0

cls

from fractions import Fraction

def catalan(n):
    c = 1
    for k in range(2, n + 1):
        c *= Fraction(n + k, k)
    return int(c)