我有一组大小未定的阵列
必须要在副程式当中才能算出它的阵列大小
因为需要将副程式中的结果，存入阵列当中
所以希望能够在副程式中宣告阵列大小。
但我尝试了一阵子，无法达成。
请教各位高手，有没有办法在subroutine当中配置内存空间大小呢?

module

95(含)以前的dummy argument不可为allocatable，改用pointer即可。