bens new fidasim.f90