# /*[*/ include <stdio.h> /* \
`"""echo" eval "exec echo I\'m a sh script."`
 # \
if 0; print "I'm a Perl program.\n"; __END__
puts "I'm a tcl script."; exit
*/
enum {a, b};
static int c99(void) {
 #ifndef __cplusplus /*bah*/
	if ((enum {b, a})0)
	;
 #endif
	return a;
}

static int trigraphs(void) {
	return sizeof "??!" == 2;
}

char X;
int main(void) {
	struct X {
		char a[2];
	};
	if (sizeof(X) != 1) {
		printf("I'm a C++ program, trigraphs %sabled.\n",
			   trigraphs() ? "en" : "dis");
	} else {
		printf("I'm a C program (C%s, trigraphs %sabled).\n", c99() ? 1//**/2
			   ? "89 with // comments" : "89" : "99",
			   trigraphs() ? "en" : "dis");
	}
	return 0;
}

/*

> main :: IO ()
> main = putStr "I'm a Literate Haskell program.\n"

]>++++++++[<+++++++++>-]<+.>>++++[<++++++++++>-]<-.[-]>++++++++++
[<+++++++++++>-]<-.>>++++[<++++++++>-]<.>>++++++++++[<++++++++++>
-]<---.<.>+.->>++++++++++[<+++++++++++>-]<++++.<.>>>++++++++++[<+
+++++++++>-]<+++++.<<<<+.->>>>---.<+++.---<++.-->>>>>++++++++++[<
+++++++++++>-]<---.<<<<<.<+++.>>>.<<<-.-->>>>+.<.<.<<.>++++++++++
+ +++.[-]++++++++++"""`
print "I'm a Python program." # */