Changeset 5626 for branches/2014/dev_r4621_NOC4_BDY_VERT_INTERP
- Timestamp:
- 2015-07-22T09:49:20+02:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2014/dev_r4621_NOC4_BDY_VERT_INTERP/NEMOGCM/NEMO/OPA_SRC/BDY/bdyini.F90
r5620 r5626 515 515 ALLOCATE( dta_global(jpbdtau, 1, nb_jpk_bdy) ) 516 516 ALLOCATE( dta_global_z(jpbdtau, 1, nb_jpk_bdy) ) 517 ALLOCATE( dta_global_dz(jpbdtau, 1, nb_jpk_bdy) ) 517 518 ELSE 518 519 ALLOCATE( dta_global(jpbdtau, 1, jpk) ) 519 ALLOCATE( dta_global_z(jpbdtau, 1, jpk) ) 520 ALLOCATE( dta_global_z(jpbdtau, 1, jpk) ) ! needed ?? TODO 521 ALLOCATE( dta_global_dz(jpbdtau, 1, jpk) )! needed ?? TODO 520 522 ENDIF 521 523 … … 524 526 ALLOCATE( dta_global2(jpbdtas, nrimmax, nb_jpk_bdy) ) 525 527 ALLOCATE( dta_global2_z(jpbdtas, nrimmax, nb_jpk_bdy) ) 528 ALLOCATE( dta_global2_dz(jpbdtas, nrimmax, nb_jpk_bdy) ) 526 529 ELSE 527 530 ALLOCATE( dta_global2(jpbdtas, nrimmax, jpk) ) 528 ALLOCATE( dta_global2_z(jpbdtas, nrimmax, jpk) ) 531 ALLOCATE( dta_global2_z(jpbdtas, nrimmax, jpk) ) ! needed ?? TODO 532 ALLOCATE( dta_global2_dz(jpbdtas, nrimmax, jpk) )! needed ?? TODO 529 533 ENDIF 530 534 ENDIF
Note: See TracChangeset
for help on using the changeset viewer.