integer a(1:100)=0
↑これって通る？

integer::　じゃないと通らなかった気が。