can $ variable be a (c)function?

[veretin]

Hi,

I need to capture function name into $ variable. Example

s x;
c f;

g expr = f(x);

  if ( match( f?$f(x?) ) );
  multiply $f(1);
  endif;

moduleoption noparallel;
.sort

print;
.end

The output is

TFORM 5.0.0 (Mar 17 2026, v5.0.0-10-gc549571) 0 workers  Run: Thu Apr 16 20:17:46 2026
    s x;
    c f;
    
    g expr = f(x);
    
      if ( match( f?$f(x?) ) );
      multiply $f(1);
test.frm Line 7 --> Illegal use of function arguments
      endif;
    
    moduleoption noparallel;
    .sort
    
    print;
    .end
Program terminating in thread 0 at  --> 
Terminate called from pre.c:1086 (PreProcessor)
  0.00 sec + 0.00 sec: 0.00 sec out of 0.00 sec

[tueda]

The issue is that $f can't be used directly as a function in the current implementation of the FORM compiler. One simple workaround is:

S x;
CF f,g;
L F = f(x);
if (match(f?$f(x?)));
  multiply g(1) * replace_(g,$f);
endif;
P;
ModuleOption local $f;
.end

[jodavies]

Does @tueda 's workaround work for you, @veretin ?