Changeset 4448 for palm


Ignore:
Timestamp:
Mar 9, 2020 9:29:12 AM (4 years ago)
Author:
moh.hefny
Message:

bugfix: removed the error message PA0672 to consider allow PC 3d data via ascii file

File:
1 edited

Legend:

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

    r4392 r4448  
    2626! Former revisions:
    2727! -----------------
     28!
    2829! $Id$
    29 ! (resler) Make pcm_heatrate_av, pcm_latentrate_av public to allow calculation
     30! (salim) removed the error message PA0672 to consider PC 3d data via ascii file
     31!
     32! 4392 2020-01-31 16:14:57Z pavelkrc (resler)
     33! Make pcm_heatrate_av, pcm_latentrate_av public to allow calculation
    3034! of averaged Bowen ratio in the user procedure
    3135!
     
    547551          CALL message( 'pcm_check_parameters', 'PA0360', 1, 2, 0, 6, 0 )
    548552       ENDIF
    549 !
    550 !--    If canopy shall be read from file, static input file must be present
    551        IF ( TRIM( canopy_mode ) == 'read_from_file' .AND.                   &
    552             .NOT. input_pids_static )  THEN
    553           message_string = 'canopy_mode = read_from_file requires ' //      &
    554                            'static input file'
    555           CALL message( 'pcm_check_parameters', 'PA0672', 1, 2, 0, 6, 0 )
    556        ENDIF
    557553
    558554    END SUBROUTINE pcm_check_parameters
Note: See TracChangeset for help on using the changeset viewer.