Parent Directory | Revision Log | Patch
trunk/Sources/phylmd/CV30_routines/cv3_trigger.f revision 184 by guez, Wed Mar 16 14:50:46 2016 UTC | trunk/Sources/phylmd/CV30_routines/cv30_trigger.f revision 185 by guez, Wed Mar 16 15:04:46 2016 UTC | |
---|---|---|
# | Line 1 | Line 1 |
1 | ||
2 | SUBROUTINE cv3_trigger(len,nd,icb,plcl,p,th,tv,tvp & | SUBROUTINE cv30_trigger(len,nd,icb,plcl,p,th,tv,tvp & |
3 | ,pbase,buoybase,iflag,sig,w0) | ,pbase,buoybase,iflag,sig,w0) |
4 | use cv3_param_m | use cv30_param_m |
5 | implicit none | implicit none |
6 | ||
7 | !------------------------------------------------------------------- | !------------------------------------------------------------------- |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |