Thomas
Code: Select all
close @all
wfopen .\1.wf1
copy _s _saux
'auxiliary equation with @abs instead of @exp
system _saux
for !i= 1 to 2
%line= _s.@line(!i)
%lineabs = @replace(@lower(%line), "exp", "@abs")
_saux.append {%lineabs}
next
%instr= _s.@line(3)
_saux.append {%instr}
_saux.gmm(w,noexinst,fastderiv,m=200)
copy c c2
c= @log(@abs(c))
show c
