Changeset 89 for palm/trunk/SOURCE/check_parameters.f90
- Timestamp:
- May 25, 2007 12:08:31 PM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/check_parameters.f90
r87 r89 1405 1405 CASE ( 'Sw' ) 1406 1406 dopr_index(i) = 39 1407 dopr_unit(i) = 'none' 1407 1408 hom(:,2,39,:) = SPREAD( zw, 2, statistic_regions+1 ) 1408 1409
Note: See TracChangeset
for help on using the changeset viewer.