是否可以在Fortran中使类实例可调用？

module MyModule
  implicit none

  type :: MyClass
    private
    integer :: value
  contains
    procedure :: MySubroutine
  end type MyClass

contains

  subroutine MySubroutine(this)
    class(MyClass), intent(inout) :: this
    ! 在这里编写类实例可调用的代码
  end subroutine MySubroutine

end module MyModule

program Main
  use MyModule
  implicit none

  type(MyClass) :: obj

  ! 调用类实例的可调用函数
  call obj()

end program Main