Ignore:
Timestamp:
Oct 28, 2010 6:35:52 AM (14 years ago)
Author:
helmke
Message:

remove print command in read_var_list

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/read_var_list.f90

    r588 r591  
    182182    READ ( 13 )  variable_chr
    183183    DO  WHILE ( TRIM( variable_chr ) /= '*** end ***' )
    184    
    185        IF(myid == 0)PRINT*,'read_var_list: variable_chr=',variable_chr
    186184
    187185       SELECT CASE ( TRIM( variable_chr ) )
Note: See TracChangeset for help on using the changeset viewer.