Changeset 568 in lmdz_wrf for trunk/tools


Ignore:
Timestamp:
Jul 6, 2015, 2:43:02 PM (10 years ago)
Author:
lfita
Message:

Working version of `values_fortran_fmt'

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/tools/nc_var_tools.py

    r567 r568  
    1634016340    ichar=0
    1634116341    ival = 0
    16342     for ft in formats:
     16342    for ft in fFMT:
    1634316343        Lft = len(ft)
    16344         print ft, Lft
    16345      
    1634616344        if ft[0:1] == 'A' or ft[0:1] == 'a':
    1634716345            Lfmt = int(ft[1:Lft+1])
     
    1636616364        elif ft.find('X') != -1 or ft.find('x') != -1:
    1636716365            print '    ' + fname + ': skipping space'
    16368             ichar = ichar + len(ft)
     16366            ichar = ichar + int(rmNOnum(ft))
    1636916367        else:
    1637016368            print errormsg
     
    1637316371            quit(-1)
    1637416372
    16375         print '    ', ichar, fvalues[ival-1]
    1637616373        ival = ival + 1
    16377 
    16378     print fvalues
    1637916374
    1638016375    return fvalues
Note: See TracChangeset for help on using the changeset viewer.