Changeset 3512 for palm/trunk
- Timestamp:
- Nov 9, 2018 6:09:51 PM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/init_masks.f90
r3467 r3512 25 25 ! ----------------- 26 26 ! $Id$ 27 ! Bugfix: do not output ghost points if mask_x/y_loop is not specified 28 ! 29 ! 3467 2018-10-30 19:05:21Z suehring 27 30 ! Implementation of a new aerosol module salsa. 28 31 ! … … 760 763 IF ( mask_loop(mid,dim,2) < 0.0_wp ) THEN 761 764 tmp2 = mask_loop(mid,dim,2) 762 mask_loop(mid,dim,2) = (nxyz+1)*dxyz / mask_scale(dim) ! (default)765 mask_loop(mid,dim,2) = nxyz*dxyz / mask_scale(dim) ! (default) 763 766 ENDIF 764 767 IF ( MAXVAL( mask_loop(mid,dim,1:2) ) &
Note: See TracChangeset
for help on using the changeset viewer.