8 lines
176 B
Text
8 lines
176 B
Text
#define-a «(_X_) _X_ )
|
|
#define Compose(_FX_,_FY_) _FC_(_FX_,_FY_,
|
|
#define _FC_(_X_,_Y_,*) *,_X_,_Y_
|
|
|
|
main:
|
|
Compose(sin,arcsin)«( 0.5)
|
|
"\n", print
|
|
{0}return
|