*** heap.fcm.old	Mon Jun 13 16:18:19 2005
--- heap.fcm	Mon Jun 13 16:18:25 2005
***************
*** 5,11 ****
        INTEGER HEAPDM
  ##IFN UNICOS (unicos)
  ##IF XXLARGE (size)
!       PARAMETER (HEAPDM=10240000)
  ##ELIF LARGE XLARGE (size)
  ##IF T3D (t3d1)
        PARAMETER (HEAPDM=2500000)
--- 5,11 ----
        INTEGER HEAPDM
  ##IFN UNICOS (unicos)
  ##IF XXLARGE (size)
!       PARAMETER (HEAPDM=40960000)
  ##ELIF LARGE XLARGE (size)
  ##IF T3D (t3d1)
        PARAMETER (HEAPDM=2500000)