2D Filled Contour Plot
This contour plot was created using the Winteracter IPgConfill2
routine, one of the extensive set of Presentation Graphics subroutines. It illustrates data generated
by the following code:
DO IX = 1,NX
X0 = 2.5*PI*(2.0*REAL(IX)REAL(NX))/REAL(NX)
DO IY = 1,NY
Y0 = 2.5*PI*(2.0*REAL(IY)REAL(NY))/REAL(NY)
D(IX,IY) = MIN(SIN(SQRT(X0*X0+Y0*Y0)) + 0.5/ABS(X0+3.05),1.4)
END DO
END DO
