Changeset 1057
- Timestamp:
- 01/28/21 15:46:20 (3 years ago)
- Location:
- codes/icosagcm/trunk/src/vertical
- Files:
-
- 1 added
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
codes/icosagcm/trunk/src/vertical/disvert.f90
r954 r1057 30 30 USE disvert_dcmip31_mod, ONLY: ap_dcmip31=>ap, bp_dcmip31=>bp, presnivs_dcmip31=>presnivs, init_disvert_dcmip31=>init_disvert 31 31 USE disvert_dcmip200_mod, ONLY: ap_dcmip200=>ap, bp_dcmip200=>bp, presnivs_dcmip200=>presnivs, init_disvert_dcmip200=>init_disvert 32 USE disvert_plugin_mod, ONLY: ap_plugin=>ap, bp_plugin=>bp, presnivs_plugin=>presnivs, init_disvert_plugin=>init_disvert 32 33 USE icosa 33 34 USE mpipara … … 87 88 bp=>bp_apbp 88 89 presnivs=>presnivs_apbp 90 91 CASE('plugin') 92 93 CALL init_disvert_plugin 94 ap=>ap_plugin 95 bp=>bp_plugin 96 presnivs=>presnivs_plugin 89 97 90 98 CASE ('ncar')
Note: See TracChangeset
for help on using the changeset viewer.