Exception for Octave 3.8, oct_fill_randg

Math

\[\left(a - \frac{1}{3}\right) \cdot \left(1 + \frac{1}{\sqrt{9 \cdot \left(a - \frac{1}{3}\right)}} \cdot rand\right)\]

C

double f(double a, double rand) {
        double r8150 = a;
        double r8151 = 1.0;
        double r8152 = 3.0;
        double r8153 = r8151 / r8152;
        double r8154 = r8150 - r8153;
        double r8155 = 9.0;
        double r8156 = r8155 * r8154;
        double r8157 = sqrt(r8156);
        double r8158 = r8151 / r8157;
        double r8159 = rand;
        double r8160 = r8158 * r8159;
        double r8161 = r8151 + r8160;
        double r8162 = r8154 * r8161;
        return r8162;
}

Reproduce

Please include this information when filing a bug report:

herbie shell --seed 2019194 
(FPCore (a rand)
  :name "Octave 3.8, oct_fill_randg"
  (* (- a (/ 1.0 3.0)) (+ 1.0 (* (/ 1.0 (sqrt (* 9.0 (- a (/ 1.0 3.0))))) rand))))

Backtrace

result arity mismatch; expected number of values not received expected: 2 received: 1 in: local-binding form values...: 0		L	C
loop	/data/pavpan/nightlies/herbie/various-cleanup/src/core/extraction.rkt	25	2
(unnamed)	/data/pavpan/nightlies/herbie/various-cleanup/src/core/simplify.rkt	26	0
simplify!	/data/pavpan/nightlies/herbie/various-cleanup/src/mainloop.rkt	220	0
run-improve47	/data/pavpan/nightlies/herbie/various-cleanup/src/mainloop.rkt	342	0
(unnamed)	/opt/racket-7.0/collects/racket/private/more-scheme.rkt	261	28
run	/opt/racket-7.0/share/pkgs/profile-lib/main.rkt	39	2
profile-thunk16	/opt/racket-7.0/share/pkgs/profile-lib/main.rkt	9	0
(unnamed)	/opt/racket-7.0/collects/racket/private/more-scheme.rkt	261	28