##
perl -pi -e 's/c$tgt || c$tgtf || c$tgtl || $tgtf || $tgtl /$tgt/g' *.c
##
##
$tgt = tanh
##
##
exa=cexpl ( ccosl (arg), csinl ( arg) ) * cabsl (arg2) + csqrtl ( cargl(arg3) + csqrtl(cargl(arg4) * cargl(arg5) + cargl (arg5) * cargl(arg5));
##
##
exa = exp( cos(arg) , sin(arg) ) * fabs(arg2)+ sqrt(carg(arg3) + sqrt(carg(arg4)*carg(arg5)+carg(arg5)*carg(arg5));