Changeset 572 for BOL/trunk/IPCC
- Timestamp:
- Dec 21, 2004, 5:10:38 PM (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
BOL/trunk/IPCC/ts2IPCC.F90
r561 r572 286 286 table=trim(ipcc_table(index_table)), & 287 287 table_entry='latitude', & 288 units= units,&288 units=trim(units), & 289 289 length=lendim(idim), & 290 290 coord_vals=lat, & … … 312 312 table=trim(ipcc_table(index_table)), & 313 313 table_entry='longitude', & 314 units= units,&314 units=trim(units), & 315 315 length=lendim(idim), & 316 316 coord_vals=lon, & … … 333 333 table=trim(ipcc_table(index_table)), & 334 334 table_entry='pressure', & 335 units= units,&335 units=trim(units), & 336 336 length=lendim(idim), & 337 337 coord_vals=vert) … … 354 354 table=trim(ipcc_table(index_table)), & 355 355 table_entry='time', & 356 units= units,&356 units=trim(units), & 357 357 length=lendim(idim), & 358 358 interval='30 minutes') … … 376 376 table=trim(ipcc_table(index_table)), & 377 377 table_entry=trim(ipcc_name(index_table)), & 378 units= units,&378 units=trim(units), & 379 379 axis_ids= axis_ids, & 380 380 missing_value=real(missing_value), & 381 381 positive = trim(ipsl_pos(index_table)), & 382 original_name= varname)382 original_name=trim(varname)) 383 383 ! 384 384 ! Lecture de la variable
Note: See TracChangeset
for help on using the changeset viewer.