REAL*8 misvalLoc
misvalLoc = misvalFlt(listId)
misvalLoc = undef
misval_r4(ii) = misvalLoc
misval_r8(ii) = misvalLoc
& qtmp1(i,j,k,bi,bj) = misvalLoc