Fortran 方法的写法

绑定方法将对象作为第一个实参，使得方法在需要时能访问对象中的内容。

subroutine set_name(this, first, last)
  implicit none
  class(employee) :: this
  character(*) :: first
  character(*) :: last