C
C Program ANRAY with the isosurface interpolation: INCLUDE 'anray.for' C anray.for INCLUDE 'modbs.for' C modbs.for C