|
My Project
|
|
My Project
|
#include "cv3param.h"Go to the source code of this file.
Functions/Subroutines | |
| subroutine | cv3a_compress (len, nloc, ncum, nd, ntra, iflag1, nk1, icb1, icbs1, plcl1, tnk1, qnk1, gznk1, hnk1, unk1, vnk1, wghti1, pbase1, buoybase1, t1, q1, qs1, t1_wake, q1_wake, qs1_wake, s1_wake, u1, v1, gz1, th1, th1_wake, tra1, h1, lv1, cpn1, p1, ph1, tv1, tp1, tvp1, clw1, h1_wake, lv1_wake, cpn1_wake, tv1_wake, sig1, w01, ptop21, Ale1, Alp1, iflag, nk, icb, icbs, plcl, tnk, qnk, gznk, hnk, unk, vnk, wghti, pbase, buoybase, t, q, qs, t_wake, q_wake, qs_wake, s_wake, u, v, gz, th, th_wake, tra, h, lv, cpn, p, ph, tv, tp, tvp, clw, h_wake, lv_wake, cpn_wake, tv_wake, sig, w0, ptop2, Ale, Alp) |
| subroutine cv3a_compress | ( | integer | len, |
| integer | nloc, | ||
| integer | ncum, | ||
| integer | nd, | ||
| integer | ntra, | ||
| integer, dimension(len) | iflag1, | ||
| integer, dimension(len) | nk1, | ||
| integer, dimension(len) | icb1, | ||
| integer, dimension(len) | icbs1, | ||
| real, dimension(len) | plcl1, | ||
| real, dimension(len) | tnk1, | ||
| real, dimension(len) | qnk1, | ||
| real, dimension(len) | gznk1, | ||
| real, dimension(len) | hnk1, | ||
| real, dimension(len) | unk1, | ||
| real, dimension(len) | vnk1, | ||
| real, dimension(len,nd) | wghti1, | ||
| real, dimension(len) | pbase1, | ||
| real, dimension(len) | buoybase1, | ||
| real, dimension(len,nd) | t1, | ||
| real, dimension(len,nd) | q1, | ||
| real, dimension(len,nd) | qs1, | ||
| real, dimension(len,nd) | t1_wake, | ||
| real, dimension(len,nd) | q1_wake, | ||
| real, dimension(len,nd) | qs1_wake, | ||
| real, dimension(len) | s1_wake, | ||
| real, dimension(len,nd) | u1, | ||
| real, dimension(len,nd) | v1, | ||
| real, dimension(len,nd) | gz1, | ||
| real, dimension(len,nd) | th1, | ||
| real, dimension(len,nd) | th1_wake, | ||
| real, dimension(len,nd,ntra) | tra1, | ||
| real, dimension(len,nd) | h1, | ||
| real, dimension(len,nd) | lv1, | ||
| real, dimension(len,nd) | cpn1, | ||
| real, dimension(len,nd) | p1, | ||
| real, dimension(len,nd+1) | ph1, | ||
| real, dimension(len,nd) | tv1, | ||
| real, dimension(len,nd) | tp1, | ||
| real, dimension(len,nd) | tvp1, | ||
| real, dimension(len,nd) | clw1, | ||
| real, dimension(len,nd) | h1_wake, | ||
| real, dimension(len,nd) | lv1_wake, | ||
| real, dimension(len,nd) | cpn1_wake, | ||
| real, dimension(len,nd) | tv1_wake, | ||
| real, dimension(len,nd) | sig1, | ||
| real, dimension(len,nd) | w01, | ||
| real, dimension(len) | ptop21, | ||
| real, dimension(len) | Ale1, | ||
| real, dimension(len) | Alp1, | ||
| integer, dimension(len) | iflag, | ||
| integer, dimension(len) | nk, | ||
| integer, dimension(len) | icb, | ||
| integer, dimension(len) | icbs, | ||
| real, dimension(len) | plcl, | ||
| real, dimension(len) | tnk, | ||
| real, dimension(len) | qnk, | ||
| real, dimension(len) | gznk, | ||
| real, dimension(len) | hnk, | ||
| real, dimension(len) | unk, | ||
| real, dimension(len) | vnk, | ||
| real, dimension(len,nd) | wghti, | ||
| real, dimension(len) | pbase, | ||
| real, dimension(len) | buoybase, | ||
| real, dimension(len,nd) | t, | ||
| real, dimension(len,nd) | q, | ||
| real, dimension(len,nd) | qs, | ||
| real, dimension(len,nd) | t_wake, | ||
| real, dimension(len,nd) | q_wake, | ||
| real, dimension(len,nd) | qs_wake, | ||
| real, dimension(len) | s_wake, | ||
| real, dimension(len,nd) | u, | ||
| real, dimension(len,nd) | v, | ||
| real, dimension(len,nd) | gz, | ||
| real, dimension(len,nd) | th, | ||
| real, dimension(len,nd) | th_wake, | ||
| real, dimension(len,nd,ntra) | tra, | ||
| real, dimension(len,nd) | h, | ||
| real, dimension(len,nd) | lv, | ||
| real, dimension(len,nd) | cpn, | ||
| real, dimension(len,nd) | p, | ||
| real, dimension(len,nd+1) | ph, | ||
| real, dimension(len,nd) | tv, | ||
| real, dimension(len,nd) | tp, | ||
| real, dimension(len,nd) | tvp, | ||
| real, dimension(len,nd) | clw, | ||
| real, dimension(len,nd) | h_wake, | ||
| real, dimension(len,nd) | lv_wake, | ||
| real, dimension(len,nd) | cpn_wake, | ||
| real, dimension(len,nd) | tv_wake, | ||
| real, dimension(len,nd) | sig, | ||
| real, dimension(len,nd) | w0, | ||
| real, dimension(len) | ptop2, | ||
| real, dimension(len) | Ale, | ||
| real, dimension(len) | Alp | ||
| ) |
Definition at line 1 of file cv3a_compress.F.
1.8.1.2