1
2
3
4
5
create_list(0) -> [];
create_list(N) -> [create_list(N-1)|N].
 
create_rev_list(0) -> [];
create_rev_list(N) -> [N|create_rev_list(N-1)]

1
2
3
4
5
6
7
8
9
import java.io.*;
import java.lang.*;
 
 
class Main
{
 
public static void Main(String args[])
{
 ...

1
2
3
4
5
6
7
8
9
class Main {
public static void main (String[] args){
 
for (int i = 0; i < 10; i = i + 1)
        {
        System.out.print("\n*");
 
        for (int j = i; j > 0; j = j - 1){
 
 ...

1
2
3
4
5
6
7
8
class Main {
public static void main (String[] args){
 
for (int i=0; i >= 10; i = i - 1)
        {
        System.out.print("\n0");
 
        for (int j = i; j > 0; j = j - 1){
 ...

1
2
3
4
5
6
7
8
class Main {
public static void main (String[] args){
 
for (int i=10; i >= 10; i = i - 1)
        {
        System.out.print("\n0");
 
        for (int j = i; j > 0; j = j - 1){
 ...

1
2
3
4
5
6
7
8
class Main {
public static void main (String[] args){
int i=10;
for (i >= 10; i = i - 1)
        {
        System.out.print("\n0");
 
        for (int j = i; j > 0; j = j - 1){
 ...

1
2
3
4
5
6
class Test {
  public static void main(String[] args) {
     int hexNum = 0x1234a;
     System.out.println(~hexNum);
}
}

1
2
3
4
5
6
7
8
9
v################################################
v################################################
>###8995*\9-13\##>-p55:2**3$#!+59*:!3$9$$2+2p6v##
v############################################$<##
v##########################?#####################
1################################################
4#####?##########>v##############################
8##########>##v##$ ##############################
*###########>v#########################v-<#######
 ...

1
2
3
4
5
6
7
8
9
Er ist’s 
        
                   
        
        Frühling läßt sein blaues Band       
        
        wieder flattern durch die Lüfte;               
        
        süße, wohlbekannte Düfte     
 ...

1
2
3
4
5
6
7
8
-module(program).
-export([main/0,main/1,beep/1]).
 
makepairs(Tuples, []) -> lists:reverse(Tuples);
makepairs(Tuples, [_]) -> lists:reverse(Tuples);
makepairs(Tuples, [A,B|Tail]) -> makepairs([{A,B}|Tuples],Tail).
 
makepairs(Tail) -> makepairs([],Tail).
 ...

1
2
3
4
5
6
7
8
9
class shuffel1{
        public static void main(String [] args){
                int x =1;
                while(x<10){
                        if(x>3){
                                System.out.println("lol");
                        }
                }
        }       

1
2
3
4
5
6
7
8
9
    L = [if SSL#ssl.keyfile /= undefined ->                                     
                 {keyfile, SSL#ssl.keyfile};                                    
            true ->                                                             
                 false                                                          
         end,                                                                   
                                                                                
         if SSL#ssl.certfile /= undefined ->                                    
                 {certfile, SSL#ssl.certfile};                                  
            true ->                                                             
 ...

1
2
3
4
5
6
7
8
9
Eshell V5.8.5  (abort with ^G)
1> sellaprime_supervisor:start_in_shell_for_testing().
area_server starting
prime_server starting
true
2> prime_server:new_prime(10).
Generating a 10 digit prime .......................
9964124809
3> prime_server:new_prime(110).
 ...

1
2
3
4
5
6
7
8
9
%%%-------------------------------------------------------------------
%%% @author Yunxing Dai <root@nov503>
%%% @copyright (C) 2012, Yunxing Dai
%%% @doc
%%%
%%% @end
%%% Created :  6 Jan 2012 by Yunxing Dai <root@nov503>
%%%-------------------------------------------------------------------
-module(sellaprime_supervisor).
 ...

1
2
3
4
5
6
7
8
9
%%%-------------------------------------------------------------------
%%% @author Yunxing Dai <root@nov503>
%%% @copyright (C) 2012, Yunxing Dai
%%% @doc
%%%
%%% @end
%%% Created :  4 Jan 2012 by Yunxing Dai <root@nov503>
%%%-------------------------------------------------------------------
-module(prime_server).
 ...

1
2
3
4
5
6
7
8
fun :: [Int]
fun = 0 : 1 : zipWith (+) fun (tail fun)
 
line n = printf "%02x" $ ( (fun !! (30-n) ) `rem` 256 )  
 
main = do
    sequence_ $ map line [1..16]
    printf "\n"

1
2
3
4
5
6
7
8
9
int lim = 0x12345678; int pp = 256;
for (int i = 1; (lim-pp) / ((64 + i) + pp) != 0; i++) {
    if (atan(i - ((i / lim) * lim)) > 1.55) // > ~50
        lim = (lim / 50) * 40;
    int foo = lim; // bar
    for (int j = 0; j < 0x123456; j++)
        foo ^= (j >> 3) | (j << 29); // tidy
    pp &= foo; // in 42-0
    if (lim - ((lim / i) * i) == 0) {
 ...

1
2
3
4
5
6
7
8
9
-module(prog).
-export([main/0]).
 
 
main() ->
    % read number of test cases
    NumLines = element(1,string:to_integer(io:get_line([]))),
    Lines = [io:get_line([]) || _ <- lists:seq(1, NumLines)],
    lists:foreach(fun(X) -> process_line(X) end, Lines),
 ...

1
2
3
4
5
6
7
8
9
-module(tested).
-export([main/0]).
 
 
main() ->
    % read number of test cases
    NumLines = element(1,string:to_integer(io:get_line([]))),
    Lines = [io:get_line([]) || _ <- lists:seq(1, NumLines)],
    lists:foreach(fun(X) -> process_line(X) end, Lines),
 ...

1
2
3
4
5
6
7
8
9
=SUPERVISOR REPORT==== 6-Jan-2012::10:43:46 ===
     Supervisor: {local,gproc_sup}
     Context:    start_error
     Reason:     {'EXIT',
                     {badarg,
                         [{ets,new,
                              [gproc,
                               [ordered_set,public,named_table,
                                {write_concurrency,true},
 ...

1
2
3
4
5
6
7
8
9
import java.awt.*;  
import java.awt.event.*;  
   
 class ImageFrame extends Frame  
{  
    private ImageCanvas c;  
    private Image i;  
    ImageFrame( Image i )  
    {  
 ...

1
2
3
4
5
6
7
8
9
int lim = 0x12345678; int pp = 256;
for (int i = 1; (lim-pp) / ((64 + i) + pp) != 0; i++) {
    if (atan(i - ((i / lim) * lim)) > 1.55) // > ~50
        lim = (lim / 50) * 40;
    int foo = lim; // bar
    for (int j = 0; j < 0x123456; j++)
        foo ^= (j >> 3) | (j << 29); // tidy
    pp &= foo; // in 42-0
    if (lim - ((lim / i) * i) == 0) {
 ...

1
2
3
4
5
6
7
8
(define (margreteborg row col)
(cond ((< row col) #f)
((or (= 0 col) (= row col)) 1)
(else (+ (margreteborg (- row 1) col) (margreteborg (- row 1) (- col 1))))))
 
N (margreteborg 2 2)+(margreteborg 3 2)+(margreteborg 11 2)
(margreteborg 6 3)+(margreteborg 3 2)
.(margreteborg 12 5)- (margreteborg 5 3)
 ...

1
2
3
4
5
6
7
8
9
%% ---
%%  Excerpted from "Programming Erlang",
%%  published by The Pragmatic Bookshelf.
%%  Copyrights apply to this code. It may not be used to create training material, 
%%  courses, books, articles, and the like. Contact us if you are in doubt.
%%  We make no guarantees that this code is fit for any purpose. 
%%  Visit http://www.pragmaticprogrammer.com/titles/jaerlang for more book information.
%%---
-module(my_bank).
 ...

1
2
3
4
5
 
-module helloworld
-export([hello/0]).
 
hello() -> 1 -module .

1
2
 
hello() -> 1 - module .

1
2
 
hello() -> 1 -module .

1
2
3
4
5
-module(prog).
-export([main/0]).
 
main() ->
        io:format("Hello World~n").

1
2
3
4
5
6
7
8
9
-module(prog).
-export([main/0]).
 
main() ->
        loop().
loop() ->
        case io:fread( "","~d" ) of
                eof ->
                        true;
 ...

1
2
3
4
5
6
7
8
9
-module(prog).
-export([main/0]).
 
main() ->
        loop().
loop() ->
        case io:fread( "","~d" ) of
                eof ->
                        true;
 ...