/[MITgcm]/MITgcm/pkg/bulk_force/bulkf_formula_vince.F
ViewVC logotype

Diff of /MITgcm/pkg/bulk_force/bulkf_formula_vince.F

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

revision 1.1 by cheisey, Thu Nov 21 19:11:42 2002 UTC revision 1.2 by edhill, Thu Oct 9 04:19:19 2003 UTC
# Line 1  Line 1 
1    C $Header$
2    C $Name$
3  c swd -- bulkf formula used in bulkf and ice pkgs  c swd -- bulkf formula used in bulkf and ice pkgs
4  c cswd -- adapted from vince/andrei surf_flux.f  c cswd -- adapted from vince/andrei surf_flux.f
5    
6  #include "CPP_OPTIONS.h"  #include "BULK_FORCE_OPTIONS.h"
7        subroutine bulkf_formula_vince(        subroutine bulkf_formula_vince(
8       I                           uw, vw, us, Ta, Qa, nc, tsf_in,       I                           uw, vw, us, Ta, Qa, nc, tsf_in,
9       I                           UFocean, flwup, flha, fsha, df0dT,       I                           UFocean, flwup, flha, fsha, df0dT,
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22