Lines Matching refs:zero
58 if(vbc_prof(kk,1).ne.zero) then
59 if(vbc_prof(kk,2).ne.zero) then ! both of these true means top FC
72 else if(vbc_prof(kk,2).ne.zero) then ! y true means low FC
131 if(vbc_prof(kk,1).ne.zero) then
132 if(vbc_prof(kk,2).ne.zero) then ! both of these true means top FC
133 if(ctrl_a(3).ge.zero) then
138 if(ctrl_a(1).ge.zero) then
141 if(ctrl_a(1).eq.zero) then
145 else if(vbc_prof(kk,2).ne.zero) then ! y true means low FC
146 if(ctrl_a(2).ge.zero) then
149 if(ctrl_a(2).eq.zero) then