Symbol Description Uses
STRIP 37



File Line number Procedure Code
./pkg/fizhi/fizhi_lwrad.F 128 LWRIO
       CALL STRIP (OZ,OZL      ,im*jm,ISTRIP,lm   ,NN)
./pkg/fizhi/fizhi_lwrad.F 129 LWRIO
       CALL STRIP (PLZE,ple    ,im*jm,ISTRIP,lm+1 ,NN)
./pkg/fizhi/fizhi_lwrad.F 130 LWRIO
       CALL STRIP (PLZ ,pl     ,im*jm,ISTRIP,lm   ,NN)
./pkg/fizhi/fizhi_lwrad.F 131 LWRIO
       CALL STRIP (PKZ ,pk     ,im*jm,ISTRIP,lm   ,NN)
./pkg/fizhi/fizhi_lwrad.F 132 LWRIO
       CALL STRIP (PKHT,pke    ,im*jm,ISTRIP,lm   ,NN)
./pkg/fizhi/fizhi_lwrad.F 133 LWRIO
       CALL STRIP (TZ,TZL      ,im*jm,ISTRIP,lm   ,NN)
./pkg/fizhi/fizhi_lwrad.F 134 LWRIO
       CALL STRIP (qz,SHZL     ,im*jm,ISTRIP,lm   ,NN)
./pkg/fizhi/fizhi_lwrad.F 135 LWRIO
       CALL STRIP (cldtot,CLRO ,im*jm,ISTRIP,lm   ,NN)
./pkg/fizhi/fizhi_lwrad.F 136 LWRIO
       CALL STRIP (cldmxo,CLMO ,im*jm,ISTRIP,lm   ,NN)
./pkg/fizhi/fizhi_lwrad.F 137 LWRIO
       CALL STRIP (lwlz,cldlz  ,im*jm,ISTRIP,lm   ,NN)
./pkg/fizhi/fizhi_lwrad.F 138 LWRIO
       CALL STRIP (tgz,tsurf   ,im*jm,ISTRIP,1    ,NN)
./pkg/fizhi/fizhi_lwrad.F 140 LWRIO
       CALL STRIP (emissivity,emiss,im*jm,ISTRIP,10,NN)
./pkg/fizhi/fizhi_moist.F 353 MOISTIO
       CALL STRIP (  pigather, SP      ,im*jm,ISTRIP,1 ,NN )
./pkg/fizhi/fizhi_moist.F 354 MOISTIO
       CALL STRIP ( pkzgather, PLK     ,im*jm,ISTRIP,lm,NN )
./pkg/fizhi/fizhi_moist.F 355 MOISTIO
       CALL STRIP ( pkegather, PLKE    ,im*jm,ISTRIP,lm+1,NN )
./pkg/fizhi/fizhi_moist.F 356 MOISTIO
       CALL STRIP ( plzgather, PL      ,im*jm,ISTRIP,lm,NN )
./pkg/fizhi/fizhi_moist.F 357 MOISTIO
       CALL STRIP ( plegather, PLE     ,im*jm,ISTRIP,lm+1,NN )
./pkg/fizhi/fizhi_moist.F 358 MOISTIO
       CALL STRIP (  dpgather, dp      ,im*jm,ISTRIP,lm,NN )
./pkg/fizhi/fizhi_moist.F 359 MOISTIO
       CALL STRIP (  thgather, TH      ,im*jm,ISTRIP,lm,NN )
./pkg/fizhi/fizhi_moist.F 360 MOISTIO
       CALL STRIP (  shgather, SHL     ,im*jm,ISTRIP,lm,NN )
./pkg/fizhi/fizhi_moist.F 364 MOISTIO
        call STRIP ( ugather(1,1,nt), ul(1,1,nt),im*jm,istrip,lm,nn )
./pkg/fizhi/fizhi_moist.F 642 MOISTIO
      CALL STRIP ( thgather,TH ,im*jm,ISTRIP,lm,NN)
./pkg/fizhi/fizhi_moist.F 643 MOISTIO
      CALL STRIP ( shgather,SHL,im*jm,ISTRIP,lm,NN)
./pkg/fizhi/fizhi_swrad.F 417 SWRIO
      CALL STRIP ( zenith,COSZ,im*jm,ISTRIP,1,NN )
./pkg/fizhi/fizhi_swrad.F 419 SWRIO
      CALL STRIP ( plze,  ple   ,im*jm,ISTRIP,lm+1,NN)
./pkg/fizhi/fizhi_swrad.F 420 SWRIO
      CALL STRIP ( pkz ,  pk    ,im*jm,ISTRIP,lm  ,NN)
./pkg/fizhi/fizhi_swrad.F 421 SWRIO
      CALL STRIP ( dpres,dpstrip,im*jm,ISTRIP,lm  ,NN)
./pkg/fizhi/fizhi_swrad.F 422 SWRIO
      CALL STRIP ( tdry,  tzl   ,im*jm,ISTRIP,lm  ,NN)
./pkg/fizhi/fizhi_swrad.F 423 SWRIO
      CALL STRIP ( qz  ,  qzl   ,im*jm,ISTRIP,lm  ,NN)
./pkg/fizhi/fizhi_swrad.F 424 SWRIO
      CALL STRIP ( oz  ,  ozl   ,im*jm,ISTRIP,lm  ,NN)
./pkg/fizhi/fizhi_swrad.F 425 SWRIO
      CALL STRIP ( tau ,  taul  ,im*jm,ISTRIP,lm  ,NN)
./pkg/fizhi/fizhi_swrad.F 427 SWRIO
      CALL STRIP ( albvisdr,albuvdr,im*jm,ISTRIP,1,NN )
./pkg/fizhi/fizhi_swrad.F 428 SWRIO
      CALL STRIP ( albvisdf,albuvdf,im*jm,ISTRIP,1,NN )
./pkg/fizhi/fizhi_swrad.F 429 SWRIO
      CALL STRIP ( albnirdr,albirdr,im*jm,ISTRIP,1,NN )
./pkg/fizhi/fizhi_swrad.F 430 SWRIO
      CALL STRIP ( albnirdf,albirdf,im*jm,ISTRIP,1,NN )
./pkg/fizhi/fizhi_swrad.F 432 SWRIO
      call STRIP ( cldtot,clro,im*jm,istrip,lm,nn )
./pkg/fizhi/fizhi_utils.F 60 STRIP
      SUBROUTINE STRIP(A,B,IA,IB,L,K)