/*

  Test of OEIS sequence.

  https://oeis.org/A026741
  """
  a(n) = n if n odd, n/2 if n even.
  """
  code = (A / (1 + even(A))) = [[[1],1],[[2],1],[[3],3],[[4],2],[[5],5],[[6],3],[[7],7],[[8],4],[[9],9],[[10],5],[[11],11]] = [[12] = 6.0]
code = (A / (2 - odd(A))) = [[[1],1],[[2],1],[[3],3],[[4],2],[[5],5],[[6],3],[[7],7],[[8],4],[[9],9],[[10],5],[[11],11]] = [[12] = 6.0]

  maxCount = 5
  code = (A / (1 + odd(even(A)))) = [[[1],1],[[2],1],[[3],3],[[4],2],[[5],5],[[6],3],[[7],7],[[8],4],[[9],9],[[10],5],[[11],11]] = [[12] = 6.0]
  code = (A / (2 - (A mod 2))) = [[[1],1],[[2],1],[[3],3],[[4],2],[[5],5],[[6],3],[[7],7],[[8],4],[[9],9],[[10],5],[[11],11]] = [[12] = 6.0]


*/
data(oeis1,Data,Vars,Unknown,Ops,Constants,MaxC) :-
  Seq = [1, 1, 3, 2, 5, 3, 7, 4, 9, 5, 11],
  (
    make_point_seq(Seq,Data,Unknown,Vars)
    % ; 
    % member(N,1..3),
    % println(n=N),
    % make_seq(Seq,N,Data,Unknown,Vars)
  ),
  % get_global_map().put("debug",true),
  Ops = new_map([infix=["+","-","*","/","mod"],
                 op1=["odd","even"]]
                 ),
  Constants = 1..2,          
  MaxC = 6.