这是我的代码：
Program Array_first_dimension
Implicit none
Integer::i
Integer,parameter::Br_sn_cv=11,Br_sn_gr=Br_sn_cv-1,Br_nn_mre=10
Integer,parameter,dimension(Br_nn_mre)::Br_nn_cv=[15,12,17,13,16,11,25,45,21,35],Br_nn_gra=Br_nn_cv-1
Integer,dimension(Br_sn_gr)::SN_Tip
Integer,dimension(Br_nn_gra,Br_nn_mre)::NN_Tip
End Program Array_first_dimension
我的意图是声明NN_tip数组的第一个维度，第一维始终是Br_nn_gra中的元素，它对应于Br_nn_mre (NN_Tip(15,1),NN_Tip(12,1)...NN_Tip(35,10))的实际值。
我在编译结束时收到了消息：
Error: Expression must be scalar
Error: The module or main program array 'nn_tip' must have constant shape
我的代码出了什么问题？