3156 i=0
3157 do while (session%count >0)
3158 i=i+1
3159 call session%ingest_ana(anav(i))
3160 end do
3161else
3162 allocate(anav(0))
3163end if
3164
3165end subroutine dbasession_ingest_anav
3166
3167
3169subroutine dbasession_ingest_anal(session,anal)