integer MaxQ,MaxQ1
integer MaxR,MaxT_h
integer MaxSlice
- parameter (Max_Parm=128)
- parameter (MaxQ=1,MaxQ1=MaxQ+2)
- parameter(MaxR=1,MaxT_h=32)
+ parameter (Max_Parm=16)
+ parameter (MaxQ=4,MaxQ1=MaxQ+2)
+ parameter(MaxR=16,MaxT_h=32)
parameter(MaxSlice=40)
integer MaxN
parameter (MaxN=100)
integer MaxPrintConf
parameter (MaxPrintConf=1000)
+ integer Max_GridT
+ parameter (Max_GridT=400)