32     function IntToChar1(integerValue) result(a)
33         integer, intent(in) :: integerValue  local
36         write(a, *) integerValue
39     function IntToChar2(integerValue) result(a)
40         integer, intent(in) :: integerValue  local
43         write(a, *) integerValue
46     function IntToChar3(integerValue) result(a)
47         integer, intent(in) :: integerValue  local
50         write(a, *) integerValue
53     function IntToChar4(integerValue) result(a)
54         integer, intent(in) :: integerValue  local
57         write(a, *) integerValue
60     function IntToChar5(integerValue) result(a)
61         integer, intent(in) :: integerValue  local
64         write(a, *) integerValue
67     function IntToChar6(integerValue) result(a)
68         integer, intent(in) :: integerValue  local
71         write(a, *) integerValue
74     function IntToChar7(integerValue) result(a)
75         integer, intent(in) :: integerValue  local
78         write(a, *) integerValue
81     function IntToChar8(integerValue) result(a)
82         integer, intent(in) :: integerValue  local
85         write(a, *) integerValue