| File |
Line number |
Procedure |
Code |
|
./pkg/openad/openad_dumpAdjoint.F |
103 |
OPENAD_DUMPADJOINT |
foo5=thetad |
|
./pkg/openad/openad_dumpAdjoint.F |
104 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XYZ_RL('adjtheta.',suff,foo5,myIter,1) |
|
./pkg/openad/openad_dumpAdjoint.F |
105 |
OPENAD_DUMPADJOINT |
foo5=saltd |
|
./pkg/openad/openad_dumpAdjoint.F |
106 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XYZ_RL('adjsalt.',suff,foo5,myIter,1) |
|
./pkg/openad/openad_dumpAdjoint.F |
107 |
OPENAD_DUMPADJOINT |
foo5=uveld |
|
./pkg/openad/openad_dumpAdjoint.F |
108 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XYZ_RL('adjuvel.',suff,foo5,myIter,1) |
|
./pkg/openad/openad_dumpAdjoint.F |
109 |
OPENAD_DUMPADJOINT |
foo5=vveld |
|
./pkg/openad/openad_dumpAdjoint.F |
110 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XYZ_RL('adjvvel.',suff,foo5,myIter,1) |
|
./pkg/openad/openad_dumpAdjoint.F |
111 |
OPENAD_DUMPADJOINT |
foo5=wveld |
|
./pkg/openad/openad_dumpAdjoint.F |
112 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XYZ_RL('adjwvel.',suff,foo5,myIter,1) |
|
./pkg/openad/openad_dumpAdjoint.F |
117 |
OPENAD_DUMPADJOINT |
foo5=diffkrd |
|
./pkg/openad/openad_dumpAdjoint.F |
118 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XY_RL('adjdiffkr.',suff,foo5,myIter,1) |
|
./pkg/openad/openad_dumpAdjoint.F |
95 |
OPENAD_DUMPADJOINT |
double precision foo5(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy) |