Changeset 1682 for palm/trunk/SOURCE/user_data_output_dvrp.f90
- Timestamp:
- Oct 7, 2015 11:56:08 PM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/user_data_output_dvrp.f90
r1321 r1682 1 SUBROUTINE user_data_output_dvrp( output_variable, local_pf ) 2 1 !> @file user_data_output_dvrp.f90 3 2 !--------------------------------------------------------------------------------! 4 3 ! This file is part of PALM. … … 20 19 ! Current revisions: 21 20 ! ----------------- 22 ! 21 ! Code annotations made doxygen readable 23 22 ! 24 23 ! Former revisions: … … 41 40 ! Description: 42 41 ! ------------ 43 ! Execution of user-defined dvrp output42 !> Execution of user-defined dvrp output 44 43 !------------------------------------------------------------------------------! 44 SUBROUTINE user_data_output_dvrp( output_variable, local_pf ) 45 45 46 46 47 USE control_parameters … … 58 59 IMPLICIT NONE 59 60 60 CHARACTER (LEN=*) :: output_variable ! :61 CHARACTER (LEN=*) :: output_variable !< 61 62 62 INTEGER(iwp) :: i ! :63 INTEGER(iwp) :: j ! :64 INTEGER(iwp) :: k ! :63 INTEGER(iwp) :: i !< 64 INTEGER(iwp) :: j !< 65 INTEGER(iwp) :: k !< 65 66 66 67 REAL(wp), DIMENSION(nxl_dvrp:nxr_dvrp+1,nys_dvrp:nyn_dvrp+1,nzb:nz_do3d) :: & 67 local_pf ! :68 local_pf !< 68 69 69 70 !
Note: See TracChangeset
for help on using the changeset viewer.