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 ?

[github-actions]

This issue has been marked as stale after 90 days of inactivity. It will be closed automatically in 30 days unless there is any further activity. If this issue is still relevant, please leave a comment to keep it open.