Changeset 1018 for trunk/LMDZ.COMMON/libf/dyn3dpar
- Timestamp:
- Aug 23, 2013, 3:30:20 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.COMMON/libf/dyn3dpar/leapfrog_p.F
r1017 r1018 1173 1173 ! sponge layer 1174 1174 if (callsponge) then 1175 call Register_SwapFieldHallo(ps,ps,ip1jmp1,1,1176 & jj_Nb_dissip,1,1,Request_dissip)1177 1175 call Register_Hallo(ps,ip1jm,1,1,1,1,1,Request_Dissip) 1178 1176 call SendRequest(Request_Dissip)
Note: See TracChangeset
for help on using the changeset viewer.