Changeset 73 in PSPA for parmelaPSPA/trunk/parmelamainv503.f


Ignore:
Timestamp:
Nov 14, 2012, 11:45:59 AM (12 years ago)
Author:
touze
Message:

ajout pprincipal

File:
1 edited

Legend:

Unmodified
Added
Removed

  • parmelaPSPA/trunk/parmelamainv503.f

    r51 r73  
    233233c++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++*
    234234c-----------------------------------------------------------------------
    235       program parmela
     235c---->program parmela
     236      subroutine parmela()
    236237c-----------------------------------------------------------------------
    237238c label n --> n*100
    … …  
    10851086      go to 99
    10861087      end
     1088
    10871089c++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++*
    10881090      subroutine cellfld(cl,nc)
Note: See TracChangeset for help on using the changeset viewer.