Ignore:
Timestamp:
Dec 10, 2010 11:46:30 AM (12 years ago)
Author:
heinze
Message:

Calculation of q*2 added

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SCRIPTS/NCL/profiles.ncl

    r594 r624  
    697697                                                                        .OR. vNam(varn) .EQ. "w"+dq+"e:dz" .OR. isStrSubset(vNam(varn), "w"+dq+"e:dz_"))then
    698698                                                                        z_u = f_att->$vNam(varn+1)$
    699                                                                         break                                                                       
     699                                                                        break   
     700                                                                     else
     701                                                                        if(vNam(varn) .EQ. "qs2" .OR. isStrSubset(vNam(varn), "qs2_")\
     702                                                                           .OR. vNam(varn) .EQ. "q*2" .OR. isStrSubset(vNam(varn), "q*2_"))then
     703                                                                           z_u = f_att->$vNam(varn+1)$
     704                                                                           break 
     705                                                                       end if               
    700706                                                                     end if
    701707                                                                  end if
Note: See TracChangeset for help on using the changeset viewer.