/[MITgcm]/MITgcm/pkg/streamice/streamice_vel_solve.F
ViewVC logotype

Diff of /MITgcm/pkg/streamice/streamice_vel_solve.F

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

revision 1.12 by dgoldberg, Wed Jul 13 09:32:45 2016 UTC revision 1.13 by dgoldberg, Thu Oct 20 15:22:53 2016 UTC
# Line 60  C     LOCAL VARIABLES Line 60  C     LOCAL VARIABLES
60  !       _RL taudx (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)  !       _RL taudx (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
61  !       _RL taudy (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)  !       _RL taudy (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
62    
63        IF (STREAMICE_ppm_driving_stress) THEN        IF (STREAMICE_alt_driving_stress) THEN
64           CALL STREAMICE_DRIVING_STRESS_FD (myThid)
65          ELSEIF (STREAMICE_ppm_driving_stress) THEN
66         CALL STREAMICE_DRIVING_STRESS_PPM (myThid)         CALL STREAMICE_DRIVING_STRESS_PPM (myThid)
67        ELSE        ELSE
68         CALL STREAMICE_DRIVING_STRESS (myThid)         CALL STREAMICE_DRIVING_STRESS (myThid)
Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13
  ViewVC Help
Powered by ViewVC 1.1.22