Changeset 2031 for palm/trunk/SOURCE/init_masks.f90
- Timestamp:
- Oct 21, 2016 3:11:58 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/init_masks.f90
r2001 r2031 20 20 ! Current revisions: 21 21 ! ----------------- 22 ! 22 ! renamed variable rho to rho_ocean 23 23 ! 24 24 ! Former revisions: … … 350 350 unit = 'kg/kg' 351 351 352 CASE ( 'rho ' )352 CASE ( 'rho_ocean' ) 353 353 IF ( .NOT. ocean ) THEN 354 354 WRITE ( message_string, * ) 'output of "', TRIM( var ), &
Note: See TracChangeset
for help on using the changeset viewer.