fortran allocate用法