Ignore:
Timestamp:
Dec 26, 2021, 10:27:36 PM (2 years ago)
Author:
dcugnet
Message:

Fixes for previous commit:

  • few tracers(:)%nqChilds were errouneously replaced with tarcers(:)%nqDesc
  • minor changes
File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/dyn3d/vlsplt.F

    r4050 r4052  
    464464        enddo
    465465      enddo
    466       do ifils=1,tracers(iq)%nqDescen
     466      do ifils=1,tracers(iq)%nqChilds
    467467        iq2=tracers(iq)%iqDescen(ifils)
    468468        call vlx(Ratio,pente_max,masseq,u_mq,iq2)
    … …  
    10151015      enddo
    10161016       
    1017       do ifils=1,tracers(iq)%nqDescen
     1017      do ifils=1,tracers(iq)%nqChilds
    10181018        iq2=tracers(iq)%iqDescen(ifils)
    10191019        call vlz(Ratio,pente_max,masseq,wq,iq2)
Note: See TracChangeset for help on using the changeset viewer.