Beautiful Code

I want to see examples of code that is beautifully constructed, laid out, and generally comfy as fuck.

All my code is compiled and licensed. But here's your (You)

public class Sup Forums
{
}

invalid syntax

What does your code being compiled and licensed have to do with anything?

(define (depth l)
(+ 1 (apply max (map depth l))))

x, y = y, x

Based lua

(define (fringe tree)
(cond ((null? tree) '())
((not (pair? tree)) (list tree))
(else (append (fringe (car tree))
(fringe (cdr tree))))))

return;

It's not lua.

>not recognizing that the thread is a code honeypot

ADD AX,10
ADD TOTALE,10
ADD AX,CX
ADD AX,TOTALE
ADD TOTALE,AX

>html
>code

I'm fucking out
this board is terrible

PUSH DSQ # Z TO PDL+0
PUSH DMP # Z SQ TO PDL+2 E:(-26) M:(-24)
TFFNP # LC P E:(-38+2NR) M:(-36+NR)
SL SIGN
5
TFFTEM # AFFIX SIGN FOR SDELF (ENTRY DISPLAY)
STODL TFFTEM # P ZSQ E:(-59+2NR) M:(-55+2NR)
# (ARG IS USED IN TFF/TRIG)
# ZSQ FROM PDL+2 E:(-26) M:(-24)
PUSH DMP # RESTORE PUSH LOC
TFFALFA # ALFA E:(26-NR) M:(24-NR)
SL*
0,1 # X1=-NR
STORE TFFX # X
RTB DMP
T(X) # POLY
# ZSQ FROM PDL+2 E:(-26) M:(-24)
SR2 BDSU # 2 ZSQ T(X) E:(-29) M:(-27)
RTERM # RTERM E:(-29) M:(-27)
DAD DMP
RMAG1 # E:(-29) M:(-27)
# Z FROM PDL+0 E:(-13) M:(-12)
SR3 BPL # TFF SQRT(MU) E:(-45) M:(-42)
ENDTFF # (NO PUSH UP)
PUSH SIGN # TFF SQRT(MU) TO PDL+0
TFFQ1 # Q1 FOR GONEPAST TEST
BPL DLOAD # GONE PAST ?
NEGTFF # YES. TFF < 0.
TFF1/ALF # 1/ALFA E:(-22-2NA) M:(-20-2NA)
DCOMP BPL # ALFA > 0 ?
NEGTFF # NO. TFF IS NEGATIVE.

>write shit code
>press the format button in an IDE
>wala instant checkstyle compliance for any standard coding style

this is missing an end case

emacs lisp:
(defun depth (lst)
(cond ((consp lst)
(+ 1 (apply #'max
(mapcar #'depth
lst))))
(t 0)))

(depth '((5 2 9) (4 3 2 1) (8 9 (3 2 1)))) ;; => 3

Get the number of vowels in a line of user input (Perl):
print =~ tr/[a|e|i|o|u//i;

lisp is so stupid.

LUL

w3m source code.