- Timestamp:
- 08/08/12 05:03:46 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
codes/icosagcm/trunk/src/disvert.f90
r75 r112 102 102 103 103 status=NF90_PUT_VAR(ncid,hyaiid, ap(:)/Preff) 104 status=NF90_PUT_VAR(ncid,hybiid, bp(:) /Preff)104 status=NF90_PUT_VAR(ncid,hybiid, bp(:)) 105 105 106 106 DO l=1,llm
Note: See TracChangeset
for help on using the changeset viewer.