/[MITgcm]/MITgcm/tools/OAD_support/ad_template.streamice_cg_solve.F
ViewVC logotype

Diff of /MITgcm/tools/OAD_support/ad_template.streamice_cg_solve.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.2 by utke, Thu Jan 16 15:15:50 2014 UTC revision 1.3 by dgoldberg, Sun Mar 16 09:56:09 2014 UTC
# Line 175  c set up for plain execution Line 175  c set up for plain execution
175           A_vv_d  = A_vv%d           A_vv_d  = A_vv%d
176        call ADSTREAMICE_CG_SOLVE(        call ADSTREAMICE_CG_SOLVE(
177       U                               cg_Uin_p,   ! velocities - solution       U                               cg_Uin_p,   ! velocities - solution
178       I                               cg_Bu_d,      ! adjoint of vel (input)       I                               cg_Uin_d,      ! adjoint of vel (input)
179       U                               cg_Vin_p,   ! velocities - solution       U                               cg_Vin_p,   ! velocities - solution
180       I                               cg_Bv_d,      ! adjoint of vel (input)       I                               cg_Vin_d,      ! adjoint of vel (input)
181       I                               cg_Bu_p,    ! to recalc velocities       I                               cg_Bu_p,    ! to recalc velocities
182       U                               cg_Uin_d,     ! adjoint of RHS (output)       U                               cg_Bu_d,     ! adjoint of RHS (output)
183       I                               cg_Bv_p,    ! to recalc velocities       I                               cg_Bv_p,    ! to recalc velocities
184       U                               cg_Vin_d,     ! adjoint of RHS (output)       U                               cg_Bv_d,     ! adjoint of RHS (output)
185       I                               A_uu_p,     ! section of matrix that multiplies u and projects on u       I                               A_uu_p,     ! section of matrix that multiplies u and projects on u
186       U                               A_uu_d,     ! adjoint of matrix coeffs (output)       U                               A_uu_d,     ! adjoint of matrix coeffs (output)
187       I                               A_uv_p,     ! section of matrix that multiplies v and projects on u       I                               A_uv_p,     ! section of matrix that multiplies v and projects on u
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22