Ignore:
Timestamp:
May 18, 2015, 11:09:37 AM (10 years ago)
Author:
crisi
Message:

Camille Risi: corrections of bugs for the isotopic part

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/dyn3d/caladvtrac.F

    r2270 r2281  
    8585          ENDDO
    8686
     87          write(*,*) 'caladvtrac 87'
    8788          CALL qminimum( q, nqtot, finmasse )
     89          write(*,*) 'caladvtrac 89'
    8890
    8991          CALL SCOPY   ( ip1jmp1*llm, masse, 1, finmasse,       1 )
Note: See TracChangeset for help on using the changeset viewer.