vortex relocation | ------------------------------------------------------------------------
r128 | stark@ucar.edu | 2010-06-03 03:25:30 +0000 (Thu, 03 Jun 2010) | 10 lines
Bug fix
304,306c305
< !lrb Do not print PT3 and PDTOP3 because uninitialized
< ! write(,)'DLMD0,DPHD0,PT3,PDTOP3=',DLMD0,DPHD0,PT3,PDTOP3
< write(,)'DLMD0,DPHD0,PT3,PDTOP3=',DLMD0,DPHD0
—
> write(,)'DLMD0,DPHD0,PT3,PDTOP3=',DLMD0,DPHD0,PT3,PDTOP3
------------------------------------------------------------------------ | diff |
vortex relocation | ------------------------------------------------------------------------
r134 | stark@ucar.edu | 2010-06-11 21:21:41 +0000 (Fri, 11 Jun 2010) | 4 lines
Modified to get around range error of argument for ACOS. Argument was able to take the
value of 1.0 + eps, thus causing an error in ACOS. Fix chops off values with magnitude
greater than one and sets them to one.
------------------------------------------------------------------------ | diff |