Member procedures/functions [Object Oriented Oracle]

create type foo_type as object (
  
  foo number,

  member procedure proc(p in number),
  member function  func(p in number) return number
);
/

create type body foo_type as 

  member procedure proc(p in number) is begin
    foo := p*2;
  end proc;

  member function func(p in number) return number is begin
    return foo/p;
  end func;
end;
/