[派生类型] 自定义类型，又是数组时，变量如何选取？ps 菜鸟一个

module typedef
 implicit none
 type ::player
 real:: angle
 real:: speed
 real:: distance
 end type
end module

 program main
  use shoot
  implicit none
  integer,parameter::players=2
  type(player)::people(players)=(/player(30.0,25.0,0.0),player(45.0,20.0,0.0)/)