- Timestamp:
- Sep 1, 2009 9:19:32 AM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SCRIPTS/NCL/profiles.ncl
r353 r375 1727 1727 end if 1728 1728 1729 if (max_z_int .gt. dimz-1)1729 if (max_z_int .gt. dimz-1) 1730 1730 max_z_int = dimz-1 1731 if (log_z .EQ. 1) then 1732 max_z_int = max_z_int - 1 1733 end if 1731 1734 end if 1732 1735 1733 if (min_z_int .lt. 0)1736 if (min_z_int .lt. 0) 1734 1737 min_z_int = 0 1738 if (log_z .EQ. 1) then 1739 min_z_int = min_z_int + 1 1740 end if 1735 1741 end if 1736 1742
Note: See TracChangeset
for help on using the changeset viewer.