RosettaCodeData/Task/Metaprogramming/M2000-Interpreter/metaprogramming.m2000

Module Meta {
      FunName$="Alfa"
      Code1$=FunName$+"=lambda (X)->{"
      Code2$={
            =x**2
      }
      Code3$="}"

      Inline code1$+code2$+code3$

      Print Function(FunName$, 4)=16

}
Meta