Searched refs:faloutnc (Results 1 – 1 of 1) sorted by relevance
542 REAL(KIND=r8) :: faloutnc(nlev) local1608 faloutnc = fnc * dumnc(i,:)1613 faltndnc = faloutnc(k)/pdel(i,k)1625 faltndnc = (faloutnc(k)-dum*faloutnc(k-1))/pdel(i,k)