& , transpobs
_RL transpobs(maxNumDays)
transpobs(irec) = 0. _d 0
read(gwunit,*) transpobs(irec), dummy, wtransp(irec)
if ( transpobs(irec) .EQ. missingObsFlag )