lf.sed 395 B

123456789101112131415161718192021222324252627282930313233
  1. 1i\
  2. #ifndef NOFLOAT
  3. /ISTART/d
  4. s/FN/main/
  5. /LSTART/c\
  6. float x=3.1415 , y= 1e-7 ;
  7. /[^&]& /d
  8. /[^|]| /d
  9. />>/d
  10. /<</d
  11. /%/d
  12. /\^/d
  13. /~/d
  14. /&=/d
  15. /|=/d
  16. /[XYZS]/s/.*/& ; printf("%s#","&"@) ;/
  17. /Z1/s/#/ %e&/
  18. /Z1/s/@/, Z1&/
  19. /Z2/s/#/ %e&/
  20. /Z2/s/@/, Z2&/
  21. /Z1/s/^/Z1 = 3.1415 ; /
  22. /Z2/s/^/Z2 = 1e-7 ; /
  23. /[XYZS]/s/^/ /
  24. s/X/.4e-5/g
  25. s/Y/.3e-5/g
  26. s/Z1/x/g
  27. s/Z2/y/g
  28. s/#/\\n/
  29. s/@//
  30. $a\
  31. #else\
  32. main() { return 0; }\
  33. #endif