処理系：gfortran v4.2
したいこと：モジュールに関数オブジェクトを保持させたい。
例えば、モジュールに変数3をセットし後に取得するプログラム
module Test
　　　implicit none
　　　integer,private::a
contains
　　　subroutine set(x)
　　　　　integer,intent(in)::x
　　　　　a = x
　　　end subroutine
　　　integer function get()
　　　　　integer::get
　　　　　get = a
　　　end function
end module
program main
　　　use Test
　　　implicit none
　　　call set(3)
　　　print *,get()
end program
というものを書くことが出来ます。

同じように、モジュールに関数を保持させることは可能でしょうか？