Ignore:
Timestamp:
Sep 20, 2006, 12:12:39 PM (18 years ago)
Author:
Laurent Fairhead
Message:

Nouvelles versions de la dynamique YM
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/branches/V3_test/libf/dyn3dpar/advz.F

    r630 r709  
    105105         DO j = 1,jjp1
    106106            DO i = 1,iim
    107                sqi = sqi + S0(i,j,l,9)
     107               sqi = sqi + S0(i,j,l,ntra)
    108108            ENDDO
    109109         ENDDO
    … …  
    307307         DO j = 1,jjp1
    308308            DO i = 1,iim
    309                sqf = sqf + S0(i,j,l,9)
     309               sqf = sqf + S0(i,j,l,ntra)
    310310            ENDDO
    311311         ENDDO
Note: See TracChangeset for help on using the changeset viewer.