New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
2011WP/2011Stream2/DynamicMemory_improvments (diff) – NEMO

Changes between Version 5 and Version 6 of 2011WP/2011Stream2/DynamicMemory_improvments


Ignore:
Timestamp:
2011-03-04T12:29:48+01:00 (12 years ago)
Author:
cetlod
Comment:

--

Legend:

Unmodified
Added
Removed
Modified
  • 2011WP/2011Stream2/DynamicMemory_improvments

    v5 v6  
    6161{{{ 
    6262   INTEGER FUNCTION work_alloc() 
    63  
    6463      ALLOCATE( data(jpi,jpj,jpk),  STAT=work_alloc ) 
    65  
    66    END FUNCTION p4z_che_alloc 
     64   END FUNCTION work_alloc 
    6765}}} 
    6866 
     
    7371   INTEGER FUNCTION work_alloc() 
    7472      INTEGER :: ierr 
    75  
    7673      ALLOCATE( data(jpi,jpj,jpk),  STAT=ierr ) 
    77  
    7874      work_alloc = ierr 
    79  
    80    END FUNCTION p4z_che_alloc 
     75   END FUNCTION work_alloc 
    8176}}} 
    8277----