version (D_LP64) {
    alias ulong size_t;
} else {
    alias uint size_t;
}

extern (C) void* malloc(size_t);
extern (C) void* realloc(void*, size_t);
extern (C) int printf(char* s, ...);
extern (C) char* gets(char* s);
extern (C) size_t strlen(char* s);
extern (C) int atoi(char* s);

size_t sum(int[] l)
{
    size_t i = 0, sum = 0;
    while (i < l.length) {
        sum = sum + i;
        i++;
    }
    return sum;
}

int main()
{
    const int LIST_LENGTH = 100;
    int index = 0;
    int[] list;

    list.length = LIST_LENGTH;
    while (index < LIST_LENGTH) {
        list[index] = index * 2;
        index++;
    }

    printf("sum:%d\n", sum(list));

    return 0;
}