-module(column_place).
-export([column_place/1]).

column(0) -> 0;
column(Num) -> 1 + column(Num div 10).

place(1) -> 1;
place(Col) -> 10 * place(Col - 1).

column_place(0) -> {1, 1};
column_place(Num) -> {column(Num), place(column(Num))}.