Changeset 14239 for NEMO/trunk/src/ABL/ablmod.F90
- Timestamp:
- 2020-12-23T09:57:16+01:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/trunk/src/ABL/ablmod.F90
r14235 r14239 537 537 CALL lbc_lnk_multi( 'ablmod', tq_abl(:,:,:,nt_a,jp_ta), 'T', 1._wp , tq_abl(:,:,:,nt_a,jp_qa), 'T', 1._wp , kfillmode = jpfillnothing ) ! ++++ this should not be needed... 538 538 ! 539 #if defined key_ iomput539 #if defined key_xios 540 540 ! 2D & first ABL level 541 541 IF ( iom_use("pblh" ) ) CALL iom_put ( "pblh", pblh(:,: ) )
Note: See TracChangeset
for help on using the changeset viewer.