Changeset 964 for palm/trunk/SOURCE/header.f90
- Timestamp:
- Jul 26, 2012 9:14:24 AM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/header.f90
r941 r964 4 4 ! Current revisions: 5 5 ! ----------------- 6 ! 6 ! output of profil-related quantities removed 7 7 ! 8 8 ! Former revisions: … … 751 751 ELSE 752 752 output_format = 'NetCDF 64bit offset' 753 ENDIF754 ENDIF755 IF ( profil_output ) THEN756 IF ( netcdf_output ) THEN757 output_format = TRIM( output_format ) // ' and profil'758 ELSE759 output_format = 'profil'760 753 ENDIF 761 754 ENDIF … … 1150 1143 ELSE 1151 1144 output_format = 'NetCDF 64bit offset' 1152 ENDIF1153 ENDIF1154 IF ( profil_output ) THEN1155 IF ( netcdf_output ) THEN1156 output_format = TRIM( output_format ) // ' and profil'1157 ELSE1158 output_format = 'profil'1159 1145 ENDIF 1160 1146 ENDIF … … 1227 1213 ELSE 1228 1214 output_format = 'NetCDF 64bit offset' 1229 ENDIF1230 ENDIF1231 IF ( profil_output ) THEN1232 IF ( netcdf_output ) THEN1233 output_format = TRIM( output_format ) // ' and profil'1234 ELSE1235 output_format = 'profil'1236 1215 ENDIF 1237 1216 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.