Changeset 514 for palm/trunk
 Timestamp:
 Mar 17, 2010 9:42:33 AM (13 years ago)
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

palm/trunk/SCRIPTS/NCL/cross_sections.ncl
r513 r514 1318 1318 temp = f[:]>$vNam(varn)$ 1319 1319 data_att = f_att>$vNam(varn)$ 1320 if(vNam(varn) .eq. "ts_xy" .or. vNam(varn) .eq. "us_xy" .or. vNam(varn) .eq. "z0s_xy") 1321 ;these variables depend zu1_xy and that's why they have only one zlayer 1320 if(vNam(varn) .eq. "lwps_xy" .or. vNam(varn) .eq. "pras_xy" \ 1321 .or. vNam(varn) .eq. "prrs_xy" .or. vNam(varn) .eq. "qsws_xy" \ 1322 .or. vNam(varn) .eq. "shfs_xy" .or. vNam(varn) .eq. "ts_xy" \ 1323 .or. vNam(varn) .eq. "us_xy" .or. vNam(varn) .eq. "z0s_xy") then 1324 ;these variables depend on zu1_xy and that's why they have only one zlayer 1322 1325 data(varn,:,0,:,:)=temp(:,0,ys:ye,xs:xe) 1323 1326 no_zu1=no_zu1+1 … … 1600 1603 end if 1601 1604 1602 if(vNam(varn) .eq. "ts_xy" .or. vNam(varn) .eq. "us_xy" .or. vNam(varn) .eq. "z0s_xy")then 1605 if(vNam(varn) .eq. "lwps_xy" .or. vNam(varn) .eq. "pras_xy" \ 1606 .or. vNam(varn) .eq. "prrs_xy" .or. vNam(varn) .eq. "qsws_xy" \ 1607 .or. vNam(varn) .eq. "shfs_xy" .or. vNam(varn) .eq. "ts_xy" \ 1608 .or. vNam(varn) .eq. "us_xy" .or. vNam(varn) .eq. "z0s_xy") then 1603 1609 loe = 0 1604 1610 level = "=" + zu1(0) + "m" 1605 1611 end if 1606 1612 1607 cs_res@gsnCenterString = "t=" + decimalPlaces(t_all(li)/3600,2,True) +"h z"+level 1613 cs_res@gsnCenterString = "t=" + decimalPlaces(t_all(li)/3600,2,True) +"h z"+level 1608 1614 plot(n) = gsn_csm_contour(wks_ps,data(varn,li,lolos,:,:),cs_res) 1609 1615 if (vector .EQ. 1 .AND. check_vecp) then … … 1633 1639 end if 1634 1640 1635 if(vNam(varn) .eq. "ts_xy" .or. vNam(varn) .eq. "us_xy" .or. vNam(varn) .eq. "z0s_xy")then 1641 if(vNam(varn) .eq. "lwps_xy" .or. vNam(varn) .eq. "pras_xy" \ 1642 .or. vNam(varn) .eq. "prrs_xy" .or. vNam(varn) .eq. "qsws_xy" \ 1643 .or. vNam(varn) .eq. "shfs_xy" .or. vNam(varn) .eq. "ts_xy" \ 1644 .or. vNam(varn) .eq. "us_xy" .or. vNam(varn) .eq. "z0s_xy") then 1636 1645 lie = 0 1637 1646 level = "=" + zu1(0) + "m"
Note: See TracChangeset
for help on using the changeset viewer.