let algebra-sqineq-4bap1lt4bsqpap1sq = `!a:real b:real. &4 * b * (a + &1) <= &4 * b pow 2 + (a + &1) pow 2`;;