max [ Y , max $integral dY$ $integral dX$ ( WORLDBATH bath ) ]
forrtl: severe (174): SIGSEGV, segmentation fault occurred Stack trace terminated abnormally.