Searched refs:stsB (Results 1 – 2 of 2) sorted by relevance
16 real*8, allocatable :: stsB(:,:) variable54 allocate ( stsB(nshg,3) )159 stsB(i,1) = r3 160 stsB(i,2) = r4 161 stsB(i,3) = r5 247 B = stsB(i,:)
16 real*8, allocatable :: stsB(:,:) variable